Modulelinear-base-0.8.1
Data.Arity.Linear
Synopsis
- family Arity
- family FunN
- class IsFunN
- family NatToPeano
- data Peano
- family PeanoToNat
- Packagelinear-base-0.8.1
- Exports6
- LicenceMIT
Equations
NatToPeano0
= 'ZNatToPeano n = 'S (NatToPeano (n -1
))
Equations
PeanoToNat 'Z =0
PeanoToNat ('S n) =1
+ PeanoToNat n