---

Step * 1 1 of Lemma coW-equiv-iff2


1. [A] : 𝕌'
2. B : A ⟶ Type
3. w : coW(A;a.B[a])
4. w' : coW(A;a.B[a])
5. coW-equiv(a.B[a];w;w')
6. p1 : coPath(a.B[a];w';0)
⊢ ∃q:copath(a.B[a];w). ((copath-length(q) = 0 ∈ ℤ) ∧ coW-equiv(a.B[a];coPath-at(0;w';p1);copath-at(w;q)))
BY
{ ((D 0 With ⌜()⌝  THEN Auto) THEN RepUR ``copath-at coPath-at`` 0 THEN EAuto 1) }

---

Latex:

---

Latex:

1.  [A]  :  \mBbbU{}'
2.  B  :  A  {}\mrightarrow{}  Type
3.  w  :  coW(A;a.B[a])
4.  w'  :  coW(A;a.B[a])
5.  coW-equiv(a.B[a];w;w')
6.  p1  :  coPath(a.B[a];w';0)
\mvdash{}  \mexists{}q:copath(a.B[a];w)
      ((copath-length(q)  =  0)  \mwedge{}  coW-equiv(a.B[a];coPath-at(0;w';p1);copath-at(w;q)))


By

---

Latex:
((D  0  With  \mkleeneopen{}()\mkleeneclose{}    THEN  Auto)  THEN  RepUR  ``copath-at  coPath-at``  0  THEN  EAuto  1)

---

Home Index