Step | Hyp | Ref
| Expression |
1 | | simprlr 779 |
. . . . . . . . . . . 12
β’ ((π β§ ((π β β β§ π€ β (πβπ)) β§ (π β β β§ π€ β (πβπ)))) β π€ β (πβπ)) |
2 | | simprll 778 |
. . . . . . . . . . . . 13
β’ ((π β§ ((π β β β§ π€ β (πβπ)) β§ (π β β β§ π€ β (πβπ)))) β π β β) |
3 | | fveq2 6889 |
. . . . . . . . . . . . . . . . 17
β’ (π = π β (πΊβπ) = (πΊβπ)) |
4 | 3 | oveq2d 7422 |
. . . . . . . . . . . . . . . 16
β’ (π = π β (π β (πΊβπ)) = (π β (πΊβπ))) |
5 | 4 | eleq1d 2819 |
. . . . . . . . . . . . . . 15
β’ (π = π β ((π β (πΊβπ)) β ran πΉ β (π β (πΊβπ)) β ran πΉ)) |
6 | 5 | rabbidv 3441 |
. . . . . . . . . . . . . 14
β’ (π = π β {π β β β£ (π β (πΊβπ)) β ran πΉ} = {π β β β£ (π β (πΊβπ)) β ran πΉ}) |
7 | | vitali.6 |
. . . . . . . . . . . . . 14
β’ π = (π β β β¦ {π β β β£ (π β (πΊβπ)) β ran πΉ}) |
8 | | reex 11198 |
. . . . . . . . . . . . . . 15
β’ β
β V |
9 | 8 | rabex 5332 |
. . . . . . . . . . . . . 14
β’ {π β β β£ (π β (πΊβπ)) β ran πΉ} β V |
10 | 6, 7, 9 | fvmpt 6996 |
. . . . . . . . . . . . 13
β’ (π β β β (πβπ) = {π β β β£ (π β (πΊβπ)) β ran πΉ}) |
11 | 2, 10 | syl 17 |
. . . . . . . . . . . 12
β’ ((π β§ ((π β β β§ π€ β (πβπ)) β§ (π β β β§ π€ β (πβπ)))) β (πβπ) = {π β β β£ (π β (πΊβπ)) β ran πΉ}) |
12 | 1, 11 | eleqtrd 2836 |
. . . . . . . . . . 11
β’ ((π β§ ((π β β β§ π€ β (πβπ)) β§ (π β β β§ π€ β (πβπ)))) β π€ β {π β β β£ (π β (πΊβπ)) β ran πΉ}) |
13 | | oveq1 7413 |
. . . . . . . . . . . . 13
β’ (π = π€ β (π β (πΊβπ)) = (π€ β (πΊβπ))) |
14 | 13 | eleq1d 2819 |
. . . . . . . . . . . 12
β’ (π = π€ β ((π β (πΊβπ)) β ran πΉ β (π€ β (πΊβπ)) β ran πΉ)) |
15 | 14 | elrab 3683 |
. . . . . . . . . . 11
β’ (π€ β {π β β β£ (π β (πΊβπ)) β ran πΉ} β (π€ β β β§ (π€ β (πΊβπ)) β ran πΉ)) |
16 | 12, 15 | sylib 217 |
. . . . . . . . . 10
β’ ((π β§ ((π β β β§ π€ β (πβπ)) β§ (π β β β§ π€ β (πβπ)))) β (π€ β β β§ (π€ β (πΊβπ)) β ran πΉ)) |
17 | 16 | simpld 496 |
. . . . . . . . 9
β’ ((π β§ ((π β β β§ π€ β (πβπ)) β§ (π β β β§ π€ β (πβπ)))) β π€ β β) |
18 | 17 | recnd 11239 |
. . . . . . . 8
β’ ((π β§ ((π β β β§ π€ β (πβπ)) β§ (π β β β§ π€ β (πβπ)))) β π€ β β) |
19 | | vitali.5 |
. . . . . . . . . . . . 13
β’ (π β πΊ:ββ1-1-ontoβ(β β© (-1[,]1))) |
20 | | f1of 6831 |
. . . . . . . . . . . . 13
β’ (πΊ:ββ1-1-ontoβ(β β© (-1[,]1)) β πΊ:ββΆ(β β©
(-1[,]1))) |
21 | 19, 20 | syl 17 |
. . . . . . . . . . . 12
β’ (π β πΊ:ββΆ(β β©
(-1[,]1))) |
22 | | inss1 4228 |
. . . . . . . . . . . 12
β’ (β
β© (-1[,]1)) β β |
23 | | fss 6732 |
. . . . . . . . . . . 12
β’ ((πΊ:ββΆ(β β©
(-1[,]1)) β§ (β β© (-1[,]1)) β β) β πΊ:ββΆβ) |
24 | 21, 22, 23 | sylancl 587 |
. . . . . . . . . . 11
β’ (π β πΊ:ββΆβ) |
25 | 24 | adantr 482 |
. . . . . . . . . 10
β’ ((π β§ ((π β β β§ π€ β (πβπ)) β§ (π β β β§ π€ β (πβπ)))) β πΊ:ββΆβ) |
26 | 25, 2 | ffvelcdmd 7085 |
. . . . . . . . 9
β’ ((π β§ ((π β β β§ π€ β (πβπ)) β§ (π β β β§ π€ β (πβπ)))) β (πΊβπ) β β) |
27 | | qcn 12944 |
. . . . . . . . 9
β’ ((πΊβπ) β β β (πΊβπ) β β) |
28 | 26, 27 | syl 17 |
. . . . . . . 8
β’ ((π β§ ((π β β β§ π€ β (πβπ)) β§ (π β β β§ π€ β (πβπ)))) β (πΊβπ) β β) |
29 | | simprrl 780 |
. . . . . . . . . 10
β’ ((π β§ ((π β β β§ π€ β (πβπ)) β§ (π β β β§ π€ β (πβπ)))) β π β β) |
30 | 25, 29 | ffvelcdmd 7085 |
. . . . . . . . 9
β’ ((π β§ ((π β β β§ π€ β (πβπ)) β§ (π β β β§ π€ β (πβπ)))) β (πΊβπ) β β) |
31 | | qcn 12944 |
. . . . . . . . 9
β’ ((πΊβπ) β β β (πΊβπ) β β) |
32 | 30, 31 | syl 17 |
. . . . . . . 8
β’ ((π β§ ((π β β β§ π€ β (πβπ)) β§ (π β β β§ π€ β (πβπ)))) β (πΊβπ) β β) |
33 | | vitali.1 |
. . . . . . . . . . . . 13
β’ βΌ =
{β¨π₯, π¦β© β£ ((π₯ β (0[,]1) β§ π¦ β (0[,]1)) β§ (π₯ β π¦) β β)} |
34 | 33 | vitalilem1 25117 |
. . . . . . . . . . . 12
β’ βΌ Er
(0[,]1) |
35 | 34 | a1i 11 |
. . . . . . . . . . 11
β’ ((π β§ ((π β β β§ π€ β (πβπ)) β§ (π β β β§ π€ β (πβπ)))) β βΌ Er
(0[,]1)) |
36 | | vitali.2 |
. . . . . . . . . . . . . . . 16
β’ π = ((0[,]1) / βΌ
) |
37 | | vitali.3 |
. . . . . . . . . . . . . . . 16
β’ (π β πΉ Fn π) |
38 | | vitali.4 |
. . . . . . . . . . . . . . . 16
β’ (π β βπ§ β π (π§ β β
β (πΉβπ§) β π§)) |
39 | | vitali.7 |
. . . . . . . . . . . . . . . 16
β’ (π β Β¬ ran πΉ β (π« β
β dom vol)) |
40 | 33, 36, 37, 38, 19, 7, 39 | vitalilem2 25118 |
. . . . . . . . . . . . . . 15
β’ (π β (ran πΉ β (0[,]1) β§ (0[,]1) β
βͺ π β β (πβπ) β§ βͺ
π β β (πβπ) β (-1[,]2))) |
41 | 40 | simp1d 1143 |
. . . . . . . . . . . . . 14
β’ (π β ran πΉ β (0[,]1)) |
42 | 41 | adantr 482 |
. . . . . . . . . . . . 13
β’ ((π β§ ((π β β β§ π€ β (πβπ)) β§ (π β β β§ π€ β (πβπ)))) β ran πΉ β (0[,]1)) |
43 | 16 | simprd 497 |
. . . . . . . . . . . . 13
β’ ((π β§ ((π β β β§ π€ β (πβπ)) β§ (π β β β§ π€ β (πβπ)))) β (π€ β (πΊβπ)) β ran πΉ) |
44 | 42, 43 | sseldd 3983 |
. . . . . . . . . . . 12
β’ ((π β§ ((π β β β§ π€ β (πβπ)) β§ (π β β β§ π€ β (πβπ)))) β (π€ β (πΊβπ)) β (0[,]1)) |
45 | | simprrr 781 |
. . . . . . . . . . . . . . . 16
β’ ((π β§ ((π β β β§ π€ β (πβπ)) β§ (π β β β§ π€ β (πβπ)))) β π€ β (πβπ)) |
46 | | fveq2 6889 |
. . . . . . . . . . . . . . . . . . . . 21
β’ (π = π β (πΊβπ) = (πΊβπ)) |
47 | 46 | oveq2d 7422 |
. . . . . . . . . . . . . . . . . . . 20
β’ (π = π β (π β (πΊβπ)) = (π β (πΊβπ))) |
48 | 47 | eleq1d 2819 |
. . . . . . . . . . . . . . . . . . 19
β’ (π = π β ((π β (πΊβπ)) β ran πΉ β (π β (πΊβπ)) β ran πΉ)) |
49 | 48 | rabbidv 3441 |
. . . . . . . . . . . . . . . . . 18
β’ (π = π β {π β β β£ (π β (πΊβπ)) β ran πΉ} = {π β β β£ (π β (πΊβπ)) β ran πΉ}) |
50 | 8 | rabex 5332 |
. . . . . . . . . . . . . . . . . 18
β’ {π β β β£ (π β (πΊβπ)) β ran πΉ} β V |
51 | 49, 7, 50 | fvmpt 6996 |
. . . . . . . . . . . . . . . . 17
β’ (π β β β (πβπ) = {π β β β£ (π β (πΊβπ)) β ran πΉ}) |
52 | 29, 51 | syl 17 |
. . . . . . . . . . . . . . . 16
β’ ((π β§ ((π β β β§ π€ β (πβπ)) β§ (π β β β§ π€ β (πβπ)))) β (πβπ) = {π β β β£ (π β (πΊβπ)) β ran πΉ}) |
53 | 45, 52 | eleqtrd 2836 |
. . . . . . . . . . . . . . 15
β’ ((π β§ ((π β β β§ π€ β (πβπ)) β§ (π β β β§ π€ β (πβπ)))) β π€ β {π β β β£ (π β (πΊβπ)) β ran πΉ}) |
54 | | oveq1 7413 |
. . . . . . . . . . . . . . . . 17
β’ (π = π€ β (π β (πΊβπ)) = (π€ β (πΊβπ))) |
55 | 54 | eleq1d 2819 |
. . . . . . . . . . . . . . . 16
β’ (π = π€ β ((π β (πΊβπ)) β ran πΉ β (π€ β (πΊβπ)) β ran πΉ)) |
56 | 55 | elrab 3683 |
. . . . . . . . . . . . . . 15
β’ (π€ β {π β β β£ (π β (πΊβπ)) β ran πΉ} β (π€ β β β§ (π€ β (πΊβπ)) β ran πΉ)) |
57 | 53, 56 | sylib 217 |
. . . . . . . . . . . . . 14
β’ ((π β§ ((π β β β§ π€ β (πβπ)) β§ (π β β β§ π€ β (πβπ)))) β (π€ β β β§ (π€ β (πΊβπ)) β ran πΉ)) |
58 | 57 | simprd 497 |
. . . . . . . . . . . . 13
β’ ((π β§ ((π β β β§ π€ β (πβπ)) β§ (π β β β§ π€ β (πβπ)))) β (π€ β (πΊβπ)) β ran πΉ) |
59 | 42, 58 | sseldd 3983 |
. . . . . . . . . . . 12
β’ ((π β§ ((π β β β§ π€ β (πβπ)) β§ (π β β β§ π€ β (πβπ)))) β (π€ β (πΊβπ)) β (0[,]1)) |
60 | 18, 28, 32 | nnncan1d 11602 |
. . . . . . . . . . . . 13
β’ ((π β§ ((π β β β§ π€ β (πβπ)) β§ (π β β β§ π€ β (πβπ)))) β ((π€ β (πΊβπ)) β (π€ β (πΊβπ))) = ((πΊβπ) β (πΊβπ))) |
61 | | qsubcl 12949 |
. . . . . . . . . . . . . 14
β’ (((πΊβπ) β β β§ (πΊβπ) β β) β ((πΊβπ) β (πΊβπ)) β β) |
62 | 30, 26, 61 | syl2anc 585 |
. . . . . . . . . . . . 13
β’ ((π β§ ((π β β β§ π€ β (πβπ)) β§ (π β β β§ π€ β (πβπ)))) β ((πΊβπ) β (πΊβπ)) β β) |
63 | 60, 62 | eqeltrd 2834 |
. . . . . . . . . . . 12
β’ ((π β§ ((π β β β§ π€ β (πβπ)) β§ (π β β β§ π€ β (πβπ)))) β ((π€ β (πΊβπ)) β (π€ β (πΊβπ))) β β) |
64 | | oveq12 7415 |
. . . . . . . . . . . . . 14
β’ ((π₯ = (π€ β (πΊβπ)) β§ π¦ = (π€ β (πΊβπ))) β (π₯ β π¦) = ((π€ β (πΊβπ)) β (π€ β (πΊβπ)))) |
65 | 64 | eleq1d 2819 |
. . . . . . . . . . . . 13
β’ ((π₯ = (π€ β (πΊβπ)) β§ π¦ = (π€ β (πΊβπ))) β ((π₯ β π¦) β β β ((π€ β (πΊβπ)) β (π€ β (πΊβπ))) β β)) |
66 | 65, 33 | brab2a 5768 |
. . . . . . . . . . . 12
β’ ((π€ β (πΊβπ)) βΌ (π€ β (πΊβπ)) β (((π€ β (πΊβπ)) β (0[,]1) β§ (π€ β (πΊβπ)) β (0[,]1)) β§ ((π€ β (πΊβπ)) β (π€ β (πΊβπ))) β β)) |
67 | 44, 59, 63, 66 | syl21anbrc 1345 |
. . . . . . . . . . 11
β’ ((π β§ ((π β β β§ π€ β (πβπ)) β§ (π β β β§ π€ β (πβπ)))) β (π€ β (πΊβπ)) βΌ (π€ β (πΊβπ))) |
68 | 35, 67 | erthi 8751 |
. . . . . . . . . 10
β’ ((π β§ ((π β β β§ π€ β (πβπ)) β§ (π β β β§ π€ β (πβπ)))) β [(π€ β (πΊβπ))] βΌ = [(π€ β (πΊβπ))] βΌ ) |
69 | 68 | fveq2d 6893 |
. . . . . . . . 9
β’ ((π β§ ((π β β β§ π€ β (πβπ)) β§ (π β β β§ π€ β (πβπ)))) β (πΉβ[(π€ β (πΊβπ))] βΌ ) = (πΉβ[(π€ β (πΊβπ))] βΌ )) |
70 | | eceq1 8738 |
. . . . . . . . . . . 12
β’ (π§ = (π€ β (πΊβπ)) β [π§] βΌ = [(π€ β (πΊβπ))] βΌ ) |
71 | 70 | fveq2d 6893 |
. . . . . . . . . . 11
β’ (π§ = (π€ β (πΊβπ)) β (πΉβ[π§] βΌ ) = (πΉβ[(π€ β (πΊβπ))] βΌ )) |
72 | | id 22 |
. . . . . . . . . . 11
β’ (π§ = (π€ β (πΊβπ)) β π§ = (π€ β (πΊβπ))) |
73 | 71, 72 | eqeq12d 2749 |
. . . . . . . . . 10
β’ (π§ = (π€ β (πΊβπ)) β ((πΉβ[π§] βΌ ) = π§ β (πΉβ[(π€ β (πΊβπ))] βΌ ) = (π€ β (πΊβπ)))) |
74 | | fveq2 6889 |
. . . . . . . . . . . . . . . . 17
β’ ([π£] βΌ = π€ β (πΉβ[π£] βΌ ) = (πΉβπ€)) |
75 | 74 | eceq1d 8739 |
. . . . . . . . . . . . . . . 16
β’ ([π£] βΌ = π€ β [(πΉβ[π£] βΌ )] βΌ =
[(πΉβπ€)] βΌ ) |
76 | 75 | fveq2d 6893 |
. . . . . . . . . . . . . . 15
β’ ([π£] βΌ = π€ β (πΉβ[(πΉβ[π£] βΌ )] βΌ ) =
(πΉβ[(πΉβπ€)] βΌ )) |
77 | 76, 74 | eqeq12d 2749 |
. . . . . . . . . . . . . 14
β’ ([π£] βΌ = π€ β ((πΉβ[(πΉβ[π£] βΌ )] βΌ ) =
(πΉβ[π£] βΌ ) β (πΉβ[(πΉβπ€)] βΌ ) = (πΉβπ€))) |
78 | 34 | a1i 11 |
. . . . . . . . . . . . . . . . 17
β’ ((π β§ π£ β (0[,]1)) β βΌ Er
(0[,]1)) |
79 | | simpr 486 |
. . . . . . . . . . . . . . . . . . . 20
β’ ((π β§ π£ β (0[,]1)) β π£ β (0[,]1)) |
80 | | erdm 8710 |
. . . . . . . . . . . . . . . . . . . . . . 23
β’ ( βΌ Er
(0[,]1) β dom βΌ =
(0[,]1)) |
81 | 34, 80 | ax-mp 5 |
. . . . . . . . . . . . . . . . . . . . . 22
β’ dom βΌ =
(0[,]1) |
82 | 81 | eleq2i 2826 |
. . . . . . . . . . . . . . . . . . . . 21
β’ (π£ β dom βΌ β π£ β
(0[,]1)) |
83 | | ecdmn0 8747 |
. . . . . . . . . . . . . . . . . . . . 21
β’ (π£ β dom βΌ β [π£] βΌ β
β
) |
84 | 82, 83 | bitr3i 277 |
. . . . . . . . . . . . . . . . . . . 20
β’ (π£ β (0[,]1) β [π£] βΌ β
β
) |
85 | 79, 84 | sylib 217 |
. . . . . . . . . . . . . . . . . . 19
β’ ((π β§ π£ β (0[,]1)) β [π£] βΌ β
β
) |
86 | | neeq1 3004 |
. . . . . . . . . . . . . . . . . . . . 21
β’ (π§ = [π£] βΌ β (π§ β β
β [π£] βΌ β
β
)) |
87 | | fveq2 6889 |
. . . . . . . . . . . . . . . . . . . . . 22
β’ (π§ = [π£] βΌ β (πΉβπ§) = (πΉβ[π£] βΌ )) |
88 | | id 22 |
. . . . . . . . . . . . . . . . . . . . . 22
β’ (π§ = [π£] βΌ β π§ = [π£] βΌ ) |
89 | 87, 88 | eleq12d 2828 |
. . . . . . . . . . . . . . . . . . . . 21
β’ (π§ = [π£] βΌ β ((πΉβπ§) β π§ β (πΉβ[π£] βΌ ) β [π£] βΌ )) |
90 | 86, 89 | imbi12d 345 |
. . . . . . . . . . . . . . . . . . . 20
β’ (π§ = [π£] βΌ β ((π§ β β
β (πΉβπ§) β π§) β ([π£] βΌ β β
β
(πΉβ[π£] βΌ ) β [π£] βΌ
))) |
91 | 38 | adantr 482 |
. . . . . . . . . . . . . . . . . . . 20
β’ ((π β§ π£ β (0[,]1)) β βπ§ β π (π§ β β
β (πΉβπ§) β π§)) |
92 | | ovex 7439 |
. . . . . . . . . . . . . . . . . . . . . . . 24
β’ (0[,]1)
β V |
93 | | erex 8724 |
. . . . . . . . . . . . . . . . . . . . . . . 24
β’ ( βΌ Er
(0[,]1) β ((0[,]1) β V β βΌ β
V)) |
94 | 34, 92, 93 | mp2 9 |
. . . . . . . . . . . . . . . . . . . . . . 23
β’ βΌ β
V |
95 | 94 | ecelqsi 8764 |
. . . . . . . . . . . . . . . . . . . . . 22
β’ (π£ β (0[,]1) β [π£] βΌ β ((0[,]1)
/ βΌ )) |
96 | 95, 36 | eleqtrrdi 2845 |
. . . . . . . . . . . . . . . . . . . . 21
β’ (π£ β (0[,]1) β [π£] βΌ β π) |
97 | 96 | adantl 483 |
. . . . . . . . . . . . . . . . . . . 20
β’ ((π β§ π£ β (0[,]1)) β [π£] βΌ β π) |
98 | 90, 91, 97 | rspcdva 3614 |
. . . . . . . . . . . . . . . . . . 19
β’ ((π β§ π£ β (0[,]1)) β ([π£] βΌ β β
β
(πΉβ[π£] βΌ ) β [π£] βΌ )) |
99 | 85, 98 | mpd 15 |
. . . . . . . . . . . . . . . . . 18
β’ ((π β§ π£ β (0[,]1)) β (πΉβ[π£] βΌ ) β [π£] βΌ ) |
100 | | fvex 6902 |
. . . . . . . . . . . . . . . . . . 19
β’ (πΉβ[π£] βΌ ) β
V |
101 | | vex 3479 |
. . . . . . . . . . . . . . . . . . 19
β’ π£ β V |
102 | 100, 101 | elec 8744 |
. . . . . . . . . . . . . . . . . 18
β’ ((πΉβ[π£] βΌ ) β [π£] βΌ β π£ βΌ (πΉβ[π£] βΌ )) |
103 | 99, 102 | sylib 217 |
. . . . . . . . . . . . . . . . 17
β’ ((π β§ π£ β (0[,]1)) β π£ βΌ (πΉβ[π£] βΌ )) |
104 | 78, 103 | erthi 8751 |
. . . . . . . . . . . . . . . 16
β’ ((π β§ π£ β (0[,]1)) β [π£] βΌ = [(πΉβ[π£] βΌ )] βΌ
) |
105 | 104 | eqcomd 2739 |
. . . . . . . . . . . . . . 15
β’ ((π β§ π£ β (0[,]1)) β [(πΉβ[π£] βΌ )] βΌ =
[π£] βΌ ) |
106 | 105 | fveq2d 6893 |
. . . . . . . . . . . . . 14
β’ ((π β§ π£ β (0[,]1)) β (πΉβ[(πΉβ[π£] βΌ )] βΌ ) =
(πΉβ[π£] βΌ )) |
107 | 36, 77, 106 | ectocld 8775 |
. . . . . . . . . . . . 13
β’ ((π β§ π€ β π) β (πΉβ[(πΉβπ€)] βΌ ) = (πΉβπ€)) |
108 | 107 | ralrimiva 3147 |
. . . . . . . . . . . 12
β’ (π β βπ€ β π (πΉβ[(πΉβπ€)] βΌ ) = (πΉβπ€)) |
109 | | eceq1 8738 |
. . . . . . . . . . . . . . . 16
β’ (π§ = (πΉβπ€) β [π§] βΌ = [(πΉβπ€)] βΌ ) |
110 | 109 | fveq2d 6893 |
. . . . . . . . . . . . . . 15
β’ (π§ = (πΉβπ€) β (πΉβ[π§] βΌ ) = (πΉβ[(πΉβπ€)] βΌ )) |
111 | | id 22 |
. . . . . . . . . . . . . . 15
β’ (π§ = (πΉβπ€) β π§ = (πΉβπ€)) |
112 | 110, 111 | eqeq12d 2749 |
. . . . . . . . . . . . . 14
β’ (π§ = (πΉβπ€) β ((πΉβ[π§] βΌ ) = π§ β (πΉβ[(πΉβπ€)] βΌ ) = (πΉβπ€))) |
113 | 112 | ralrn 7087 |
. . . . . . . . . . . . 13
β’ (πΉ Fn π β (βπ§ β ran πΉ(πΉβ[π§] βΌ ) = π§ β βπ€ β π (πΉβ[(πΉβπ€)] βΌ ) = (πΉβπ€))) |
114 | 37, 113 | syl 17 |
. . . . . . . . . . . 12
β’ (π β (βπ§ β ran πΉ(πΉβ[π§] βΌ ) = π§ β βπ€ β π (πΉβ[(πΉβπ€)] βΌ ) = (πΉβπ€))) |
115 | 108, 114 | mpbird 257 |
. . . . . . . . . . 11
β’ (π β βπ§ β ran πΉ(πΉβ[π§] βΌ ) = π§) |
116 | 115 | adantr 482 |
. . . . . . . . . 10
β’ ((π β§ ((π β β β§ π€ β (πβπ)) β§ (π β β β§ π€ β (πβπ)))) β βπ§ β ran πΉ(πΉβ[π§] βΌ ) = π§) |
117 | 73, 116, 43 | rspcdva 3614 |
. . . . . . . . 9
β’ ((π β§ ((π β β β§ π€ β (πβπ)) β§ (π β β β§ π€ β (πβπ)))) β (πΉβ[(π€ β (πΊβπ))] βΌ ) = (π€ β (πΊβπ))) |
118 | | eceq1 8738 |
. . . . . . . . . . . 12
β’ (π§ = (π€ β (πΊβπ)) β [π§] βΌ = [(π€ β (πΊβπ))] βΌ ) |
119 | 118 | fveq2d 6893 |
. . . . . . . . . . 11
β’ (π§ = (π€ β (πΊβπ)) β (πΉβ[π§] βΌ ) = (πΉβ[(π€ β (πΊβπ))] βΌ )) |
120 | | id 22 |
. . . . . . . . . . 11
β’ (π§ = (π€ β (πΊβπ)) β π§ = (π€ β (πΊβπ))) |
121 | 119, 120 | eqeq12d 2749 |
. . . . . . . . . 10
β’ (π§ = (π€ β (πΊβπ)) β ((πΉβ[π§] βΌ ) = π§ β (πΉβ[(π€ β (πΊβπ))] βΌ ) = (π€ β (πΊβπ)))) |
122 | 121, 116,
58 | rspcdva 3614 |
. . . . . . . . 9
β’ ((π β§ ((π β β β§ π€ β (πβπ)) β§ (π β β β§ π€ β (πβπ)))) β (πΉβ[(π€ β (πΊβπ))] βΌ ) = (π€ β (πΊβπ))) |
123 | 69, 117, 122 | 3eqtr3d 2781 |
. . . . . . . 8
β’ ((π β§ ((π β β β§ π€ β (πβπ)) β§ (π β β β§ π€ β (πβπ)))) β (π€ β (πΊβπ)) = (π€ β (πΊβπ))) |
124 | 18, 28, 32, 123 | subcand 11609 |
. . . . . . 7
β’ ((π β§ ((π β β β§ π€ β (πβπ)) β§ (π β β β§ π€ β (πβπ)))) β (πΊβπ) = (πΊβπ)) |
125 | 19 | adantr 482 |
. . . . . . . . 9
β’ ((π β§ ((π β β β§ π€ β (πβπ)) β§ (π β β β§ π€ β (πβπ)))) β πΊ:ββ1-1-ontoβ(β β© (-1[,]1))) |
126 | | f1of1 6830 |
. . . . . . . . 9
β’ (πΊ:ββ1-1-ontoβ(β β© (-1[,]1)) β πΊ:ββ1-1β(β β© (-1[,]1))) |
127 | 125, 126 | syl 17 |
. . . . . . . 8
β’ ((π β§ ((π β β β§ π€ β (πβπ)) β§ (π β β β§ π€ β (πβπ)))) β πΊ:ββ1-1β(β β© (-1[,]1))) |
128 | | f1fveq 7258 |
. . . . . . . 8
β’ ((πΊ:ββ1-1β(β β© (-1[,]1)) β§ (π β β β§ π β β)) β ((πΊβπ) = (πΊβπ) β π = π)) |
129 | 127, 2, 29, 128 | syl12anc 836 |
. . . . . . 7
β’ ((π β§ ((π β β β§ π€ β (πβπ)) β§ (π β β β§ π€ β (πβπ)))) β ((πΊβπ) = (πΊβπ) β π = π)) |
130 | 124, 129 | mpbid 231 |
. . . . . 6
β’ ((π β§ ((π β β β§ π€ β (πβπ)) β§ (π β β β§ π€ β (πβπ)))) β π = π) |
131 | 130 | ex 414 |
. . . . 5
β’ (π β (((π β β β§ π€ β (πβπ)) β§ (π β β β§ π€ β (πβπ))) β π = π)) |
132 | 131 | alrimivv 1932 |
. . . 4
β’ (π β βπβπ(((π β β β§ π€ β (πβπ)) β§ (π β β β§ π€ β (πβπ))) β π = π)) |
133 | | eleq1w 2817 |
. . . . . 6
β’ (π = π β (π β β β π β β)) |
134 | | fveq2 6889 |
. . . . . . 7
β’ (π = π β (πβπ) = (πβπ)) |
135 | 134 | eleq2d 2820 |
. . . . . 6
β’ (π = π β (π€ β (πβπ) β π€ β (πβπ))) |
136 | 133, 135 | anbi12d 632 |
. . . . 5
β’ (π = π β ((π β β β§ π€ β (πβπ)) β (π β β β§ π€ β (πβπ)))) |
137 | 136 | mo4 2561 |
. . . 4
β’
(β*π(π β β β§ π€ β (πβπ)) β βπβπ(((π β β β§ π€ β (πβπ)) β§ (π β β β§ π€ β (πβπ))) β π = π)) |
138 | 132, 137 | sylibr 233 |
. . 3
β’ (π β β*π(π β β β§ π€ β (πβπ))) |
139 | 138 | alrimiv 1931 |
. 2
β’ (π β βπ€β*π(π β β β§ π€ β (πβπ))) |
140 | | dfdisj2 5115 |
. 2
β’
(Disj π
β β (πβπ) β βπ€β*π(π β β β§ π€ β (πβπ))) |
141 | 139, 140 | sylibr 233 |
1
β’ (π β Disj π β β (πβπ)) |