/usr/web/sources/contrib/fernan/nhc98/src/prelude/Numeric/ShowEFloat.hs

Plan 9 from Bell Labs’s /usr/web/sources/contrib/fernan/nhc98/src/prelude/Numeric/ShowEFloat.hs


module Numeric (showEFloat) where

import FFFormat
import FormatRealFloat

showEFloat     :: (RealFloat a) => Maybe Int -> a -> ShowS
showEFloat d x =  showString (formatRealFloat FFExponent d x)

(Return to Plan 9 Home Page)