-- | eliminate trailing zeros
formatF :: (RealFloat a) => Int -> a -> String
formatF i = unpack . toLazyText . formatRealFloat Fixed (Just i)
formatF :: (RealFloat a) => Int -> a -> String
formatF i = unpack . toLazyText . formatRealFloat Fixed (Just i)
formatF i = unpack . toLazyText . formatRealFloat Fixed (Just i)