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

Theorem xkopt 22191
Description: The compact-open topology on a discrete set coincides with the product topology where all the factors are the same. (Contributed by Mario Carneiro, 19-Mar-2015.) (Revised by Mario Carneiro, 12-Sep-2015.)
Assertion
Ref Expression
xkopt ((𝑅 ∈ Top ∧ 𝐴𝑉) → (𝑅ko 𝒫 𝐴) = (∏t‘(𝐴 × {𝑅})))

Proof of Theorem xkopt
Dummy variables 𝑓 𝑘 𝑣 𝑥 are mutually distinct and distinct from all other variables.
StepHypRef Expression
1 distop 21531 . . . 4 (𝐴𝑉 → 𝒫 𝐴 ∈ Top)
2 simpl 483 . . . 4 ((𝑅 ∈ Top ∧ 𝐴𝑉) → 𝑅 ∈ Top)
3 unipw 5333 . . . . . 6 𝒫 𝐴 = 𝐴
43eqcomi 2827 . . . . 5 𝐴 = 𝒫 𝐴
5 eqid 2818 . . . . 5 {𝑥 ∈ 𝒫 𝐴 ∣ (𝒫 𝐴t 𝑥) ∈ Comp} = {𝑥 ∈ 𝒫 𝐴 ∣ (𝒫 𝐴t 𝑥) ∈ Comp}
6 eqid 2818 . . . . 5 (𝑘 ∈ {𝑥 ∈ 𝒫 𝐴 ∣ (𝒫 𝐴t 𝑥) ∈ Comp}, 𝑣𝑅 ↦ {𝑓 ∈ (𝒫 𝐴 Cn 𝑅) ∣ (𝑓𝑘) ⊆ 𝑣}) = (𝑘 ∈ {𝑥 ∈ 𝒫 𝐴 ∣ (𝒫 𝐴t 𝑥) ∈ Comp}, 𝑣𝑅 ↦ {𝑓 ∈ (𝒫 𝐴 Cn 𝑅) ∣ (𝑓𝑘) ⊆ 𝑣})
74, 5, 6xkoval 22123 . . . 4 ((𝒫 𝐴 ∈ Top ∧ 𝑅 ∈ Top) → (𝑅ko 𝒫 𝐴) = (topGen‘(fi‘ran (𝑘 ∈ {𝑥 ∈ 𝒫 𝐴 ∣ (𝒫 𝐴t 𝑥) ∈ Comp}, 𝑣𝑅 ↦ {𝑓 ∈ (𝒫 𝐴 Cn 𝑅) ∣ (𝑓𝑘) ⊆ 𝑣}))))
81, 2, 7syl2an2 682 . . 3 ((𝑅 ∈ Top ∧ 𝐴𝑉) → (𝑅ko 𝒫 𝐴) = (topGen‘(fi‘ran (𝑘 ∈ {𝑥 ∈ 𝒫 𝐴 ∣ (𝒫 𝐴t 𝑥) ∈ Comp}, 𝑣𝑅 ↦ {𝑓 ∈ (𝒫 𝐴 Cn 𝑅) ∣ (𝑓𝑘) ⊆ 𝑣}))))
9 simpr 485 . . . . 5 ((𝑅 ∈ Top ∧ 𝐴𝑉) → 𝐴𝑉)
10 fconst6g 6561 . . . . . 6 (𝑅 ∈ Top → (𝐴 × {𝑅}):𝐴⟶Top)
1110adantr 481 . . . . 5 ((𝑅 ∈ Top ∧ 𝐴𝑉) → (𝐴 × {𝑅}):𝐴⟶Top)
12 pttop 22118 . . . . 5 ((𝐴𝑉 ∧ (𝐴 × {𝑅}):𝐴⟶Top) → (∏t‘(𝐴 × {𝑅})) ∈ Top)
139, 11, 12syl2anc 584 . . . 4 ((𝑅 ∈ Top ∧ 𝐴𝑉) → (∏t‘(𝐴 × {𝑅})) ∈ Top)
14 elpwi 4547 . . . . . . . . . . . . . 14 (𝑥 ∈ 𝒫 𝐴𝑥𝐴)
15 restdis 21714 . . . . . . . . . . . . . 14 ((𝐴𝑉𝑥𝐴) → (𝒫 𝐴t 𝑥) = 𝒫 𝑥)
1614, 15sylan2 592 . . . . . . . . . . . . 13 ((𝐴𝑉𝑥 ∈ 𝒫 𝐴) → (𝒫 𝐴t 𝑥) = 𝒫 𝑥)
1716adantll 710 . . . . . . . . . . . 12 (((𝑅 ∈ Top ∧ 𝐴𝑉) ∧ 𝑥 ∈ 𝒫 𝐴) → (𝒫 𝐴t 𝑥) = 𝒫 𝑥)
1817eleq1d 2894 . . . . . . . . . . 11 (((𝑅 ∈ Top ∧ 𝐴𝑉) ∧ 𝑥 ∈ 𝒫 𝐴) → ((𝒫 𝐴t 𝑥) ∈ Comp ↔ 𝒫 𝑥 ∈ Comp))
19 discmp 21934 . . . . . . . . . . 11 (𝑥 ∈ Fin ↔ 𝒫 𝑥 ∈ Comp)
2018, 19syl6bbr 290 . . . . . . . . . 10 (((𝑅 ∈ Top ∧ 𝐴𝑉) ∧ 𝑥 ∈ 𝒫 𝐴) → ((𝒫 𝐴t 𝑥) ∈ Comp ↔ 𝑥 ∈ Fin))
2120rabbidva 3476 . . . . . . . . 9 ((𝑅 ∈ Top ∧ 𝐴𝑉) → {𝑥 ∈ 𝒫 𝐴 ∣ (𝒫 𝐴t 𝑥) ∈ Comp} = {𝑥 ∈ 𝒫 𝐴𝑥 ∈ Fin})
22 dfin5 3941 . . . . . . . . 9 (𝒫 𝐴 ∩ Fin) = {𝑥 ∈ 𝒫 𝐴𝑥 ∈ Fin}
2321, 22syl6eqr 2871 . . . . . . . 8 ((𝑅 ∈ Top ∧ 𝐴𝑉) → {𝑥 ∈ 𝒫 𝐴 ∣ (𝒫 𝐴t 𝑥) ∈ Comp} = (𝒫 𝐴 ∩ Fin))
24 eqidd 2819 . . . . . . . 8 ((𝑅 ∈ Top ∧ 𝐴𝑉) → 𝑅 = 𝑅)
25 toptopon2 21454 . . . . . . . . . 10 (𝑅 ∈ Top ↔ 𝑅 ∈ (TopOn‘ 𝑅))
26 cndis 21827 . . . . . . . . . . 11 ((𝐴𝑉𝑅 ∈ (TopOn‘ 𝑅)) → (𝒫 𝐴 Cn 𝑅) = ( 𝑅m 𝐴))
2726ancoms 459 . . . . . . . . . 10 ((𝑅 ∈ (TopOn‘ 𝑅) ∧ 𝐴𝑉) → (𝒫 𝐴 Cn 𝑅) = ( 𝑅m 𝐴))
2825, 27sylanb 581 . . . . . . . . 9 ((𝑅 ∈ Top ∧ 𝐴𝑉) → (𝒫 𝐴 Cn 𝑅) = ( 𝑅m 𝐴))
2928rabeqdv 3482 . . . . . . . 8 ((𝑅 ∈ Top ∧ 𝐴𝑉) → {𝑓 ∈ (𝒫 𝐴 Cn 𝑅) ∣ (𝑓𝑘) ⊆ 𝑣} = {𝑓 ∈ ( 𝑅m 𝐴) ∣ (𝑓𝑘) ⊆ 𝑣})
3023, 24, 29mpoeq123dv 7218 . . . . . . 7 ((𝑅 ∈ Top ∧ 𝐴𝑉) → (𝑘 ∈ {𝑥 ∈ 𝒫 𝐴 ∣ (𝒫 𝐴t 𝑥) ∈ Comp}, 𝑣𝑅 ↦ {𝑓 ∈ (𝒫 𝐴 Cn 𝑅) ∣ (𝑓𝑘) ⊆ 𝑣}) = (𝑘 ∈ (𝒫 𝐴 ∩ Fin), 𝑣𝑅 ↦ {𝑓 ∈ ( 𝑅m 𝐴) ∣ (𝑓𝑘) ⊆ 𝑣}))
3130rneqd 5801 . . . . . 6 ((𝑅 ∈ Top ∧ 𝐴𝑉) → ran (𝑘 ∈ {𝑥 ∈ 𝒫 𝐴 ∣ (𝒫 𝐴t 𝑥) ∈ Comp}, 𝑣𝑅 ↦ {𝑓 ∈ (𝒫 𝐴 Cn 𝑅) ∣ (𝑓𝑘) ⊆ 𝑣}) = ran (𝑘 ∈ (𝒫 𝐴 ∩ Fin), 𝑣𝑅 ↦ {𝑓 ∈ ( 𝑅m 𝐴) ∣ (𝑓𝑘) ⊆ 𝑣}))
32 eqid 2818 . . . . . . 7 (𝑘 ∈ (𝒫 𝐴 ∩ Fin), 𝑣𝑅 ↦ {𝑓 ∈ ( 𝑅m 𝐴) ∣ (𝑓𝑘) ⊆ 𝑣}) = (𝑘 ∈ (𝒫 𝐴 ∩ Fin), 𝑣𝑅 ↦ {𝑓 ∈ ( 𝑅m 𝐴) ∣ (𝑓𝑘) ⊆ 𝑣})
3332rnmpo 7273 . . . . . 6 ran (𝑘 ∈ (𝒫 𝐴 ∩ Fin), 𝑣𝑅 ↦ {𝑓 ∈ ( 𝑅m 𝐴) ∣ (𝑓𝑘) ⊆ 𝑣}) = {𝑥 ∣ ∃𝑘 ∈ (𝒫 𝐴 ∩ Fin)∃𝑣𝑅 𝑥 = {𝑓 ∈ ( 𝑅m 𝐴) ∣ (𝑓𝑘) ⊆ 𝑣}}
3431, 33syl6eq 2869 . . . . 5 ((𝑅 ∈ Top ∧ 𝐴𝑉) → ran (𝑘 ∈ {𝑥 ∈ 𝒫 𝐴 ∣ (𝒫 𝐴t 𝑥) ∈ Comp}, 𝑣𝑅 ↦ {𝑓 ∈ (𝒫 𝐴 Cn 𝑅) ∣ (𝑓𝑘) ⊆ 𝑣}) = {𝑥 ∣ ∃𝑘 ∈ (𝒫 𝐴 ∩ Fin)∃𝑣𝑅 𝑥 = {𝑓 ∈ ( 𝑅m 𝐴) ∣ (𝑓𝑘) ⊆ 𝑣}})
35 elmapi 8417 . . . . . . . . . . . 12 (𝑓 ∈ ( 𝑅m 𝐴) → 𝑓:𝐴 𝑅)
36 eleq2 2898 . . . . . . . . . . . . . . . . 17 (𝑣 = if(𝑥𝑘, 𝑣, 𝑅) → ((𝑓𝑥) ∈ 𝑣 ↔ (𝑓𝑥) ∈ if(𝑥𝑘, 𝑣, 𝑅)))
3736imbi2d 342 . . . . . . . . . . . . . . . 16 (𝑣 = if(𝑥𝑘, 𝑣, 𝑅) → ((𝑥𝐴 → (𝑓𝑥) ∈ 𝑣) ↔ (𝑥𝐴 → (𝑓𝑥) ∈ if(𝑥𝑘, 𝑣, 𝑅))))
3837bibi1d 345 . . . . . . . . . . . . . . 15 (𝑣 = if(𝑥𝑘, 𝑣, 𝑅) → (((𝑥𝐴 → (𝑓𝑥) ∈ 𝑣) ↔ (𝑥𝑘 → (𝑓𝑥) ∈ 𝑣)) ↔ ((𝑥𝐴 → (𝑓𝑥) ∈ if(𝑥𝑘, 𝑣, 𝑅)) ↔ (𝑥𝑘 → (𝑓𝑥) ∈ 𝑣))))
39 eleq2 2898 . . . . . . . . . . . . . . . . 17 ( 𝑅 = if(𝑥𝑘, 𝑣, 𝑅) → ((𝑓𝑥) ∈ 𝑅 ↔ (𝑓𝑥) ∈ if(𝑥𝑘, 𝑣, 𝑅)))
4039imbi2d 342 . . . . . . . . . . . . . . . 16 ( 𝑅 = if(𝑥𝑘, 𝑣, 𝑅) → ((𝑥𝐴 → (𝑓𝑥) ∈ 𝑅) ↔ (𝑥𝐴 → (𝑓𝑥) ∈ if(𝑥𝑘, 𝑣, 𝑅))))
4140bibi1d 345 . . . . . . . . . . . . . . 15 ( 𝑅 = if(𝑥𝑘, 𝑣, 𝑅) → (((𝑥𝐴 → (𝑓𝑥) ∈ 𝑅) ↔ (𝑥𝑘 → (𝑓𝑥) ∈ 𝑣)) ↔ ((𝑥𝐴 → (𝑓𝑥) ∈ if(𝑥𝑘, 𝑣, 𝑅)) ↔ (𝑥𝑘 → (𝑓𝑥) ∈ 𝑣))))
42 simprl 767 . . . . . . . . . . . . . . . . . . . . 21 (((𝑅 ∈ Top ∧ 𝐴𝑉) ∧ (𝑘 ∈ (𝒫 𝐴 ∩ Fin) ∧ 𝑣𝑅)) → 𝑘 ∈ (𝒫 𝐴 ∩ Fin))
4342elin1d 4172 . . . . . . . . . . . . . . . . . . . 20 (((𝑅 ∈ Top ∧ 𝐴𝑉) ∧ (𝑘 ∈ (𝒫 𝐴 ∩ Fin) ∧ 𝑣𝑅)) → 𝑘 ∈ 𝒫 𝐴)
4443elpwid 4549 . . . . . . . . . . . . . . . . . . 19 (((𝑅 ∈ Top ∧ 𝐴𝑉) ∧ (𝑘 ∈ (𝒫 𝐴 ∩ Fin) ∧ 𝑣𝑅)) → 𝑘𝐴)
4544adantr 481 . . . . . . . . . . . . . . . . . 18 ((((𝑅 ∈ Top ∧ 𝐴𝑉) ∧ (𝑘 ∈ (𝒫 𝐴 ∩ Fin) ∧ 𝑣𝑅)) ∧ 𝑓:𝐴 𝑅) → 𝑘𝐴)
4645sselda 3964 . . . . . . . . . . . . . . . . 17 (((((𝑅 ∈ Top ∧ 𝐴𝑉) ∧ (𝑘 ∈ (𝒫 𝐴 ∩ Fin) ∧ 𝑣𝑅)) ∧ 𝑓:𝐴 𝑅) ∧ 𝑥𝑘) → 𝑥𝐴)
47 simpr 485 . . . . . . . . . . . . . . . . 17 (((((𝑅 ∈ Top ∧ 𝐴𝑉) ∧ (𝑘 ∈ (𝒫 𝐴 ∩ Fin) ∧ 𝑣𝑅)) ∧ 𝑓:𝐴 𝑅) ∧ 𝑥𝑘) → 𝑥𝑘)
4846, 472thd 266 . . . . . . . . . . . . . . . 16 (((((𝑅 ∈ Top ∧ 𝐴𝑉) ∧ (𝑘 ∈ (𝒫 𝐴 ∩ Fin) ∧ 𝑣𝑅)) ∧ 𝑓:𝐴 𝑅) ∧ 𝑥𝑘) → (𝑥𝐴𝑥𝑘))
4948imbi1d 343 . . . . . . . . . . . . . . 15 (((((𝑅 ∈ Top ∧ 𝐴𝑉) ∧ (𝑘 ∈ (𝒫 𝐴 ∩ Fin) ∧ 𝑣𝑅)) ∧ 𝑓:𝐴 𝑅) ∧ 𝑥𝑘) → ((𝑥𝐴 → (𝑓𝑥) ∈ 𝑣) ↔ (𝑥𝑘 → (𝑓𝑥) ∈ 𝑣)))
50 ffvelrn 6841 . . . . . . . . . . . . . . . . . . 19 ((𝑓:𝐴 𝑅𝑥𝐴) → (𝑓𝑥) ∈ 𝑅)
5150ex 413 . . . . . . . . . . . . . . . . . 18 (𝑓:𝐴 𝑅 → (𝑥𝐴 → (𝑓𝑥) ∈ 𝑅))
5251adantl 482 . . . . . . . . . . . . . . . . 17 ((((𝑅 ∈ Top ∧ 𝐴𝑉) ∧ (𝑘 ∈ (𝒫 𝐴 ∩ Fin) ∧ 𝑣𝑅)) ∧ 𝑓:𝐴 𝑅) → (𝑥𝐴 → (𝑓𝑥) ∈ 𝑅))
5352adantr 481 . . . . . . . . . . . . . . . 16 (((((𝑅 ∈ Top ∧ 𝐴𝑉) ∧ (𝑘 ∈ (𝒫 𝐴 ∩ Fin) ∧ 𝑣𝑅)) ∧ 𝑓:𝐴 𝑅) ∧ ¬ 𝑥𝑘) → (𝑥𝐴 → (𝑓𝑥) ∈ 𝑅))
54 pm2.21 123 . . . . . . . . . . . . . . . . 17 𝑥𝑘 → (𝑥𝑘 → (𝑓𝑥) ∈ 𝑣))
5554adantl 482 . . . . . . . . . . . . . . . 16 (((((𝑅 ∈ Top ∧ 𝐴𝑉) ∧ (𝑘 ∈ (𝒫 𝐴 ∩ Fin) ∧ 𝑣𝑅)) ∧ 𝑓:𝐴 𝑅) ∧ ¬ 𝑥𝑘) → (𝑥𝑘 → (𝑓𝑥) ∈ 𝑣))
5653, 552thd 266 . . . . . . . . . . . . . . 15 (((((𝑅 ∈ Top ∧ 𝐴𝑉) ∧ (𝑘 ∈ (𝒫 𝐴 ∩ Fin) ∧ 𝑣𝑅)) ∧ 𝑓:𝐴 𝑅) ∧ ¬ 𝑥𝑘) → ((𝑥𝐴 → (𝑓𝑥) ∈ 𝑅) ↔ (𝑥𝑘 → (𝑓𝑥) ∈ 𝑣)))
5738, 41, 49, 56ifbothda 4500 . . . . . . . . . . . . . 14 ((((𝑅 ∈ Top ∧ 𝐴𝑉) ∧ (𝑘 ∈ (𝒫 𝐴 ∩ Fin) ∧ 𝑣𝑅)) ∧ 𝑓:𝐴 𝑅) → ((𝑥𝐴 → (𝑓𝑥) ∈ if(𝑥𝑘, 𝑣, 𝑅)) ↔ (𝑥𝑘 → (𝑓𝑥) ∈ 𝑣)))
5857ralbidv2 3192 . . . . . . . . . . . . 13 ((((𝑅 ∈ Top ∧ 𝐴𝑉) ∧ (𝑘 ∈ (𝒫 𝐴 ∩ Fin) ∧ 𝑣𝑅)) ∧ 𝑓:𝐴 𝑅) → (∀𝑥𝐴 (𝑓𝑥) ∈ if(𝑥𝑘, 𝑣, 𝑅) ↔ ∀𝑥𝑘 (𝑓𝑥) ∈ 𝑣))
59 ffn 6507 . . . . . . . . . . . . . . 15 (𝑓:𝐴 𝑅𝑓 Fn 𝐴)
6059adantl 482 . . . . . . . . . . . . . 14 ((((𝑅 ∈ Top ∧ 𝐴𝑉) ∧ (𝑘 ∈ (𝒫 𝐴 ∩ Fin) ∧ 𝑣𝑅)) ∧ 𝑓:𝐴 𝑅) → 𝑓 Fn 𝐴)
61 vex 3495 . . . . . . . . . . . . . . . 16 𝑓 ∈ V
6261elixp 8456 . . . . . . . . . . . . . . 15 (𝑓X𝑥𝐴 if(𝑥𝑘, 𝑣, 𝑅) ↔ (𝑓 Fn 𝐴 ∧ ∀𝑥𝐴 (𝑓𝑥) ∈ if(𝑥𝑘, 𝑣, 𝑅)))
6362baib 536 . . . . . . . . . . . . . 14 (𝑓 Fn 𝐴 → (𝑓X𝑥𝐴 if(𝑥𝑘, 𝑣, 𝑅) ↔ ∀𝑥𝐴 (𝑓𝑥) ∈ if(𝑥𝑘, 𝑣, 𝑅)))
6460, 63syl 17 . . . . . . . . . . . . 13 ((((𝑅 ∈ Top ∧ 𝐴𝑉) ∧ (𝑘 ∈ (𝒫 𝐴 ∩ Fin) ∧ 𝑣𝑅)) ∧ 𝑓:𝐴 𝑅) → (𝑓X𝑥𝐴 if(𝑥𝑘, 𝑣, 𝑅) ↔ ∀𝑥𝐴 (𝑓𝑥) ∈ if(𝑥𝑘, 𝑣, 𝑅)))
65 ffun 6510 . . . . . . . . . . . . . 14 (𝑓:𝐴 𝑅 → Fun 𝑓)
66 fdm 6515 . . . . . . . . . . . . . . . 16 (𝑓:𝐴 𝑅 → dom 𝑓 = 𝐴)
6766adantl 482 . . . . . . . . . . . . . . 15 ((((𝑅 ∈ Top ∧ 𝐴𝑉) ∧ (𝑘 ∈ (𝒫 𝐴 ∩ Fin) ∧ 𝑣𝑅)) ∧ 𝑓:𝐴 𝑅) → dom 𝑓 = 𝐴)
6845, 67sseqtrrd 4005 . . . . . . . . . . . . . 14 ((((𝑅 ∈ Top ∧ 𝐴𝑉) ∧ (𝑘 ∈ (𝒫 𝐴 ∩ Fin) ∧ 𝑣𝑅)) ∧ 𝑓:𝐴 𝑅) → 𝑘 ⊆ dom 𝑓)
69 funimass4 6723 . . . . . . . . . . . . . 14 ((Fun 𝑓𝑘 ⊆ dom 𝑓) → ((𝑓𝑘) ⊆ 𝑣 ↔ ∀𝑥𝑘 (𝑓𝑥) ∈ 𝑣))
7065, 68, 69syl2an2 682 . . . . . . . . . . . . 13 ((((𝑅 ∈ Top ∧ 𝐴𝑉) ∧ (𝑘 ∈ (𝒫 𝐴 ∩ Fin) ∧ 𝑣𝑅)) ∧ 𝑓:𝐴 𝑅) → ((𝑓𝑘) ⊆ 𝑣 ↔ ∀𝑥𝑘 (𝑓𝑥) ∈ 𝑣))
7158, 64, 703bitr4d 312 . . . . . . . . . . . 12 ((((𝑅 ∈ Top ∧ 𝐴𝑉) ∧ (𝑘 ∈ (𝒫 𝐴 ∩ Fin) ∧ 𝑣𝑅)) ∧ 𝑓:𝐴 𝑅) → (𝑓X𝑥𝐴 if(𝑥𝑘, 𝑣, 𝑅) ↔ (𝑓𝑘) ⊆ 𝑣))
7235, 71sylan2 592 . . . . . . . . . . 11 ((((𝑅 ∈ Top ∧ 𝐴𝑉) ∧ (𝑘 ∈ (𝒫 𝐴 ∩ Fin) ∧ 𝑣𝑅)) ∧ 𝑓 ∈ ( 𝑅m 𝐴)) → (𝑓X𝑥𝐴 if(𝑥𝑘, 𝑣, 𝑅) ↔ (𝑓𝑘) ⊆ 𝑣))
7372rabbi2dva 4191 . . . . . . . . . 10 (((𝑅 ∈ Top ∧ 𝐴𝑉) ∧ (𝑘 ∈ (𝒫 𝐴 ∩ Fin) ∧ 𝑣𝑅)) → (( 𝑅m 𝐴) ∩ X𝑥𝐴 if(𝑥𝑘, 𝑣, 𝑅)) = {𝑓 ∈ ( 𝑅m 𝐴) ∣ (𝑓𝑘) ⊆ 𝑣})
74 elssuni 4859 . . . . . . . . . . . . . . . 16 (𝑣𝑅𝑣 𝑅)
7574ad2antll 725 . . . . . . . . . . . . . . 15 (((𝑅 ∈ Top ∧ 𝐴𝑉) ∧ (𝑘 ∈ (𝒫 𝐴 ∩ Fin) ∧ 𝑣𝑅)) → 𝑣 𝑅)
76 ssid 3986 . . . . . . . . . . . . . . 15 𝑅 𝑅
77 sseq1 3989 . . . . . . . . . . . . . . . 16 (𝑣 = if(𝑥𝑘, 𝑣, 𝑅) → (𝑣 𝑅 ↔ if(𝑥𝑘, 𝑣, 𝑅) ⊆ 𝑅))
78 sseq1 3989 . . . . . . . . . . . . . . . 16 ( 𝑅 = if(𝑥𝑘, 𝑣, 𝑅) → ( 𝑅 𝑅 ↔ if(𝑥𝑘, 𝑣, 𝑅) ⊆ 𝑅))
7977, 78ifboth 4501 . . . . . . . . . . . . . . 15 ((𝑣 𝑅 𝑅 𝑅) → if(𝑥𝑘, 𝑣, 𝑅) ⊆ 𝑅)
8075, 76, 79sylancl 586 . . . . . . . . . . . . . 14 (((𝑅 ∈ Top ∧ 𝐴𝑉) ∧ (𝑘 ∈ (𝒫 𝐴 ∩ Fin) ∧ 𝑣𝑅)) → if(𝑥𝑘, 𝑣, 𝑅) ⊆ 𝑅)
8180ralrimivw 3180 . . . . . . . . . . . . 13 (((𝑅 ∈ Top ∧ 𝐴𝑉) ∧ (𝑘 ∈ (𝒫 𝐴 ∩ Fin) ∧ 𝑣𝑅)) → ∀𝑥𝐴 if(𝑥𝑘, 𝑣, 𝑅) ⊆ 𝑅)
82 ss2ixp 8462 . . . . . . . . . . . . 13 (∀𝑥𝐴 if(𝑥𝑘, 𝑣, 𝑅) ⊆ 𝑅X𝑥𝐴 if(𝑥𝑘, 𝑣, 𝑅) ⊆ X𝑥𝐴 𝑅)
8381, 82syl 17 . . . . . . . . . . . 12 (((𝑅 ∈ Top ∧ 𝐴𝑉) ∧ (𝑘 ∈ (𝒫 𝐴 ∩ Fin) ∧ 𝑣𝑅)) → X𝑥𝐴 if(𝑥𝑘, 𝑣, 𝑅) ⊆ X𝑥𝐴 𝑅)
84 simplr 765 . . . . . . . . . . . . 13 (((𝑅 ∈ Top ∧ 𝐴𝑉) ∧ (𝑘 ∈ (𝒫 𝐴 ∩ Fin) ∧ 𝑣𝑅)) → 𝐴𝑉)
85 uniexg 7456 . . . . . . . . . . . . . 14 (𝑅 ∈ Top → 𝑅 ∈ V)
8685ad2antrr 722 . . . . . . . . . . . . 13 (((𝑅 ∈ Top ∧ 𝐴𝑉) ∧ (𝑘 ∈ (𝒫 𝐴 ∩ Fin) ∧ 𝑣𝑅)) → 𝑅 ∈ V)
87 ixpconstg 8458 . . . . . . . . . . . . 13 ((𝐴𝑉 𝑅 ∈ V) → X𝑥𝐴 𝑅 = ( 𝑅m 𝐴))
8884, 86, 87syl2anc 584 . . . . . . . . . . . 12 (((𝑅 ∈ Top ∧ 𝐴𝑉) ∧ (𝑘 ∈ (𝒫 𝐴 ∩ Fin) ∧ 𝑣𝑅)) → X𝑥𝐴 𝑅 = ( 𝑅m 𝐴))
8983, 88sseqtrd 4004 . . . . . . . . . . 11 (((𝑅 ∈ Top ∧ 𝐴𝑉) ∧ (𝑘 ∈ (𝒫 𝐴 ∩ Fin) ∧ 𝑣𝑅)) → X𝑥𝐴 if(𝑥𝑘, 𝑣, 𝑅) ⊆ ( 𝑅m 𝐴))
90 sseqin2 4189 . . . . . . . . . . 11 (X𝑥𝐴 if(𝑥𝑘, 𝑣, 𝑅) ⊆ ( 𝑅m 𝐴) ↔ (( 𝑅m 𝐴) ∩ X𝑥𝐴 if(𝑥𝑘, 𝑣, 𝑅)) = X𝑥𝐴 if(𝑥𝑘, 𝑣, 𝑅))
9189, 90sylib 219 . . . . . . . . . 10 (((𝑅 ∈ Top ∧ 𝐴𝑉) ∧ (𝑘 ∈ (𝒫 𝐴 ∩ Fin) ∧ 𝑣𝑅)) → (( 𝑅m 𝐴) ∩ X𝑥𝐴 if(𝑥𝑘, 𝑣, 𝑅)) = X𝑥𝐴 if(𝑥𝑘, 𝑣, 𝑅))
9273, 91eqtr3d 2855 . . . . . . . . 9 (((𝑅 ∈ Top ∧ 𝐴𝑉) ∧ (𝑘 ∈ (𝒫 𝐴 ∩ Fin) ∧ 𝑣𝑅)) → {𝑓 ∈ ( 𝑅m 𝐴) ∣ (𝑓𝑘) ⊆ 𝑣} = X𝑥𝐴 if(𝑥𝑘, 𝑣, 𝑅))
9310ad2antrr 722 . . . . . . . . . 10 (((𝑅 ∈ Top ∧ 𝐴𝑉) ∧ (𝑘 ∈ (𝒫 𝐴 ∩ Fin) ∧ 𝑣𝑅)) → (𝐴 × {𝑅}):𝐴⟶Top)
9442elin2d 4173 . . . . . . . . . 10 (((𝑅 ∈ Top ∧ 𝐴𝑉) ∧ (𝑘 ∈ (𝒫 𝐴 ∩ Fin) ∧ 𝑣𝑅)) → 𝑘 ∈ Fin)
95 simplrr 774 . . . . . . . . . . . 12 ((((𝑅 ∈ Top ∧ 𝐴𝑉) ∧ (𝑘 ∈ (𝒫 𝐴 ∩ Fin) ∧ 𝑣𝑅)) ∧ 𝑥𝐴) → 𝑣𝑅)
96 eqid 2818 . . . . . . . . . . . . . 14 𝑅 = 𝑅
9796topopn 21442 . . . . . . . . . . . . 13 (𝑅 ∈ Top → 𝑅𝑅)
9897ad3antrrr 726 . . . . . . . . . . . 12 ((((𝑅 ∈ Top ∧ 𝐴𝑉) ∧ (𝑘 ∈ (𝒫 𝐴 ∩ Fin) ∧ 𝑣𝑅)) ∧ 𝑥𝐴) → 𝑅𝑅)
9995, 98ifcld 4508 . . . . . . . . . . 11 ((((𝑅 ∈ Top ∧ 𝐴𝑉) ∧ (𝑘 ∈ (𝒫 𝐴 ∩ Fin) ∧ 𝑣𝑅)) ∧ 𝑥𝐴) → if(𝑥𝑘, 𝑣, 𝑅) ∈ 𝑅)
100 fvconst2g 6956 . . . . . . . . . . . 12 ((𝑅 ∈ Top ∧ 𝑥𝐴) → ((𝐴 × {𝑅})‘𝑥) = 𝑅)
101100ad4ant14 748 . . . . . . . . . . 11 ((((𝑅 ∈ Top ∧ 𝐴𝑉) ∧ (𝑘 ∈ (𝒫 𝐴 ∩ Fin) ∧ 𝑣𝑅)) ∧ 𝑥𝐴) → ((𝐴 × {𝑅})‘𝑥) = 𝑅)
10299, 101eleqtrrd 2913 . . . . . . . . . 10 ((((𝑅 ∈ Top ∧ 𝐴𝑉) ∧ (𝑘 ∈ (𝒫 𝐴 ∩ Fin) ∧ 𝑣𝑅)) ∧ 𝑥𝐴) → if(𝑥𝑘, 𝑣, 𝑅) ∈ ((𝐴 × {𝑅})‘𝑥))
103 eldifn 4101 . . . . . . . . . . . . 13 (𝑥 ∈ (𝐴𝑘) → ¬ 𝑥𝑘)
104103iffalsed 4474 . . . . . . . . . . . 12 (𝑥 ∈ (𝐴𝑘) → if(𝑥𝑘, 𝑣, 𝑅) = 𝑅)
105104adantl 482 . . . . . . . . . . 11 ((((𝑅 ∈ Top ∧ 𝐴𝑉) ∧ (𝑘 ∈ (𝒫 𝐴 ∩ Fin) ∧ 𝑣𝑅)) ∧ 𝑥 ∈ (𝐴𝑘)) → if(𝑥𝑘, 𝑣, 𝑅) = 𝑅)
106 eldifi 4100 . . . . . . . . . . . . 13 (𝑥 ∈ (𝐴𝑘) → 𝑥𝐴)
107106, 101sylan2 592 . . . . . . . . . . . 12 ((((𝑅 ∈ Top ∧ 𝐴𝑉) ∧ (𝑘 ∈ (𝒫 𝐴 ∩ Fin) ∧ 𝑣𝑅)) ∧ 𝑥 ∈ (𝐴𝑘)) → ((𝐴 × {𝑅})‘𝑥) = 𝑅)
108107unieqd 4840 . . . . . . . . . . 11 ((((𝑅 ∈ Top ∧ 𝐴𝑉) ∧ (𝑘 ∈ (𝒫 𝐴 ∩ Fin) ∧ 𝑣𝑅)) ∧ 𝑥 ∈ (𝐴𝑘)) → ((𝐴 × {𝑅})‘𝑥) = 𝑅)
109105, 108eqtr4d 2856 . . . . . . . . . 10 ((((𝑅 ∈ Top ∧ 𝐴𝑉) ∧ (𝑘 ∈ (𝒫 𝐴 ∩ Fin) ∧ 𝑣𝑅)) ∧ 𝑥 ∈ (𝐴𝑘)) → if(𝑥𝑘, 𝑣, 𝑅) = ((𝐴 × {𝑅})‘𝑥))
11084, 93, 94, 102, 109ptopn 22119 . . . . . . . . 9 (((𝑅 ∈ Top ∧ 𝐴𝑉) ∧ (𝑘 ∈ (𝒫 𝐴 ∩ Fin) ∧ 𝑣𝑅)) → X𝑥𝐴 if(𝑥𝑘, 𝑣, 𝑅) ∈ (∏t‘(𝐴 × {𝑅})))
11192, 110eqeltrd 2910 . . . . . . . 8 (((𝑅 ∈ Top ∧ 𝐴𝑉) ∧ (𝑘 ∈ (𝒫 𝐴 ∩ Fin) ∧ 𝑣𝑅)) → {𝑓 ∈ ( 𝑅m 𝐴) ∣ (𝑓𝑘) ⊆ 𝑣} ∈ (∏t‘(𝐴 × {𝑅})))
112 eleq1 2897 . . . . . . . 8 (𝑥 = {𝑓 ∈ ( 𝑅m 𝐴) ∣ (𝑓𝑘) ⊆ 𝑣} → (𝑥 ∈ (∏t‘(𝐴 × {𝑅})) ↔ {𝑓 ∈ ( 𝑅m 𝐴) ∣ (𝑓𝑘) ⊆ 𝑣} ∈ (∏t‘(𝐴 × {𝑅}))))
113111, 112syl5ibrcom 248 . . . . . . 7 (((𝑅 ∈ Top ∧ 𝐴𝑉) ∧ (𝑘 ∈ (𝒫 𝐴 ∩ Fin) ∧ 𝑣𝑅)) → (𝑥 = {𝑓 ∈ ( 𝑅m 𝐴) ∣ (𝑓𝑘) ⊆ 𝑣} → 𝑥 ∈ (∏t‘(𝐴 × {𝑅}))))
114113rexlimdvva 3291 . . . . . 6 ((𝑅 ∈ Top ∧ 𝐴𝑉) → (∃𝑘 ∈ (𝒫 𝐴 ∩ Fin)∃𝑣𝑅 𝑥 = {𝑓 ∈ ( 𝑅m 𝐴) ∣ (𝑓𝑘) ⊆ 𝑣} → 𝑥 ∈ (∏t‘(𝐴 × {𝑅}))))
115114abssdv 4042 . . . . 5 ((𝑅 ∈ Top ∧ 𝐴𝑉) → {𝑥 ∣ ∃𝑘 ∈ (𝒫 𝐴 ∩ Fin)∃𝑣𝑅 𝑥 = {𝑓 ∈ ( 𝑅m 𝐴) ∣ (𝑓𝑘) ⊆ 𝑣}} ⊆ (∏t‘(𝐴 × {𝑅})))
11634, 115eqsstrd 4002 . . . 4 ((𝑅 ∈ Top ∧ 𝐴𝑉) → ran (𝑘 ∈ {𝑥 ∈ 𝒫 𝐴 ∣ (𝒫 𝐴t 𝑥) ∈ Comp}, 𝑣𝑅 ↦ {𝑓 ∈ (𝒫 𝐴 Cn 𝑅) ∣ (𝑓𝑘) ⊆ 𝑣}) ⊆ (∏t‘(𝐴 × {𝑅})))
117 tgfiss 21527 . . . 4 (((∏t‘(𝐴 × {𝑅})) ∈ Top ∧ ran (𝑘 ∈ {𝑥 ∈ 𝒫 𝐴 ∣ (𝒫 𝐴t 𝑥) ∈ Comp}, 𝑣𝑅 ↦ {𝑓 ∈ (𝒫 𝐴 Cn 𝑅) ∣ (𝑓𝑘) ⊆ 𝑣}) ⊆ (∏t‘(𝐴 × {𝑅}))) → (topGen‘(fi‘ran (𝑘 ∈ {𝑥 ∈ 𝒫 𝐴 ∣ (𝒫 𝐴t 𝑥) ∈ Comp}, 𝑣𝑅 ↦ {𝑓 ∈ (𝒫 𝐴 Cn 𝑅) ∣ (𝑓𝑘) ⊆ 𝑣}))) ⊆ (∏t‘(𝐴 × {𝑅})))
11813, 116, 117syl2anc 584 . . 3 ((𝑅 ∈ Top ∧ 𝐴𝑉) → (topGen‘(fi‘ran (𝑘 ∈ {𝑥 ∈ 𝒫 𝐴 ∣ (𝒫 𝐴t 𝑥) ∈ Comp}, 𝑣𝑅 ↦ {𝑓 ∈ (𝒫 𝐴 Cn 𝑅) ∣ (𝑓𝑘) ⊆ 𝑣}))) ⊆ (∏t‘(𝐴 × {𝑅})))
1198, 118eqsstrd 4002 . 2 ((𝑅 ∈ Top ∧ 𝐴𝑉) → (𝑅ko 𝒫 𝐴) ⊆ (∏t‘(𝐴 × {𝑅})))
120 eqid 2818 . . . . . . . 8 (∏t‘(𝐴 × {𝑅})) = (∏t‘(𝐴 × {𝑅}))
121120, 96ptuniconst 22134 . . . . . . 7 ((𝐴𝑉𝑅 ∈ Top) → ( 𝑅m 𝐴) = (∏t‘(𝐴 × {𝑅})))
122121ancoms 459 . . . . . 6 ((𝑅 ∈ Top ∧ 𝐴𝑉) → ( 𝑅m 𝐴) = (∏t‘(𝐴 × {𝑅})))
12328, 122eqtrd 2853 . . . . 5 ((𝑅 ∈ Top ∧ 𝐴𝑉) → (𝒫 𝐴 Cn 𝑅) = (∏t‘(𝐴 × {𝑅})))
124123oveq2d 7161 . . . 4 ((𝑅 ∈ Top ∧ 𝐴𝑉) → ((∏t‘(𝐴 × {𝑅})) ↾t (𝒫 𝐴 Cn 𝑅)) = ((∏t‘(𝐴 × {𝑅})) ↾t (∏t‘(𝐴 × {𝑅}))))
125 eqid 2818 . . . . . 6 (∏t‘(𝐴 × {𝑅})) = (∏t‘(𝐴 × {𝑅}))
126125restid 16695 . . . . 5 ((∏t‘(𝐴 × {𝑅})) ∈ Top → ((∏t‘(𝐴 × {𝑅})) ↾t (∏t‘(𝐴 × {𝑅}))) = (∏t‘(𝐴 × {𝑅})))
12713, 126syl 17 . . . 4 ((𝑅 ∈ Top ∧ 𝐴𝑉) → ((∏t‘(𝐴 × {𝑅})) ↾t (∏t‘(𝐴 × {𝑅}))) = (∏t‘(𝐴 × {𝑅})))
128124, 127eqtrd 2853 . . 3 ((𝑅 ∈ Top ∧ 𝐴𝑉) → ((∏t‘(𝐴 × {𝑅})) ↾t (𝒫 𝐴 Cn 𝑅)) = (∏t‘(𝐴 × {𝑅})))
1294, 120xkoptsub 22190 . . . 4 ((𝒫 𝐴 ∈ Top ∧ 𝑅 ∈ Top) → ((∏t‘(𝐴 × {𝑅})) ↾t (𝒫 𝐴 Cn 𝑅)) ⊆ (𝑅ko 𝒫 𝐴))
1301, 2, 129syl2an2 682 . . 3 ((𝑅 ∈ Top ∧ 𝐴𝑉) → ((∏t‘(𝐴 × {𝑅})) ↾t (𝒫 𝐴 Cn 𝑅)) ⊆ (𝑅ko 𝒫 𝐴))
131128, 130eqsstrrd 4003 . 2 ((𝑅 ∈ Top ∧ 𝐴𝑉) → (∏t‘(𝐴 × {𝑅})) ⊆ (𝑅ko 𝒫 𝐴))
132119, 131eqssd 3981 1 ((𝑅 ∈ Top ∧ 𝐴𝑉) → (𝑅ko 𝒫 𝐴) = (∏t‘(𝐴 × {𝑅})))
Colors of variables: wff setvar class
Syntax hints:  ¬ wn 3  wi 4  wb 207  wa 396   = wceq 1528  wcel 2105  {cab 2796  wral 3135  wrex 3136  {crab 3139  Vcvv 3492  cdif 3930  cin 3932  wss 3933  ifcif 4463  𝒫 cpw 4535  {csn 4557   cuni 4830   × cxp 5546  dom cdm 5548  ran crn 5549  cima 5551  Fun wfun 6342   Fn wfn 6343  wf 6344  cfv 6348  (class class class)co 7145  cmpo 7147  m cmap 8395  Xcixp 8449  Fincfn 8497  ficfi 8862  t crest 16682  topGenctg 16699  tcpt 16700  Topctop 21429  TopOnctopon 21446   Cn ccn 21760  Compccmp 21922  ko cxko 22097
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1787  ax-4 1801  ax-5 1902  ax-6 1961  ax-7 2006  ax-8 2107  ax-9 2115  ax-10 2136  ax-11 2151  ax-12 2167  ax-ext 2790  ax-rep 5181  ax-sep 5194  ax-nul 5201  ax-pow 5257  ax-pr 5320  ax-un 7450
This theorem depends on definitions:  df-bi 208  df-an 397  df-or 842  df-3or 1080  df-3an 1081  df-tru 1531  df-ex 1772  df-nf 1776  df-sb 2061  df-mo 2615  df-eu 2647  df-clab 2797  df-cleq 2811  df-clel 2890  df-nfc 2960  df-ne 3014  df-ral 3140  df-rex 3141  df-reu 3142  df-rab 3144  df-v 3494  df-sbc 3770  df-csb 3881  df-dif 3936  df-un 3938  df-in 3940  df-ss 3949  df-pss 3951  df-nul 4289  df-if 4464  df-pw 4537  df-sn 4558  df-pr 4560  df-tp 4562  df-op 4564  df-uni 4831  df-int 4868  df-iun 4912  df-iin 4913  df-br 5058  df-opab 5120  df-mpt 5138  df-tr 5164  df-id 5453  df-eprel 5458  df-po 5467  df-so 5468  df-fr 5507  df-we 5509  df-xp 5554  df-rel 5555  df-cnv 5556  df-co 5557  df-dm 5558  df-rn 5559  df-res 5560  df-ima 5561  df-pred 6141  df-ord 6187  df-on 6188  df-lim 6189  df-suc 6190  df-iota 6307  df-fun 6350  df-fn 6351  df-f 6352  df-f1 6353  df-fo 6354  df-f1o 6355  df-fv 6356  df-ov 7148  df-oprab 7149  df-mpo 7150  df-om 7570  df-1st 7678  df-2nd 7679  df-wrecs 7936  df-recs 7997  df-rdg 8035  df-1o 8091  df-2o 8092  df-oadd 8095  df-er 8278  df-map 8397  df-ixp 8450  df-en 8498  df-dom 8499  df-sdom 8500  df-fin 8501  df-fi 8863  df-rest 16684  df-topgen 16705  df-pt 16706  df-top 21430  df-topon 21447  df-bases 21482  df-cn 21763  df-cmp 21923  df-xko 22099
This theorem is referenced by:  tmdgsum  22631  tmdgsum2  22632  symgtgp  22637  efmndtmd  43997
  Copyright terms: Public domain W3C validator