2013-12-01 15:44:49 +00:00
|
|
|
|
Set: pp::colors
|
|
|
|
|
Set: pp::unicode
|
|
|
|
|
Proved: T
|
2014-01-05 20:05:08 +00:00
|
|
|
|
theorem T (a b : Bool) : a ∨ b ⇒ ¬ b ⇒ a :=
|
2013-12-29 10:44:49 +00:00
|
|
|
|
Discharge (λ H : a ∨ b, Discharge (λ H::1 : ¬ b, DisjCases H (λ H : a, H) (λ H : b, AbsurdElim a H H::1)))
|