Step
*
2
1
2
1
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. Bij(E(Ib);E(Ia);g)@i
10. ∀e:E(Ib). g e c≤ e@i
11. ∀e,e':E(Ib).  (g e ≤loc g e'  
⇒ e ≤loc e' )@i
12. ∀e:E(Ib). ((f (g e)) = Ib(e) ∈ B)@i
⊢ Inj(E(Ib);E;g)
BY
{ (D (-4) THEN (RepeatFor 2 (ParallelOp (-5)) THENA Auto) THEN (ParallelLast THEN Auto) THEN D -2 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.  Bij(E(Ib);E(Ia);g)@i
10.  \mforall{}e:E(Ib).  g  e  c\mleq{}  e@i
11.  \mforall{}e,e':E(Ib).    (g  e  \mleq{}loc  g  e'    {}\mRightarrow{}  e  \mleq{}loc  e'  )@i
12.  \mforall{}e:E(Ib).  ((f  (g  e))  =  Ib(e))@i
\mvdash{}  Inj(E(Ib);E;g)
By
Latex:
(D  (-4)
  THEN  (RepeatFor  2  (ParallelOp  (-5))  THENA  Auto)
  THEN  (ParallelLast  THEN  Auto)
  THEN  D  -2
  THEN  Auto)\mcdot{}
Home
Index