Step
*
of Lemma
sp-join_wf
∀[f,g:Sierpinski].  (f ∨ g ∈ Sierpinski)
BY
{ TACTIC:(Auto THEN D 1 THEN D -1 THEN Unfold `sp-join` 0 THEN EqTypeCD THEN Auto) }
1
1. f : Base
2. f1 : Base
3. f = f1 ∈ pertype(λf,g. ((f ∈ ℕ ⟶ 𝔹) ∧ (g ∈ ℕ ⟶ 𝔹) ∧ (f = ⊥ ∈ (ℕ ⟶ 𝔹) 
⇐⇒ g = ⊥ ∈ (ℕ ⟶ 𝔹))))
4. f ∈ ℕ ⟶ 𝔹
5. f1 ∈ ℕ ⟶ 𝔹
6. (f = ⊥ ∈ (ℕ ⟶ 𝔹)) 
⇒ (f1 = ⊥ ∈ (ℕ ⟶ 𝔹))
7. (f = ⊥ ∈ (ℕ ⟶ 𝔹)) 
⇐ f1 = ⊥ ∈ (ℕ ⟶ 𝔹)
8. g : Base
9. g1 : Base
10. g = g1 ∈ pertype(λf,g. ((f ∈ ℕ ⟶ 𝔹) ∧ (g ∈ ℕ ⟶ 𝔹) ∧ (f = ⊥ ∈ (ℕ ⟶ 𝔹) 
⇐⇒ g = ⊥ ∈ (ℕ ⟶ 𝔹))))
11. g ∈ ℕ ⟶ 𝔹
12. g1 ∈ ℕ ⟶ 𝔹
13. (g = ⊥ ∈ (ℕ ⟶ 𝔹)) 
⇒ (g1 = ⊥ ∈ (ℕ ⟶ 𝔹))
14. (g = ⊥ ∈ (ℕ ⟶ 𝔹)) 
⇐ g1 = ⊥ ∈ (ℕ ⟶ 𝔹)
15. (λn.((f n) ∨b(g n))) = ⊥ ∈ (ℕ ⟶ 𝔹)
⊢ (λn.((f1 n) ∨b(g1 n))) = ⊥ ∈ (ℕ ⟶ 𝔹)
2
1. f : Base
2. f1 : Base
3. f = f1 ∈ pertype(λf,g. ((f ∈ ℕ ⟶ 𝔹) ∧ (g ∈ ℕ ⟶ 𝔹) ∧ (f = ⊥ ∈ (ℕ ⟶ 𝔹) 
⇐⇒ g = ⊥ ∈ (ℕ ⟶ 𝔹))))
4. f ∈ ℕ ⟶ 𝔹
5. f1 ∈ ℕ ⟶ 𝔹
6. (f = ⊥ ∈ (ℕ ⟶ 𝔹)) 
⇒ (f1 = ⊥ ∈ (ℕ ⟶ 𝔹))
7. (f = ⊥ ∈ (ℕ ⟶ 𝔹)) 
⇐ f1 = ⊥ ∈ (ℕ ⟶ 𝔹)
8. g : Base
9. g1 : Base
10. g = g1 ∈ pertype(λf,g. ((f ∈ ℕ ⟶ 𝔹) ∧ (g ∈ ℕ ⟶ 𝔹) ∧ (f = ⊥ ∈ (ℕ ⟶ 𝔹) 
⇐⇒ g = ⊥ ∈ (ℕ ⟶ 𝔹))))
11. g ∈ ℕ ⟶ 𝔹
12. g1 ∈ ℕ ⟶ 𝔹
13. (g = ⊥ ∈ (ℕ ⟶ 𝔹)) 
⇒ (g1 = ⊥ ∈ (ℕ ⟶ 𝔹))
14. (g = ⊥ ∈ (ℕ ⟶ 𝔹)) 
⇐ g1 = ⊥ ∈ (ℕ ⟶ 𝔹)
15. (λn.((f1 n) ∨b(g1 n))) = ⊥ ∈ (ℕ ⟶ 𝔹)
⊢ (λn.((f n) ∨b(g n))) = ⊥ ∈ (ℕ ⟶ 𝔹)
Latex:
Latex:
\mforall{}[f,g:Sierpinski].    (f  \mvee{}  g  \mmember{}  Sierpinski)
By
Latex:
TACTIC:(Auto  THEN  D  1  THEN  D  -1  THEN  Unfold  `sp-join`  0  THEN  EqTypeCD  THEN  Auto)
Home
Index