test(tests/lean/run): add test for performance issue reported in the lean group
This commit is contained in:
parent
6e3959de2f
commit
7794ecfb69
1 changed files with 12 additions and 0 deletions
12
tests/lean/run/even.lean
Normal file
12
tests/lean/run/even.lean
Normal file
|
|
@ -0,0 +1,12 @@
|
|||
open nat
|
||||
|
||||
def even : nat → bool
|
||||
| 0 := tt
|
||||
| (succ 0) := ff
|
||||
| (succ (succ n)) := even n
|
||||
|
||||
vm_eval even 0
|
||||
vm_eval even 1
|
||||
vm_eval even 2
|
||||
vm_eval even 10000
|
||||
vm_eval even 10001
|
||||
Loading…
Add table
Reference in a new issue