Step | Hyp | Ref
| Expression |
1 | | sseq1 4007 |
. . . . 5
β’ (π = π β (π β π‘ β π β π‘)) |
2 | | fveq2 6891 |
. . . . . 6
β’ (π = π β (πΌβπ ) = (πΌβπ)) |
3 | 2 | sseq1d 4013 |
. . . . 5
β’ (π = π β ((πΌβπ ) β (πΌβπ‘) β (πΌβπ) β (πΌβπ‘))) |
4 | 1, 3 | imbi12d 344 |
. . . 4
β’ (π = π β ((π β π‘ β (πΌβπ ) β (πΌβπ‘)) β (π β π‘ β (πΌβπ) β (πΌβπ‘)))) |
5 | | sseq2 4008 |
. . . . 5
β’ (π‘ = π β (π β π‘ β π β π)) |
6 | | fveq2 6891 |
. . . . . 6
β’ (π‘ = π β (πΌβπ‘) = (πΌβπ)) |
7 | 6 | sseq2d 4014 |
. . . . 5
β’ (π‘ = π β ((πΌβπ) β (πΌβπ‘) β (πΌβπ) β (πΌβπ))) |
8 | 5, 7 | imbi12d 344 |
. . . 4
β’ (π‘ = π β ((π β π‘ β (πΌβπ) β (πΌβπ‘)) β (π β π β (πΌβπ) β (πΌβπ)))) |
9 | 4, 8 | cbvral2vw 3237 |
. . 3
β’
(βπ β
π« π΅βπ‘ β π« π΅(π β π‘ β (πΌβπ ) β (πΌβπ‘)) β βπ β π« π΅βπ β π« π΅(π β π β (πΌβπ) β (πΌβπ))) |
10 | | ralcom 3285 |
. . 3
β’
(βπ β
π« π΅βπ β π« π΅(π β π β (πΌβπ) β (πΌβπ)) β βπ β π« π΅βπ β π« π΅(π β π β (πΌβπ) β (πΌβπ))) |
11 | 9, 10 | bitri 275 |
. 2
β’
(βπ β
π« π΅βπ‘ β π« π΅(π β π‘ β (πΌβπ ) β (πΌβπ‘)) β βπ β π« π΅βπ β π« π΅(π β π β (πΌβπ) β (πΌβπ))) |
12 | | simpl 482 |
. . . . 5
β’ ((π β§ π β π« π΅) β π) |
13 | | ntrcls.d |
. . . . . 6
β’ π· = (πβπ΅) |
14 | | ntrcls.r |
. . . . . 6
β’ (π β πΌπ·πΎ) |
15 | 13, 14 | ntrclsbex 43088 |
. . . . 5
β’ (π β π΅ β V) |
16 | 12, 15 | syl 17 |
. . . 4
β’ ((π β§ π β π« π΅) β π΅ β V) |
17 | | difssd 4132 |
. . . 4
β’ ((π β§ π β π« π΅) β (π΅ β π ) β π΅) |
18 | 16, 17 | sselpwd 5326 |
. . 3
β’ ((π β§ π β π« π΅) β (π΅ β π ) β π« π΅) |
19 | | elpwi 4609 |
. . . 4
β’ (π β π« π΅ β π β π΅) |
20 | | simpl 482 |
. . . . . 6
β’ ((π΅ β V β§ π β π΅) β π΅ β V) |
21 | | difssd 4132 |
. . . . . 6
β’ ((π΅ β V β§ π β π΅) β (π΅ β π) β π΅) |
22 | 20, 21 | sselpwd 5326 |
. . . . 5
β’ ((π΅ β V β§ π β π΅) β (π΅ β π) β π« π΅) |
23 | | simpr 484 |
. . . . . . . 8
β’ (((π΅ β V β§ π β π΅) β§ π = (π΅ β π)) β π = (π΅ β π)) |
24 | 23 | difeq2d 4122 |
. . . . . . 7
β’ (((π΅ β V β§ π β π΅) β§ π = (π΅ β π)) β (π΅ β π ) = (π΅ β (π΅ β π))) |
25 | 24 | eqeq2d 2742 |
. . . . . 6
β’ (((π΅ β V β§ π β π΅) β§ π = (π΅ β π)) β (π = (π΅ β π ) β π = (π΅ β (π΅ β π)))) |
26 | | eqcom 2738 |
. . . . . 6
β’ (π = (π΅ β (π΅ β π)) β (π΅ β (π΅ β π)) = π) |
27 | 25, 26 | bitrdi 287 |
. . . . 5
β’ (((π΅ β V β§ π β π΅) β§ π = (π΅ β π)) β (π = (π΅ β π ) β (π΅ β (π΅ β π)) = π)) |
28 | | dfss4 4258 |
. . . . . . 7
β’ (π β π΅ β (π΅ β (π΅ β π)) = π) |
29 | 28 | biimpi 215 |
. . . . . 6
β’ (π β π΅ β (π΅ β (π΅ β π)) = π) |
30 | 29 | adantl 481 |
. . . . 5
β’ ((π΅ β V β§ π β π΅) β (π΅ β (π΅ β π)) = π) |
31 | 22, 27, 30 | rspcedvd 3614 |
. . . 4
β’ ((π΅ β V β§ π β π΅) β βπ β π« π΅π = (π΅ β π )) |
32 | 15, 19, 31 | syl2an 595 |
. . 3
β’ ((π β§ π β π« π΅) β βπ β π« π΅π = (π΅ β π )) |
33 | | simpl1 1190 |
. . . . . 6
β’ (((π β§ π β π« π΅ β§ π = (π΅ β π )) β§ π‘ β π« π΅) β π) |
34 | 33, 15 | syl 17 |
. . . . 5
β’ (((π β§ π β π« π΅ β§ π = (π΅ β π )) β§ π‘ β π« π΅) β π΅ β V) |
35 | | difssd 4132 |
. . . . 5
β’ (((π β§ π β π« π΅ β§ π = (π΅ β π )) β§ π‘ β π« π΅) β (π΅ β π‘) β π΅) |
36 | 34, 35 | sselpwd 5326 |
. . . 4
β’ (((π β§ π β π« π΅ β§ π = (π΅ β π )) β§ π‘ β π« π΅) β (π΅ β π‘) β π« π΅) |
37 | | elpwi 4609 |
. . . . . 6
β’ (π β π« π΅ β π β π΅) |
38 | | simpl 482 |
. . . . . . . 8
β’ ((π΅ β V β§ π β π΅) β π΅ β V) |
39 | | difssd 4132 |
. . . . . . . 8
β’ ((π΅ β V β§ π β π΅) β (π΅ β π) β π΅) |
40 | 38, 39 | sselpwd 5326 |
. . . . . . 7
β’ ((π΅ β V β§ π β π΅) β (π΅ β π) β π« π΅) |
41 | | simpr 484 |
. . . . . . . . . 10
β’ (((π΅ β V β§ π β π΅) β§ π‘ = (π΅ β π)) β π‘ = (π΅ β π)) |
42 | 41 | difeq2d 4122 |
. . . . . . . . 9
β’ (((π΅ β V β§ π β π΅) β§ π‘ = (π΅ β π)) β (π΅ β π‘) = (π΅ β (π΅ β π))) |
43 | 42 | eqeq2d 2742 |
. . . . . . . 8
β’ (((π΅ β V β§ π β π΅) β§ π‘ = (π΅ β π)) β (π = (π΅ β π‘) β π = (π΅ β (π΅ β π)))) |
44 | | eqcom 2738 |
. . . . . . . 8
β’ (π = (π΅ β (π΅ β π)) β (π΅ β (π΅ β π)) = π) |
45 | 43, 44 | bitrdi 287 |
. . . . . . 7
β’ (((π΅ β V β§ π β π΅) β§ π‘ = (π΅ β π)) β (π = (π΅ β π‘) β (π΅ β (π΅ β π)) = π)) |
46 | | dfss4 4258 |
. . . . . . . . 9
β’ (π β π΅ β (π΅ β (π΅ β π)) = π) |
47 | 46 | biimpi 215 |
. . . . . . . 8
β’ (π β π΅ β (π΅ β (π΅ β π)) = π) |
48 | 47 | adantl 481 |
. . . . . . 7
β’ ((π΅ β V β§ π β π΅) β (π΅ β (π΅ β π)) = π) |
49 | 40, 45, 48 | rspcedvd 3614 |
. . . . . 6
β’ ((π΅ β V β§ π β π΅) β βπ‘ β π« π΅π = (π΅ β π‘)) |
50 | 15, 37, 49 | syl2an 595 |
. . . . 5
β’ ((π β§ π β π« π΅) β βπ‘ β π« π΅π = (π΅ β π‘)) |
51 | 50 | 3ad2antl1 1184 |
. . . 4
β’ (((π β§ π β π« π΅ β§ π = (π΅ β π )) β§ π β π« π΅) β βπ‘ β π« π΅π = (π΅ β π‘)) |
52 | | simp12 1203 |
. . . . . . . . 9
β’ (((π β§ π β π« π΅ β§ π = (π΅ β π )) β§ π‘ β π« π΅ β§ π = (π΅ β π‘)) β π β π« π΅) |
53 | 52 | elpwid 4611 |
. . . . . . . 8
β’ (((π β§ π β π« π΅ β§ π = (π΅ β π )) β§ π‘ β π« π΅ β§ π = (π΅ β π‘)) β π β π΅) |
54 | | simp2 1136 |
. . . . . . . . 9
β’ (((π β§ π β π« π΅ β§ π = (π΅ β π )) β§ π‘ β π« π΅ β§ π = (π΅ β π‘)) β π‘ β π« π΅) |
55 | 54 | elpwid 4611 |
. . . . . . . 8
β’ (((π β§ π β π« π΅ β§ π = (π΅ β π )) β§ π‘ β π« π΅ β§ π = (π΅ β π‘)) β π‘ β π΅) |
56 | | sscon34b 4294 |
. . . . . . . 8
β’ ((π β π΅ β§ π‘ β π΅) β (π β π‘ β (π΅ β π‘) β (π΅ β π ))) |
57 | 53, 55, 56 | syl2anc 583 |
. . . . . . 7
β’ (((π β§ π β π« π΅ β§ π = (π΅ β π )) β§ π‘ β π« π΅ β§ π = (π΅ β π‘)) β (π β π‘ β (π΅ β π‘) β (π΅ β π ))) |
58 | 57 | bicomd 222 |
. . . . . 6
β’ (((π β§ π β π« π΅ β§ π = (π΅ β π )) β§ π‘ β π« π΅ β§ π = (π΅ β π‘)) β ((π΅ β π‘) β (π΅ β π ) β π β π‘)) |
59 | | simp11 1202 |
. . . . . . . . . . 11
β’ (((π β§ π β π« π΅ β§ π = (π΅ β π )) β§ π‘ β π« π΅ β§ π = (π΅ β π‘)) β π) |
60 | | ntrcls.o |
. . . . . . . . . . . 12
β’ π = (π β V β¦ (π β (π« π βm π« π) β¦ (π β π« π β¦ (π β (πβ(π β π)))))) |
61 | 60, 13, 14 | ntrclsiex 43107 |
. . . . . . . . . . 11
β’ (π β πΌ β (π« π΅ βm π« π΅)) |
62 | 59, 61 | syl 17 |
. . . . . . . . . 10
β’ (((π β§ π β π« π΅ β§ π = (π΅ β π )) β§ π‘ β π« π΅ β§ π = (π΅ β π‘)) β πΌ β (π« π΅ βm π« π΅)) |
63 | | elmapi 8847 |
. . . . . . . . . 10
β’ (πΌ β (π« π΅ βm π«
π΅) β πΌ:π« π΅βΆπ« π΅) |
64 | 62, 63 | syl 17 |
. . . . . . . . 9
β’ (((π β§ π β π« π΅ β§ π = (π΅ β π )) β§ π‘ β π« π΅ β§ π = (π΅ β π‘)) β πΌ:π« π΅βΆπ« π΅) |
65 | 59, 15 | syl 17 |
. . . . . . . . . 10
β’ (((π β§ π β π« π΅ β§ π = (π΅ β π )) β§ π‘ β π« π΅ β§ π = (π΅ β π‘)) β π΅ β V) |
66 | | difssd 4132 |
. . . . . . . . . 10
β’ (((π β§ π β π« π΅ β§ π = (π΅ β π )) β§ π‘ β π« π΅ β§ π = (π΅ β π‘)) β (π΅ β π‘) β π΅) |
67 | 65, 66 | sselpwd 5326 |
. . . . . . . . 9
β’ (((π β§ π β π« π΅ β§ π = (π΅ β π )) β§ π‘ β π« π΅ β§ π = (π΅ β π‘)) β (π΅ β π‘) β π« π΅) |
68 | 64, 67 | ffvelcdmd 7087 |
. . . . . . . 8
β’ (((π β§ π β π« π΅ β§ π = (π΅ β π )) β§ π‘ β π« π΅ β§ π = (π΅ β π‘)) β (πΌβ(π΅ β π‘)) β π« π΅) |
69 | 68 | elpwid 4611 |
. . . . . . 7
β’ (((π β§ π β π« π΅ β§ π = (π΅ β π )) β§ π‘ β π« π΅ β§ π = (π΅ β π‘)) β (πΌβ(π΅ β π‘)) β π΅) |
70 | | difssd 4132 |
. . . . . . . . . 10
β’ (((π β§ π β π« π΅ β§ π = (π΅ β π )) β§ π‘ β π« π΅ β§ π = (π΅ β π‘)) β (π΅ β π ) β π΅) |
71 | 65, 70 | sselpwd 5326 |
. . . . . . . . 9
β’ (((π β§ π β π« π΅ β§ π = (π΅ β π )) β§ π‘ β π« π΅ β§ π = (π΅ β π‘)) β (π΅ β π ) β π« π΅) |
72 | 64, 71 | ffvelcdmd 7087 |
. . . . . . . 8
β’ (((π β§ π β π« π΅ β§ π = (π΅ β π )) β§ π‘ β π« π΅ β§ π = (π΅ β π‘)) β (πΌβ(π΅ β π )) β π« π΅) |
73 | 72 | elpwid 4611 |
. . . . . . 7
β’ (((π β§ π β π« π΅ β§ π = (π΅ β π )) β§ π‘ β π« π΅ β§ π = (π΅ β π‘)) β (πΌβ(π΅ β π )) β π΅) |
74 | | sscon34b 4294 |
. . . . . . 7
β’ (((πΌβ(π΅ β π‘)) β π΅ β§ (πΌβ(π΅ β π )) β π΅) β ((πΌβ(π΅ β π‘)) β (πΌβ(π΅ β π )) β (π΅ β (πΌβ(π΅ β π ))) β (π΅ β (πΌβ(π΅ β π‘))))) |
75 | 69, 73, 74 | syl2anc 583 |
. . . . . 6
β’ (((π β§ π β π« π΅ β§ π = (π΅ β π )) β§ π‘ β π« π΅ β§ π = (π΅ β π‘)) β ((πΌβ(π΅ β π‘)) β (πΌβ(π΅ β π )) β (π΅ β (πΌβ(π΅ β π ))) β (π΅ β (πΌβ(π΅ β π‘))))) |
76 | 58, 75 | imbi12d 344 |
. . . . 5
β’ (((π β§ π β π« π΅ β§ π = (π΅ β π )) β§ π‘ β π« π΅ β§ π = (π΅ β π‘)) β (((π΅ β π‘) β (π΅ β π ) β (πΌβ(π΅ β π‘)) β (πΌβ(π΅ β π ))) β (π β π‘ β (π΅ β (πΌβ(π΅ β π ))) β (π΅ β (πΌβ(π΅ β π‘)))))) |
77 | | simp3 1137 |
. . . . . . 7
β’ (((π β§ π β π« π΅ β§ π = (π΅ β π )) β§ π‘ β π« π΅ β§ π = (π΅ β π‘)) β π = (π΅ β π‘)) |
78 | | simp13 1204 |
. . . . . . 7
β’ (((π β§ π β π« π΅ β§ π = (π΅ β π )) β§ π‘ β π« π΅ β§ π = (π΅ β π‘)) β π = (π΅ β π )) |
79 | 77, 78 | sseq12d 4015 |
. . . . . 6
β’ (((π β§ π β π« π΅ β§ π = (π΅ β π )) β§ π‘ β π« π΅ β§ π = (π΅ β π‘)) β (π β π β (π΅ β π‘) β (π΅ β π ))) |
80 | 77 | fveq2d 6895 |
. . . . . . 7
β’ (((π β§ π β π« π΅ β§ π = (π΅ β π )) β§ π‘ β π« π΅ β§ π = (π΅ β π‘)) β (πΌβπ) = (πΌβ(π΅ β π‘))) |
81 | 78 | fveq2d 6895 |
. . . . . . 7
β’ (((π β§ π β π« π΅ β§ π = (π΅ β π )) β§ π‘ β π« π΅ β§ π = (π΅ β π‘)) β (πΌβπ) = (πΌβ(π΅ β π ))) |
82 | 80, 81 | sseq12d 4015 |
. . . . . 6
β’ (((π β§ π β π« π΅ β§ π = (π΅ β π )) β§ π‘ β π« π΅ β§ π = (π΅ β π‘)) β ((πΌβπ) β (πΌβπ) β (πΌβ(π΅ β π‘)) β (πΌβ(π΅ β π )))) |
83 | 79, 82 | imbi12d 344 |
. . . . 5
β’ (((π β§ π β π« π΅ β§ π = (π΅ β π )) β§ π‘ β π« π΅ β§ π = (π΅ β π‘)) β ((π β π β (πΌβπ) β (πΌβπ)) β ((π΅ β π‘) β (π΅ β π ) β (πΌβ(π΅ β π‘)) β (πΌβ(π΅ β π ))))) |
84 | 60, 13, 14 | ntrclsfv1 43109 |
. . . . . . . . . 10
β’ (π β (π·βπΌ) = πΎ) |
85 | 59, 84 | syl 17 |
. . . . . . . . 9
β’ (((π β§ π β π« π΅ β§ π = (π΅ β π )) β§ π‘ β π« π΅ β§ π = (π΅ β π‘)) β (π·βπΌ) = πΎ) |
86 | 85 | fveq1d 6893 |
. . . . . . . 8
β’ (((π β§ π β π« π΅ β§ π = (π΅ β π )) β§ π‘ β π« π΅ β§ π = (π΅ β π‘)) β ((π·βπΌ)βπ ) = (πΎβπ )) |
87 | | eqid 2731 |
. . . . . . . . 9
β’ (π·βπΌ) = (π·βπΌ) |
88 | | eqid 2731 |
. . . . . . . . 9
β’ ((π·βπΌ)βπ ) = ((π·βπΌ)βπ ) |
89 | 60, 13, 65, 62, 87, 52, 88 | dssmapfv3d 43073 |
. . . . . . . 8
β’ (((π β§ π β π« π΅ β§ π = (π΅ β π )) β§ π‘ β π« π΅ β§ π = (π΅ β π‘)) β ((π·βπΌ)βπ ) = (π΅ β (πΌβ(π΅ β π )))) |
90 | 86, 89 | eqtr3d 2773 |
. . . . . . 7
β’ (((π β§ π β π« π΅ β§ π = (π΅ β π )) β§ π‘ β π« π΅ β§ π = (π΅ β π‘)) β (πΎβπ ) = (π΅ β (πΌβ(π΅ β π )))) |
91 | 59, 14 | syl 17 |
. . . . . . . . . 10
β’ (((π β§ π β π« π΅ β§ π = (π΅ β π )) β§ π‘ β π« π΅ β§ π = (π΅ β π‘)) β πΌπ·πΎ) |
92 | 60, 13, 91 | ntrclsfv1 43109 |
. . . . . . . . 9
β’ (((π β§ π β π« π΅ β§ π = (π΅ β π )) β§ π‘ β π« π΅ β§ π = (π΅ β π‘)) β (π·βπΌ) = πΎ) |
93 | 92 | fveq1d 6893 |
. . . . . . . 8
β’ (((π β§ π β π« π΅ β§ π = (π΅ β π )) β§ π‘ β π« π΅ β§ π = (π΅ β π‘)) β ((π·βπΌ)βπ‘) = (πΎβπ‘)) |
94 | | eqid 2731 |
. . . . . . . . 9
β’ ((π·βπΌ)βπ‘) = ((π·βπΌ)βπ‘) |
95 | 60, 13, 65, 62, 87, 54, 94 | dssmapfv3d 43073 |
. . . . . . . 8
β’ (((π β§ π β π« π΅ β§ π = (π΅ β π )) β§ π‘ β π« π΅ β§ π = (π΅ β π‘)) β ((π·βπΌ)βπ‘) = (π΅ β (πΌβ(π΅ β π‘)))) |
96 | 93, 95 | eqtr3d 2773 |
. . . . . . 7
β’ (((π β§ π β π« π΅ β§ π = (π΅ β π )) β§ π‘ β π« π΅ β§ π = (π΅ β π‘)) β (πΎβπ‘) = (π΅ β (πΌβ(π΅ β π‘)))) |
97 | 90, 96 | sseq12d 4015 |
. . . . . 6
β’ (((π β§ π β π« π΅ β§ π = (π΅ β π )) β§ π‘ β π« π΅ β§ π = (π΅ β π‘)) β ((πΎβπ ) β (πΎβπ‘) β (π΅ β (πΌβ(π΅ β π ))) β (π΅ β (πΌβ(π΅ β π‘))))) |
98 | 97 | imbi2d 340 |
. . . . 5
β’ (((π β§ π β π« π΅ β§ π = (π΅ β π )) β§ π‘ β π« π΅ β§ π = (π΅ β π‘)) β ((π β π‘ β (πΎβπ ) β (πΎβπ‘)) β (π β π‘ β (π΅ β (πΌβ(π΅ β π ))) β (π΅ β (πΌβ(π΅ β π‘)))))) |
99 | 76, 83, 98 | 3bitr4d 311 |
. . . 4
β’ (((π β§ π β π« π΅ β§ π = (π΅ β π )) β§ π‘ β π« π΅ β§ π = (π΅ β π‘)) β ((π β π β (πΌβπ) β (πΌβπ)) β (π β π‘ β (πΎβπ ) β (πΎβπ‘)))) |
100 | 36, 51, 99 | ralxfrd2 5410 |
. . 3
β’ ((π β§ π β π« π΅ β§ π = (π΅ β π )) β (βπ β π« π΅(π β π β (πΌβπ) β (πΌβπ)) β βπ‘ β π« π΅(π β π‘ β (πΎβπ ) β (πΎβπ‘)))) |
101 | 18, 32, 100 | ralxfrd2 5410 |
. 2
β’ (π β (βπ β π« π΅βπ β π« π΅(π β π β (πΌβπ) β (πΌβπ)) β βπ β π« π΅βπ‘ β π« π΅(π β π‘ β (πΎβπ ) β (πΎβπ‘)))) |
102 | 11, 101 | bitrid 283 |
1
β’ (π β (βπ β π« π΅βπ‘ β π« π΅(π β π‘ β (πΌβπ ) β (πΌβπ‘)) β βπ β π« π΅βπ‘ β π« π΅(π β π‘ β (πΎβπ ) β (πΎβπ‘)))) |