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

12 lines
258 B
Text

exit
import logic
example (a b : Prop) : a ∧ b → b ∧ a :=
begin
intros, rewrite and.comm, assumption
end
example (a b c : Prop) : a ∧ b ∧ c → b ∧ a ∧ c :=
begin
intros, rewrite [-and.assoc, {b ∧ a}and.comm, and.assoc], assumption
end