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

12 lines
184 B
Text

example : ∀ (p q : Prop), p → q → p :=
begin
intros p p h1 h2,
exact h2,
end
example : ∀ (p q : Prop), p → q → p :=
begin
intros p p h1 h2,
dedup,
exact h2,
end