---

Step * 1 1 2 of Lemma finite'_functionality_wrt_equipollent


1. [A] : Type
2. [B] : Type
3. f : A ⟶ B
4. Inj(A;B;f)
5. ∀b:B. ∃a:A. ((f a) = b ∈ B)
6. ∀f:A ⟶ A. (Inj(A;A;f) ⇒ Surj(A;A;f))
7. g : B ⟶ B
8. Inj(B;B;g)
9. h : b:B ⟶ A
10. ∀b:B. ((f (h b)) = b ∈ B)
11. Inj(B;A;h)
⊢ Inj(A;A;(h o g) o f)
BY
{ (All (Unfold `inject`)
   THEN Auto
   THEN RepUR ``compose`` -1
   THEN BackThruSomeHyp⋅
   THEN OnMaybeHyp 8 (\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:A  {}\mrightarrow{}  A.  (Inj(A;A;f)  {}\mRightarrow{}  Surj(A;A;f))
7.  g  :  B  {}\mrightarrow{}  B
8.  Inj(B;B;g)
9.  h  :  b:B  {}\mrightarrow{}  A
10.  \mforall{}b:B.  ((f  (h  b))  =  b)
11.  Inj(B;A;h)
\mvdash{}  Inj(A;A;(h  o  g)  o  f)


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