module Types.Data.Num.Decimal.Digits
where
import Data.Typeable
import Types.Data.List
import Types.Data.Num.Ops
data Decimal
decimal = undefined :: Decimal
data Dec x
data Neg' x
data DecN
instance Show DecN where
show _ = ""
data Dec0 deriving (Typeable)
instance Show Dec0 where
show _ = "0"
data Dec1 deriving (Typeable)
instance Show Dec1 where
show _ = "1"
data Dec2 deriving (Typeable)
instance Show Dec2 where
show _ = "2"
data Dec3 deriving (Typeable)
instance Show Dec3 where
show _ = "3"
data Dec4 deriving (Typeable)
instance Show Dec4 where
show _ = "4"
data Dec5 deriving (Typeable)
instance Show Dec5 where
show _ = "5"
data Dec6 deriving (Typeable)
instance Show Dec6 where
show _ = "6"
data Dec7 deriving (Typeable)
instance Show Dec7 where
show _ = "7"
data Dec8 deriving (Typeable)
instance Show Dec8 where
show _ = "8"
data Dec9 deriving (Typeable)
instance Show Dec9 where
show _ = "9"