Pantograph/examples/Example/Example.lean

14 lines
222 B
Plaintext
Raw Normal View History

2024-05-17 20:45:29 -07:00
import Aesop
2024-05-17 20:53:34 -07:00
-- Ensure that Aesop is running
example : αα :=
by aesop
2024-05-28 20:35:47 -07:00
example : ∀ (p q: Prop), p q → q p := by
intro p q h
cases h
. apply Or.inr
assumption
. apply Or.inl
assumption