Step * 2 1 2 of Lemma finite'_functionality_wrt_equipollent


1. [A] Type
2. [B] Type
3. A ⟶ B
4. Inj(A;B;f)
5. ∀b:B. ∃a:A. ((f a) b ∈ B)
6. ∀f:B ⟶ B. (Inj(B;B;f)  Surj(B;B;f))
7. A ⟶ A
8. Inj(A;A;g)
9. b:B ⟶ A
10. ∀b:B. ((f (h b)) b ∈ B)
11. Inj(B;A;h)
⊢ Inj(B;B;(f g) h)
BY
(All (Unfold `inject`)
   THEN Auto
   THEN RepUR ``compose`` -1
   THEN BackThruSomeHyp⋅
   THEN OnMaybeHyp (\h. ((BHyp h  THENA Auto) THEN Auto')))⋅ }


Latex:


Latex:

1.  [A]  :  Type
2.  [B]  :  Type
3.  f  :  A  {}\mrightarrow{}  B
4.  Inj(A;B;f)
5.  \mforall{}b:B.  \mexists{}a:A.  ((f  a)  =  b)
6.  \mforall{}f:B  {}\mrightarrow{}  B.  (Inj(B;B;f)  {}\mRightarrow{}  Surj(B;B;f))
7.  g  :  A  {}\mrightarrow{}  A
8.  Inj(A;A;g)
9.  h  :  b:B  {}\mrightarrow{}  A
10.  \mforall{}b:B.  ((f  (h  b))  =  b)
11.  Inj(B;A;h)
\mvdash{}  Inj(B;B;(f  o  g)  o  h)


By


Latex:
(All  (Unfold  `inject`)
  THEN  Auto
  THEN  RepUR  ``compose``  -1
  THEN  BackThruSomeHyp\mcdot{}
  THEN  OnMaybeHyp  8  (\mbackslash{}h.  ((BHyp  h    THENA  Auto)  THEN  Auto')))\mcdot{}




Home Index