printFloat :: Float -> Int -> String
printFloat f i = printf ("%."++show i++"f") f
printFloat :: Float -> Int -> String
printFloat f i = printf ("%."++show i++"f") f
printFloat f i = printf ("%."++show i++"f") f