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

8 lines
190 B
Text

exit
example (a b : Prop) : a ∧ b → b ∧ a :=
begin
intro Hab,
have Ha : a, from and.elim_left Hab,
have Hb : b, from and.elim_right Hab,
show b ∧ a, from and.intro _ Ha
end