Step | Hyp | Ref
| Expression |
1 | | ovex 7439 |
. . . . . . 7
β’ (π
Cn π) β V |
2 | 1 | pwex 5378 |
. . . . . 6
β’ π«
(π
Cn π) β V |
3 | | xkoopn.x |
. . . . . . . 8
β’ π = βͺ
π
|
4 | | eqid 2733 |
. . . . . . . 8
β’ {π₯ β π« π β£ (π
βΎt π₯) β Comp} = {π₯ β π« π β£ (π
βΎt π₯) β Comp} |
5 | | eqid 2733 |
. . . . . . . 8
β’ (π β {π₯ β π« π β£ (π
βΎt π₯) β Comp}, π£ β π β¦ {π β (π
Cn π) β£ (π β π) β π£}) = (π β {π₯ β π« π β£ (π
βΎt π₯) β Comp}, π£ β π β¦ {π β (π
Cn π) β£ (π β π) β π£}) |
6 | 3, 4, 5 | xkotf 23081 |
. . . . . . 7
β’ (π β {π₯ β π« π β£ (π
βΎt π₯) β Comp}, π£ β π β¦ {π β (π
Cn π) β£ (π β π) β π£}):({π₯ β π« π β£ (π
βΎt π₯) β Comp} Γ π)βΆπ« (π
Cn π) |
7 | | frn 6722 |
. . . . . . 7
β’ ((π β {π₯ β π« π β£ (π
βΎt π₯) β Comp}, π£ β π β¦ {π β (π
Cn π) β£ (π β π) β π£}):({π₯ β π« π β£ (π
βΎt π₯) β Comp} Γ π)βΆπ« (π
Cn π) β ran (π β {π₯ β π« π β£ (π
βΎt π₯) β Comp}, π£ β π β¦ {π β (π
Cn π) β£ (π β π) β π£}) β π« (π
Cn π)) |
8 | 6, 7 | ax-mp 5 |
. . . . . 6
β’ ran
(π β {π₯ β π« π β£ (π
βΎt π₯) β Comp}, π£ β π β¦ {π β (π
Cn π) β£ (π β π) β π£}) β π« (π
Cn π) |
9 | 2, 8 | ssexi 5322 |
. . . . 5
β’ ran
(π β {π₯ β π« π β£ (π
βΎt π₯) β Comp}, π£ β π β¦ {π β (π
Cn π) β£ (π β π) β π£}) β V |
10 | | ssfii 9411 |
. . . . 5
β’ (ran
(π β {π₯ β π« π β£ (π
βΎt π₯) β Comp}, π£ β π β¦ {π β (π
Cn π) β£ (π β π) β π£}) β V β ran (π β {π₯ β π« π β£ (π
βΎt π₯) β Comp}, π£ β π β¦ {π β (π
Cn π) β£ (π β π) β π£}) β (fiβran (π β {π₯ β π« π β£ (π
βΎt π₯) β Comp}, π£ β π β¦ {π β (π
Cn π) β£ (π β π) β π£}))) |
11 | 9, 10 | ax-mp 5 |
. . . 4
β’ ran
(π β {π₯ β π« π β£ (π
βΎt π₯) β Comp}, π£ β π β¦ {π β (π
Cn π) β£ (π β π) β π£}) β (fiβran (π β {π₯ β π« π β£ (π
βΎt π₯) β Comp}, π£ β π β¦ {π β (π
Cn π) β£ (π β π) β π£})) |
12 | | fvex 6902 |
. . . . 5
β’
(fiβran (π
β {π₯ β π«
π β£ (π
βΎt π₯) β Comp}, π£ β π β¦ {π β (π
Cn π) β£ (π β π) β π£})) β V |
13 | | bastg 22461 |
. . . . 5
β’
((fiβran (π
β {π₯ β π«
π β£ (π
βΎt π₯) β Comp}, π£ β π β¦ {π β (π
Cn π) β£ (π β π) β π£})) β V β (fiβran (π β {π₯ β π« π β£ (π
βΎt π₯) β Comp}, π£ β π β¦ {π β (π
Cn π) β£ (π β π) β π£})) β (topGenβ(fiβran
(π β {π₯ β π« π β£ (π
βΎt π₯) β Comp}, π£ β π β¦ {π β (π
Cn π) β£ (π β π) β π£})))) |
14 | 12, 13 | ax-mp 5 |
. . . 4
β’
(fiβran (π
β {π₯ β π«
π β£ (π
βΎt π₯) β Comp}, π£ β π β¦ {π β (π
Cn π) β£ (π β π) β π£})) β (topGenβ(fiβran
(π β {π₯ β π« π β£ (π
βΎt π₯) β Comp}, π£ β π β¦ {π β (π
Cn π) β£ (π β π) β π£}))) |
15 | 11, 14 | sstri 3991 |
. . 3
β’ ran
(π β {π₯ β π« π β£ (π
βΎt π₯) β Comp}, π£ β π β¦ {π β (π
Cn π) β£ (π β π) β π£}) β (topGenβ(fiβran (π β {π₯ β π« π β£ (π
βΎt π₯) β Comp}, π£ β π β¦ {π β (π
Cn π) β£ (π β π) β π£}))) |
16 | | oveq2 7414 |
. . . . . . 7
β’ (π₯ = π΄ β (π
βΎt π₯) = (π
βΎt π΄)) |
17 | 16 | eleq1d 2819 |
. . . . . 6
β’ (π₯ = π΄ β ((π
βΎt π₯) β Comp β (π
βΎt π΄) β Comp)) |
18 | | xkoopn.a |
. . . . . . 7
β’ (π β π΄ β π) |
19 | | xkoopn.r |
. . . . . . . 8
β’ (π β π
β Top) |
20 | 3 | topopn 22400 |
. . . . . . . 8
β’ (π
β Top β π β π
) |
21 | | elpw2g 5344 |
. . . . . . . 8
β’ (π β π
β (π΄ β π« π β π΄ β π)) |
22 | 19, 20, 21 | 3syl 18 |
. . . . . . 7
β’ (π β (π΄ β π« π β π΄ β π)) |
23 | 18, 22 | mpbird 257 |
. . . . . 6
β’ (π β π΄ β π« π) |
24 | | xkoopn.c |
. . . . . 6
β’ (π β (π
βΎt π΄) β Comp) |
25 | 17, 23, 24 | elrabd 3685 |
. . . . 5
β’ (π β π΄ β {π₯ β π« π β£ (π
βΎt π₯) β Comp}) |
26 | | xkoopn.u |
. . . . 5
β’ (π β π β π) |
27 | | eqidd 2734 |
. . . . 5
β’ (π β {π β (π
Cn π) β£ (π β π΄) β π} = {π β (π
Cn π) β£ (π β π΄) β π}) |
28 | | imaeq2 6054 |
. . . . . . . . 9
β’ (π = π΄ β (π β π) = (π β π΄)) |
29 | 28 | sseq1d 4013 |
. . . . . . . 8
β’ (π = π΄ β ((π β π) β π£ β (π β π΄) β π£)) |
30 | 29 | rabbidv 3441 |
. . . . . . 7
β’ (π = π΄ β {π β (π
Cn π) β£ (π β π) β π£} = {π β (π
Cn π) β£ (π β π΄) β π£}) |
31 | 30 | eqeq2d 2744 |
. . . . . 6
β’ (π = π΄ β ({π β (π
Cn π) β£ (π β π΄) β π} = {π β (π
Cn π) β£ (π β π) β π£} β {π β (π
Cn π) β£ (π β π΄) β π} = {π β (π
Cn π) β£ (π β π΄) β π£})) |
32 | | sseq2 4008 |
. . . . . . . 8
β’ (π£ = π β ((π β π΄) β π£ β (π β π΄) β π)) |
33 | 32 | rabbidv 3441 |
. . . . . . 7
β’ (π£ = π β {π β (π
Cn π) β£ (π β π΄) β π£} = {π β (π
Cn π) β£ (π β π΄) β π}) |
34 | 33 | eqeq2d 2744 |
. . . . . 6
β’ (π£ = π β ({π β (π
Cn π) β£ (π β π΄) β π} = {π β (π
Cn π) β£ (π β π΄) β π£} β {π β (π
Cn π) β£ (π β π΄) β π} = {π β (π
Cn π) β£ (π β π΄) β π})) |
35 | 31, 34 | rspc2ev 3624 |
. . . . 5
β’ ((π΄ β {π₯ β π« π β£ (π
βΎt π₯) β Comp} β§ π β π β§ {π β (π
Cn π) β£ (π β π΄) β π} = {π β (π
Cn π) β£ (π β π΄) β π}) β βπ β {π₯ β π« π β£ (π
βΎt π₯) β Comp}βπ£ β π {π β (π
Cn π) β£ (π β π΄) β π} = {π β (π
Cn π) β£ (π β π) β π£}) |
36 | 25, 26, 27, 35 | syl3anc 1372 |
. . . 4
β’ (π β βπ β {π₯ β π« π β£ (π
βΎt π₯) β Comp}βπ£ β π {π β (π
Cn π) β£ (π β π΄) β π} = {π β (π
Cn π) β£ (π β π) β π£}) |
37 | 1 | rabex 5332 |
. . . . 5
β’ {π β (π
Cn π) β£ (π β π΄) β π} β V |
38 | | eqeq1 2737 |
. . . . . 6
β’ (π¦ = {π β (π
Cn π) β£ (π β π΄) β π} β (π¦ = {π β (π
Cn π) β£ (π β π) β π£} β {π β (π
Cn π) β£ (π β π΄) β π} = {π β (π
Cn π) β£ (π β π) β π£})) |
39 | 38 | 2rexbidv 3220 |
. . . . 5
β’ (π¦ = {π β (π
Cn π) β£ (π β π΄) β π} β (βπ β {π₯ β π« π β£ (π
βΎt π₯) β Comp}βπ£ β π π¦ = {π β (π
Cn π) β£ (π β π) β π£} β βπ β {π₯ β π« π β£ (π
βΎt π₯) β Comp}βπ£ β π {π β (π
Cn π) β£ (π β π΄) β π} = {π β (π
Cn π) β£ (π β π) β π£})) |
40 | 5 | rnmpo 7539 |
. . . . 5
β’ ran
(π β {π₯ β π« π β£ (π
βΎt π₯) β Comp}, π£ β π β¦ {π β (π
Cn π) β£ (π β π) β π£}) = {π¦ β£ βπ β {π₯ β π« π β£ (π
βΎt π₯) β Comp}βπ£ β π π¦ = {π β (π
Cn π) β£ (π β π) β π£}} |
41 | 37, 39, 40 | elab2 3672 |
. . . 4
β’ ({π β (π
Cn π) β£ (π β π΄) β π} β ran (π β {π₯ β π« π β£ (π
βΎt π₯) β Comp}, π£ β π β¦ {π β (π
Cn π) β£ (π β π) β π£}) β βπ β {π₯ β π« π β£ (π
βΎt π₯) β Comp}βπ£ β π {π β (π
Cn π) β£ (π β π΄) β π} = {π β (π
Cn π) β£ (π β π) β π£}) |
42 | 36, 41 | sylibr 233 |
. . 3
β’ (π β {π β (π
Cn π) β£ (π β π΄) β π} β ran (π β {π₯ β π« π β£ (π
βΎt π₯) β Comp}, π£ β π β¦ {π β (π
Cn π) β£ (π β π) β π£})) |
43 | 15, 42 | sselid 3980 |
. 2
β’ (π β {π β (π
Cn π) β£ (π β π΄) β π} β (topGenβ(fiβran (π β {π₯ β π« π β£ (π
βΎt π₯) β Comp}, π£ β π β¦ {π β (π
Cn π) β£ (π β π) β π£})))) |
44 | | xkoopn.s |
. . 3
β’ (π β π β Top) |
45 | 3, 4, 5 | xkoval 23083 |
. . 3
β’ ((π
β Top β§ π β Top) β (π βko π
) = (topGenβ(fiβran
(π β {π₯ β π« π β£ (π
βΎt π₯) β Comp}, π£ β π β¦ {π β (π
Cn π) β£ (π β π) β π£})))) |
46 | 19, 44, 45 | syl2anc 585 |
. 2
β’ (π β (π βko π
) = (topGenβ(fiβran (π β {π₯ β π« π β£ (π
βΎt π₯) β Comp}, π£ β π β¦ {π β (π
Cn π) β£ (π β π) β π£})))) |
47 | 43, 46 | eleqtrrd 2837 |
1
β’ (π β {π β (π
Cn π) β£ (π β π΄) β π} β (π βko π
)) |