lean4-htt/tests/lean/run/reduce2.lean
2021-01-27 14:45:31 +01:00

8 lines
129 B
Text

def fact : Nat → Nat
| 0 => 1
| (n+1) => (n+1)*fact n
def v1 := fact 10
theorem v1Eq : v1 = fact 10 :=
Eq.refl (fact 10)