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

2 lines
150 B
Text

example (p q r s : Prop) : p → q → r → s → (p ∧ q) ∧ (r ∧ s ∧ p) ∧ (p ∧ r ∧ q) :=
by intros; repeat { constructor }; assumption