lean4-htt/doc/examples/Certora2022/ex19.lean
2022-11-21 17:02:28 -08:00

10 lines
313 B
Text

/- Tactic combinators -/
example : p → q → r → p ∧ ((p ∧ q) ∧ r) ∧ (q ∧ r ∧ p) := by
intros
repeat (any_goals constructor)
all_goals assumption
example : p → q → r → p ∧ ((p ∧ q) ∧ r) ∧ (q ∧ r ∧ p) := by
intros
repeat (any_goals (first | assumption | constructor))