test(tests/lean/run): add example for constructive choice
This commit is contained in:
parent
e9c8de7bdf
commit
9812cfe906
1 changed files with 12 additions and 0 deletions
12
tests/lean/run/choose_test.lean
Normal file
12
tests/lean/run/choose_test.lean
Normal file
|
@ -0,0 +1,12 @@
|
|||
import data.encodable
|
||||
open nat encodable
|
||||
|
||||
theorem ex : ∃ x, x > 3 :=
|
||||
exists.intro 6 dec_trivial
|
||||
|
||||
reveal ex
|
||||
|
||||
eval choose ex
|
||||
|
||||
example : choose ex = 4 :=
|
||||
rfl
|
Loading…
Reference in a new issue