Modulelinear-base-0.8.1
Data.Arity.Linear
- 1 type
- 1 class
- 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
:: a typeCtrl KGHC 10.0.0.20260917 · lts/ghc-10.0.x · fc4e598 · 2026-10-11
Modulelinear-base-0.8.1
NatToPeano 0
= 'ZNatToPeano n = 'S (NatToPeano (n - 1
))PeanoToNat 'Z = 0
PeanoToNat ('S n) = 1
+ PeanoToNat n