---

Step * of Lemma fpf-compatible-singles-trivial

∀[A:Type]. ∀[eq:EqDecider(A)]. ∀[B:Top]. ∀[x,y:A]. ∀[v,u:Top].  x : v || y : u supposing ¬(x = y ∈ A)
BY
{ xxx((UnivCD THENA Auto)
      THEN RepeatFor 2 ((D 0 THENA Auto))
      THEN D -3
      THEN (RepUR ``fpf-dom fpf-single eqof`` (-1))
      THEN (RW assert_pushdownC (-1))
      THEN Auto
      THEN SplitOrHyps
      THEN Auto)xxx }

---

Latex:

---

Latex:
\mforall{}[A:Type].  \mforall{}[eq:EqDecider(A)].  \mforall{}[B:Top].  \mforall{}[x,y:A].  \mforall{}[v,u:Top].    x  :  v  ||  y  :  u  supposing  \mneg{}(x  =  y)


By

---

Latex:
xxx((UnivCD  THENA  Auto)
        THEN  RepeatFor  2  ((D  0  THENA  Auto))
        THEN  D  -3
        THEN  (RepUR  ``fpf-dom  fpf-single  eqof``  (-1))
        THEN  (RW  assert\_pushdownC  (-1))
        THEN  Auto
        THEN  SplitOrHyps
        THEN  Auto)xxx

---

Home Index