MPE Home Metamath Proof Explorer < Previous   Next >
Nearby theorems
Mirrors  >  Home  >  MPE Home  >  Th. List  >  ptcmplem1 Structured version   Visualization version   GIF version

Theorem ptcmplem1 21761
Description: Lemma for ptcmp 21767. (Contributed by Mario Carneiro, 26-Aug-2015.)
Hypotheses
Ref Expression
ptcmp.1 𝑆 = (𝑘𝐴, 𝑢 ∈ (𝐹𝑘) ↦ ((𝑤𝑋 ↦ (𝑤𝑘)) “ 𝑢))
ptcmp.2 𝑋 = X𝑛𝐴 (𝐹𝑛)
ptcmp.3 (𝜑𝐴𝑉)
ptcmp.4 (𝜑𝐹:𝐴⟶Comp)
ptcmp.5 (𝜑𝑋 ∈ (UFL ∩ dom card))
Assertion
Ref Expression
ptcmplem1 (𝜑 → (𝑋 = (ran 𝑆 ∪ {𝑋}) ∧ (∏t𝐹) = (topGen‘(fi‘(ran 𝑆 ∪ {𝑋})))))
Distinct variable groups:   𝑘,𝑛,𝑢,𝑤,𝐴   𝑆,𝑘,𝑛,𝑢   𝜑,𝑘,𝑛,𝑢   𝑘,𝑉,𝑛,𝑢,𝑤   𝑘,𝐹,𝑛,𝑢,𝑤   𝑘,𝑋,𝑛,𝑢,𝑤
Allowed substitution hints:   𝜑(𝑤)   𝑆(𝑤)

