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

Theorem alexsubALT 23418
Description: The Alexander Subbase Theorem: a space is compact iff it has a subbase such that any cover taken from the subbase has a finite subcover. (Contributed by Jeff Hankins, 24-Jan-2010.) (Revised by Mario Carneiro, 11-Feb-2015.) (New usage is discouraged.) (Proof modification is discouraged.)
Hypothesis
Ref Expression
alexsubALT.1 𝑋 = βˆͺ 𝐽
Assertion
Ref Expression
alexsubALT (𝐽 ∈ Comp ↔ βˆƒπ‘₯(𝐽 = (topGenβ€˜(fiβ€˜π‘₯)) ∧ βˆ€π‘ ∈ 𝒫 π‘₯(𝑋 = βˆͺ 𝑐 β†’ βˆƒπ‘‘ ∈ (𝒫 𝑐 ∩ Fin)𝑋 = βˆͺ 𝑑)))
Distinct variable groups:   𝑐,𝑑,π‘₯,𝐽   𝑋,𝑐,𝑑,π‘₯

Proof of Theorem alexsubALT
Dummy variables π‘Ž 𝑏 𝑓 𝑑 𝑀 𝑦 𝑧 are mutually distinct and distinct from all other variables.
StepHypRef Expression
1 alexsubALT.1 . . 3 𝑋 = βˆͺ 𝐽
21alexsubALTlem1 23414 . 2 (𝐽 ∈ Comp β†’ βˆƒπ‘₯(𝐽 = (topGenβ€˜(fiβ€˜π‘₯)) ∧ βˆ€π‘ ∈ 𝒫 π‘₯(𝑋 = βˆͺ 𝑐 β†’ βˆƒπ‘‘ ∈ (𝒫 𝑐 ∩ Fin)𝑋 = βˆͺ 𝑑)))
31alexsubALTlem4 23417 . . . . 5 (𝐽 = (topGenβ€˜(fiβ€˜π‘₯)) β†’ (βˆ€π‘ ∈ 𝒫 π‘₯(𝑋 = βˆͺ 𝑐 β†’ βˆƒπ‘‘ ∈ (𝒫 𝑐 ∩ Fin)𝑋 = βˆͺ 𝑑) β†’ βˆ€π‘Ž ∈ 𝒫 (fiβ€˜π‘₯)(𝑋 = βˆͺ π‘Ž β†’ βˆƒπ‘ ∈ (𝒫 π‘Ž ∩ Fin)𝑋 = βˆͺ 𝑏)))
4 velpw 4566 . . . . . . . . 9 (𝑐 ∈ 𝒫 𝐽 ↔ 𝑐 βŠ† 𝐽)
5 eleq2 2823 . . . . . . . . . . . . . . . . . . 19 (𝑋 = βˆͺ 𝑐 β†’ (𝑑 ∈ 𝑋 ↔ 𝑑 ∈ βˆͺ 𝑐))
653ad2ant3 1136 . . . . . . . . . . . . . . . . . 18 ((𝐽 = (topGenβ€˜(fiβ€˜π‘₯)) ∧ 𝑐 βŠ† 𝐽 ∧ 𝑋 = βˆͺ 𝑐) β†’ (𝑑 ∈ 𝑋 ↔ 𝑑 ∈ βˆͺ 𝑐))
7 eluni 4869 . . . . . . . . . . . . . . . . . . . 20 (𝑑 ∈ βˆͺ 𝑐 ↔ βˆƒπ‘€(𝑑 ∈ 𝑀 ∧ 𝑀 ∈ 𝑐))
8 ssel 3938 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 (𝑐 βŠ† 𝐽 β†’ (𝑀 ∈ 𝑐 β†’ 𝑀 ∈ 𝐽))
9 eleq2 2823 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 (𝐽 = (topGenβ€˜(fiβ€˜π‘₯)) β†’ (𝑀 ∈ 𝐽 ↔ 𝑀 ∈ (topGenβ€˜(fiβ€˜π‘₯))))
10 tg2 22331 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 ((𝑀 ∈ (topGenβ€˜(fiβ€˜π‘₯)) ∧ 𝑑 ∈ 𝑀) β†’ βˆƒπ‘¦ ∈ (fiβ€˜π‘₯)(𝑑 ∈ 𝑦 ∧ 𝑦 βŠ† 𝑀))
1110ex 414 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 (𝑀 ∈ (topGenβ€˜(fiβ€˜π‘₯)) β†’ (𝑑 ∈ 𝑀 β†’ βˆƒπ‘¦ ∈ (fiβ€˜π‘₯)(𝑑 ∈ 𝑦 ∧ 𝑦 βŠ† 𝑀)))
129, 11syl6bi 253 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 (𝐽 = (topGenβ€˜(fiβ€˜π‘₯)) β†’ (𝑀 ∈ 𝐽 β†’ (𝑑 ∈ 𝑀 β†’ βˆƒπ‘¦ ∈ (fiβ€˜π‘₯)(𝑑 ∈ 𝑦 ∧ 𝑦 βŠ† 𝑀))))
138, 12sylan9r 510 . . . . . . . . . . . . . . . . . . . . . . . . . 26 ((𝐽 = (topGenβ€˜(fiβ€˜π‘₯)) ∧ 𝑐 βŠ† 𝐽) β†’ (𝑀 ∈ 𝑐 β†’ (𝑑 ∈ 𝑀 β†’ βˆƒπ‘¦ ∈ (fiβ€˜π‘₯)(𝑑 ∈ 𝑦 ∧ 𝑦 βŠ† 𝑀))))
14133impia 1118 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((𝐽 = (topGenβ€˜(fiβ€˜π‘₯)) ∧ 𝑐 βŠ† 𝐽 ∧ 𝑀 ∈ 𝑐) β†’ (𝑑 ∈ 𝑀 β†’ βˆƒπ‘¦ ∈ (fiβ€˜π‘₯)(𝑑 ∈ 𝑦 ∧ 𝑦 βŠ† 𝑀)))
15 sseq2 3971 . . . . . . . . . . . . . . . . . . . . . . . . . . . . . 30 (𝑧 = 𝑀 β†’ (𝑦 βŠ† 𝑧 ↔ 𝑦 βŠ† 𝑀))
1615rspcev 3580 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 ((𝑀 ∈ 𝑐 ∧ 𝑦 βŠ† 𝑀) β†’ βˆƒπ‘§ ∈ 𝑐 𝑦 βŠ† 𝑧)
1716ex 414 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 (𝑀 ∈ 𝑐 β†’ (𝑦 βŠ† 𝑀 β†’ βˆƒπ‘§ ∈ 𝑐 𝑦 βŠ† 𝑧))
18173ad2ant3 1136 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 ((𝐽 = (topGenβ€˜(fiβ€˜π‘₯)) ∧ 𝑐 βŠ† 𝐽 ∧ 𝑀 ∈ 𝑐) β†’ (𝑦 βŠ† 𝑀 β†’ βˆƒπ‘§ ∈ 𝑐 𝑦 βŠ† 𝑧))
1918anim2d 613 . . . . . . . . . . . . . . . . . . . . . . . . . 26 ((𝐽 = (topGenβ€˜(fiβ€˜π‘₯)) ∧ 𝑐 βŠ† 𝐽 ∧ 𝑀 ∈ 𝑐) β†’ ((𝑑 ∈ 𝑦 ∧ 𝑦 βŠ† 𝑀) β†’ (𝑑 ∈ 𝑦 ∧ βˆƒπ‘§ ∈ 𝑐 𝑦 βŠ† 𝑧)))
2019reximdv 3164 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((𝐽 = (topGenβ€˜(fiβ€˜π‘₯)) ∧ 𝑐 βŠ† 𝐽 ∧ 𝑀 ∈ 𝑐) β†’ (βˆƒπ‘¦ ∈ (fiβ€˜π‘₯)(𝑑 ∈ 𝑦 ∧ 𝑦 βŠ† 𝑀) β†’ βˆƒπ‘¦ ∈ (fiβ€˜π‘₯)(𝑑 ∈ 𝑦 ∧ βˆƒπ‘§ ∈ 𝑐 𝑦 βŠ† 𝑧)))
2114, 20syld 47 . . . . . . . . . . . . . . . . . . . . . . . 24 ((𝐽 = (topGenβ€˜(fiβ€˜π‘₯)) ∧ 𝑐 βŠ† 𝐽 ∧ 𝑀 ∈ 𝑐) β†’ (𝑑 ∈ 𝑀 β†’ βˆƒπ‘¦ ∈ (fiβ€˜π‘₯)(𝑑 ∈ 𝑦 ∧ βˆƒπ‘§ ∈ 𝑐 𝑦 βŠ† 𝑧)))
22213expia 1122 . . . . . . . . . . . . . . . . . . . . . . 23 ((𝐽 = (topGenβ€˜(fiβ€˜π‘₯)) ∧ 𝑐 βŠ† 𝐽) β†’ (𝑀 ∈ 𝑐 β†’ (𝑑 ∈ 𝑀 β†’ βˆƒπ‘¦ ∈ (fiβ€˜π‘₯)(𝑑 ∈ 𝑦 ∧ βˆƒπ‘§ ∈ 𝑐 𝑦 βŠ† 𝑧))))
2322com23 86 . . . . . . . . . . . . . . . . . . . . . 22 ((𝐽 = (topGenβ€˜(fiβ€˜π‘₯)) ∧ 𝑐 βŠ† 𝐽) β†’ (𝑑 ∈ 𝑀 β†’ (𝑀 ∈ 𝑐 β†’ βˆƒπ‘¦ ∈ (fiβ€˜π‘₯)(𝑑 ∈ 𝑦 ∧ βˆƒπ‘§ ∈ 𝑐 𝑦 βŠ† 𝑧))))
2423impd 412 . . . . . . . . . . . . . . . . . . . . 21 ((𝐽 = (topGenβ€˜(fiβ€˜π‘₯)) ∧ 𝑐 βŠ† 𝐽) β†’ ((𝑑 ∈ 𝑀 ∧ 𝑀 ∈ 𝑐) β†’ βˆƒπ‘¦ ∈ (fiβ€˜π‘₯)(𝑑 ∈ 𝑦 ∧ βˆƒπ‘§ ∈ 𝑐 𝑦 βŠ† 𝑧)))
2524exlimdv 1937 . . . . . . . . . . . . . . . . . . . 20 ((𝐽 = (topGenβ€˜(fiβ€˜π‘₯)) ∧ 𝑐 βŠ† 𝐽) β†’ (βˆƒπ‘€(𝑑 ∈ 𝑀 ∧ 𝑀 ∈ 𝑐) β†’ βˆƒπ‘¦ ∈ (fiβ€˜π‘₯)(𝑑 ∈ 𝑦 ∧ βˆƒπ‘§ ∈ 𝑐 𝑦 βŠ† 𝑧)))
267, 25biimtrid 241 . . . . . . . . . . . . . . . . . . 19 ((𝐽 = (topGenβ€˜(fiβ€˜π‘₯)) ∧ 𝑐 βŠ† 𝐽) β†’ (𝑑 ∈ βˆͺ 𝑐 β†’ βˆƒπ‘¦ ∈ (fiβ€˜π‘₯)(𝑑 ∈ 𝑦 ∧ βˆƒπ‘§ ∈ 𝑐 𝑦 βŠ† 𝑧)))
27263adant3 1133 . . . . . . . . . . . . . . . . . 18 ((𝐽 = (topGenβ€˜(fiβ€˜π‘₯)) ∧ 𝑐 βŠ† 𝐽 ∧ 𝑋 = βˆͺ 𝑐) β†’ (𝑑 ∈ βˆͺ 𝑐 β†’ βˆƒπ‘¦ ∈ (fiβ€˜π‘₯)(𝑑 ∈ 𝑦 ∧ βˆƒπ‘§ ∈ 𝑐 𝑦 βŠ† 𝑧)))
286, 27sylbid 239 . . . . . . . . . . . . . . . . 17 ((𝐽 = (topGenβ€˜(fiβ€˜π‘₯)) ∧ 𝑐 βŠ† 𝐽 ∧ 𝑋 = βˆͺ 𝑐) β†’ (𝑑 ∈ 𝑋 β†’ βˆƒπ‘¦ ∈ (fiβ€˜π‘₯)(𝑑 ∈ 𝑦 ∧ βˆƒπ‘§ ∈ 𝑐 𝑦 βŠ† 𝑧)))
29 ssel 3938 . . . . . . . . . . . . . . . . . . . . . 22 (𝑦 βŠ† 𝑧 β†’ (𝑑 ∈ 𝑦 β†’ 𝑑 ∈ 𝑧))
30 elunii 4871 . . . . . . . . . . . . . . . . . . . . . . . 24 ((𝑑 ∈ 𝑧 ∧ 𝑧 ∈ 𝑐) β†’ 𝑑 ∈ βˆͺ 𝑐)
3130expcom 415 . . . . . . . . . . . . . . . . . . . . . . 23 (𝑧 ∈ 𝑐 β†’ (𝑑 ∈ 𝑧 β†’ 𝑑 ∈ βˆͺ 𝑐))
326biimprd 248 . . . . . . . . . . . . . . . . . . . . . . 23 ((𝐽 = (topGenβ€˜(fiβ€˜π‘₯)) ∧ 𝑐 βŠ† 𝐽 ∧ 𝑋 = βˆͺ 𝑐) β†’ (𝑑 ∈ βˆͺ 𝑐 β†’ 𝑑 ∈ 𝑋))
3331, 32sylan9r 510 . . . . . . . . . . . . . . . . . . . . . 22 (((𝐽 = (topGenβ€˜(fiβ€˜π‘₯)) ∧ 𝑐 βŠ† 𝐽 ∧ 𝑋 = βˆͺ 𝑐) ∧ 𝑧 ∈ 𝑐) β†’ (𝑑 ∈ 𝑧 β†’ 𝑑 ∈ 𝑋))
3429, 33syl9r 78 . . . . . . . . . . . . . . . . . . . . 21 (((𝐽 = (topGenβ€˜(fiβ€˜π‘₯)) ∧ 𝑐 βŠ† 𝐽 ∧ 𝑋 = βˆͺ 𝑐) ∧ 𝑧 ∈ 𝑐) β†’ (𝑦 βŠ† 𝑧 β†’ (𝑑 ∈ 𝑦 β†’ 𝑑 ∈ 𝑋)))
3534rexlimdva 3149 . . . . . . . . . . . . . . . . . . . 20 ((𝐽 = (topGenβ€˜(fiβ€˜π‘₯)) ∧ 𝑐 βŠ† 𝐽 ∧ 𝑋 = βˆͺ 𝑐) β†’ (βˆƒπ‘§ ∈ 𝑐 𝑦 βŠ† 𝑧 β†’ (𝑑 ∈ 𝑦 β†’ 𝑑 ∈ 𝑋)))
3635com23 86 . . . . . . . . . . . . . . . . . . 19 ((𝐽 = (topGenβ€˜(fiβ€˜π‘₯)) ∧ 𝑐 βŠ† 𝐽 ∧ 𝑋 = βˆͺ 𝑐) β†’ (𝑑 ∈ 𝑦 β†’ (βˆƒπ‘§ ∈ 𝑐 𝑦 βŠ† 𝑧 β†’ 𝑑 ∈ 𝑋)))
3736impd 412 . . . . . . . . . . . . . . . . . 18 ((𝐽 = (topGenβ€˜(fiβ€˜π‘₯)) ∧ 𝑐 βŠ† 𝐽 ∧ 𝑋 = βˆͺ 𝑐) β†’ ((𝑑 ∈ 𝑦 ∧ βˆƒπ‘§ ∈ 𝑐 𝑦 βŠ† 𝑧) β†’ 𝑑 ∈ 𝑋))
3837rexlimdvw 3154 . . . . . . . . . . . . . . . . 17 ((𝐽 = (topGenβ€˜(fiβ€˜π‘₯)) ∧ 𝑐 βŠ† 𝐽 ∧ 𝑋 = βˆͺ 𝑐) β†’ (βˆƒπ‘¦ ∈ (fiβ€˜π‘₯)(𝑑 ∈ 𝑦 ∧ βˆƒπ‘§ ∈ 𝑐 𝑦 βŠ† 𝑧) β†’ 𝑑 ∈ 𝑋))
3928, 38impbid 211 . . . . . . . . . . . . . . . 16 ((𝐽 = (topGenβ€˜(fiβ€˜π‘₯)) ∧ 𝑐 βŠ† 𝐽 ∧ 𝑋 = βˆͺ 𝑐) β†’ (𝑑 ∈ 𝑋 ↔ βˆƒπ‘¦ ∈ (fiβ€˜π‘₯)(𝑑 ∈ 𝑦 ∧ βˆƒπ‘§ ∈ 𝑐 𝑦 βŠ† 𝑧)))
40 elunirab 4882 . . . . . . . . . . . . . . . 16 (𝑑 ∈ βˆͺ {𝑦 ∈ (fiβ€˜π‘₯) ∣ βˆƒπ‘§ ∈ 𝑐 𝑦 βŠ† 𝑧} ↔ βˆƒπ‘¦ ∈ (fiβ€˜π‘₯)(𝑑 ∈ 𝑦 ∧ βˆƒπ‘§ ∈ 𝑐 𝑦 βŠ† 𝑧))
4139, 40bitr4di 289 . . . . . . . . . . . . . . 15 ((𝐽 = (topGenβ€˜(fiβ€˜π‘₯)) ∧ 𝑐 βŠ† 𝐽 ∧ 𝑋 = βˆͺ 𝑐) β†’ (𝑑 ∈ 𝑋 ↔ 𝑑 ∈ βˆͺ {𝑦 ∈ (fiβ€˜π‘₯) ∣ βˆƒπ‘§ ∈ 𝑐 𝑦 βŠ† 𝑧}))
4241eqrdv 2731 . . . . . . . . . . . . . 14 ((𝐽 = (topGenβ€˜(fiβ€˜π‘₯)) ∧ 𝑐 βŠ† 𝐽 ∧ 𝑋 = βˆͺ 𝑐) β†’ 𝑋 = βˆͺ {𝑦 ∈ (fiβ€˜π‘₯) ∣ βˆƒπ‘§ ∈ 𝑐 𝑦 βŠ† 𝑧})
43 ssrab2 4038 . . . . . . . . . . . . . . . 16 {𝑦 ∈ (fiβ€˜π‘₯) ∣ βˆƒπ‘§ ∈ 𝑐 𝑦 βŠ† 𝑧} βŠ† (fiβ€˜π‘₯)
44 fvex 6856 . . . . . . . . . . . . . . . . 17 (fiβ€˜π‘₯) ∈ V
4544elpw2 5303 . . . . . . . . . . . . . . . 16 ({𝑦 ∈ (fiβ€˜π‘₯) ∣ βˆƒπ‘§ ∈ 𝑐 𝑦 βŠ† 𝑧} ∈ 𝒫 (fiβ€˜π‘₯) ↔ {𝑦 ∈ (fiβ€˜π‘₯) ∣ βˆƒπ‘§ ∈ 𝑐 𝑦 βŠ† 𝑧} βŠ† (fiβ€˜π‘₯))
4643, 45mpbir 230 . . . . . . . . . . . . . . 15 {𝑦 ∈ (fiβ€˜π‘₯) ∣ βˆƒπ‘§ ∈ 𝑐 𝑦 βŠ† 𝑧} ∈ 𝒫 (fiβ€˜π‘₯)
47 unieq 4877 . . . . . . . . . . . . . . . . . 18 (π‘Ž = {𝑦 ∈ (fiβ€˜π‘₯) ∣ βˆƒπ‘§ ∈ 𝑐 𝑦 βŠ† 𝑧} β†’ βˆͺ π‘Ž = βˆͺ {𝑦 ∈ (fiβ€˜π‘₯) ∣ βˆƒπ‘§ ∈ 𝑐 𝑦 βŠ† 𝑧})
4847eqeq2d 2744 . . . . . . . . . . . . . . . . 17 (π‘Ž = {𝑦 ∈ (fiβ€˜π‘₯) ∣ βˆƒπ‘§ ∈ 𝑐 𝑦 βŠ† 𝑧} β†’ (𝑋 = βˆͺ π‘Ž ↔ 𝑋 = βˆͺ {𝑦 ∈ (fiβ€˜π‘₯) ∣ βˆƒπ‘§ ∈ 𝑐 𝑦 βŠ† 𝑧}))
49 pweq 4575 . . . . . . . . . . . . . . . . . . 19 (π‘Ž = {𝑦 ∈ (fiβ€˜π‘₯) ∣ βˆƒπ‘§ ∈ 𝑐 𝑦 βŠ† 𝑧} β†’ 𝒫 π‘Ž = 𝒫 {𝑦 ∈ (fiβ€˜π‘₯) ∣ βˆƒπ‘§ ∈ 𝑐 𝑦 βŠ† 𝑧})
5049ineq1d 4172 . . . . . . . . . . . . . . . . . 18 (π‘Ž = {𝑦 ∈ (fiβ€˜π‘₯) ∣ βˆƒπ‘§ ∈ 𝑐 𝑦 βŠ† 𝑧} β†’ (𝒫 π‘Ž ∩ Fin) = (𝒫 {𝑦 ∈ (fiβ€˜π‘₯) ∣ βˆƒπ‘§ ∈ 𝑐 𝑦 βŠ† 𝑧} ∩ Fin))
5150rexeqdv 3313 . . . . . . . . . . . . . . . . 17 (π‘Ž = {𝑦 ∈ (fiβ€˜π‘₯) ∣ βˆƒπ‘§ ∈ 𝑐 𝑦 βŠ† 𝑧} β†’ (βˆƒπ‘ ∈ (𝒫 π‘Ž ∩ Fin)𝑋 = βˆͺ 𝑏 ↔ βˆƒπ‘ ∈ (𝒫 {𝑦 ∈ (fiβ€˜π‘₯) ∣ βˆƒπ‘§ ∈ 𝑐 𝑦 βŠ† 𝑧} ∩ Fin)𝑋 = βˆͺ 𝑏))
5248, 51imbi12d 345 . . . . . . . . . . . . . . . 16 (π‘Ž = {𝑦 ∈ (fiβ€˜π‘₯) ∣ βˆƒπ‘§ ∈ 𝑐 𝑦 βŠ† 𝑧} β†’ ((𝑋 = βˆͺ π‘Ž β†’ βˆƒπ‘ ∈ (𝒫 π‘Ž ∩ Fin)𝑋 = βˆͺ 𝑏) ↔ (𝑋 = βˆͺ {𝑦 ∈ (fiβ€˜π‘₯) ∣ βˆƒπ‘§ ∈ 𝑐 𝑦 βŠ† 𝑧} β†’ βˆƒπ‘ ∈ (𝒫 {𝑦 ∈ (fiβ€˜π‘₯) ∣ βˆƒπ‘§ ∈ 𝑐 𝑦 βŠ† 𝑧} ∩ Fin)𝑋 = βˆͺ 𝑏)))
5352rspcv 3576 . . . . . . . . . . . . . . 15 ({𝑦 ∈ (fiβ€˜π‘₯) ∣ βˆƒπ‘§ ∈ 𝑐 𝑦 βŠ† 𝑧} ∈ 𝒫 (fiβ€˜π‘₯) β†’ (βˆ€π‘Ž ∈ 𝒫 (fiβ€˜π‘₯)(𝑋 = βˆͺ π‘Ž β†’ βˆƒπ‘ ∈ (𝒫 π‘Ž ∩ Fin)𝑋 = βˆͺ 𝑏) β†’ (𝑋 = βˆͺ {𝑦 ∈ (fiβ€˜π‘₯) ∣ βˆƒπ‘§ ∈ 𝑐 𝑦 βŠ† 𝑧} β†’ βˆƒπ‘ ∈ (𝒫 {𝑦 ∈ (fiβ€˜π‘₯) ∣ βˆƒπ‘§ ∈ 𝑐 𝑦 βŠ† 𝑧} ∩ Fin)𝑋 = βˆͺ 𝑏)))
5446, 53ax-mp 5 . . . . . . . . . . . . . 14 (βˆ€π‘Ž ∈ 𝒫 (fiβ€˜π‘₯)(𝑋 = βˆͺ π‘Ž β†’ βˆƒπ‘ ∈ (𝒫 π‘Ž ∩ Fin)𝑋 = βˆͺ 𝑏) β†’ (𝑋 = βˆͺ {𝑦 ∈ (fiβ€˜π‘₯) ∣ βˆƒπ‘§ ∈ 𝑐 𝑦 βŠ† 𝑧} β†’ βˆƒπ‘ ∈ (𝒫 {𝑦 ∈ (fiβ€˜π‘₯) ∣ βˆƒπ‘§ ∈ 𝑐 𝑦 βŠ† 𝑧} ∩ Fin)𝑋 = βˆͺ 𝑏))
5542, 54syl5com 31 . . . . . . . . . . . . 13 ((𝐽 = (topGenβ€˜(fiβ€˜π‘₯)) ∧ 𝑐 βŠ† 𝐽 ∧ 𝑋 = βˆͺ 𝑐) β†’ (βˆ€π‘Ž ∈ 𝒫 (fiβ€˜π‘₯)(𝑋 = βˆͺ π‘Ž β†’ βˆƒπ‘ ∈ (𝒫 π‘Ž ∩ Fin)𝑋 = βˆͺ 𝑏) β†’ βˆƒπ‘ ∈ (𝒫 {𝑦 ∈ (fiβ€˜π‘₯) ∣ βˆƒπ‘§ ∈ 𝑐 𝑦 βŠ† 𝑧} ∩ Fin)𝑋 = βˆͺ 𝑏))
56 elfpw 9301 . . . . . . . . . . . . . . 15 (𝑏 ∈ (𝒫 {𝑦 ∈ (fiβ€˜π‘₯) ∣ βˆƒπ‘§ ∈ 𝑐 𝑦 βŠ† 𝑧} ∩ Fin) ↔ (𝑏 βŠ† {𝑦 ∈ (fiβ€˜π‘₯) ∣ βˆƒπ‘§ ∈ 𝑐 𝑦 βŠ† 𝑧} ∧ 𝑏 ∈ Fin))
57 ssel 3938 . . . . . . . . . . . . . . . . . . . . . . 23 (𝑏 βŠ† {𝑦 ∈ (fiβ€˜π‘₯) ∣ βˆƒπ‘§ ∈ 𝑐 𝑦 βŠ† 𝑧} β†’ (𝑑 ∈ 𝑏 β†’ 𝑑 ∈ {𝑦 ∈ (fiβ€˜π‘₯) ∣ βˆƒπ‘§ ∈ 𝑐 𝑦 βŠ† 𝑧}))
58 sseq1 3970 . . . . . . . . . . . . . . . . . . . . . . . . . 26 (𝑦 = 𝑑 β†’ (𝑦 βŠ† 𝑧 ↔ 𝑑 βŠ† 𝑧))
5958rexbidv 3172 . . . . . . . . . . . . . . . . . . . . . . . . 25 (𝑦 = 𝑑 β†’ (βˆƒπ‘§ ∈ 𝑐 𝑦 βŠ† 𝑧 ↔ βˆƒπ‘§ ∈ 𝑐 𝑑 βŠ† 𝑧))
6059elrab 3646 . . . . . . . . . . . . . . . . . . . . . . . 24 (𝑑 ∈ {𝑦 ∈ (fiβ€˜π‘₯) ∣ βˆƒπ‘§ ∈ 𝑐 𝑦 βŠ† 𝑧} ↔ (𝑑 ∈ (fiβ€˜π‘₯) ∧ βˆƒπ‘§ ∈ 𝑐 𝑑 βŠ† 𝑧))
6160simprbi 498 . . . . . . . . . . . . . . . . . . . . . . 23 (𝑑 ∈ {𝑦 ∈ (fiβ€˜π‘₯) ∣ βˆƒπ‘§ ∈ 𝑐 𝑦 βŠ† 𝑧} β†’ βˆƒπ‘§ ∈ 𝑐 𝑑 βŠ† 𝑧)
6257, 61syl6 35 . . . . . . . . . . . . . . . . . . . . . 22 (𝑏 βŠ† {𝑦 ∈ (fiβ€˜π‘₯) ∣ βˆƒπ‘§ ∈ 𝑐 𝑦 βŠ† 𝑧} β†’ (𝑑 ∈ 𝑏 β†’ βˆƒπ‘§ ∈ 𝑐 𝑑 βŠ† 𝑧))
6362ralrimiv 3139 . . . . . . . . . . . . . . . . . . . . 21 (𝑏 βŠ† {𝑦 ∈ (fiβ€˜π‘₯) ∣ βˆƒπ‘§ ∈ 𝑐 𝑦 βŠ† 𝑧} β†’ βˆ€π‘‘ ∈ 𝑏 βˆƒπ‘§ ∈ 𝑐 𝑑 βŠ† 𝑧)
64 sseq2 3971 . . . . . . . . . . . . . . . . . . . . . . 23 (𝑧 = (π‘“β€˜π‘‘) β†’ (𝑑 βŠ† 𝑧 ↔ 𝑑 βŠ† (π‘“β€˜π‘‘)))
6564ac6sfi 9234 . . . . . . . . . . . . . . . . . . . . . 22 ((𝑏 ∈ Fin ∧ βˆ€π‘‘ ∈ 𝑏 βˆƒπ‘§ ∈ 𝑐 𝑑 βŠ† 𝑧) β†’ βˆƒπ‘“(𝑓:π‘βŸΆπ‘ ∧ βˆ€π‘‘ ∈ 𝑏 𝑑 βŠ† (π‘“β€˜π‘‘)))
6665ex 414 . . . . . . . . . . . . . . . . . . . . 21 (𝑏 ∈ Fin β†’ (βˆ€π‘‘ ∈ 𝑏 βˆƒπ‘§ ∈ 𝑐 𝑑 βŠ† 𝑧 β†’ βˆƒπ‘“(𝑓:π‘βŸΆπ‘ ∧ βˆ€π‘‘ ∈ 𝑏 𝑑 βŠ† (π‘“β€˜π‘‘))))
6763, 66syl5 34 . . . . . . . . . . . . . . . . . . . 20 (𝑏 ∈ Fin β†’ (𝑏 βŠ† {𝑦 ∈ (fiβ€˜π‘₯) ∣ βˆƒπ‘§ ∈ 𝑐 𝑦 βŠ† 𝑧} β†’ βˆƒπ‘“(𝑓:π‘βŸΆπ‘ ∧ βˆ€π‘‘ ∈ 𝑏 𝑑 βŠ† (π‘“β€˜π‘‘))))
6867adantl 483 . . . . . . . . . . . . . . . . . . 19 (((𝐽 = (topGenβ€˜(fiβ€˜π‘₯)) ∧ 𝑐 βŠ† 𝐽 ∧ 𝑋 = βˆͺ 𝑐) ∧ 𝑏 ∈ Fin) β†’ (𝑏 βŠ† {𝑦 ∈ (fiβ€˜π‘₯) ∣ βˆƒπ‘§ ∈ 𝑐 𝑦 βŠ† 𝑧} β†’ βˆƒπ‘“(𝑓:π‘βŸΆπ‘ ∧ βˆ€π‘‘ ∈ 𝑏 𝑑 βŠ† (π‘“β€˜π‘‘))))
69 simprll 778 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((((𝐽 = (topGenβ€˜(fiβ€˜π‘₯)) ∧ 𝑐 βŠ† 𝐽 ∧ 𝑋 = βˆͺ 𝑐) ∧ 𝑏 ∈ Fin) ∧ ((𝑓:π‘βŸΆπ‘ ∧ βˆ€π‘‘ ∈ 𝑏 𝑑 βŠ† (π‘“β€˜π‘‘)) ∧ 𝑋 = βˆͺ 𝑏)) β†’ 𝑓:π‘βŸΆπ‘)
70 frn 6676 . . . . . . . . . . . . . . . . . . . . . . . . 25 (𝑓:π‘βŸΆπ‘ β†’ ran 𝑓 βŠ† 𝑐)
7169, 70syl 17 . . . . . . . . . . . . . . . . . . . . . . . 24 ((((𝐽 = (topGenβ€˜(fiβ€˜π‘₯)) ∧ 𝑐 βŠ† 𝐽 ∧ 𝑋 = βˆͺ 𝑐) ∧ 𝑏 ∈ Fin) ∧ ((𝑓:π‘βŸΆπ‘ ∧ βˆ€π‘‘ ∈ 𝑏 𝑑 βŠ† (π‘“β€˜π‘‘)) ∧ 𝑋 = βˆͺ 𝑏)) β†’ ran 𝑓 βŠ† 𝑐)
72 simplr 768 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((((𝐽 = (topGenβ€˜(fiβ€˜π‘₯)) ∧ 𝑐 βŠ† 𝐽 ∧ 𝑋 = βˆͺ 𝑐) ∧ 𝑏 ∈ Fin) ∧ ((𝑓:π‘βŸΆπ‘ ∧ βˆ€π‘‘ ∈ 𝑏 𝑑 βŠ† (π‘“β€˜π‘‘)) ∧ 𝑋 = βˆͺ 𝑏)) β†’ 𝑏 ∈ Fin)
73 ffn 6669 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 (𝑓:π‘βŸΆπ‘ β†’ 𝑓 Fn 𝑏)
74 dffn4 6763 . . . . . . . . . . . . . . . . . . . . . . . . . . . . 29 (𝑓 Fn 𝑏 ↔ 𝑓:𝑏–ontoβ†’ran 𝑓)
7573, 74sylib 217 . . . . . . . . . . . . . . . . . . . . . . . . . . . 28 (𝑓:π‘βŸΆπ‘ β†’ 𝑓:𝑏–ontoβ†’ran 𝑓)
7675adantr 482 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 ((𝑓:π‘βŸΆπ‘ ∧ βˆ€π‘‘ ∈ 𝑏 𝑑 βŠ† (π‘“β€˜π‘‘)) β†’ 𝑓:𝑏–ontoβ†’ran 𝑓)
7776ad2antrl 727 . . . . . . . . . . . . . . . . . . . . . . . . . 26 ((((𝐽 = (topGenβ€˜(fiβ€˜π‘₯)) ∧ 𝑐 βŠ† 𝐽 ∧ 𝑋 = βˆͺ 𝑐) ∧ 𝑏 ∈ Fin) ∧ ((𝑓:π‘βŸΆπ‘ ∧ βˆ€π‘‘ ∈ 𝑏 𝑑 βŠ† (π‘“β€˜π‘‘)) ∧ 𝑋 = βˆͺ 𝑏)) β†’ 𝑓:𝑏–ontoβ†’ran 𝑓)
78 fodomfi 9272 . . . . . . . . . . . . . . . . . . . . . . . . . 26 ((𝑏 ∈ Fin ∧ 𝑓:𝑏–ontoβ†’ran 𝑓) β†’ ran 𝑓 β‰Ό 𝑏)
7972, 77, 78syl2anc 585 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((((𝐽 = (topGenβ€˜(fiβ€˜π‘₯)) ∧ 𝑐 βŠ† 𝐽 ∧ 𝑋 = βˆͺ 𝑐) ∧ 𝑏 ∈ Fin) ∧ ((𝑓:π‘βŸΆπ‘ ∧ βˆ€π‘‘ ∈ 𝑏 𝑑 βŠ† (π‘“β€˜π‘‘)) ∧ 𝑋 = βˆͺ 𝑏)) β†’ ran 𝑓 β‰Ό 𝑏)
80 domfi 9139 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((𝑏 ∈ Fin ∧ ran 𝑓 β‰Ό 𝑏) β†’ ran 𝑓 ∈ Fin)
8172, 79, 80syl2anc 585 . . . . . . . . . . . . . . . . . . . . . . . 24 ((((𝐽 = (topGenβ€˜(fiβ€˜π‘₯)) ∧ 𝑐 βŠ† 𝐽 ∧ 𝑋 = βˆͺ 𝑐) ∧ 𝑏 ∈ Fin) ∧ ((𝑓:π‘βŸΆπ‘ ∧ βˆ€π‘‘ ∈ 𝑏 𝑑 βŠ† (π‘“β€˜π‘‘)) ∧ 𝑋 = βˆͺ 𝑏)) β†’ ran 𝑓 ∈ Fin)
8271, 81jca 513 . . . . . . . . . . . . . . . . . . . . . . 23 ((((𝐽 = (topGenβ€˜(fiβ€˜π‘₯)) ∧ 𝑐 βŠ† 𝐽 ∧ 𝑋 = βˆͺ 𝑐) ∧ 𝑏 ∈ Fin) ∧ ((𝑓:π‘βŸΆπ‘ ∧ βˆ€π‘‘ ∈ 𝑏 𝑑 βŠ† (π‘“β€˜π‘‘)) ∧ 𝑋 = βˆͺ 𝑏)) β†’ (ran 𝑓 βŠ† 𝑐 ∧ ran 𝑓 ∈ Fin))
83 elin 3927 . . . . . . . . . . . . . . . . . . . . . . . 24 (ran 𝑓 ∈ (𝒫 𝑐 ∩ Fin) ↔ (ran 𝑓 ∈ 𝒫 𝑐 ∧ ran 𝑓 ∈ Fin))
84 vex 3448 . . . . . . . . . . . . . . . . . . . . . . . . . 26 𝑐 ∈ V
8584elpw2 5303 . . . . . . . . . . . . . . . . . . . . . . . . 25 (ran 𝑓 ∈ 𝒫 𝑐 ↔ ran 𝑓 βŠ† 𝑐)
8685anbi1i 625 . . . . . . . . . . . . . . . . . . . . . . . 24 ((ran 𝑓 ∈ 𝒫 𝑐 ∧ ran 𝑓 ∈ Fin) ↔ (ran 𝑓 βŠ† 𝑐 ∧ ran 𝑓 ∈ Fin))
8783, 86bitr2i 276 . . . . . . . . . . . . . . . . . . . . . . 23 ((ran 𝑓 βŠ† 𝑐 ∧ ran 𝑓 ∈ Fin) ↔ ran 𝑓 ∈ (𝒫 𝑐 ∩ Fin))
8882, 87sylib 217 . . . . . . . . . . . . . . . . . . . . . 22 ((((𝐽 = (topGenβ€˜(fiβ€˜π‘₯)) ∧ 𝑐 βŠ† 𝐽 ∧ 𝑋 = βˆͺ 𝑐) ∧ 𝑏 ∈ Fin) ∧ ((𝑓:π‘βŸΆπ‘ ∧ βˆ€π‘‘ ∈ 𝑏 𝑑 βŠ† (π‘“β€˜π‘‘)) ∧ 𝑋 = βˆͺ 𝑏)) β†’ ran 𝑓 ∈ (𝒫 𝑐 ∩ Fin))
89 simprr 772 . . . . . . . . . . . . . . . . . . . . . . . 24 ((((𝐽 = (topGenβ€˜(fiβ€˜π‘₯)) ∧ 𝑐 βŠ† 𝐽 ∧ 𝑋 = βˆͺ 𝑐) ∧ 𝑏 ∈ Fin) ∧ ((𝑓:π‘βŸΆπ‘ ∧ βˆ€π‘‘ ∈ 𝑏 𝑑 βŠ† (π‘“β€˜π‘‘)) ∧ 𝑋 = βˆͺ 𝑏)) β†’ 𝑋 = βˆͺ 𝑏)
90 uniiun 5019 . . . . . . . . . . . . . . . . . . . . . . . . . 26 βˆͺ 𝑏 = βˆͺ 𝑑 ∈ 𝑏 𝑑
91 simprlr 779 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 ((((𝐽 = (topGenβ€˜(fiβ€˜π‘₯)) ∧ 𝑐 βŠ† 𝐽 ∧ 𝑋 = βˆͺ 𝑐) ∧ 𝑏 ∈ Fin) ∧ ((𝑓:π‘βŸΆπ‘ ∧ βˆ€π‘‘ ∈ 𝑏 𝑑 βŠ† (π‘“β€˜π‘‘)) ∧ 𝑋 = βˆͺ 𝑏)) β†’ βˆ€π‘‘ ∈ 𝑏 𝑑 βŠ† (π‘“β€˜π‘‘))
92 ss2iun 4973 . . . . . . . . . . . . . . . . . . . . . . . . . . 27 (βˆ€π‘‘ ∈ 𝑏 𝑑 βŠ† (π‘“β€˜π‘‘) β†’ βˆͺ 𝑑 ∈ 𝑏 𝑑 βŠ† βˆͺ 𝑑 ∈ 𝑏 (π‘“β€˜π‘‘))
9391, 92syl 17 . . . . . . . . . . . . . . . . . . . . . . . . . 26 ((((𝐽 = (topGenβ€˜(fiβ€˜π‘₯)) ∧ 𝑐 βŠ† 𝐽 ∧ 𝑋 = βˆͺ 𝑐) ∧ 𝑏 ∈ Fin) ∧ ((𝑓:π‘βŸΆπ‘ ∧ βˆ€π‘‘ ∈ 𝑏 𝑑 βŠ† (π‘“β€˜π‘‘)) ∧ 𝑋 = βˆͺ 𝑏)) β†’ βˆͺ 𝑑 ∈ 𝑏 𝑑 βŠ† βˆͺ 𝑑 ∈ 𝑏 (π‘“β€˜π‘‘))
9490, 93eqsstrid 3993 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((((𝐽 = (topGenβ€˜(fiβ€˜π‘₯)) ∧ 𝑐 βŠ† 𝐽 ∧ 𝑋 = βˆͺ 𝑐) ∧ 𝑏 ∈ Fin) ∧ ((𝑓:π‘βŸΆπ‘ ∧ βˆ€π‘‘ ∈ 𝑏 𝑑 βŠ† (π‘“β€˜π‘‘)) ∧ 𝑋 = βˆͺ 𝑏)) β†’ βˆͺ 𝑏 βŠ† βˆͺ 𝑑 ∈ 𝑏 (π‘“β€˜π‘‘))
95 fniunfv 7195 . . . . . . . . . . . . . . . . . . . . . . . . . 26 (𝑓 Fn 𝑏 β†’ βˆͺ 𝑑 ∈ 𝑏 (π‘“β€˜π‘‘) = βˆͺ ran 𝑓)
9669, 73, 953syl 18 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((((𝐽 = (topGenβ€˜(fiβ€˜π‘₯)) ∧ 𝑐 βŠ† 𝐽 ∧ 𝑋 = βˆͺ 𝑐) ∧ 𝑏 ∈ Fin) ∧ ((𝑓:π‘βŸΆπ‘ ∧ βˆ€π‘‘ ∈ 𝑏 𝑑 βŠ† (π‘“β€˜π‘‘)) ∧ 𝑋 = βˆͺ 𝑏)) β†’ βˆͺ 𝑑 ∈ 𝑏 (π‘“β€˜π‘‘) = βˆͺ ran 𝑓)
9794, 96sseqtrd 3985 . . . . . . . . . . . . . . . . . . . . . . . 24 ((((𝐽 = (topGenβ€˜(fiβ€˜π‘₯)) ∧ 𝑐 βŠ† 𝐽 ∧ 𝑋 = βˆͺ 𝑐) ∧ 𝑏 ∈ Fin) ∧ ((𝑓:π‘βŸΆπ‘ ∧ βˆ€π‘‘ ∈ 𝑏 𝑑 βŠ† (π‘“β€˜π‘‘)) ∧ 𝑋 = βˆͺ 𝑏)) β†’ βˆͺ 𝑏 βŠ† βˆͺ ran 𝑓)
9889, 97eqsstrd 3983 . . . . . . . . . . . . . . . . . . . . . . 23 ((((𝐽 = (topGenβ€˜(fiβ€˜π‘₯)) ∧ 𝑐 βŠ† 𝐽 ∧ 𝑋 = βˆͺ 𝑐) ∧ 𝑏 ∈ Fin) ∧ ((𝑓:π‘βŸΆπ‘ ∧ βˆ€π‘‘ ∈ 𝑏 𝑑 βŠ† (π‘“β€˜π‘‘)) ∧ 𝑋 = βˆͺ 𝑏)) β†’ 𝑋 βŠ† βˆͺ ran 𝑓)
99 simpll2 1214 . . . . . . . . . . . . . . . . . . . . . . . . 25 ((((𝐽 = (topGenβ€˜(fiβ€˜π‘₯)) ∧ 𝑐 βŠ† 𝐽 ∧ 𝑋 = βˆͺ 𝑐) ∧ 𝑏 ∈ Fin) ∧ ((𝑓:π‘βŸΆπ‘ ∧ βˆ€π‘‘ ∈ 𝑏 𝑑 βŠ† (π‘“β€˜π‘‘)) ∧ 𝑋 = βˆͺ 𝑏)) β†’ 𝑐 βŠ† 𝐽)
10071, 99sstrd 3955 . . . . . . . . . . . . . . . . . . . . . . . 24 ((((𝐽 = (topGenβ€˜(fiβ€˜π‘₯)) ∧ 𝑐 βŠ† 𝐽 ∧ 𝑋 = βˆͺ 𝑐) ∧ 𝑏 ∈ Fin) ∧ ((𝑓:π‘βŸΆπ‘ ∧ βˆ€π‘‘ ∈ 𝑏 𝑑 βŠ† (π‘“β€˜π‘‘)) ∧ 𝑋 = βˆͺ 𝑏)) β†’ ran 𝑓 βŠ† 𝐽)
101 uniss 4874 . . . . . . . . . . . . . . . . . . . . . . . . 25 (ran 𝑓 βŠ† 𝐽 β†’ βˆͺ ran 𝑓 βŠ† βˆͺ 𝐽)
102101, 1sseqtrrdi 3996 . . . . . . . . . . . . . . . . . . . . . . . 24 (ran 𝑓 βŠ† 𝐽 β†’ βˆͺ ran 𝑓 βŠ† 𝑋)
103100, 102syl 17 . . . . . . . . . . . . . . . . . . . . . . 23 ((((𝐽 = (topGenβ€˜(fiβ€˜π‘₯)) ∧ 𝑐 βŠ† 𝐽 ∧ 𝑋 = βˆͺ 𝑐) ∧ 𝑏 ∈ Fin) ∧ ((𝑓:π‘βŸΆπ‘ ∧ βˆ€π‘‘ ∈ 𝑏 𝑑 βŠ† (π‘“β€˜π‘‘)) ∧ 𝑋 = βˆͺ 𝑏)) β†’ βˆͺ ran 𝑓 βŠ† 𝑋)
10498, 103eqssd 3962 . . . . . . . . . . . . . . . . . . . . . 22 ((((𝐽 = (topGenβ€˜(fiβ€˜π‘₯)) ∧ 𝑐 βŠ† 𝐽 ∧ 𝑋 = βˆͺ 𝑐) ∧ 𝑏 ∈ Fin) ∧ ((𝑓:π‘βŸΆπ‘ ∧ βˆ€π‘‘ ∈ 𝑏 𝑑 βŠ† (π‘“β€˜π‘‘)) ∧ 𝑋 = βˆͺ 𝑏)) β†’ 𝑋 = βˆͺ ran 𝑓)
105 unieq 4877 . . . . . . . . . . . . . . . . . . . . . . . 24 (𝑑 = ran 𝑓 β†’ βˆͺ 𝑑 = βˆͺ ran 𝑓)
106105eqeq2d 2744 . . . . . . . . . . . . . . . . . . . . . . 23 (𝑑 = ran 𝑓 β†’ (𝑋 = βˆͺ 𝑑 ↔ 𝑋 = βˆͺ ran 𝑓))
107106rspcev 3580 . . . . . . . . . . . . . . . . . . . . . 22 ((ran 𝑓 ∈ (𝒫 𝑐 ∩ Fin) ∧ 𝑋 = βˆͺ ran 𝑓) β†’ βˆƒπ‘‘ ∈ (𝒫 𝑐 ∩ Fin)𝑋 = βˆͺ 𝑑)
10888, 104, 107syl2anc 585 . . . . . . . . . . . . . . . . . . . . 21 ((((𝐽 = (topGenβ€˜(fiβ€˜π‘₯)) ∧ 𝑐 βŠ† 𝐽 ∧ 𝑋 = βˆͺ 𝑐) ∧ 𝑏 ∈ Fin) ∧ ((𝑓:π‘βŸΆπ‘ ∧ βˆ€π‘‘ ∈ 𝑏 𝑑 βŠ† (π‘“β€˜π‘‘)) ∧ 𝑋 = βˆͺ 𝑏)) β†’ βˆƒπ‘‘ ∈ (𝒫 𝑐 ∩ Fin)𝑋 = βˆͺ 𝑑)
109108exp32 422 . . . . . . . . . . . . . . . . . . . 20 (((𝐽 = (topGenβ€˜(fiβ€˜π‘₯)) ∧ 𝑐 βŠ† 𝐽 ∧ 𝑋 = βˆͺ 𝑐) ∧ 𝑏 ∈ Fin) β†’ ((𝑓:π‘βŸΆπ‘ ∧ βˆ€π‘‘ ∈ 𝑏 𝑑 βŠ† (π‘“β€˜π‘‘)) β†’ (𝑋 = βˆͺ 𝑏 β†’ βˆƒπ‘‘ ∈ (𝒫 𝑐 ∩ Fin)𝑋 = βˆͺ 𝑑)))
110109exlimdv 1937 . . . . . . . . . . . . . . . . . . 19 (((𝐽 = (topGenβ€˜(fiβ€˜π‘₯)) ∧ 𝑐 βŠ† 𝐽 ∧ 𝑋 = βˆͺ 𝑐) ∧ 𝑏 ∈ Fin) β†’ (βˆƒπ‘“(𝑓:π‘βŸΆπ‘ ∧ βˆ€π‘‘ ∈ 𝑏 𝑑 βŠ† (π‘“β€˜π‘‘)) β†’ (𝑋 = βˆͺ 𝑏 β†’ βˆƒπ‘‘ ∈ (𝒫 𝑐 ∩ Fin)𝑋 = βˆͺ 𝑑)))
11168, 110syld 47 . . . . . . . . . . . . . . . . . 18 (((𝐽 = (topGenβ€˜(fiβ€˜π‘₯)) ∧ 𝑐 βŠ† 𝐽 ∧ 𝑋 = βˆͺ 𝑐) ∧ 𝑏 ∈ Fin) β†’ (𝑏 βŠ† {𝑦 ∈ (fiβ€˜π‘₯) ∣ βˆƒπ‘§ ∈ 𝑐 𝑦 βŠ† 𝑧} β†’ (𝑋 = βˆͺ 𝑏 β†’ βˆƒπ‘‘ ∈ (𝒫 𝑐 ∩ Fin)𝑋 = βˆͺ 𝑑)))
112111ex 414 . . . . . . . . . . . . . . . . 17 ((𝐽 = (topGenβ€˜(fiβ€˜π‘₯)) ∧ 𝑐 βŠ† 𝐽 ∧ 𝑋 = βˆͺ 𝑐) β†’ (𝑏 ∈ Fin β†’ (𝑏 βŠ† {𝑦 ∈ (fiβ€˜π‘₯) ∣ βˆƒπ‘§ ∈ 𝑐 𝑦 βŠ† 𝑧} β†’ (𝑋 = βˆͺ 𝑏 β†’ βˆƒπ‘‘ ∈ (𝒫 𝑐 ∩ Fin)𝑋 = βˆͺ 𝑑))))
113112com23 86 . . . . . . . . . . . . . . . 16 ((𝐽 = (topGenβ€˜(fiβ€˜π‘₯)) ∧ 𝑐 βŠ† 𝐽 ∧ 𝑋 = βˆͺ 𝑐) β†’ (𝑏 βŠ† {𝑦 ∈ (fiβ€˜π‘₯) ∣ βˆƒπ‘§ ∈ 𝑐 𝑦 βŠ† 𝑧} β†’ (𝑏 ∈ Fin β†’ (𝑋 = βˆͺ 𝑏 β†’ βˆƒπ‘‘ ∈ (𝒫 𝑐 ∩ Fin)𝑋 = βˆͺ 𝑑))))
114113impd 412 . . . . . . . . . . . . . . 15 ((𝐽 = (topGenβ€˜(fiβ€˜π‘₯)) ∧ 𝑐 βŠ† 𝐽 ∧ 𝑋 = βˆͺ 𝑐) β†’ ((𝑏 βŠ† {𝑦 ∈ (fiβ€˜π‘₯) ∣ βˆƒπ‘§ ∈ 𝑐 𝑦 βŠ† 𝑧} ∧ 𝑏 ∈ Fin) β†’ (𝑋 = βˆͺ 𝑏 β†’ βˆƒπ‘‘ ∈ (𝒫 𝑐 ∩ Fin)𝑋 = βˆͺ 𝑑)))
11556, 114biimtrid 241 . . . . . . . . . . . . . 14 ((𝐽 = (topGenβ€˜(fiβ€˜π‘₯)) ∧ 𝑐 βŠ† 𝐽 ∧ 𝑋 = βˆͺ 𝑐) β†’ (𝑏 ∈ (𝒫 {𝑦 ∈ (fiβ€˜π‘₯) ∣ βˆƒπ‘§ ∈ 𝑐 𝑦 βŠ† 𝑧} ∩ Fin) β†’ (𝑋 = βˆͺ 𝑏 β†’ βˆƒπ‘‘ ∈ (𝒫 𝑐 ∩ Fin)𝑋 = βˆͺ 𝑑)))
116115rexlimdv 3147 . . . . . . . . . . . . 13 ((𝐽 = (topGenβ€˜(fiβ€˜π‘₯)) ∧ 𝑐 βŠ† 𝐽 ∧ 𝑋 = βˆͺ 𝑐) β†’ (βˆƒπ‘ ∈ (𝒫 {𝑦 ∈ (fiβ€˜π‘₯) ∣ βˆƒπ‘§ ∈ 𝑐 𝑦 βŠ† 𝑧} ∩ Fin)𝑋 = βˆͺ 𝑏 β†’ βˆƒπ‘‘ ∈ (𝒫 𝑐 ∩ Fin)𝑋 = βˆͺ 𝑑))
11755, 116syld 47 . . . . . . . . . . . 12 ((𝐽 = (topGenβ€˜(fiβ€˜π‘₯)) ∧ 𝑐 βŠ† 𝐽 ∧ 𝑋 = βˆͺ 𝑐) β†’ (βˆ€π‘Ž ∈ 𝒫 (fiβ€˜π‘₯)(𝑋 = βˆͺ π‘Ž β†’ βˆƒπ‘ ∈ (𝒫 π‘Ž ∩ Fin)𝑋 = βˆͺ 𝑏) β†’ βˆƒπ‘‘ ∈ (𝒫 𝑐 ∩ Fin)𝑋 = βˆͺ 𝑑))
1181173exp 1120 . . . . . . . . . . 11 (𝐽 = (topGenβ€˜(fiβ€˜π‘₯)) β†’ (𝑐 βŠ† 𝐽 β†’ (𝑋 = βˆͺ 𝑐 β†’ (βˆ€π‘Ž ∈ 𝒫 (fiβ€˜π‘₯)(𝑋 = βˆͺ π‘Ž β†’ βˆƒπ‘ ∈ (𝒫 π‘Ž ∩ Fin)𝑋 = βˆͺ 𝑏) β†’ βˆƒπ‘‘ ∈ (𝒫 𝑐 ∩ Fin)𝑋 = βˆͺ 𝑑))))
119118com34 91 . . . . . . . . . 10 (𝐽 = (topGenβ€˜(fiβ€˜π‘₯)) β†’ (𝑐 βŠ† 𝐽 β†’ (βˆ€π‘Ž ∈ 𝒫 (fiβ€˜π‘₯)(𝑋 = βˆͺ π‘Ž β†’ βˆƒπ‘ ∈ (𝒫 π‘Ž ∩ Fin)𝑋 = βˆͺ 𝑏) β†’ (𝑋 = βˆͺ 𝑐 β†’ βˆƒπ‘‘ ∈ (𝒫 𝑐 ∩ Fin)𝑋 = βˆͺ 𝑑))))
120119com23 86 . . . . . . . . 9 (𝐽 = (topGenβ€˜(fiβ€˜π‘₯)) β†’ (βˆ€π‘Ž ∈ 𝒫 (fiβ€˜π‘₯)(𝑋 = βˆͺ π‘Ž β†’ βˆƒπ‘ ∈ (𝒫 π‘Ž ∩ Fin)𝑋 = βˆͺ 𝑏) β†’ (𝑐 βŠ† 𝐽 β†’ (𝑋 = βˆͺ 𝑐 β†’ βˆƒπ‘‘ ∈ (𝒫 𝑐 ∩ Fin)𝑋 = βˆͺ 𝑑))))
1214, 120syl7bi 255 . . . . . . . 8 (𝐽 = (topGenβ€˜(fiβ€˜π‘₯)) β†’ (βˆ€π‘Ž ∈ 𝒫 (fiβ€˜π‘₯)(𝑋 = βˆͺ π‘Ž β†’ βˆƒπ‘ ∈ (𝒫 π‘Ž ∩ Fin)𝑋 = βˆͺ 𝑏) β†’ (𝑐 ∈ 𝒫 𝐽 β†’ (𝑋 = βˆͺ 𝑐 β†’ βˆƒπ‘‘ ∈ (𝒫 𝑐 ∩ Fin)𝑋 = βˆͺ 𝑑))))
122121ralrimdv 3146 . . . . . . 7 (𝐽 = (topGenβ€˜(fiβ€˜π‘₯)) β†’ (βˆ€π‘Ž ∈ 𝒫 (fiβ€˜π‘₯)(𝑋 = βˆͺ π‘Ž β†’ βˆƒπ‘ ∈ (𝒫 π‘Ž ∩ Fin)𝑋 = βˆͺ 𝑏) β†’ βˆ€π‘ ∈ 𝒫 𝐽(𝑋 = βˆͺ 𝑐 β†’ βˆƒπ‘‘ ∈ (𝒫 𝑐 ∩ Fin)𝑋 = βˆͺ 𝑑)))
123 fibas 22343 . . . . . . . . 9 (fiβ€˜π‘₯) ∈ TopBases
124 tgcl 22335 . . . . . . . . 9 ((fiβ€˜π‘₯) ∈ TopBases β†’ (topGenβ€˜(fiβ€˜π‘₯)) ∈ Top)
125123, 124ax-mp 5 . . . . . . . 8 (topGenβ€˜(fiβ€˜π‘₯)) ∈ Top
126 eleq1 2822 . . . . . . . 8 (𝐽 = (topGenβ€˜(fiβ€˜π‘₯)) β†’ (𝐽 ∈ Top ↔ (topGenβ€˜(fiβ€˜π‘₯)) ∈ Top))
127125, 126mpbiri 258 . . . . . . 7 (𝐽 = (topGenβ€˜(fiβ€˜π‘₯)) β†’ 𝐽 ∈ Top)
128122, 127jctild 527 . . . . . 6 (𝐽 = (topGenβ€˜(fiβ€˜π‘₯)) β†’ (βˆ€π‘Ž ∈ 𝒫 (fiβ€˜π‘₯)(𝑋 = βˆͺ π‘Ž β†’ βˆƒπ‘ ∈ (𝒫 π‘Ž ∩ Fin)𝑋 = βˆͺ 𝑏) β†’ (𝐽 ∈ Top ∧ βˆ€π‘ ∈ 𝒫 𝐽(𝑋 = βˆͺ 𝑐 β†’ βˆƒπ‘‘ ∈ (𝒫 𝑐 ∩ Fin)𝑋 = βˆͺ 𝑑))))
1291iscmp 22755 . . . . . 6 (𝐽 ∈ Comp ↔ (𝐽 ∈ Top ∧ βˆ€π‘ ∈ 𝒫 𝐽(𝑋 = βˆͺ 𝑐 β†’ βˆƒπ‘‘ ∈ (𝒫 𝑐 ∩ Fin)𝑋 = βˆͺ 𝑑)))
130128, 129syl6ibr 252 . . . . 5 (𝐽 = (topGenβ€˜(fiβ€˜π‘₯)) β†’ (βˆ€π‘Ž ∈ 𝒫 (fiβ€˜π‘₯)(𝑋 = βˆͺ π‘Ž β†’ βˆƒπ‘ ∈ (𝒫 π‘Ž ∩ Fin)𝑋 = βˆͺ 𝑏) β†’ 𝐽 ∈ Comp))
1313, 130syld 47 . . . 4 (𝐽 = (topGenβ€˜(fiβ€˜π‘₯)) β†’ (βˆ€π‘ ∈ 𝒫 π‘₯(𝑋 = βˆͺ 𝑐 β†’ βˆƒπ‘‘ ∈ (𝒫 𝑐 ∩ Fin)𝑋 = βˆͺ 𝑑) β†’ 𝐽 ∈ Comp))
132131imp 408 . . 3 ((𝐽 = (topGenβ€˜(fiβ€˜π‘₯)) ∧ βˆ€π‘ ∈ 𝒫 π‘₯(𝑋 = βˆͺ 𝑐 β†’ βˆƒπ‘‘ ∈ (𝒫 𝑐 ∩ Fin)𝑋 = βˆͺ 𝑑)) β†’ 𝐽 ∈ Comp)
133132exlimiv 1934 . 2 (βˆƒπ‘₯(𝐽 = (topGenβ€˜(fiβ€˜π‘₯)) ∧ βˆ€π‘ ∈ 𝒫 π‘₯(𝑋 = βˆͺ 𝑐 β†’ βˆƒπ‘‘ ∈ (𝒫 𝑐 ∩ Fin)𝑋 = βˆͺ 𝑑)) β†’ 𝐽 ∈ Comp)
1342, 133impbii 208 1 (𝐽 ∈ Comp ↔ βˆƒπ‘₯(𝐽 = (topGenβ€˜(fiβ€˜π‘₯)) ∧ βˆ€π‘ ∈ 𝒫 π‘₯(𝑋 = βˆͺ 𝑐 β†’ βˆƒπ‘‘ ∈ (𝒫 𝑐 ∩ Fin)𝑋 = βˆͺ 𝑑)))
Colors of variables: wff setvar class
Syntax hints:   β†’ wi 4   ↔ wb 205   ∧ wa 397   ∧ w3a 1088   = wceq 1542  βˆƒwex 1782   ∈ wcel 2107  βˆ€wral 3061  βˆƒwrex 3070  {crab 3406   ∩ cin 3910   βŠ† wss 3911  π’« cpw 4561  βˆͺ cuni 4866  βˆͺ ciun 4955   class class class wbr 5106  ran crn 5635   Fn wfn 6492  βŸΆwf 6493  β€“ontoβ†’wfo 6495  β€˜cfv 6497   β‰Ό cdom 8884  Fincfn 8886  ficfi 9351  topGenctg 17324  Topctop 22258  TopBasesctb 22311  Compccmp 22753
This theorem was proved from axioms:  ax-mp 5  ax-1 6  ax-2 7  ax-3 8  ax-gen 1798  ax-4 1812  ax-5 1914  ax-6 1972  ax-7 2012  ax-8 2109  ax-9 2117  ax-10 2138  ax-11 2155  ax-12 2172  ax-ext 2704  ax-rep 5243  ax-sep 5257  ax-nul 5264  ax-pow 5321  ax-pr 5385  ax-un 7673  ax-ac2 10404
This theorem depends on definitions:  df-bi 206  df-an 398  df-or 847  df-3or 1089  df-3an 1090  df-tru 1545  df-fal 1555  df-ex 1783  df-nf 1787  df-sb 2069  df-mo 2535  df-eu 2564  df-clab 2711  df-cleq 2725  df-clel 2811  df-nfc 2886  df-ne 2941  df-ral 3062  df-rex 3071  df-rmo 3352  df-reu 3353  df-rab 3407  df-v 3446  df-sbc 3741  df-csb 3857  df-dif 3914  df-un 3916  df-in 3918  df-ss 3928  df-pss 3930  df-nul 4284  df-if 4488  df-pw 4563  df-sn 4588  df-pr 4590  df-op 4594  df-uni 4867  df-int 4909  df-iun 4957  df-br 5107  df-opab 5169  df-mpt 5190  df-tr 5224  df-id 5532  df-eprel 5538  df-po 5546  df-so 5547  df-fr 5589  df-se 5590  df-we 5591  df-xp 5640  df-rel 5641  df-cnv 5642  df-co 5643  df-dm 5644  df-rn 5645  df-res 5646  df-ima 5647  df-pred 6254  df-ord 6321  df-on 6322  df-lim 6323  df-suc 6324  df-iota 6449  df-fun 6499  df-fn 6500  df-f 6501  df-f1 6502  df-fo 6503  df-f1o 6504  df-fv 6505  df-isom 6506  df-riota 7314  df-ov 7361  df-rpss 7661  df-om 7804  df-2nd 7923  df-frecs 8213  df-wrecs 8244  df-recs 8318  df-1o 8413  df-er 8651  df-en 8887  df-dom 8888  df-fin 8890  df-fi 9352  df-card 9880  df-ac 10057  df-topgen 17330  df-top 22259  df-bases 22312  df-cmp 22754
This theorem is referenced by: (None)
  Copyright terms: Public domain W3C validator