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

13 lines
289 B
Text

exit
example (a b c : Prop) : a ∧ b ↔ b ∧ a :=
begin
apply iff.intro,
{intro H,
match H with
| and.intro H₁ H₂ := by apply and.intro; repeat assumption
end},
{intro H,
match H with
| and.intro H₁ H₂ := by apply and.intro; repeat assumption
end},
end