2014-01-06 05:39:31 +00:00
|
|
|
|
Set: pp::colors
|
|
|
|
|
Set: pp::unicode
|
|
|
|
|
Assumed: p
|
|
|
|
|
λ (a b c : Bool)
|
|
|
|
|
(p : ℕ → ℕ → Bool)
|
|
|
|
|
(n m : ℕ)
|
2014-01-08 08:38:39 +00:00
|
|
|
|
(H : a → b → (∀ (x y : ℕ), c → p (x + n) (x + m)))
|
2014-01-06 05:39:31 +00:00
|
|
|
|
(Ha : a)
|
|
|
|
|
(Hb : b)
|
|
|
|
|
(Hc : c),
|
2014-01-08 08:38:39 +00:00
|
|
|
|
H Ha Hb 0 1 Hc :
|
|
|
|
|
∀ (a b c : Bool) (p : ℕ → ℕ → Bool) (n m : ℕ),
|
|
|
|
|
(a → b → (∀ (x y : ℕ), c → p (x + n) (x + m))) → a → b → c → p (0 + n) (0 + m)
|