lean4-htt/tests/lean/run/specialize2.lean
Leonardo de Moura 5caf1bc692 chore: style
Use `·` instead of `.` for structuring tactics.
2022-03-11 16:12:46 -08:00

11 lines
328 B
Text
Raw Blame History

This file contains ambiguous Unicode characters

This file contains Unicode characters that might be confused with other characters. If you think that this is intentional, you can safely ignore this warning. Use the Escape button to reveal them.

example : (p → q → False) ↔ (¬ p ¬ q) := by
apply Iff.intro
· intro h
by_cases hp:p <;> by_cases hq:q
· specialize h hp hq; contradiction
· exact Or.inr hq
· exact Or.inl hp
· exact Or.inr hq
· intro
| Or.inl hnp => intros; contradiction
| Or.inr hnq => intros; contradiction