Step | Hyp | Ref
| Expression |
1 | | ptbas.1 |
. . . 4
β’ π΅ = {π₯ β£ βπ((π Fn π΄ β§ βπ¦ β π΄ (πβπ¦) β (πΉβπ¦) β§ βπ§ β Fin βπ¦ β (π΄ β π§)(πβπ¦) = βͺ (πΉβπ¦)) β§ π₯ = Xπ¦ β π΄ (πβπ¦))} |
2 | 1 | ptbasid 23070 |
. . 3
β’ ((π΄ β π β§ πΉ:π΄βΆTop) β Xπ β
π΄ βͺ (πΉβπ) β π΅) |
3 | | elssuni 4940 |
. . 3
β’ (Xπ β
π΄ βͺ (πΉβπ) β π΅ β Xπ β π΄ βͺ (πΉβπ) β βͺ π΅) |
4 | 2, 3 | syl 17 |
. 2
β’ ((π΄ β π β§ πΉ:π΄βΆTop) β Xπ β
π΄ βͺ (πΉβπ) β βͺ π΅) |
5 | | simpr2 1195 |
. . . . . . . . . 10
β’ (((π΄ β π β§ πΉ:π΄βΆTop) β§ (π Fn π΄ β§ βπ¦ β π΄ (πβπ¦) β (πΉβπ¦) β§ βπ§ β Fin βπ¦ β (π΄ β π§)(πβπ¦) = βͺ (πΉβπ¦))) β βπ¦ β π΄ (πβπ¦) β (πΉβπ¦)) |
6 | | elssuni 4940 |
. . . . . . . . . . 11
β’ ((πβπ¦) β (πΉβπ¦) β (πβπ¦) β βͺ (πΉβπ¦)) |
7 | 6 | ralimi 3083 |
. . . . . . . . . 10
β’
(βπ¦ β
π΄ (πβπ¦) β (πΉβπ¦) β βπ¦ β π΄ (πβπ¦) β βͺ (πΉβπ¦)) |
8 | | ss2ixp 8900 |
. . . . . . . . . 10
β’
(βπ¦ β
π΄ (πβπ¦) β βͺ (πΉβπ¦) β Xπ¦ β π΄ (πβπ¦) β Xπ¦ β π΄ βͺ (πΉβπ¦)) |
9 | 5, 7, 8 | 3syl 18 |
. . . . . . . . 9
β’ (((π΄ β π β§ πΉ:π΄βΆTop) β§ (π Fn π΄ β§ βπ¦ β π΄ (πβπ¦) β (πΉβπ¦) β§ βπ§ β Fin βπ¦ β (π΄ β π§)(πβπ¦) = βͺ (πΉβπ¦))) β Xπ¦ β π΄ (πβπ¦) β Xπ¦ β π΄ βͺ (πΉβπ¦)) |
10 | | fveq2 6888 |
. . . . . . . . . . 11
β’ (π¦ = π β (πΉβπ¦) = (πΉβπ)) |
11 | 10 | unieqd 4921 |
. . . . . . . . . 10
β’ (π¦ = π β βͺ (πΉβπ¦) = βͺ (πΉβπ)) |
12 | 11 | cbvixpv 8905 |
. . . . . . . . 9
β’ Xπ¦ β
π΄ βͺ (πΉβπ¦) = Xπ β π΄ βͺ (πΉβπ) |
13 | 9, 12 | sseqtrdi 4031 |
. . . . . . . 8
β’ (((π΄ β π β§ πΉ:π΄βΆTop) β§ (π Fn π΄ β§ βπ¦ β π΄ (πβπ¦) β (πΉβπ¦) β§ βπ§ β Fin βπ¦ β (π΄ β π§)(πβπ¦) = βͺ (πΉβπ¦))) β Xπ¦ β π΄ (πβπ¦) β Xπ β π΄ βͺ (πΉβπ)) |
14 | | velpw 4606 |
. . . . . . . . 9
β’ (π₯ β π« Xπ β
π΄ βͺ (πΉβπ) β π₯ β Xπ β π΄ βͺ (πΉβπ)) |
15 | | sseq1 4006 |
. . . . . . . . 9
β’ (π₯ = Xπ¦ β π΄ (πβπ¦) β (π₯ β Xπ β π΄ βͺ (πΉβπ) β Xπ¦ β π΄ (πβπ¦) β Xπ β π΄ βͺ (πΉβπ))) |
16 | 14, 15 | bitrid 282 |
. . . . . . . 8
β’ (π₯ = Xπ¦ β π΄ (πβπ¦) β (π₯ β π« Xπ β
π΄ βͺ (πΉβπ) β Xπ¦ β π΄ (πβπ¦) β Xπ β π΄ βͺ (πΉβπ))) |
17 | 13, 16 | syl5ibrcom 246 |
. . . . . . 7
β’ (((π΄ β π β§ πΉ:π΄βΆTop) β§ (π Fn π΄ β§ βπ¦ β π΄ (πβπ¦) β (πΉβπ¦) β§ βπ§ β Fin βπ¦ β (π΄ β π§)(πβπ¦) = βͺ (πΉβπ¦))) β (π₯ = Xπ¦ β π΄ (πβπ¦) β π₯ β π« Xπ β
π΄ βͺ (πΉβπ))) |
18 | 17 | expimpd 454 |
. . . . . 6
β’ ((π΄ β π β§ πΉ:π΄βΆTop) β (((π Fn π΄ β§ βπ¦ β π΄ (πβπ¦) β (πΉβπ¦) β§ βπ§ β Fin βπ¦ β (π΄ β π§)(πβπ¦) = βͺ (πΉβπ¦)) β§ π₯ = Xπ¦ β π΄ (πβπ¦)) β π₯ β π« Xπ β
π΄ βͺ (πΉβπ))) |
19 | 18 | exlimdv 1936 |
. . . . 5
β’ ((π΄ β π β§ πΉ:π΄βΆTop) β (βπ((π Fn π΄ β§ βπ¦ β π΄ (πβπ¦) β (πΉβπ¦) β§ βπ§ β Fin βπ¦ β (π΄ β π§)(πβπ¦) = βͺ (πΉβπ¦)) β§ π₯ = Xπ¦ β π΄ (πβπ¦)) β π₯ β π« Xπ β
π΄ βͺ (πΉβπ))) |
20 | 19 | abssdv 4064 |
. . . 4
β’ ((π΄ β π β§ πΉ:π΄βΆTop) β {π₯ β£ βπ((π Fn π΄ β§ βπ¦ β π΄ (πβπ¦) β (πΉβπ¦) β§ βπ§ β Fin βπ¦ β (π΄ β π§)(πβπ¦) = βͺ (πΉβπ¦)) β§ π₯ = Xπ¦ β π΄ (πβπ¦))} β π« Xπ β
π΄ βͺ (πΉβπ)) |
21 | 1, 20 | eqsstrid 4029 |
. . 3
β’ ((π΄ β π β§ πΉ:π΄βΆTop) β π΅ β π« Xπ β
π΄ βͺ (πΉβπ)) |
22 | | sspwuni 5102 |
. . 3
β’ (π΅ β π« Xπ β
π΄ βͺ (πΉβπ) β βͺ π΅ β Xπ β
π΄ βͺ (πΉβπ)) |
23 | 21, 22 | sylib 217 |
. 2
β’ ((π΄ β π β§ πΉ:π΄βΆTop) β βͺ π΅
β Xπ β π΄ βͺ (πΉβπ)) |
24 | 4, 23 | eqssd 3998 |
1
β’ ((π΄ β π β§ πΉ:π΄βΆTop) β Xπ β
π΄ βͺ (πΉβπ) = βͺ π΅) |