---

Step * 1 1 1 1 1 1 of Lemma band-sqequal-inl


1. a : Base
2. b : Base
3. c : Base
4. a ∧b b ~ inl c
5. (a ∧b b)↓
6. a ∈ Top + Top
7. x : Top@i
8. a = (inl x) ∈ (Top + Top)
9. ∀a@0,b:Base.  (a@0 ~ b)
⊢ inl x ~ inr ⊥ 
BY
{ (InstLemma `not_all_sqequal` [] THEN (UnivCD THENA Auto)) }

1
1. a : Base
2. b : Base
3. c : Base
4. a ∧b b ~ inl c
5. (a ∧b b)↓
6. a ∈ Top + Top
7. x : Top@i
8. a = (inl x) ∈ (Top + Top)
9. ∀a@0,b:Base.  (a@0 ~ b)
10. a1 : Base
11. b1 : Base
⊢ a1 ~ b1

2
1. a : Base
2. b : Base
3. c : Base
4. a ∧b b ~ inl c
5. (a ∧b b)↓
6. a ∈ Top + Top
7. x : Top@i
8. a = (inl x) ∈ (Top + Top)
9. ∀a@0,b:Base.  (a@0 ~ b)
10. False
⊢ inl x ~ inr ⊥ 

---

Latex:

---

Latex:

1.  a  :  Base
2.  b  :  Base
3.  c  :  Base
4.  a  \mwedge{}\msubb{}  b  \msim{}  inl  c
5.  (a  \mwedge{}\msubb{}  b)\mdownarrow{}
6.  a  \mmember{}  Top  +  Top
7.  x  :  Top@i
8.  a  =  (inl  x)
9.  \mforall{}a@0,b:Base.    (a@0  \msim{}  b)
\mvdash{}  inl  x  \msim{}  inr  \mbot{} 


By

---

Latex:
(InstLemma  `not\_all\_sqequal`  []  THEN  (UnivCD  THENA  Auto))

---

Home Index