---

Step * 1 2 of Lemma isect_functionality_wrt_equipollent_dependent


1. A : Type
2. B : Type
3. C : A ⟶ Type
4. D : B ⟶ Type
5. f : A ⟶ B
6. a : A
7. Bij(A;B;f)
8. h : ∀[a:A]. ∃f@0:C[a] ⟶ D[f a]. Bij(C[a];D[f a];f@0)
9. v : ⋂a:A. C[a]
10. b : B
⊢ (fst(h)) v ∈ D[b]
BY
{ ((FLemma `biject-inverse` [-4] THENA Auto)
   THEN ExRepD
   THEN (InstHyp [⌜b⌝] (-2)⋅ THENA Auto)
   THEN (With ⌜g b⌝ (D (-7))⋅ THENA Auto)
   THEN (With ⌜g b⌝ (D (-8))⋅ THENA Auto)
   THEN All(RepUR ``exists``)
   THEN DProdsAndUnions
   THEN SimpEqPairs
   THEN Assert ⌜f@0 y1 ∈ D[b]⌝⋅
   THEN Auto) }

---

Latex:

---

Latex:

1.  A  :  Type
2.  B  :  Type
3.  C  :  A  {}\mrightarrow{}  Type
4.  D  :  B  {}\mrightarrow{}  Type
5.  f  :  A  {}\mrightarrow{}  B
6.  a  :  A
7.  Bij(A;B;f)
8.  h  :  \mforall{}[a:A].  \mexists{}f@0:C[a]  {}\mrightarrow{}  D[f  a].  Bij(C[a];D[f  a];f@0)
9.  v  :  \mcap{}a:A.  C[a]
10.  b  :  B
\mvdash{}  (fst(h))  v  \mmember{}  D[b]


By

---

Latex:
((FLemma  `biject-inverse`  [-4]  THENA  Auto)
  THEN  ExRepD
  THEN  (InstHyp  [\mkleeneopen{}b\mkleeneclose{}]  (-2)\mcdot{}  THENA  Auto)
  THEN  (With  \mkleeneopen{}g  b\mkleeneclose{}  (D  (-7))\mcdot{}  THENA  Auto)
  THEN  (With  \mkleeneopen{}g  b\mkleeneclose{}  (D  (-8))\mcdot{}  THENA  Auto)
  THEN  All(RepUR  ``exists``)
  THEN  DProdsAndUnions
  THEN  SimpEqPairs
  THEN  Assert  \mkleeneopen{}f@0  y1  \mmember{}  D[b]\mkleeneclose{}\mcdot{}
  THEN  Auto)

---

Home Index