9 lines
141 B
Text
9 lines
141 B
Text
#lang lean4
|
|
|
|
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)
|