---

Step * of Lemma Q-R-glues-property

∀[Info:Type]. ∀[es:EO+(Info)]. ∀[Qa,Rb:E ─→ E ─→ ℙ]. ∀[A,B:Type]. ∀[Ia:EClass(A)]. ∀[Ib:EClass(B)]. ∀[f:E(Ia) ─→ B].
∀[g:E(Ib) ─→ E].
  g ∈ E(Ib) ─→ E(Ia) supposing g glues Ia:Qa ──f─→ Ib:Rb
BY
{ (Repeat ((D 0 THENA Auto))
   THEN (D (-1))
   THEN D -2
   THEN ((FLemma `weak-antecedent-surjection-property` [-3]) THENA Auto)
   THEN All es_pred_rewrite
   THEN Auto) }

---

Latex:

---

Latex:
\mforall{}[Info:Type].  \mforall{}[es:EO+(Info)].  \mforall{}[Qa,Rb:E  {}\mrightarrow{}  E  {}\mrightarrow{}  \mBbbP{}].  \mforall{}[A,B:Type].  \mforall{}[Ia:EClass(A)].  \mforall{}[Ib:EClass(B)].
\mforall{}[f:E(Ia)  {}\mrightarrow{}  B].  \mforall{}[g:E(Ib)  {}\mrightarrow{}  E].
    g  \mmember{}  E(Ib)  {}\mrightarrow{}  E(Ia)  supposing  g  glues  Ia:Qa  {}{}f{}\mrightarrow{}  Ib:Rb


By

---

Latex:
(Repeat  ((D  0  THENA  Auto))
  THEN  (D  (-1))
  THEN  D  -2
  THEN  ((FLemma  `weak-antecedent-surjection-property`  [-3])  THENA  Auto)
  THEN  All  es\_pred\_rewrite
  THEN  Auto)

---

Home Index