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

7 lines
114 B
Text

exit
variables {P Q R : Prop}
theorem foo (H : P → Q → R) (x : P) : Q → R :=
begin
apply H,
exact x
end