lean4-htt/tests/lean/run/454.lean
2016-06-10 18:29:41 -07:00

7 lines
153 B
Text

exit
constants (A : Type₁) (P : A → Type₁) (H : Π{a b : A}, P a → P b) (a b : A) (K : P a)
theorem foo : P b :=
begin
apply H, {apply K}
end