Compare commits
2 Commits
b44ffb282a
...
bc7565a1f7
Author | SHA1 | Date | |
---|---|---|---|
bc7565a1f7 | |||
4d940fb59b |
1
test.hm
1
test.hm
|
@ -6,7 +6,6 @@ type Nat
|
||||||
-- which will bring a recursor for the type into scope
|
-- which will bring a recursor for the type into scope
|
||||||
-- rec[Nat] : A → (A → A) → Nat → A
|
-- rec[Nat] : A → (A → A) → Nat → A
|
||||||
|
|
||||||
|
|
||||||
-- defining addition as
|
-- defining addition as
|
||||||
add : Nat → Nat → Nat
|
add : Nat → Nat → Nat
|
||||||
:= rec[Nat] (λx. x) (λf n. succ (f n))
|
:= rec[Nat] (λx. x) (λf n. succ (f n))
|
||||||
|
|
Loading…
Reference in New Issue
Block a user