Step | Hyp | Ref
| Expression |
1 | | fveq2 6891 |
. . . . . . . . . 10
β’ (π = π₯ β (πβπ) = (πβπ₯)) |
2 | 1 | unieqd 4922 |
. . . . . . . . 9
β’ (π = π₯ β βͺ (πβπ) = βͺ (πβπ₯)) |
3 | 2 | pweqd 4619 |
. . . . . . . 8
β’ (π = π₯ β π« βͺ (πβπ) = π« βͺ
(πβπ₯)) |
4 | 3 | cbvixpv 8911 |
. . . . . . 7
β’ Xπ β
dom ππ« βͺ (πβπ) = Xπ₯ β dom ππ« βͺ (πβπ₯) |
5 | 4 | eleq2i 2825 |
. . . . . 6
β’ (π β Xπ β
dom ππ« βͺ (πβπ) β π β Xπ₯ β dom ππ« βͺ (πβπ₯)) |
6 | | simplr 767 |
. . . . . . . . . . 11
β’
(((CHOICE β§ π:dom πβΆTop) β§ π β Xπ₯ β dom ππ« βͺ (πβπ₯)) β π:dom πβΆTop) |
7 | 6 | feqmptd 6960 |
. . . . . . . . . 10
β’
(((CHOICE β§ π:dom πβΆTop) β§ π β Xπ₯ β dom ππ« βͺ (πβπ₯)) β π = (π β dom π β¦ (πβπ))) |
8 | 7 | fveq2d 6895 |
. . . . . . . . 9
β’
(((CHOICE β§ π:dom πβΆTop) β§ π β Xπ₯ β dom ππ« βͺ (πβπ₯)) β (βtβπ) =
(βtβ(π β dom π β¦ (πβπ)))) |
9 | 8 | fveq2d 6895 |
. . . . . . . 8
β’
(((CHOICE β§ π:dom πβΆTop) β§ π β Xπ₯ β dom ππ« βͺ (πβπ₯)) β
(clsβ(βtβπ)) =
(clsβ(βtβ(π β dom π β¦ (πβπ))))) |
10 | 9 | fveq1d 6893 |
. . . . . . 7
β’
(((CHOICE β§ π:dom πβΆTop) β§ π β Xπ₯ β dom ππ« βͺ (πβπ₯)) β
((clsβ(βtβπ))βXπ β dom π(π βπ)) =
((clsβ(βtβ(π β dom π β¦ (πβπ))))βXπ β dom π(π βπ))) |
11 | | eqid 2732 |
. . . . . . . 8
β’
(βtβ(π β dom π β¦ (πβπ))) = (βtβ(π β dom π β¦ (πβπ))) |
12 | | vex 3478 |
. . . . . . . . . 10
β’ π β V |
13 | 12 | dmex 7904 |
. . . . . . . . 9
β’ dom π β V |
14 | 13 | a1i 11 |
. . . . . . . 8
β’
(((CHOICE β§ π:dom πβΆTop) β§ π β Xπ₯ β dom ππ« βͺ (πβπ₯)) β dom π β V) |
15 | 6 | ffvelcdmda 7086 |
. . . . . . . . 9
β’
((((CHOICE β§ π:dom πβΆTop) β§ π β Xπ₯ β dom ππ« βͺ (πβπ₯)) β§ π β dom π) β (πβπ) β Top) |
16 | | toptopon2 22640 |
. . . . . . . . 9
β’ ((πβπ) β Top β (πβπ) β (TopOnββͺ (πβπ))) |
17 | 15, 16 | sylib 217 |
. . . . . . . 8
β’
((((CHOICE β§ π:dom πβΆTop) β§ π β Xπ₯ β dom ππ« βͺ (πβπ₯)) β§ π β dom π) β (πβπ) β (TopOnββͺ (πβπ))) |
18 | | simpr 485 |
. . . . . . . . . . . 12
β’
(((CHOICE β§ π:dom πβΆTop) β§ π β Xπ₯ β dom ππ« βͺ (πβπ₯)) β π β Xπ₯ β dom ππ« βͺ (πβπ₯)) |
19 | 18, 5 | sylibr 233 |
. . . . . . . . . . 11
β’
(((CHOICE β§ π:dom πβΆTop) β§ π β Xπ₯ β dom ππ« βͺ (πβπ₯)) β π β Xπ β dom ππ« βͺ (πβπ)) |
20 | | vex 3478 |
. . . . . . . . . . . . 13
β’ π β V |
21 | 20 | elixp 8900 |
. . . . . . . . . . . 12
β’ (π β Xπ β
dom ππ« βͺ (πβπ) β (π Fn dom π β§ βπ β dom π(π βπ) β π« βͺ (πβπ))) |
22 | 21 | simprbi 497 |
. . . . . . . . . . 11
β’ (π β Xπ β
dom ππ« βͺ (πβπ) β βπ β dom π(π βπ) β π« βͺ (πβπ)) |
23 | 19, 22 | syl 17 |
. . . . . . . . . 10
β’
(((CHOICE β§ π:dom πβΆTop) β§ π β Xπ₯ β dom ππ« βͺ (πβπ₯)) β βπ β dom π(π βπ) β π« βͺ (πβπ)) |
24 | 23 | r19.21bi 3248 |
. . . . . . . . 9
β’
((((CHOICE β§ π:dom πβΆTop) β§ π β Xπ₯ β dom ππ« βͺ (πβπ₯)) β§ π β dom π) β (π βπ) β π« βͺ (πβπ)) |
25 | 24 | elpwid 4611 |
. . . . . . . 8
β’
((((CHOICE β§ π:dom πβΆTop) β§ π β Xπ₯ β dom ππ« βͺ (πβπ₯)) β§ π β dom π) β (π βπ) β βͺ (πβπ)) |
26 | | fvex 6904 |
. . . . . . . . . 10
β’ (π βπ) β V |
27 | 13, 26 | iunex 7957 |
. . . . . . . . 9
β’ βͺ π β dom π(π βπ) β V |
28 | | simpll 765 |
. . . . . . . . . 10
β’
(((CHOICE β§ π:dom πβΆTop) β§ π β Xπ₯ β dom ππ« βͺ (πβπ₯)) β
CHOICE) |
29 | | acacni 10137 |
. . . . . . . . . 10
β’
((CHOICE β§ dom π β V) β AC dom π = V) |
30 | 28, 13, 29 | sylancl 586 |
. . . . . . . . 9
β’
(((CHOICE β§ π:dom πβΆTop) β§ π β Xπ₯ β dom ππ« βͺ (πβπ₯)) β AC dom π = V) |
31 | 27, 30 | eleqtrrid 2840 |
. . . . . . . 8
β’
(((CHOICE β§ π:dom πβΆTop) β§ π β Xπ₯ β dom ππ« βͺ (πβπ₯)) β βͺ
π β dom π(π βπ) β AC dom π) |
32 | 11, 14, 17, 25, 31 | ptclsg 23339 |
. . . . . . 7
β’
(((CHOICE β§ π:dom πβΆTop) β§ π β Xπ₯ β dom ππ« βͺ (πβπ₯)) β
((clsβ(βtβ(π β dom π β¦ (πβπ))))βXπ β dom π(π βπ)) = Xπ β dom π((clsβ(πβπ))β(π βπ))) |
33 | 10, 32 | eqtrd 2772 |
. . . . . 6
β’
(((CHOICE β§ π:dom πβΆTop) β§ π β Xπ₯ β dom ππ« βͺ (πβπ₯)) β
((clsβ(βtβπ))βXπ β dom π(π βπ)) = Xπ β dom π((clsβ(πβπ))β(π βπ))) |
34 | 5, 33 | sylan2b 594 |
. . . . 5
β’
(((CHOICE β§ π:dom πβΆTop) β§ π β Xπ β dom ππ« βͺ (πβπ)) β
((clsβ(βtβπ))βXπ β dom π(π βπ)) = Xπ β dom π((clsβ(πβπ))β(π βπ))) |
35 | 34 | ralrimiva 3146 |
. . . 4
β’
((CHOICE β§ π:dom πβΆTop) β βπ β X
π β dom ππ« βͺ (πβπ)((clsβ(βtβπ))βXπ β
dom π(π βπ)) = Xπ β dom π((clsβ(πβπ))β(π βπ))) |
36 | 35 | ex 413 |
. . 3
β’
(CHOICE β (π:dom πβΆTop β βπ β X π β dom ππ« βͺ (πβπ)((clsβ(βtβπ))βXπ β
dom π(π βπ)) = Xπ β dom π((clsβ(πβπ))β(π βπ)))) |
37 | 36 | alrimiv 1930 |
. 2
β’
(CHOICE β βπ(π:dom πβΆTop β βπ β X π β dom ππ« βͺ (πβπ)((clsβ(βtβπ))βXπ β
dom π(π βπ)) = Xπ β dom π((clsβ(πβπ))β(π βπ)))) |
38 | | vex 3478 |
. . . . . . . 8
β’ π β V |
39 | 38 | dmex 7904 |
. . . . . . 7
β’ dom π β V |
40 | 39 | a1i 11 |
. . . . . 6
β’
((βπ(π:dom πβΆTop β βπ β X π β dom ππ« βͺ (πβπ)((clsβ(βtβπ))βXπ β
dom π(π βπ)) = Xπ β dom π((clsβ(πβπ))β(π βπ))) β§ (Fun π β§ β
β ran π)) β dom π β V) |
41 | | fvex 6904 |
. . . . . . 7
β’ (πβπ₯) β V |
42 | 41 | a1i 11 |
. . . . . 6
β’
(((βπ(π:dom πβΆTop β βπ β X π β dom ππ« βͺ (πβπ)((clsβ(βtβπ))βXπ β
dom π(π βπ)) = Xπ β dom π((clsβ(πβπ))β(π βπ))) β§ (Fun π β§ β
β ran π)) β§ π₯ β dom π) β (πβπ₯) β V) |
43 | | simplrr 776 |
. . . . . . . 8
β’
(((βπ(π:dom πβΆTop β βπ β X π β dom ππ« βͺ (πβπ)((clsβ(βtβπ))βXπ β
dom π(π βπ)) = Xπ β dom π((clsβ(πβπ))β(π βπ))) β§ (Fun π β§ β
β ran π)) β§ π₯ β dom π) β β
β ran π) |
44 | | df-nel 3047 |
. . . . . . . 8
β’ (β
β ran π β Β¬
β
β ran π) |
45 | 43, 44 | sylib 217 |
. . . . . . 7
β’
(((βπ(π:dom πβΆTop β βπ β X π β dom ππ« βͺ (πβπ)((clsβ(βtβπ))βXπ β
dom π(π βπ)) = Xπ β dom π((clsβ(πβπ))β(π βπ))) β§ (Fun π β§ β
β ran π)) β§ π₯ β dom π) β Β¬ β
β ran π) |
46 | | funforn 6812 |
. . . . . . . . . . . 12
β’ (Fun
π β π:dom πβontoβran π) |
47 | | fof 6805 |
. . . . . . . . . . . 12
β’ (π:dom πβontoβran π β π:dom πβΆran π) |
48 | 46, 47 | sylbi 216 |
. . . . . . . . . . 11
β’ (Fun
π β π:dom πβΆran π) |
49 | 48 | ad2antrl 726 |
. . . . . . . . . 10
β’
((βπ(π:dom πβΆTop β βπ β X π β dom ππ« βͺ (πβπ)((clsβ(βtβπ))βXπ β
dom π(π βπ)) = Xπ β dom π((clsβ(πβπ))β(π βπ))) β§ (Fun π β§ β
β ran π)) β π:dom πβΆran π) |
50 | 49 | ffvelcdmda 7086 |
. . . . . . . . 9
β’
(((βπ(π:dom πβΆTop β βπ β X π β dom ππ« βͺ (πβπ)((clsβ(βtβπ))βXπ β
dom π(π βπ)) = Xπ β dom π((clsβ(πβπ))β(π βπ))) β§ (Fun π β§ β
β ran π)) β§ π₯ β dom π) β (πβπ₯) β ran π) |
51 | | eleq1 2821 |
. . . . . . . . 9
β’ ((πβπ₯) = β
β ((πβπ₯) β ran π β β
β ran π)) |
52 | 50, 51 | syl5ibcom 244 |
. . . . . . . 8
β’
(((βπ(π:dom πβΆTop β βπ β X π β dom ππ« βͺ (πβπ)((clsβ(βtβπ))βXπ β
dom π(π βπ)) = Xπ β dom π((clsβ(πβπ))β(π βπ))) β§ (Fun π β§ β
β ran π)) β§ π₯ β dom π) β ((πβπ₯) = β
β β
β ran π)) |
53 | 52 | necon3bd 2954 |
. . . . . . 7
β’
(((βπ(π:dom πβΆTop β βπ β X π β dom ππ« βͺ (πβπ)((clsβ(βtβπ))βXπ β
dom π(π βπ)) = Xπ β dom π((clsβ(πβπ))β(π βπ))) β§ (Fun π β§ β
β ran π)) β§ π₯ β dom π) β (Β¬ β
β ran π β (πβπ₯) β β
)) |
54 | 45, 53 | mpd 15 |
. . . . . 6
β’
(((βπ(π:dom πβΆTop β βπ β X π β dom ππ« βͺ (πβπ)((clsβ(βtβπ))βXπ β
dom π(π βπ)) = Xπ β dom π((clsβ(πβπ))β(π βπ))) β§ (Fun π β§ β
β ran π)) β§ π₯ β dom π) β (πβπ₯) β β
) |
55 | | eqid 2732 |
. . . . . 6
β’ π«
βͺ (πβπ₯) = π« βͺ
(πβπ₯) |
56 | | eqid 2732 |
. . . . . 6
β’ {π¦ β π« ((πβπ₯) βͺ {π« βͺ (πβπ₯)}) β£ (π« βͺ (πβπ₯) β π¦ β π¦ = ((πβπ₯) βͺ {π« βͺ (πβπ₯)}))} = {π¦ β π« ((πβπ₯) βͺ {π« βͺ (πβπ₯)}) β£ (π« βͺ (πβπ₯) β π¦ β π¦ = ((πβπ₯) βͺ {π« βͺ (πβπ₯)}))} |
57 | | eqid 2732 |
. . . . . 6
β’
(βtβ(π₯ β dom π β¦ {π¦ β π« ((πβπ₯) βͺ {π« βͺ (πβπ₯)}) β£ (π« βͺ (πβπ₯) β π¦ β π¦ = ((πβπ₯) βͺ {π« βͺ (πβπ₯)}))})) = (βtβ(π₯ β dom π β¦ {π¦ β π« ((πβπ₯) βͺ {π« βͺ (πβπ₯)}) β£ (π« βͺ (πβπ₯) β π¦ β π¦ = ((πβπ₯) βͺ {π« βͺ (πβπ₯)}))})) |
58 | | fveq1 6890 |
. . . . . . . . . . 11
β’ (π = π β (π βπ) = (πβπ)) |
59 | 58 | ixpeq2dv 8909 |
. . . . . . . . . 10
β’ (π = π β Xπ β dom π(π βπ) = Xπ β dom π(πβπ)) |
60 | | fveq2 6891 |
. . . . . . . . . . 11
β’ (π = π₯ β (πβπ) = (πβπ₯)) |
61 | 60 | cbvixpv 8911 |
. . . . . . . . . 10
β’ Xπ β
dom π(πβπ) = Xπ₯ β dom π(πβπ₯) |
62 | 59, 61 | eqtrdi 2788 |
. . . . . . . . 9
β’ (π = π β Xπ β dom π(π βπ) = Xπ₯ β dom π(πβπ₯)) |
63 | 62 | fveq2d 6895 |
. . . . . . . 8
β’ (π = π β
((clsβ(βtβ(π₯ β dom π β¦ {π¦ β π« ((πβπ₯) βͺ {π« βͺ (πβπ₯)}) β£ (π« βͺ (πβπ₯) β π¦ β π¦ = ((πβπ₯) βͺ {π« βͺ (πβπ₯)}))})))βXπ β dom π(π βπ)) =
((clsβ(βtβ(π₯ β dom π β¦ {π¦ β π« ((πβπ₯) βͺ {π« βͺ (πβπ₯)}) β£ (π« βͺ (πβπ₯) β π¦ β π¦ = ((πβπ₯) βͺ {π« βͺ (πβπ₯)}))})))βXπ₯ β dom π(πβπ₯))) |
64 | 58 | fveq2d 6895 |
. . . . . . . . . 10
β’ (π = π β ((clsβ{π¦ β π« ((πβπ) βͺ {π« βͺ (πβπ)}) β£ (π« βͺ (πβπ) β π¦ β π¦ = ((πβπ) βͺ {π« βͺ (πβπ)}))})β(π βπ)) = ((clsβ{π¦ β π« ((πβπ) βͺ {π« βͺ (πβπ)}) β£ (π« βͺ (πβπ) β π¦ β π¦ = ((πβπ) βͺ {π« βͺ (πβπ)}))})β(πβπ))) |
65 | 64 | ixpeq2dv 8909 |
. . . . . . . . 9
β’ (π = π β Xπ β dom π((clsβ{π¦ β π« ((πβπ) βͺ {π« βͺ (πβπ)}) β£ (π« βͺ (πβπ) β π¦ β π¦ = ((πβπ) βͺ {π« βͺ (πβπ)}))})β(π βπ)) = Xπ β dom π((clsβ{π¦ β π« ((πβπ) βͺ {π« βͺ (πβπ)}) β£ (π« βͺ (πβπ) β π¦ β π¦ = ((πβπ) βͺ {π« βͺ (πβπ)}))})β(πβπ))) |
66 | 60 | unieqd 4922 |
. . . . . . . . . . . . . . . . 17
β’ (π = π₯ β βͺ (πβπ) = βͺ (πβπ₯)) |
67 | 66 | pweqd 4619 |
. . . . . . . . . . . . . . . 16
β’ (π = π₯ β π« βͺ (πβπ) = π« βͺ
(πβπ₯)) |
68 | 67 | sneqd 4640 |
. . . . . . . . . . . . . . 15
β’ (π = π₯ β {π« βͺ (πβπ)} = {π« βͺ
(πβπ₯)}) |
69 | 60, 68 | uneq12d 4164 |
. . . . . . . . . . . . . 14
β’ (π = π₯ β ((πβπ) βͺ {π« βͺ (πβπ)}) = ((πβπ₯) βͺ {π« βͺ (πβπ₯)})) |
70 | 69 | pweqd 4619 |
. . . . . . . . . . . . 13
β’ (π = π₯ β π« ((πβπ) βͺ {π« βͺ (πβπ)}) = π« ((πβπ₯) βͺ {π« βͺ (πβπ₯)})) |
71 | 67 | eleq1d 2818 |
. . . . . . . . . . . . . 14
β’ (π = π₯ β (π« βͺ (πβπ) β π¦ β π« βͺ (πβπ₯) β π¦)) |
72 | 69 | eqeq2d 2743 |
. . . . . . . . . . . . . 14
β’ (π = π₯ β (π¦ = ((πβπ) βͺ {π« βͺ (πβπ)}) β π¦ = ((πβπ₯) βͺ {π« βͺ (πβπ₯)}))) |
73 | 71, 72 | imbi12d 344 |
. . . . . . . . . . . . 13
β’ (π = π₯ β ((π« βͺ (πβπ) β π¦ β π¦ = ((πβπ) βͺ {π« βͺ (πβπ)})) β (π« βͺ (πβπ₯) β π¦ β π¦ = ((πβπ₯) βͺ {π« βͺ (πβπ₯)})))) |
74 | 70, 73 | rabeqbidv 3449 |
. . . . . . . . . . . 12
β’ (π = π₯ β {π¦ β π« ((πβπ) βͺ {π« βͺ (πβπ)}) β£ (π« βͺ (πβπ) β π¦ β π¦ = ((πβπ) βͺ {π« βͺ (πβπ)}))} = {π¦ β π« ((πβπ₯) βͺ {π« βͺ (πβπ₯)}) β£ (π« βͺ (πβπ₯) β π¦ β π¦ = ((πβπ₯) βͺ {π« βͺ (πβπ₯)}))}) |
75 | 74 | fveq2d 6895 |
. . . . . . . . . . 11
β’ (π = π₯ β (clsβ{π¦ β π« ((πβπ) βͺ {π« βͺ (πβπ)}) β£ (π« βͺ (πβπ) β π¦ β π¦ = ((πβπ) βͺ {π« βͺ (πβπ)}))}) = (clsβ{π¦ β π« ((πβπ₯) βͺ {π« βͺ (πβπ₯)}) β£ (π« βͺ (πβπ₯) β π¦ β π¦ = ((πβπ₯) βͺ {π« βͺ (πβπ₯)}))})) |
76 | 75, 60 | fveq12d 6898 |
. . . . . . . . . 10
β’ (π = π₯ β ((clsβ{π¦ β π« ((πβπ) βͺ {π« βͺ (πβπ)}) β£ (π« βͺ (πβπ) β π¦ β π¦ = ((πβπ) βͺ {π« βͺ (πβπ)}))})β(πβπ)) = ((clsβ{π¦ β π« ((πβπ₯) βͺ {π« βͺ (πβπ₯)}) β£ (π« βͺ (πβπ₯) β π¦ β π¦ = ((πβπ₯) βͺ {π« βͺ (πβπ₯)}))})β(πβπ₯))) |
77 | 76 | cbvixpv 8911 |
. . . . . . . . 9
β’ Xπ β
dom π((clsβ{π¦ β π« ((πβπ) βͺ {π« βͺ (πβπ)}) β£ (π« βͺ (πβπ) β π¦ β π¦ = ((πβπ) βͺ {π« βͺ (πβπ)}))})β(πβπ)) = Xπ₯ β dom π((clsβ{π¦ β π« ((πβπ₯) βͺ {π« βͺ (πβπ₯)}) β£ (π« βͺ (πβπ₯) β π¦ β π¦ = ((πβπ₯) βͺ {π« βͺ (πβπ₯)}))})β(πβπ₯)) |
78 | 65, 77 | eqtrdi 2788 |
. . . . . . . 8
β’ (π = π β Xπ β dom π((clsβ{π¦ β π« ((πβπ) βͺ {π« βͺ (πβπ)}) β£ (π« βͺ (πβπ) β π¦ β π¦ = ((πβπ) βͺ {π« βͺ (πβπ)}))})β(π βπ)) = Xπ₯ β dom π((clsβ{π¦ β π« ((πβπ₯) βͺ {π« βͺ (πβπ₯)}) β£ (π« βͺ (πβπ₯) β π¦ β π¦ = ((πβπ₯) βͺ {π« βͺ (πβπ₯)}))})β(πβπ₯))) |
79 | 63, 78 | eqeq12d 2748 |
. . . . . . 7
β’ (π = π β
(((clsβ(βtβ(π₯ β dom π β¦ {π¦ β π« ((πβπ₯) βͺ {π« βͺ (πβπ₯)}) β£ (π« βͺ (πβπ₯) β π¦ β π¦ = ((πβπ₯) βͺ {π« βͺ (πβπ₯)}))})))βXπ β dom π(π βπ)) = Xπ β dom π((clsβ{π¦ β π« ((πβπ) βͺ {π« βͺ (πβπ)}) β£ (π« βͺ (πβπ) β π¦ β π¦ = ((πβπ) βͺ {π« βͺ (πβπ)}))})β(π βπ)) β
((clsβ(βtβ(π₯ β dom π β¦ {π¦ β π« ((πβπ₯) βͺ {π« βͺ (πβπ₯)}) β£ (π« βͺ (πβπ₯) β π¦ β π¦ = ((πβπ₯) βͺ {π« βͺ (πβπ₯)}))})))βXπ₯ β dom π(πβπ₯)) = Xπ₯ β dom π((clsβ{π¦ β π« ((πβπ₯) βͺ {π« βͺ (πβπ₯)}) β£ (π« βͺ (πβπ₯) β π¦ β π¦ = ((πβπ₯) βͺ {π« βͺ (πβπ₯)}))})β(πβπ₯)))) |
80 | | simpl 483 |
. . . . . . . 8
β’
((βπ(π:dom πβΆTop β βπ β X π β dom ππ« βͺ (πβπ)((clsβ(βtβπ))βXπ β
dom π(π βπ)) = Xπ β dom π((clsβ(πβπ))β(π βπ))) β§ (Fun π β§ β
β ran π)) β βπ(π:dom πβΆTop β βπ β X π β dom ππ« βͺ (πβπ)((clsβ(βtβπ))βXπ β
dom π(π βπ)) = Xπ β dom π((clsβ(πβπ))β(π βπ)))) |
81 | | snex 5431 |
. . . . . . . . . . . . 13
β’
{π« βͺ (πβπ₯)} β V |
82 | 41, 81 | unex 7735 |
. . . . . . . . . . . 12
β’ ((πβπ₯) βͺ {π« βͺ (πβπ₯)}) β V |
83 | | ssun2 4173 |
. . . . . . . . . . . . 13
β’
{π« βͺ (πβπ₯)} β ((πβπ₯) βͺ {π« βͺ (πβπ₯)}) |
84 | 41 | uniex 7733 |
. . . . . . . . . . . . . . 15
β’ βͺ (πβπ₯) β V |
85 | 84 | pwex 5378 |
. . . . . . . . . . . . . 14
β’ π«
βͺ (πβπ₯) β V |
86 | 85 | snid 4664 |
. . . . . . . . . . . . 13
β’ π«
βͺ (πβπ₯) β {π« βͺ (πβπ₯)} |
87 | 83, 86 | sselii 3979 |
. . . . . . . . . . . 12
β’ π«
βͺ (πβπ₯) β ((πβπ₯) βͺ {π« βͺ (πβπ₯)}) |
88 | | epttop 22732 |
. . . . . . . . . . . 12
β’ ((((πβπ₯) βͺ {π« βͺ (πβπ₯)}) β V β§ π« βͺ (πβπ₯) β ((πβπ₯) βͺ {π« βͺ (πβπ₯)})) β {π¦ β π« ((πβπ₯) βͺ {π« βͺ (πβπ₯)}) β£ (π« βͺ (πβπ₯) β π¦ β π¦ = ((πβπ₯) βͺ {π« βͺ (πβπ₯)}))} β (TopOnβ((πβπ₯) βͺ {π« βͺ (πβπ₯)}))) |
89 | 82, 87, 88 | mp2an 690 |
. . . . . . . . . . 11
β’ {π¦ β π« ((πβπ₯) βͺ {π« βͺ (πβπ₯)}) β£ (π« βͺ (πβπ₯) β π¦ β π¦ = ((πβπ₯) βͺ {π« βͺ (πβπ₯)}))} β (TopOnβ((πβπ₯) βͺ {π« βͺ (πβπ₯)})) |
90 | 89 | topontopi 22637 |
. . . . . . . . . 10
β’ {π¦ β π« ((πβπ₯) βͺ {π« βͺ (πβπ₯)}) β£ (π« βͺ (πβπ₯) β π¦ β π¦ = ((πβπ₯) βͺ {π« βͺ (πβπ₯)}))} β Top |
91 | 90 | a1i 11 |
. . . . . . . . 9
β’
(((βπ(π:dom πβΆTop β βπ β X π β dom ππ« βͺ (πβπ)((clsβ(βtβπ))βXπ β
dom π(π βπ)) = Xπ β dom π((clsβ(πβπ))β(π βπ))) β§ (Fun π β§ β
β ran π)) β§ π₯ β dom π) β {π¦ β π« ((πβπ₯) βͺ {π« βͺ (πβπ₯)}) β£ (π« βͺ (πβπ₯) β π¦ β π¦ = ((πβπ₯) βͺ {π« βͺ (πβπ₯)}))} β Top) |
92 | 91 | fmpttd 7116 |
. . . . . . . 8
β’
((βπ(π:dom πβΆTop β βπ β X π β dom ππ« βͺ (πβπ)((clsβ(βtβπ))βXπ β
dom π(π βπ)) = Xπ β dom π((clsβ(πβπ))β(π βπ))) β§ (Fun π β§ β
β ran π)) β (π₯ β dom π β¦ {π¦ β π« ((πβπ₯) βͺ {π« βͺ (πβπ₯)}) β£ (π« βͺ (πβπ₯) β π¦ β π¦ = ((πβπ₯) βͺ {π« βͺ (πβπ₯)}))}):dom πβΆTop) |
93 | 39 | mptex 7227 |
. . . . . . . . 9
β’ (π₯ β dom π β¦ {π¦ β π« ((πβπ₯) βͺ {π« βͺ (πβπ₯)}) β£ (π« βͺ (πβπ₯) β π¦ β π¦ = ((πβπ₯) βͺ {π« βͺ (πβπ₯)}))}) β V |
94 | | id 22 |
. . . . . . . . . . 11
β’ (π = (π₯ β dom π β¦ {π¦ β π« ((πβπ₯) βͺ {π« βͺ (πβπ₯)}) β£ (π« βͺ (πβπ₯) β π¦ β π¦ = ((πβπ₯) βͺ {π« βͺ (πβπ₯)}))}) β π = (π₯ β dom π β¦ {π¦ β π« ((πβπ₯) βͺ {π« βͺ (πβπ₯)}) β£ (π« βͺ (πβπ₯) β π¦ β π¦ = ((πβπ₯) βͺ {π« βͺ (πβπ₯)}))})) |
95 | | dmeq 5903 |
. . . . . . . . . . . 12
β’ (π = (π₯ β dom π β¦ {π¦ β π« ((πβπ₯) βͺ {π« βͺ (πβπ₯)}) β£ (π« βͺ (πβπ₯) β π¦ β π¦ = ((πβπ₯) βͺ {π« βͺ (πβπ₯)}))}) β dom π = dom (π₯ β dom π β¦ {π¦ β π« ((πβπ₯) βͺ {π« βͺ (πβπ₯)}) β£ (π« βͺ (πβπ₯) β π¦ β π¦ = ((πβπ₯) βͺ {π« βͺ (πβπ₯)}))})) |
96 | 82 | pwex 5378 |
. . . . . . . . . . . . . 14
β’ π«
((πβπ₯) βͺ {π« βͺ (πβπ₯)}) β V |
97 | 96 | rabex 5332 |
. . . . . . . . . . . . 13
β’ {π¦ β π« ((πβπ₯) βͺ {π« βͺ (πβπ₯)}) β£ (π« βͺ (πβπ₯) β π¦ β π¦ = ((πβπ₯) βͺ {π« βͺ (πβπ₯)}))} β V |
98 | | eqid 2732 |
. . . . . . . . . . . . 13
β’ (π₯ β dom π β¦ {π¦ β π« ((πβπ₯) βͺ {π« βͺ (πβπ₯)}) β£ (π« βͺ (πβπ₯) β π¦ β π¦ = ((πβπ₯) βͺ {π« βͺ (πβπ₯)}))}) = (π₯ β dom π β¦ {π¦ β π« ((πβπ₯) βͺ {π« βͺ (πβπ₯)}) β£ (π« βͺ (πβπ₯) β π¦ β π¦ = ((πβπ₯) βͺ {π« βͺ (πβπ₯)}))}) |
99 | 97, 98 | dmmpti 6694 |
. . . . . . . . . . . 12
β’ dom
(π₯ β dom π β¦ {π¦ β π« ((πβπ₯) βͺ {π« βͺ (πβπ₯)}) β£ (π« βͺ (πβπ₯) β π¦ β π¦ = ((πβπ₯) βͺ {π« βͺ (πβπ₯)}))}) = dom π |
100 | 95, 99 | eqtrdi 2788 |
. . . . . . . . . . 11
β’ (π = (π₯ β dom π β¦ {π¦ β π« ((πβπ₯) βͺ {π« βͺ (πβπ₯)}) β£ (π« βͺ (πβπ₯) β π¦ β π¦ = ((πβπ₯) βͺ {π« βͺ (πβπ₯)}))}) β dom π = dom π) |
101 | 94, 100 | feq12d 6705 |
. . . . . . . . . 10
β’ (π = (π₯ β dom π β¦ {π¦ β π« ((πβπ₯) βͺ {π« βͺ (πβπ₯)}) β£ (π« βͺ (πβπ₯) β π¦ β π¦ = ((πβπ₯) βͺ {π« βͺ (πβπ₯)}))}) β (π:dom πβΆTop β (π₯ β dom π β¦ {π¦ β π« ((πβπ₯) βͺ {π« βͺ (πβπ₯)}) β£ (π« βͺ (πβπ₯) β π¦ β π¦ = ((πβπ₯) βͺ {π« βͺ (πβπ₯)}))}):dom πβΆTop)) |
102 | 100 | ixpeq1d 8905 |
. . . . . . . . . . . 12
β’ (π = (π₯ β dom π β¦ {π¦ β π« ((πβπ₯) βͺ {π« βͺ (πβπ₯)}) β£ (π« βͺ (πβπ₯) β π¦ β π¦ = ((πβπ₯) βͺ {π« βͺ (πβπ₯)}))}) β Xπ β dom ππ« βͺ (πβπ) = Xπ β dom ππ« βͺ (πβπ)) |
103 | | fveq1 6890 |
. . . . . . . . . . . . . . . . 17
β’ (π = (π₯ β dom π β¦ {π¦ β π« ((πβπ₯) βͺ {π« βͺ (πβπ₯)}) β£ (π« βͺ (πβπ₯) β π¦ β π¦ = ((πβπ₯) βͺ {π« βͺ (πβπ₯)}))}) β (πβπ) = ((π₯ β dom π β¦ {π¦ β π« ((πβπ₯) βͺ {π« βͺ (πβπ₯)}) β£ (π« βͺ (πβπ₯) β π¦ β π¦ = ((πβπ₯) βͺ {π« βͺ (πβπ₯)}))})βπ)) |
104 | | fveq2 6891 |
. . . . . . . . . . . . . . . . . . . . 21
β’ (π₯ = π β (πβπ₯) = (πβπ)) |
105 | 104 | unieqd 4922 |
. . . . . . . . . . . . . . . . . . . . . . 23
β’ (π₯ = π β βͺ (πβπ₯) = βͺ (πβπ)) |
106 | 105 | pweqd 4619 |
. . . . . . . . . . . . . . . . . . . . . 22
β’ (π₯ = π β π« βͺ (πβπ₯) = π« βͺ
(πβπ)) |
107 | 106 | sneqd 4640 |
. . . . . . . . . . . . . . . . . . . . 21
β’ (π₯ = π β {π« βͺ (πβπ₯)} = {π« βͺ
(πβπ)}) |
108 | 104, 107 | uneq12d 4164 |
. . . . . . . . . . . . . . . . . . . 20
β’ (π₯ = π β ((πβπ₯) βͺ {π« βͺ (πβπ₯)}) = ((πβπ) βͺ {π« βͺ (πβπ)})) |
109 | 108 | pweqd 4619 |
. . . . . . . . . . . . . . . . . . 19
β’ (π₯ = π β π« ((πβπ₯) βͺ {π« βͺ (πβπ₯)}) = π« ((πβπ) βͺ {π« βͺ (πβπ)})) |
110 | 106 | eleq1d 2818 |
. . . . . . . . . . . . . . . . . . . 20
β’ (π₯ = π β (π« βͺ (πβπ₯) β π¦ β π« βͺ (πβπ) β π¦)) |
111 | 108 | eqeq2d 2743 |
. . . . . . . . . . . . . . . . . . . 20
β’ (π₯ = π β (π¦ = ((πβπ₯) βͺ {π« βͺ (πβπ₯)}) β π¦ = ((πβπ) βͺ {π« βͺ (πβπ)}))) |
112 | 110, 111 | imbi12d 344 |
. . . . . . . . . . . . . . . . . . 19
β’ (π₯ = π β ((π« βͺ (πβπ₯) β π¦ β π¦ = ((πβπ₯) βͺ {π« βͺ (πβπ₯)})) β (π« βͺ (πβπ) β π¦ β π¦ = ((πβπ) βͺ {π« βͺ (πβπ)})))) |
113 | 109, 112 | rabeqbidv 3449 |
. . . . . . . . . . . . . . . . . 18
β’ (π₯ = π β {π¦ β π« ((πβπ₯) βͺ {π« βͺ (πβπ₯)}) β£ (π« βͺ (πβπ₯) β π¦ β π¦ = ((πβπ₯) βͺ {π« βͺ (πβπ₯)}))} = {π¦ β π« ((πβπ) βͺ {π« βͺ (πβπ)}) β£ (π« βͺ (πβπ) β π¦ β π¦ = ((πβπ) βͺ {π« βͺ (πβπ)}))}) |
114 | | fvex 6904 |
. . . . . . . . . . . . . . . . . . . . 21
β’ (πβπ) β V |
115 | | snex 5431 |
. . . . . . . . . . . . . . . . . . . . 21
β’
{π« βͺ (πβπ)} β V |
116 | 114, 115 | unex 7735 |
. . . . . . . . . . . . . . . . . . . 20
β’ ((πβπ) βͺ {π« βͺ (πβπ)}) β V |
117 | 116 | pwex 5378 |
. . . . . . . . . . . . . . . . . . 19
β’ π«
((πβπ) βͺ {π« βͺ (πβπ)}) β V |
118 | 117 | rabex 5332 |
. . . . . . . . . . . . . . . . . 18
β’ {π¦ β π« ((πβπ) βͺ {π« βͺ (πβπ)}) β£ (π« βͺ (πβπ) β π¦ β π¦ = ((πβπ) βͺ {π« βͺ (πβπ)}))} β V |
119 | 113, 98, 118 | fvmpt 6998 |
. . . . . . . . . . . . . . . . 17
β’ (π β dom π β ((π₯ β dom π β¦ {π¦ β π« ((πβπ₯) βͺ {π« βͺ (πβπ₯)}) β£ (π« βͺ (πβπ₯) β π¦ β π¦ = ((πβπ₯) βͺ {π« βͺ (πβπ₯)}))})βπ) = {π¦ β π« ((πβπ) βͺ {π« βͺ (πβπ)}) β£ (π« βͺ (πβπ) β π¦ β π¦ = ((πβπ) βͺ {π« βͺ (πβπ)}))}) |
120 | 103, 119 | sylan9eq 2792 |
. . . . . . . . . . . . . . . 16
β’ ((π = (π₯ β dom π β¦ {π¦ β π« ((πβπ₯) βͺ {π« βͺ (πβπ₯)}) β£ (π« βͺ (πβπ₯) β π¦ β π¦ = ((πβπ₯) βͺ {π« βͺ (πβπ₯)}))}) β§ π β dom π) β (πβπ) = {π¦ β π« ((πβπ) βͺ {π« βͺ (πβπ)}) β£ (π« βͺ (πβπ) β π¦ β π¦ = ((πβπ) βͺ {π« βͺ (πβπ)}))}) |
121 | 120 | unieqd 4922 |
. . . . . . . . . . . . . . 15
β’ ((π = (π₯ β dom π β¦ {π¦ β π« ((πβπ₯) βͺ {π« βͺ (πβπ₯)}) β£ (π« βͺ (πβπ₯) β π¦ β π¦ = ((πβπ₯) βͺ {π« βͺ (πβπ₯)}))}) β§ π β dom π) β βͺ (πβπ) = βͺ {π¦ β π« ((πβπ) βͺ {π« βͺ (πβπ)}) β£ (π« βͺ (πβπ) β π¦ β π¦ = ((πβπ) βͺ {π« βͺ (πβπ)}))}) |
122 | | ssun2 4173 |
. . . . . . . . . . . . . . . . . 18
β’
{π« βͺ (πβπ)} β ((πβπ) βͺ {π« βͺ (πβπ)}) |
123 | 114 | uniex 7733 |
. . . . . . . . . . . . . . . . . . . 20
β’ βͺ (πβπ) β V |
124 | 123 | pwex 5378 |
. . . . . . . . . . . . . . . . . . 19
β’ π«
βͺ (πβπ) β V |
125 | 124 | snid 4664 |
. . . . . . . . . . . . . . . . . 18
β’ π«
βͺ (πβπ) β {π« βͺ (πβπ)} |
126 | 122, 125 | sselii 3979 |
. . . . . . . . . . . . . . . . 17
β’ π«
βͺ (πβπ) β ((πβπ) βͺ {π« βͺ (πβπ)}) |
127 | | epttop 22732 |
. . . . . . . . . . . . . . . . 17
β’ ((((πβπ) βͺ {π« βͺ (πβπ)}) β V β§ π« βͺ (πβπ) β ((πβπ) βͺ {π« βͺ (πβπ)})) β {π¦ β π« ((πβπ) βͺ {π« βͺ (πβπ)}) β£ (π« βͺ (πβπ) β π¦ β π¦ = ((πβπ) βͺ {π« βͺ (πβπ)}))} β (TopOnβ((πβπ) βͺ {π« βͺ (πβπ)}))) |
128 | 116, 126,
127 | mp2an 690 |
. . . . . . . . . . . . . . . 16
β’ {π¦ β π« ((πβπ) βͺ {π« βͺ (πβπ)}) β£ (π« βͺ (πβπ) β π¦ β π¦ = ((πβπ) βͺ {π« βͺ (πβπ)}))} β (TopOnβ((πβπ) βͺ {π« βͺ (πβπ)})) |
129 | 128 | toponunii 22638 |
. . . . . . . . . . . . . . 15
β’ ((πβπ) βͺ {π« βͺ (πβπ)}) = βͺ {π¦ β π« ((πβπ) βͺ {π« βͺ (πβπ)}) β£ (π« βͺ (πβπ) β π¦ β π¦ = ((πβπ) βͺ {π« βͺ (πβπ)}))} |
130 | 121, 129 | eqtr4di 2790 |
. . . . . . . . . . . . . 14
β’ ((π = (π₯ β dom π β¦ {π¦ β π« ((πβπ₯) βͺ {π« βͺ (πβπ₯)}) β£ (π« βͺ (πβπ₯) β π¦ β π¦ = ((πβπ₯) βͺ {π« βͺ (πβπ₯)}))}) β§ π β dom π) β βͺ (πβπ) = ((πβπ) βͺ {π« βͺ (πβπ)})) |
131 | 130 | pweqd 4619 |
. . . . . . . . . . . . 13
β’ ((π = (π₯ β dom π β¦ {π¦ β π« ((πβπ₯) βͺ {π« βͺ (πβπ₯)}) β£ (π« βͺ (πβπ₯) β π¦ β π¦ = ((πβπ₯) βͺ {π« βͺ (πβπ₯)}))}) β§ π β dom π) β π« βͺ (πβπ) = π« ((πβπ) βͺ {π« βͺ (πβπ)})) |
132 | 131 | ixpeq2dva 8908 |
. . . . . . . . . . . 12
β’ (π = (π₯ β dom π β¦ {π¦ β π« ((πβπ₯) βͺ {π« βͺ (πβπ₯)}) β£ (π« βͺ (πβπ₯) β π¦ β π¦ = ((πβπ₯) βͺ {π« βͺ (πβπ₯)}))}) β Xπ β dom ππ« βͺ (πβπ) = Xπ β dom ππ« ((πβπ) βͺ {π« βͺ (πβπ)})) |
133 | 102, 132 | eqtrd 2772 |
. . . . . . . . . . 11
β’ (π = (π₯ β dom π β¦ {π¦ β π« ((πβπ₯) βͺ {π« βͺ (πβπ₯)}) β£ (π« βͺ (πβπ₯) β π¦ β π¦ = ((πβπ₯) βͺ {π« βͺ (πβπ₯)}))}) β Xπ β dom ππ« βͺ (πβπ) = Xπ β dom ππ« ((πβπ) βͺ {π« βͺ (πβπ)})) |
134 | | 2fveq3 6896 |
. . . . . . . . . . . . 13
β’ (π = (π₯ β dom π β¦ {π¦ β π« ((πβπ₯) βͺ {π« βͺ (πβπ₯)}) β£ (π« βͺ (πβπ₯) β π¦ β π¦ = ((πβπ₯) βͺ {π« βͺ (πβπ₯)}))}) β
(clsβ(βtβπ)) =
(clsβ(βtβ(π₯ β dom π β¦ {π¦ β π« ((πβπ₯) βͺ {π« βͺ (πβπ₯)}) β£ (π« βͺ (πβπ₯) β π¦ β π¦ = ((πβπ₯) βͺ {π« βͺ (πβπ₯)}))})))) |
135 | 100 | ixpeq1d 8905 |
. . . . . . . . . . . . 13
β’ (π = (π₯ β dom π β¦ {π¦ β π« ((πβπ₯) βͺ {π« βͺ (πβπ₯)}) β£ (π« βͺ (πβπ₯) β π¦ β π¦ = ((πβπ₯) βͺ {π« βͺ (πβπ₯)}))}) β Xπ β dom π(π βπ) = Xπ β dom π(π βπ)) |
136 | 134, 135 | fveq12d 6898 |
. . . . . . . . . . . 12
β’ (π = (π₯ β dom π β¦ {π¦ β π« ((πβπ₯) βͺ {π« βͺ (πβπ₯)}) β£ (π« βͺ (πβπ₯) β π¦ β π¦ = ((πβπ₯) βͺ {π« βͺ (πβπ₯)}))}) β
((clsβ(βtβπ))βXπ β dom π(π βπ)) =
((clsβ(βtβ(π₯ β dom π β¦ {π¦ β π« ((πβπ₯) βͺ {π« βͺ (πβπ₯)}) β£ (π« βͺ (πβπ₯) β π¦ β π¦ = ((πβπ₯) βͺ {π« βͺ (πβπ₯)}))})))βXπ β dom π(π βπ))) |
137 | 100 | ixpeq1d 8905 |
. . . . . . . . . . . . 13
β’ (π = (π₯ β dom π β¦ {π¦ β π« ((πβπ₯) βͺ {π« βͺ (πβπ₯)}) β£ (π« βͺ (πβπ₯) β π¦ β π¦ = ((πβπ₯) βͺ {π« βͺ (πβπ₯)}))}) β Xπ β dom π((clsβ(πβπ))β(π βπ)) = Xπ β dom π((clsβ(πβπ))β(π βπ))) |
138 | 120 | fveq2d 6895 |
. . . . . . . . . . . . . . 15
β’ ((π = (π₯ β dom π β¦ {π¦ β π« ((πβπ₯) βͺ {π« βͺ (πβπ₯)}) β£ (π« βͺ (πβπ₯) β π¦ β π¦ = ((πβπ₯) βͺ {π« βͺ (πβπ₯)}))}) β§ π β dom π) β (clsβ(πβπ)) = (clsβ{π¦ β π« ((πβπ) βͺ {π« βͺ (πβπ)}) β£ (π« βͺ (πβπ) β π¦ β π¦ = ((πβπ) βͺ {π« βͺ (πβπ)}))})) |
139 | 138 | fveq1d 6893 |
. . . . . . . . . . . . . 14
β’ ((π = (π₯ β dom π β¦ {π¦ β π« ((πβπ₯) βͺ {π« βͺ (πβπ₯)}) β£ (π« βͺ (πβπ₯) β π¦ β π¦ = ((πβπ₯) βͺ {π« βͺ (πβπ₯)}))}) β§ π β dom π) β ((clsβ(πβπ))β(π βπ)) = ((clsβ{π¦ β π« ((πβπ) βͺ {π« βͺ (πβπ)}) β£ (π« βͺ (πβπ) β π¦ β π¦ = ((πβπ) βͺ {π« βͺ (πβπ)}))})β(π βπ))) |
140 | 139 | ixpeq2dva 8908 |
. . . . . . . . . . . . 13
β’ (π = (π₯ β dom π β¦ {π¦ β π« ((πβπ₯) βͺ {π« βͺ (πβπ₯)}) β£ (π« βͺ (πβπ₯) β π¦ β π¦ = ((πβπ₯) βͺ {π« βͺ (πβπ₯)}))}) β Xπ β dom π((clsβ(πβπ))β(π βπ)) = Xπ β dom π((clsβ{π¦ β π« ((πβπ) βͺ {π« βͺ (πβπ)}) β£ (π« βͺ (πβπ) β π¦ β π¦ = ((πβπ) βͺ {π« βͺ (πβπ)}))})β(π βπ))) |
141 | 137, 140 | eqtrd 2772 |
. . . . . . . . . . . 12
β’ (π = (π₯ β dom π β¦ {π¦ β π« ((πβπ₯) βͺ {π« βͺ (πβπ₯)}) β£ (π« βͺ (πβπ₯) β π¦ β π¦ = ((πβπ₯) βͺ {π« βͺ (πβπ₯)}))}) β Xπ β dom π((clsβ(πβπ))β(π βπ)) = Xπ β dom π((clsβ{π¦ β π« ((πβπ) βͺ {π« βͺ (πβπ)}) β£ (π« βͺ (πβπ) β π¦ β π¦ = ((πβπ) βͺ {π« βͺ (πβπ)}))})β(π βπ))) |
142 | 136, 141 | eqeq12d 2748 |
. . . . . . . . . . 11
β’ (π = (π₯ β dom π β¦ {π¦ β π« ((πβπ₯) βͺ {π« βͺ (πβπ₯)}) β£ (π« βͺ (πβπ₯) β π¦ β π¦ = ((πβπ₯) βͺ {π« βͺ (πβπ₯)}))}) β
(((clsβ(βtβπ))βXπ β dom π(π βπ)) = Xπ β dom π((clsβ(πβπ))β(π βπ)) β
((clsβ(βtβ(π₯ β dom π β¦ {π¦ β π« ((πβπ₯) βͺ {π« βͺ (πβπ₯)}) β£ (π« βͺ (πβπ₯) β π¦ β π¦ = ((πβπ₯) βͺ {π« βͺ (πβπ₯)}))})))βXπ β dom π(π βπ)) = Xπ β dom π((clsβ{π¦ β π« ((πβπ) βͺ {π« βͺ (πβπ)}) β£ (π« βͺ (πβπ) β π¦ β π¦ = ((πβπ) βͺ {π« βͺ (πβπ)}))})β(π βπ)))) |
143 | 133, 142 | raleqbidv 3342 |
. . . . . . . . . 10
β’ (π = (π₯ β dom π β¦ {π¦ β π« ((πβπ₯) βͺ {π« βͺ (πβπ₯)}) β£ (π« βͺ (πβπ₯) β π¦ β π¦ = ((πβπ₯) βͺ {π« βͺ (πβπ₯)}))}) β (βπ β X π β dom ππ« βͺ (πβπ)((clsβ(βtβπ))βXπ β
dom π(π βπ)) = Xπ β dom π((clsβ(πβπ))β(π βπ)) β βπ β X π β dom ππ« ((πβπ) βͺ {π« βͺ (πβπ)})((clsβ(βtβ(π₯ β dom π β¦ {π¦ β π« ((πβπ₯) βͺ {π« βͺ
(πβπ₯)}) β£ (π« βͺ (πβπ₯) β π¦ β π¦ = ((πβπ₯) βͺ {π« βͺ
(πβπ₯)}))})))βXπ β dom π(π βπ)) = Xπ β dom π((clsβ{π¦ β π« ((πβπ) βͺ {π« βͺ
(πβπ)}) β£ (π« βͺ (πβπ) β π¦ β π¦ = ((πβπ) βͺ {π« βͺ
(πβπ)}))})β(π βπ)))) |
144 | 101, 143 | imbi12d 344 |
. . . . . . . . 9
β’ (π = (π₯ β dom π β¦ {π¦ β π« ((πβπ₯) βͺ {π« βͺ (πβπ₯)}) β£ (π« βͺ (πβπ₯) β π¦ β π¦ = ((πβπ₯) βͺ {π« βͺ (πβπ₯)}))}) β ((π:dom πβΆTop β βπ β X π β dom ππ« βͺ (πβπ)((clsβ(βtβπ))βXπ β
dom π(π βπ)) = Xπ β dom π((clsβ(πβπ))β(π βπ))) β ((π₯ β dom π β¦ {π¦ β π« ((πβπ₯) βͺ {π« βͺ (πβπ₯)}) β£ (π« βͺ (πβπ₯) β π¦ β π¦ = ((πβπ₯) βͺ {π« βͺ (πβπ₯)}))}):dom πβΆTop β βπ β X π β dom ππ« ((πβπ) βͺ {π« βͺ (πβπ)})((clsβ(βtβ(π₯ β dom π β¦ {π¦ β π« ((πβπ₯) βͺ {π« βͺ
(πβπ₯)}) β£ (π« βͺ (πβπ₯) β π¦ β π¦ = ((πβπ₯) βͺ {π« βͺ
(πβπ₯)}))})))βXπ β dom π(π βπ)) = Xπ β dom π((clsβ{π¦ β π« ((πβπ) βͺ {π« βͺ
(πβπ)}) β£ (π« βͺ (πβπ) β π¦ β π¦ = ((πβπ) βͺ {π« βͺ
(πβπ)}))})β(π βπ))))) |
145 | 93, 144 | spcv 3595 |
. . . . . . . 8
β’
(βπ(π:dom πβΆTop β βπ β X π β dom ππ« βͺ (πβπ)((clsβ(βtβπ))βXπ β
dom π(π βπ)) = Xπ β dom π((clsβ(πβπ))β(π βπ))) β ((π₯ β dom π β¦ {π¦ β π« ((πβπ₯) βͺ {π« βͺ (πβπ₯)}) β£ (π« βͺ (πβπ₯) β π¦ β π¦ = ((πβπ₯) βͺ {π« βͺ (πβπ₯)}))}):dom πβΆTop β βπ β X π β dom ππ« ((πβπ) βͺ {π« βͺ (πβπ)})((clsβ(βtβ(π₯ β dom π β¦ {π¦ β π« ((πβπ₯) βͺ {π« βͺ
(πβπ₯)}) β£ (π« βͺ (πβπ₯) β π¦ β π¦ = ((πβπ₯) βͺ {π« βͺ
(πβπ₯)}))})))βXπ β dom π(π βπ)) = Xπ β dom π((clsβ{π¦ β π« ((πβπ) βͺ {π« βͺ
(πβπ)}) β£ (π« βͺ (πβπ) β π¦ β π¦ = ((πβπ) βͺ {π« βͺ
(πβπ)}))})β(π βπ)))) |
146 | 80, 92, 145 | sylc 65 |
. . . . . . 7
β’
((βπ(π:dom πβΆTop β βπ β X π β dom ππ« βͺ (πβπ)((clsβ(βtβπ))βXπ β
dom π(π βπ)) = Xπ β dom π((clsβ(πβπ))β(π βπ))) β§ (Fun π β§ β
β ran π)) β βπ β X π β dom ππ« ((πβπ) βͺ {π« βͺ (πβπ)})((clsβ(βtβ(π₯ β dom π β¦ {π¦ β π« ((πβπ₯) βͺ {π« βͺ
(πβπ₯)}) β£ (π« βͺ (πβπ₯) β π¦ β π¦ = ((πβπ₯) βͺ {π« βͺ
(πβπ₯)}))})))βXπ β dom π(π βπ)) = Xπ β dom π((clsβ{π¦ β π« ((πβπ) βͺ {π« βͺ
(πβπ)}) β£ (π« βͺ (πβπ) β π¦ β π¦ = ((πβπ) βͺ {π« βͺ
(πβπ)}))})β(π βπ))) |
147 | | simprl 769 |
. . . . . . . . 9
β’
((βπ(π:dom πβΆTop β βπ β X π β dom ππ« βͺ (πβπ)((clsβ(βtβπ))βXπ β
dom π(π βπ)) = Xπ β dom π((clsβ(πβπ))β(π βπ))) β§ (Fun π β§ β
β ran π)) β Fun π) |
148 | 147 | funfnd 6579 |
. . . . . . . 8
β’
((βπ(π:dom πβΆTop β βπ β X π β dom ππ« βͺ (πβπ)((clsβ(βtβπ))βXπ β
dom π(π βπ)) = Xπ β dom π((clsβ(πβπ))β(π βπ))) β§ (Fun π β§ β
β ran π)) β π Fn dom π) |
149 | | ssun1 4172 |
. . . . . . . . . 10
β’ (πβπ) β ((πβπ) βͺ {π« βͺ (πβπ)}) |
150 | 114 | elpw 4606 |
. . . . . . . . . 10
β’ ((πβπ) β π« ((πβπ) βͺ {π« βͺ (πβπ)}) β (πβπ) β ((πβπ) βͺ {π« βͺ (πβπ)})) |
151 | 149, 150 | mpbir 230 |
. . . . . . . . 9
β’ (πβπ) β π« ((πβπ) βͺ {π« βͺ (πβπ)}) |
152 | 151 | rgenw 3065 |
. . . . . . . 8
β’
βπ β dom
π(πβπ) β π« ((πβπ) βͺ {π« βͺ (πβπ)}) |
153 | 38 | elixp 8900 |
. . . . . . . 8
β’ (π β Xπ β
dom ππ« ((πβπ) βͺ {π« βͺ (πβπ)}) β (π Fn dom π β§ βπ β dom π(πβπ) β π« ((πβπ) βͺ {π« βͺ (πβπ)}))) |
154 | 148, 152,
153 | sylanblrc 590 |
. . . . . . 7
β’
((βπ(π:dom πβΆTop β βπ β X π β dom ππ« βͺ (πβπ)((clsβ(βtβπ))βXπ β
dom π(π βπ)) = Xπ β dom π((clsβ(πβπ))β(π βπ))) β§ (Fun π β§ β
β ran π)) β π β Xπ β dom ππ« ((πβπ) βͺ {π« βͺ (πβπ)})) |
155 | 79, 146, 154 | rspcdva 3613 |
. . . . . 6
β’
((βπ(π:dom πβΆTop β βπ β X π β dom ππ« βͺ (πβπ)((clsβ(βtβπ))βXπ β
dom π(π βπ)) = Xπ β dom π((clsβ(πβπ))β(π βπ))) β§ (Fun π β§ β
β ran π)) β
((clsβ(βtβ(π₯ β dom π β¦ {π¦ β π« ((πβπ₯) βͺ {π« βͺ (πβπ₯)}) β£ (π« βͺ (πβπ₯) β π¦ β π¦ = ((πβπ₯) βͺ {π« βͺ (πβπ₯)}))})))βXπ₯ β dom π(πβπ₯)) = Xπ₯ β dom π((clsβ{π¦ β π« ((πβπ₯) βͺ {π« βͺ (πβπ₯)}) β£ (π« βͺ (πβπ₯) β π¦ β π¦ = ((πβπ₯) βͺ {π« βͺ (πβπ₯)}))})β(πβπ₯))) |
156 | 40, 42, 54, 55, 56, 57, 155 | dfac14lem 23341 |
. . . . 5
β’
((βπ(π:dom πβΆTop β βπ β X π β dom ππ« βͺ (πβπ)((clsβ(βtβπ))βXπ β
dom π(π βπ)) = Xπ β dom π((clsβ(πβπ))β(π βπ))) β§ (Fun π β§ β
β ran π)) β Xπ₯ β dom π(πβπ₯) β β
) |
157 | 156 | ex 413 |
. . . 4
β’
(βπ(π:dom πβΆTop β βπ β X π β dom ππ« βͺ (πβπ)((clsβ(βtβπ))βXπ β
dom π(π βπ)) = Xπ β dom π((clsβ(πβπ))β(π βπ))) β ((Fun π β§ β
β ran π) β Xπ₯ β dom π(πβπ₯) β β
)) |
158 | 157 | alrimiv 1930 |
. . 3
β’
(βπ(π:dom πβΆTop β βπ β X π β dom ππ« βͺ (πβπ)((clsβ(βtβπ))βXπ β
dom π(π βπ)) = Xπ β dom π((clsβ(πβπ))β(π βπ))) β βπ((Fun π β§ β
β ran π) β Xπ₯ β dom π(πβπ₯) β β
)) |
159 | | dfac9 10133 |
. . 3
β’
(CHOICE β βπ((Fun π β§ β
β ran π) β Xπ₯ β dom π(πβπ₯) β β
)) |
160 | 158, 159 | sylibr 233 |
. 2
β’
(βπ(π:dom πβΆTop β βπ β X π β dom ππ« βͺ (πβπ)((clsβ(βtβπ))βXπ β
dom π(π βπ)) = Xπ β dom π((clsβ(πβπ))β(π βπ))) β
CHOICE) |
161 | 37, 160 | impbii 208 |
1
β’
(CHOICE β βπ(π:dom πβΆTop β βπ β X π β dom ππ« βͺ (πβπ)((clsβ(βtβπ))βXπ β
dom π(π βπ)) = Xπ β dom π((clsβ(πβπ))β(π βπ)))) |