lean4-htt/old_tests/tests/lean/run/over3.lean
2018-04-10 12:56:55 -07:00

7 lines
197 B
Text

constant foo.f {A B : Type} : (A → B) → (B → A)
constant bla.f {A : Type} : (A → nat) → (A → nat)
open foo bla
noncomputable example : nat → bool :=
f (λ b, bool.cases_on b 0 1)