Proof of Theorem ptcmplem1
Dummy variables 𝑔 𝑥 𝑦 𝑧 are mutually distinct and distinct from all other variables.
StepHypRef Expression
1 ptcmp.3 . . . . . . 7 (𝜑𝐴𝑉)
2 ptcmp.4 . . . . . . . 8 (𝜑𝐹:𝐴⟶Comp)
3 ffn 6004 . . . . . . . 8 (𝐹:𝐴⟶Comp → 𝐹 Fn 𝐴)
42, 3syl 17 . . . . . . 7 (𝜑𝐹 Fn 𝐴)
5 eqid 2626 . . . . . . . 8 {𝑥 ∣ ∃𝑔((𝑔 Fn 𝐴 ∧ ∀𝑦𝐴 (𝑔𝑦) ∈ (𝐹𝑦) ∧ ∃𝑧 ∈ Fin ∀𝑦 ∈ (𝐴𝑧)(𝑔𝑦) = (𝐹𝑦)) ∧ 𝑥 = X𝑦𝐴 (𝑔𝑦))} = {𝑥 ∣ ∃𝑔((𝑔 Fn 𝐴 ∧ ∀𝑦𝐴 (𝑔𝑦) ∈ (𝐹𝑦) ∧ ∃𝑧 ∈ Fin ∀𝑦 ∈ (𝐴𝑧)(𝑔𝑦) = (𝐹𝑦)) ∧ 𝑥 = X𝑦𝐴 (𝑔𝑦))}
65ptval 21278 . . . . . . 7 ((𝐴𝑉𝐹 Fn 𝐴) → (∏t𝐹) = (topGen‘{𝑥 ∣ ∃𝑔((𝑔 Fn 𝐴 ∧ ∀𝑦𝐴 (𝑔𝑦) ∈ (𝐹𝑦) ∧ ∃𝑧 ∈ Fin ∀𝑦 ∈ (𝐴𝑧)(𝑔𝑦) = (𝐹𝑦)) ∧ 𝑥 = X𝑦𝐴 (𝑔𝑦))}))
71, 4, 6syl2anc 692 . . . . . 6 (𝜑 → (∏t𝐹) = (topGen‘{𝑥 ∣ ∃𝑔((𝑔 Fn 𝐴 ∧ ∀𝑦𝐴 (𝑔𝑦) ∈ (𝐹𝑦) ∧ ∃𝑧 ∈ Fin ∀𝑦 ∈ (𝐴𝑧)(𝑔𝑦) = (𝐹𝑦)) ∧ 𝑥 = X𝑦𝐴 (𝑔𝑦))}))
8 cmptop 21103 . . . . . . . . . . 11 (𝑥 ∈ Comp → 𝑥 ∈ Top)
98ssriv 3592 . . . . . . . . . 10 Comp ⊆ Top
10 fss 6015 . . . . . . . . . 10 ((𝐹:𝐴⟶Comp ∧ Comp ⊆ Top) → 𝐹:𝐴⟶Top)
112, 9, 10sylancl 693 . . . . . . . . 9 (𝜑𝐹:𝐴⟶Top)
12 ptcmp.2 . . . . . . . . . 10 𝑋 = X𝑛𝐴 (𝐹𝑛)
135, 12ptbasfi 21289 . . . . . . . . 9 ((𝐴𝑉𝐹:𝐴⟶Top) → {𝑥 ∣ ∃𝑔((𝑔 Fn 𝐴 ∧ ∀𝑦𝐴 (𝑔𝑦) ∈ (𝐹𝑦) ∧ ∃𝑧 ∈ Fin ∀𝑦 ∈ (𝐴𝑧)(𝑔𝑦) = (𝐹𝑦)) ∧ 𝑥 = X𝑦𝐴 (𝑔𝑦))} = (fi‘({𝑋} ∪ ran (𝑘𝐴, 𝑢 ∈ (𝐹𝑘) ↦ ((𝑤𝑋 ↦ (𝑤𝑘)) “ 𝑢)))))
141, 11, 13syl2anc 692 . . . . . . . 8 (𝜑 → {𝑥 ∣ ∃𝑔((𝑔 Fn 𝐴 ∧ ∀𝑦𝐴 (𝑔𝑦) ∈ (𝐹𝑦) ∧ ∃𝑧 ∈ Fin ∀𝑦 ∈ (𝐴𝑧)(𝑔𝑦) = (𝐹𝑦)) ∧ 𝑥 = X𝑦𝐴 (𝑔𝑦))} = (fi‘({𝑋} ∪ ran (𝑘𝐴, 𝑢 ∈ (𝐹𝑘) ↦ ((𝑤𝑋 ↦ (𝑤𝑘)) “ 𝑢)))))
15 uncom 3740 . . . . . . . . . 10 (ran 𝑆 ∪ {𝑋}) = ({𝑋} ∪ ran 𝑆)
16 ptcmp.1 . . . . . . . . . . . 12 𝑆 = (𝑘𝐴, 𝑢 ∈ (𝐹𝑘) ↦ ((𝑤𝑋 ↦ (𝑤𝑘)) “ 𝑢))
1716rneqi 5316 . . . . . . . . . . 11 ran 𝑆 = ran (𝑘𝐴, 𝑢 ∈ (𝐹𝑘) ↦ ((𝑤𝑋 ↦ (𝑤𝑘)) “ 𝑢))
1817uneq2i 3747 . . . . . . . . . 10 ({𝑋} ∪ ran 𝑆) = ({𝑋} ∪ ran (𝑘𝐴, 𝑢 ∈ (𝐹𝑘) ↦ ((𝑤𝑋 ↦ (𝑤𝑘)) “ 𝑢)))
1915, 18eqtri 2648 . . . . . . . . 9 (ran 𝑆 ∪ {𝑋}) = ({𝑋} ∪ ran (𝑘𝐴, 𝑢 ∈ (𝐹𝑘) ↦ ((𝑤𝑋 ↦ (𝑤𝑘)) “ 𝑢)))
2019fveq2i 6153 . . . . . . . 8 (fi‘(ran 𝑆 ∪ {𝑋})) = (fi‘({𝑋} ∪ ran (𝑘𝐴, 𝑢 ∈ (𝐹𝑘) ↦ ((𝑤𝑋 ↦ (𝑤𝑘)) “ 𝑢))))
2114, 20syl6eqr 2678 . . . . . . 7 (𝜑 → {𝑥 ∣ ∃𝑔((𝑔 Fn 𝐴 ∧ ∀𝑦𝐴 (𝑔𝑦) ∈ (𝐹𝑦) ∧ ∃𝑧 ∈ Fin ∀𝑦 ∈ (𝐴𝑧)(𝑔𝑦) = (𝐹𝑦)) ∧ 𝑥 = X𝑦𝐴 (𝑔𝑦))} = (fi‘(ran 𝑆 ∪ {𝑋})))
2221fveq2d 6154 . . . . . 6 (𝜑 → (topGen‘{𝑥 ∣ ∃𝑔((𝑔 Fn 𝐴 ∧ ∀𝑦𝐴 (𝑔𝑦) ∈ (𝐹𝑦) ∧ ∃𝑧 ∈ Fin ∀𝑦 ∈ (𝐴𝑧)(𝑔𝑦) = (𝐹𝑦)) ∧ 𝑥 = X𝑦𝐴 (𝑔𝑦))}) = (topGen‘(fi‘(ran 𝑆 ∪ {𝑋}))))
237, 22eqtrd 2660 . . . . 5 (𝜑 → (∏t𝐹) = (topGen‘(fi‘(ran 𝑆 ∪ {𝑋}))))
2423unieqd 4417 . . . 4 (𝜑 (∏t𝐹) = (topGen‘(fi‘(ran 𝑆 ∪ {𝑋}))))
25 fibas 20687 . . . . 5 (fi‘(ran 𝑆 ∪ {𝑋})) ∈ TopBases
26 unitg 20677 . . . . 5 ((fi‘(ran 𝑆 ∪ {𝑋})) ∈ TopBases → (topGen‘(fi‘(ran 𝑆 ∪ {𝑋}))) = (fi‘(ran 𝑆 ∪ {𝑋})))
2725, 26ax-mp 5 . . . 4 (topGen‘(fi‘(ran 𝑆 ∪ {𝑋}))) = (fi‘(ran 𝑆 ∪ {𝑋}))
2824, 27syl6eq 2676 . . 3 (𝜑 (∏t𝐹) = (fi‘(ran 𝑆 ∪ {𝑋})))
29 eqid 2626 . . . . . 6 (∏t𝐹) = (∏t𝐹)
3029ptuni 21302 . . . . 5 ((𝐴𝑉𝐹:𝐴⟶Top) → X𝑛𝐴 (𝐹𝑛) = (∏t𝐹))
311, 11, 30syl2anc 692 . . . 4 (𝜑X𝑛𝐴 (𝐹𝑛) = (∏t𝐹))
3212, 31syl5eq 2672 . . 3 (𝜑𝑋 = (∏t𝐹))
33 ptcmp.5 . . . . . . 7 (𝜑𝑋 ∈ (UFL ∩ dom card))
34 pwexg 4815 . . . . . . 7 (𝑋 ∈ (UFL ∩ dom card) → 𝒫 𝑋 ∈ V)
3533, 34syl 17 . . . . . 6 (𝜑 → 𝒫 𝑋 ∈ V)
36 eqid 2626 . . . . . . . . . . . 12 (𝑤𝑋 ↦ (𝑤𝑘)) = (𝑤𝑋 ↦ (𝑤𝑘))
3736mptpreima 5590 . . . . . . . . . . 11 ((𝑤𝑋 ↦ (𝑤𝑘)) “ 𝑢) = {𝑤𝑋 ∣ (𝑤𝑘) ∈ 𝑢}
38 ssrab2 3671 . . . . . . . . . . 11 {𝑤𝑋 ∣ (𝑤𝑘) ∈ 𝑢} ⊆ 𝑋
3937, 38eqsstri 3619 . . . . . . . . . 10 ((𝑤𝑋 ↦ (𝑤𝑘)) “ 𝑢) ⊆ 𝑋
4033adantr 481 . . . . . . . . . . 11 ((𝜑 ∧ (𝑘𝐴𝑢 ∈ (𝐹𝑘))) → 𝑋 ∈ (UFL ∩ dom card))
41 elpw2g 4792 . . . . . . . . . . 11 (𝑋 ∈ (UFL ∩ dom card) → (((𝑤𝑋 ↦ (𝑤𝑘)) “ 𝑢) ∈ 𝒫 𝑋 ↔ ((𝑤𝑋 ↦ (𝑤𝑘)) “ 𝑢) ⊆ 𝑋))
4240, 41syl 17 . . . . . . . . . 10 ((𝜑 ∧ (𝑘𝐴𝑢 ∈ (𝐹𝑘))) → (((𝑤𝑋 ↦ (𝑤𝑘)) “ 𝑢) ∈ 𝒫 𝑋 ↔ ((𝑤𝑋 ↦ (𝑤𝑘)) “ 𝑢) ⊆ 𝑋))
4339, 42mpbiri 248 . . . . . . . . 9 ((𝜑 ∧ (𝑘𝐴𝑢 ∈ (𝐹𝑘))) → ((𝑤𝑋 ↦ (𝑤𝑘)) “ 𝑢) ∈ 𝒫 𝑋)
4443ralrimivva 2970 . . . . . . . 8 (𝜑 → ∀𝑘𝐴𝑢 ∈ (𝐹𝑘)((𝑤𝑋 ↦ (𝑤𝑘)) “ 𝑢) ∈ 𝒫 𝑋)
4516fmpt2x 7182 . . . . . . . 8 (∀𝑘𝐴𝑢 ∈ (𝐹𝑘)((𝑤𝑋 ↦ (𝑤𝑘)) “ 𝑢) ∈ 𝒫 𝑋𝑆: 𝑘𝐴 ({𝑘} × (𝐹𝑘))⟶𝒫 𝑋)
4644, 45sylib 208 . . . . . . 7 (𝜑𝑆: 𝑘𝐴 ({𝑘} × (𝐹𝑘))⟶𝒫 𝑋)
47 frn 6012 . . . . . . 7 (𝑆: 𝑘𝐴 ({𝑘} × (𝐹𝑘))⟶𝒫 𝑋 → ran 𝑆 ⊆ 𝒫 𝑋)
4846, 47syl 17 . . . . . 6 (𝜑 → ran 𝑆 ⊆ 𝒫 𝑋)
4935, 48ssexd 4770 . . . . 5 (𝜑 → ran 𝑆 ∈ V)
50 snex 4874 . . . . 5 {𝑋} ∈ V
51 unexg 6913 . . . . 5 ((ran 𝑆 ∈ V ∧ {𝑋} ∈ V) → (ran 𝑆 ∪ {𝑋}) ∈ V)
5249, 50, 51sylancl 693 . . . 4 (𝜑 → (ran 𝑆 ∪ {𝑋}) ∈ V)
53 fiuni 8279 . . . 4 ((ran 𝑆 ∪ {𝑋}) ∈ V → (ran 𝑆 ∪ {𝑋}) = (fi‘(ran 𝑆 ∪ {𝑋})))
5452, 53syl 17 . . 3 (𝜑 (ran 𝑆 ∪ {𝑋}) = (fi‘(ran 𝑆 ∪ {𝑋})))
5528, 32, 543eqtr4d 2670 . 2 (𝜑𝑋 = (ran 𝑆 ∪ {𝑋}))
5655, 23jca 554 1 (𝜑 → (𝑋 = (ran 𝑆 ∪ {𝑋}) ∧ (∏t𝐹) = (topGen‘(fi‘(ran 𝑆 ∪ {𝑋})))))
Colors of variables: wff setvar class
Syntax hints:  wi 4  wb 196  wa 384  w3a 1036   = wceq 1480  wex 1701  wcel 1992  {cab 2612  wral 2912  wrex 2913  {crab 2916  Vcvv 3191  cdif 3557  cun 3558  cin 3559  wss 3560  𝒫 cpw 4135  {csn 4153   cuni 4407   ciun 4490  cmpt 4678   × cxp 5077  ccnv 5078  dom cdm 5079  ran crn 5080  cima 5082   Fn wfn 5845  wf 5846  cfv 5850  cmpt2 6607  Xcixp 7853  Fincfn 7900  ficfi 8261  cardccrd 8706  topGenctg 16014  tcpt 16015  Topctop 20612  TopBasesctb 20615  Compccmp 21094  UFLcufl 21609
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1719  ax-4 1734  ax-5 1841  ax-6 1890  ax-7 1937  ax-8 1994  ax-9 2001  ax-10 2021  ax-11 2036  ax-12 2049  ax-13 2250  ax-ext 2606  ax-rep 4736  ax-sep 4746  ax-nul 4754  ax-pow 4808  ax-pr 4872  ax-un 6903
This theorem depends on definitions:  df-bi 197  df-or 385  df-an 386  df-3or 1037  df-3an 1038  df-tru 1483  df-ex 1702  df-nf 1707  df-sb 1883  df-eu 2478  df-mo 2479  df-clab 2613  df-cleq 2619  df-clel 2622  df-nfc 2756  df-ne 2797  df-ral 2917  df-rex 2918  df-reu 2919  df-rab 2921  df-v 3193  df-sbc 3423  df-csb 3520  df-dif 3563  df-un 3565  df-in 3567  df-ss 3574  df-pss 3576  df-nul 3897  df-if 4064  df-pw 4137  df-sn 4154  df-pr 4156  df-tp 4158  df-op 4160  df-uni 4408  df-int 4446  df-iun 4492  df-iin 4493  df-br 4619  df-opab 4679  df-mpt 4680  df-tr 4718  df-eprel 4990  df-id 4994  df-po 5000  df-so 5001  df-fr 5038  df-we 5040  df-xp 5085  df-rel 5086  df-cnv 5087  df-co 5088  df-dm 5089  df-rn 5090  df-res 5091  df-ima 5092  df-pred 5642  df-ord 5688  df-on 5689  df-lim 5690  df-suc 5691  df-iota 5813  df-fun 5852  df-fn 5853  df-f 5854  df-f1 5855  df-fo 5856  df-f1o 5857  df-fv 5858  df-ov 6608  df-oprab 6609  df-mpt2 6610  df-om 7014  df-1st 7116  df-2nd 7117  df-wrecs 7353  df-recs 7414  df-rdg 7452  df-1o 7506  df-oadd 7510  df-er 7688  df-ixp 7854  df-en 7901  df-dom 7902  df-fin 7904  df-fi 8262  df-topgen 16020  df-pt 16021  df-top 20616  df-bases 20617  df-cmp 21095
This theorem is referenced by:  ptcmplem5  21765
  Copyright terms: Public domain W3C validator