---

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
{ ((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) }

---

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:
((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)

---

Home Index