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

6 lines
151 B
Text

exit
example (a b c : Prop) : a ∧ b → b ∧ a :=
begin
intro H,
repeat (apply or.elim H | apply and.elim H | intro H | split | assumption)
end