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

11 lines
201 B
Text

variables {a r : Type}
definition f (a) := Πr, (a -> r) -> r
lemma blah2 (sa : f a) (k : (a -> r)) :
sa r k = sa r k :=
sorry
lemma blah3 (sa : f a) (k : (a -> r)) :
sa r k = sa r k :=
rfl