lean2/tests/lean/whnf.lean

9 lines
136 B
Text
Raw Normal View History

open nat
eval [whnf] (fun x, x + 1) (2:nat)
eval (fun x, x + 1) (2:nat)
variable a : nat
eval [whnf] a + succ zero
eval a + succ zero