lean4-htt/tests/lean/run/noncomp.lean

7 lines
159 B
Text

noncomputable def foo : Nat := Classical.choose (show ∃ x, x = 1 from ⟨1, rfl⟩)
structure Bar (n : Nat) :=
x : Nat
def baz : Bar foo :=
{ x := 1 }