Functional Programming, Formal Methods.
-> Z -- Inductive Nats INat : CNat -> Set INat = λn -> (P : CNat -> *) -> ((n:CNat) -> P n -> P (CSucc n)) -> (P CZero) -> P n ISucc : (n : CNat) -> INat n -> INat (CSucc n) ISucc = λn -> λi -> λP -> λS -> λZ -> S n (i P S Z) IZero : INat CZero IZero = λP -> λS -> λZ -> Z -- Actuall Nat type is the