Plan 9 from Bell Labs’s /usr/web/sources/contrib/fernan/nhc98/src/prelude/Numeric/ShowFFloat.hs
module Numeric (showFFloat) where import FFFormat import FormatRealFloat showFFloat :: (RealFloat a) => Maybe Int -> a -> ShowS showFFloat d x = showString (formatRealFloat FFFixed d x)
