---

Step * 1 1 2 of Lemma glues-iff


1. [Info] : Type
2. es : EO+(Info)@i'
3. [A] : Type
4. [B] : Type
5. Ia : EClass(A)@i'
6. Ib : EClass(B)@i'
7. f : E(Ia) ─→ B@i
8. g : E(Ib) ─→ E(Ia)@i
9. {Ia} ←←= g== {Ib}@i
10. g is λe,e'. e ≤loc e' -λe,e'. e ≤loc e' -pre-preserving on {Ib}@i
11. Inj(E(Ib);E;g)@i
12. ∀e:E(Ib). ((f (g e)) = Ib(e) ∈ B)@i
⊢ Surj(E(Ib);E(Ia);g)
BY
{ ((D (-4) THEN RepUR ``es-interface-predicate`` -4)
   THEN Fold `es-E-interface` (-4)
   THEN UnfoldTopAb 0
   THEN (ParallelOp -4 THENA Auto)
   THEN ParallelLast
   THEN Auto) }

---

Latex:

---

Latex:

1.  [Info]  :  Type
2.  es  :  EO+(Info)@i'
3.  [A]  :  Type
4.  [B]  :  Type
5.  Ia  :  EClass(A)@i'
6.  Ib  :  EClass(B)@i'
7.  f  :  E(Ia)  {}\mrightarrow{}  B@i
8.  g  :  E(Ib)  {}\mrightarrow{}  E(Ia)@i
9.  \{Ia\}  \mleftarrow{}\mleftarrow{}=  g==  \{Ib\}@i
10.  g  is  \mlambda{}e,e'.  e  \mleq{}loc  e'  -\mlambda{}e,e'.  e  \mleq{}loc  e'  -pre-preserving  on  \{Ib\}@i
11.  Inj(E(Ib);E;g)@i
12.  \mforall{}e:E(Ib).  ((f  (g  e))  =  Ib(e))@i
\mvdash{}  Surj(E(Ib);E(Ia);g)


By

---

Latex:
((D  (-4)  THEN  RepUR  ``es-interface-predicate``  -4)
  THEN  Fold  `es-E-interface`  (-4)
  THEN  UnfoldTopAb  0
  THEN  (ParallelOp  -4  THENA  Auto)
  THEN  ParallelLast
  THEN  Auto)

---

Home Index