---

Step * 2 1 of Lemma type-separation


1. x : Base
2. y : Base
3. (x)↓ ∨ is-exception(x)
4. (y)↓ ∨ is-exception(y)
5. ∀n,m:ℤ. ∀T:Type.  ((x = n ∈ T) ⇒ (y = m ∈ T) ⇒ (x = y ∈ T))
6. n : ℤ
7. m : ℤ
8. ¬(n = m ∈ ℤ)
9. ¬(x = m ∈ Base)
10. ¬(y = n ∈ Base)
11. ∀T:Type. ((x = n ∈ T) ⇒ (y = m ∈ T) ⇒ (x = y ∈ T))
⊢ x = y ∈ Base
BY
{ ((Assert ¬(n = m ∈ Base) BY
          (ParallelOp -4 THEN HypSubst' (-1) 0 THEN Auto))
   THEN (InstHyp [⌜EquatePairs(x;n;y;m)⌝] (-2)⋅ THENA (Auto THEN BLemma `EquatePairs-equality` THEN Auto))
   ) }

1
1. x : Base
2. y : Base
3. (x)↓ ∨ is-exception(x)
4. (y)↓ ∨ is-exception(y)
5. ∀n,m:ℤ. ∀T:Type.  ((x = n ∈ T) ⇒ (y = m ∈ T) ⇒ (x = y ∈ T))
6. n : ℤ
7. m : ℤ
8. ¬(n = m ∈ ℤ)
9. ¬(x = m ∈ Base)
10. ¬(y = n ∈ Base)
11. ∀T:Type. ((x = n ∈ T) ⇒ (y = m ∈ T) ⇒ (x = y ∈ T))
12. ¬(n = m ∈ Base)
13. x = y ∈ EquatePairs(x;n;y;m)
⊢ x = y ∈ Base

---

Latex:

---

Latex:

1.  x  :  Base
2.  y  :  Base
3.  (x)\mdownarrow{}  \mvee{}  is-exception(x)
4.  (y)\mdownarrow{}  \mvee{}  is-exception(y)
5.  \mforall{}n,m:\mBbbZ{}.  \mforall{}T:Type.    ((x  =  n)  {}\mRightarrow{}  (y  =  m)  {}\mRightarrow{}  (x  =  y))
6.  n  :  \mBbbZ{}
7.  m  :  \mBbbZ{}
8.  \mneg{}(n  =  m)
9.  \mneg{}(x  =  m)
10.  \mneg{}(y  =  n)
11.  \mforall{}T:Type.  ((x  =  n)  {}\mRightarrow{}  (y  =  m)  {}\mRightarrow{}  (x  =  y))
\mvdash{}  x  =  y


By

---

Latex:
((Assert  \mneg{}(n  =  m)  BY
                (ParallelOp  -4  THEN  HypSubst'  (-1)  0  THEN  Auto))
  THEN  (InstHyp  [\mkleeneopen{}EquatePairs(x;n;y;m)\mkleeneclose{}]  (-2)\mcdot{}
              THENA  (Auto  THEN  BLemma  `EquatePairs-equality`  THEN  Auto)
              )
  )

---

Home Index