lean4-htt/tests/lean/run/def2.lean
2016-09-20 08:32:37 -07:00

5 lines
95 B
Text

definition plus (a b : nat) : nat :=
nat.rec_on a b (λ a' ih, nat.succ ih)
vm_eval plus 3 5