---

Step * 2 2 4 of Lemma equipollent-quotient

.....wf..... 
1. A : Type
2. E : A ⟶ A ⟶ 𝔹
3. EquivRel(A;x,y.↑(E x y))
4. {E ∈ (x,y:A//(↑(E x y))) ⟶ A ⟶ 𝔹}
5. Refl(A;x,y.↑(E x y))
6. Sym(A;x,y.↑(E x y))
7. Trans(A;x,y.↑(E x y))
⊢ istype(a:x,y:A//(↑(E x y)) × {b:A| ↑(E a b)} )
BY
{ (RepeatFor 4 (((D 0 ORELSE MemCD) THEN Try (Complete (Auto)))) THEN Unfold `guard` 4 THEN Auto) }

---

Latex:

---

Latex:
.....wf..... 
1.  A  :  Type
2.  E  :  A  {}\mrightarrow{}  A  {}\mrightarrow{}  \mBbbB{}
3.  EquivRel(A;x,y.\muparrow{}(E  x  y))
4.  \{E  \mmember{}  (x,y:A//(\muparrow{}(E  x  y)))  {}\mrightarrow{}  A  {}\mrightarrow{}  \mBbbB{}\}
5.  Refl(A;x,y.\muparrow{}(E  x  y))
6.  Sym(A;x,y.\muparrow{}(E  x  y))
7.  Trans(A;x,y.\muparrow{}(E  x  y))
\mvdash{}  istype(a:x,y:A//(\muparrow{}(E  x  y))  \mtimes{}  \{b:A|  \muparrow{}(E  a  b)\}  )


By

---

Latex:
(RepeatFor  4  (((D  0  ORELSE  MemCD)  THEN  Try  (Complete  (Auto))))  THEN  Unfold  `guard`  4  THEN  Auto)

---

Home Index