2013-12-01 18:41:05 +00:00
|
|
|
|
Set: pp::colors
|
|
|
|
|
Set: pp::unicode
|
|
|
|
|
Defined: f
|
|
|
|
|
Defined: g
|
|
|
|
|
Proved: T1
|
|
|
|
|
Defined: h
|
|
|
|
|
Proved: T2
|
2013-12-19 20:46:14 +00:00
|
|
|
|
Theorem T2 (a b : Bool) : h a b ⇒ f 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)))
|