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