lean2/tests/lean/run/choose_test.lean
2015-05-09 12:02:52 -07:00

12 lines
157 B
Text

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