Step | Hyp | Ref
| Expression |
1 | | simpr 486 |
. . . 4
β’ ((((π β§ π β (Baseβπ)) β§ π = ((π + π) β π)) β§ π β π΄) β π β π΄) |
2 | | simpr 486 |
. . . . . . 7
β’
(((((π β§ π β (Baseβπ)) β§ π = ((π + π) β π)) β§ π β π΄) β§ π = π) β π = π) |
3 | 2 | oveq1d 7419 |
. . . . . 6
β’
(((((π β§ π β (Baseβπ)) β§ π = ((π + π) β π)) β§ π β π΄) β§ π = π) β (π + π) = (π + π)) |
4 | 3, 2 | oveq12d 7422 |
. . . . 5
β’
(((((π β§ π β (Baseβπ)) β§ π = ((π + π) β π)) β§ π β π΄) β§ π = π) β ((π + π) β π) = ((π + π) β π)) |
5 | 4 | eqeq2d 2744 |
. . . 4
β’
(((((π β§ π β (Baseβπ)) β§ π = ((π + π) β π)) β§ π β π΄) β§ π = π) β (π = ((π + π) β π) β π = ((π + π) β π))) |
6 | | simplr 768 |
. . . 4
β’ ((((π β§ π β (Baseβπ)) β§ π = ((π + π) β π)) β§ π β π΄) β π = ((π + π) β π)) |
7 | 1, 5, 6 | rspcedvd 3614 |
. . 3
β’ ((((π β§ π β (Baseβπ)) β§ π = ((π + π) β π)) β§ π β π΄) β βπ β π΄ π = ((π + π) β π)) |
8 | | cyc3conja.d |
. . . . . . . . 9
β’ (π β π· β Fin) |
9 | 8 | ad5antr 733 |
. . . . . . . 8
β’
((((((π β§ π β (Baseβπ)) β§ π = ((π + π) β π)) β§ Β¬ π β π΄) β§ π’ β ({π€ β Word π· β£ π€:dom π€β1-1βπ·} β© (β‘β― β {3}))) β§ (πβπ’) = π) β π· β Fin) |
10 | 9 | ad3antrrr 729 |
. . . . . . 7
β’
(((((((((π β§ π β (Baseβπ)) β§ π = ((π + π) β π)) β§ Β¬ π β π΄) β§ π’ β ({π€ β Word π· β£ π€:dom π€β1-1βπ·} β© (β‘β― β {3}))) β§ (πβπ’) = π) β§ π₯ β (π· β ran π’)) β§ π¦ β (π· β ran π’)) β§ π₯ β π¦) β π· β Fin) |
11 | | simp-8r 791 |
. . . . . . . 8
β’
(((((((((π β§ π β (Baseβπ)) β§ π = ((π + π) β π)) β§ Β¬ π β π΄) β§ π’ β ({π€ β Word π· β£ π€:dom π€β1-1βπ·} β© (β‘β― β {3}))) β§ (πβπ’) = π) β§ π₯ β (π· β ran π’)) β§ π¦ β (π· β ran π’)) β§ π₯ β π¦) β π β (Baseβπ)) |
12 | | simp-6r 787 |
. . . . . . . 8
β’
(((((((((π β§ π β (Baseβπ)) β§ π = ((π + π) β π)) β§ Β¬ π β π΄) β§ π’ β ({π€ β Word π· β£ π€:dom π€β1-1βπ·} β© (β‘β― β {3}))) β§ (πβπ’) = π) β§ π₯ β (π· β ran π’)) β§ π¦ β (π· β ran π’)) β§ π₯ β π¦) β Β¬ π β π΄) |
13 | 11, 12 | eldifd 3958 |
. . . . . . 7
β’
(((((((((π β§ π β (Baseβπ)) β§ π = ((π + π) β π)) β§ Β¬ π β π΄) β§ π’ β ({π€ β Word π· β£ π€:dom π€β1-1βπ·} β© (β‘β― β {3}))) β§ (πβπ’) = π) β§ π₯ β (π· β ran π’)) β§ π¦ β (π· β ran π’)) β§ π₯ β π¦) β π β ((Baseβπ) β π΄)) |
14 | | simpllr 775 |
. . . . . . . . . . . 12
β’
(((((((((π β§ π β (Baseβπ)) β§ π = ((π + π) β π)) β§ Β¬ π β π΄) β§ π’ β ({π€ β Word π· β£ π€:dom π€β1-1βπ·} β© (β‘β― β {3}))) β§ (πβπ’) = π) β§ π₯ β (π· β ran π’)) β§ π¦ β (π· β ran π’)) β§ π₯ β π¦) β π₯ β (π· β ran π’)) |
15 | 14 | eldifad 3959 |
. . . . . . . . . . 11
β’
(((((((((π β§ π β (Baseβπ)) β§ π = ((π + π) β π)) β§ Β¬ π β π΄) β§ π’ β ({π€ β Word π· β£ π€:dom π€β1-1βπ·} β© (β‘β― β {3}))) β§ (πβπ’) = π) β§ π₯ β (π· β ran π’)) β§ π¦ β (π· β ran π’)) β§ π₯ β π¦) β π₯ β π·) |
16 | | simplr 768 |
. . . . . . . . . . . 12
β’
(((((((((π β§ π β (Baseβπ)) β§ π = ((π + π) β π)) β§ Β¬ π β π΄) β§ π’ β ({π€ β Word π· β£ π€:dom π€β1-1βπ·} β© (β‘β― β {3}))) β§ (πβπ’) = π) β§ π₯ β (π· β ran π’)) β§ π¦ β (π· β ran π’)) β§ π₯ β π¦) β π¦ β (π· β ran π’)) |
17 | 16 | eldifad 3959 |
. . . . . . . . . . 11
β’
(((((((((π β§ π β (Baseβπ)) β§ π = ((π + π) β π)) β§ Β¬ π β π΄) β§ π’ β ({π€ β Word π· β£ π€:dom π€β1-1βπ·} β© (β‘β― β {3}))) β§ (πβπ’) = π) β§ π₯ β (π· β ran π’)) β§ π¦ β (π· β ran π’)) β§ π₯ β π¦) β π¦ β π·) |
18 | 15, 17 | prssd 4824 |
. . . . . . . . . 10
β’
(((((((((π β§ π β (Baseβπ)) β§ π = ((π + π) β π)) β§ Β¬ π β π΄) β§ π’ β ({π€ β Word π· β£ π€:dom π€β1-1βπ·} β© (β‘β― β {3}))) β§ (πβπ’) = π) β§ π₯ β (π· β ran π’)) β§ π¦ β (π· β ran π’)) β§ π₯ β π¦) β {π₯, π¦} β π·) |
19 | | simpr 486 |
. . . . . . . . . . 11
β’
(((((((((π β§ π β (Baseβπ)) β§ π = ((π + π) β π)) β§ Β¬ π β π΄) β§ π’ β ({π€ β Word π· β£ π€:dom π€β1-1βπ·} β© (β‘β― β {3}))) β§ (πβπ’) = π) β§ π₯ β (π· β ran π’)) β§ π¦ β (π· β ran π’)) β§ π₯ β π¦) β π₯ β π¦) |
20 | | enpr2 9993 |
. . . . . . . . . . 11
β’ ((π₯ β (π· β ran π’) β§ π¦ β (π· β ran π’) β§ π₯ β π¦) β {π₯, π¦} β 2o) |
21 | 14, 16, 19, 20 | syl3anc 1372 |
. . . . . . . . . 10
β’
(((((((((π β§ π β (Baseβπ)) β§ π = ((π + π) β π)) β§ Β¬ π β π΄) β§ π’ β ({π€ β Word π· β£ π€:dom π€β1-1βπ·} β© (β‘β― β {3}))) β§ (πβπ’) = π) β§ π₯ β (π· β ran π’)) β§ π¦ β (π· β ran π’)) β§ π₯ β π¦) β {π₯, π¦} β 2o) |
22 | | eqid 2733 |
. . . . . . . . . . 11
β’
(pmTrspβπ·) =
(pmTrspβπ·) |
23 | | eqid 2733 |
. . . . . . . . . . 11
β’ ran
(pmTrspβπ·) = ran
(pmTrspβπ·) |
24 | 22, 23 | pmtrrn 19318 |
. . . . . . . . . 10
β’ ((π· β Fin β§ {π₯, π¦} β π· β§ {π₯, π¦} β 2o) β
((pmTrspβπ·)β{π₯, π¦}) β ran (pmTrspβπ·)) |
25 | 10, 18, 21, 24 | syl3anc 1372 |
. . . . . . . . 9
β’
(((((((((π β§ π β (Baseβπ)) β§ π = ((π + π) β π)) β§ Β¬ π β π΄) β§ π’ β ({π€ β Word π· β£ π€:dom π€β1-1βπ·} β© (β‘β― β {3}))) β§ (πβπ’) = π) β§ π₯ β (π· β ran π’)) β§ π¦ β (π· β ran π’)) β§ π₯ β π¦) β ((pmTrspβπ·)β{π₯, π¦}) β ran (pmTrspβπ·)) |
26 | | cyc3conja.s |
. . . . . . . . . 10
β’ π = (SymGrpβπ·) |
27 | | eqid 2733 |
. . . . . . . . . 10
β’
(Baseβπ) =
(Baseβπ) |
28 | 26, 27, 23 | pmtrodpm 21134 |
. . . . . . . . 9
β’ ((π· β Fin β§
((pmTrspβπ·)β{π₯, π¦}) β ran (pmTrspβπ·)) β ((pmTrspβπ·)β{π₯, π¦}) β ((Baseβπ) β (pmEvenβπ·))) |
29 | 10, 25, 28 | syl2anc 585 |
. . . . . . . 8
β’
(((((((((π β§ π β (Baseβπ)) β§ π = ((π + π) β π)) β§ Β¬ π β π΄) β§ π’ β ({π€ β Word π· β£ π€:dom π€β1-1βπ·} β© (β‘β― β {3}))) β§ (πβπ’) = π) β§ π₯ β (π· β ran π’)) β§ π¦ β (π· β ran π’)) β§ π₯ β π¦) β ((pmTrspβπ·)β{π₯, π¦}) β ((Baseβπ) β (pmEvenβπ·))) |
30 | | cyc3conja.a |
. . . . . . . . 9
β’ π΄ = (pmEvenβπ·) |
31 | 30 | difeq2i 4118 |
. . . . . . . 8
β’
((Baseβπ)
β π΄) =
((Baseβπ) β
(pmEvenβπ·)) |
32 | 29, 31 | eleqtrrdi 2845 |
. . . . . . 7
β’
(((((((((π β§ π β (Baseβπ)) β§ π = ((π + π) β π)) β§ Β¬ π β π΄) β§ π’ β ({π€ β Word π· β£ π€:dom π€β1-1βπ·} β© (β‘β― β {3}))) β§ (πβπ’) = π) β§ π₯ β (π· β ran π’)) β§ π¦ β (π· β ran π’)) β§ π₯ β π¦) β ((pmTrspβπ·)β{π₯, π¦}) β ((Baseβπ) β π΄)) |
33 | 26, 27, 30 | odpmco 32225 |
. . . . . . 7
β’ ((π· β Fin β§ π β ((Baseβπ) β π΄) β§ ((pmTrspβπ·)β{π₯, π¦}) β ((Baseβπ) β π΄)) β (π β ((pmTrspβπ·)β{π₯, π¦})) β π΄) |
34 | 10, 13, 32, 33 | syl3anc 1372 |
. . . . . 6
β’
(((((((((π β§ π β (Baseβπ)) β§ π = ((π + π) β π)) β§ Β¬ π β π΄) β§ π’ β ({π€ β Word π· β£ π€:dom π€β1-1βπ·} β© (β‘β― β {3}))) β§ (πβπ’) = π) β§ π₯ β (π· β ran π’)) β§ π¦ β (π· β ran π’)) β§ π₯ β π¦) β (π β ((pmTrspβπ·)β{π₯, π¦})) β π΄) |
35 | | simpr 486 |
. . . . . . . . 9
β’
((((((((((π β§
π β (Baseβπ)) β§ π = ((π + π) β π)) β§ Β¬ π β π΄) β§ π’ β ({π€ β Word π· β£ π€:dom π€β1-1βπ·} β© (β‘β― β {3}))) β§ (πβπ’) = π) β§ π₯ β (π· β ran π’)) β§ π¦ β (π· β ran π’)) β§ π₯ β π¦) β§ π = (π β ((pmTrspβπ·)β{π₯, π¦}))) β π = (π β ((pmTrspβπ·)β{π₯, π¦}))) |
36 | 35 | oveq1d 7419 |
. . . . . . . 8
β’
((((((((((π β§
π β (Baseβπ)) β§ π = ((π + π) β π)) β§ Β¬ π β π΄) β§ π’ β ({π€ β Word π· β£ π€:dom π€β1-1βπ·} β© (β‘β― β {3}))) β§ (πβπ’) = π) β§ π₯ β (π· β ran π’)) β§ π¦ β (π· β ran π’)) β§ π₯ β π¦) β§ π = (π β ((pmTrspβπ·)β{π₯, π¦}))) β (π + π) = ((π β ((pmTrspβπ·)β{π₯, π¦})) + π)) |
37 | 36, 35 | oveq12d 7422 |
. . . . . . 7
β’
((((((((((π β§
π β (Baseβπ)) β§ π = ((π + π) β π)) β§ Β¬ π β π΄) β§ π’ β ({π€ β Word π· β£ π€:dom π€β1-1βπ·} β© (β‘β― β {3}))) β§ (πβπ’) = π) β§ π₯ β (π· β ran π’)) β§ π¦ β (π· β ran π’)) β§ π₯ β π¦) β§ π = (π β ((pmTrspβπ·)β{π₯, π¦}))) β ((π + π) β π) = (((π β ((pmTrspβπ·)β{π₯, π¦})) + π) β (π β ((pmTrspβπ·)β{π₯, π¦})))) |
38 | 37 | eqeq2d 2744 |
. . . . . 6
β’
((((((((((π β§
π β (Baseβπ)) β§ π = ((π + π) β π)) β§ Β¬ π β π΄) β§ π’ β ({π€ β Word π· β£ π€:dom π€β1-1βπ·} β© (β‘β― β {3}))) β§ (πβπ’) = π) β§ π₯ β (π· β ran π’)) β§ π¦ β (π· β ran π’)) β§ π₯ β π¦) β§ π = (π β ((pmTrspβπ·)β{π₯, π¦}))) β (π = ((π + π) β π) β π = (((π β ((pmTrspβπ·)β{π₯, π¦})) + π) β (π β ((pmTrspβπ·)β{π₯, π¦}))))) |
39 | 29 | eldifad 3959 |
. . . . . . . . . . . 12
β’
(((((((((π β§ π β (Baseβπ)) β§ π = ((π + π) β π)) β§ Β¬ π β π΄) β§ π’ β ({π€ β Word π· β£ π€:dom π€β1-1βπ·} β© (β‘β― β {3}))) β§ (πβπ’) = π) β§ π₯ β (π· β ran π’)) β§ π¦ β (π· β ran π’)) β§ π₯ β π¦) β ((pmTrspβπ·)β{π₯, π¦}) β (Baseβπ)) |
40 | | 0zd 12566 |
. . . . . . . . . . . . . . . 16
β’ (π β 0 β
β€) |
41 | | cyc3conja.n |
. . . . . . . . . . . . . . . . . 18
β’ π = (β―βπ·) |
42 | | hashcl 14312 |
. . . . . . . . . . . . . . . . . . 19
β’ (π· β Fin β
(β―βπ·) β
β0) |
43 | 8, 42 | syl 17 |
. . . . . . . . . . . . . . . . . 18
β’ (π β (β―βπ·) β
β0) |
44 | 41, 43 | eqeltrid 2838 |
. . . . . . . . . . . . . . . . 17
β’ (π β π β
β0) |
45 | 44 | nn0zd 12580 |
. . . . . . . . . . . . . . . 16
β’ (π β π β β€) |
46 | | 3z 12591 |
. . . . . . . . . . . . . . . . 17
β’ 3 β
β€ |
47 | 46 | a1i 11 |
. . . . . . . . . . . . . . . 16
β’ (π β 3 β
β€) |
48 | | 0red 11213 |
. . . . . . . . . . . . . . . . 17
β’ (π β 0 β
β) |
49 | 47 | zred 12662 |
. . . . . . . . . . . . . . . . 17
β’ (π β 3 β
β) |
50 | | 3pos 12313 |
. . . . . . . . . . . . . . . . . 18
β’ 0 <
3 |
51 | 50 | a1i 11 |
. . . . . . . . . . . . . . . . 17
β’ (π β 0 < 3) |
52 | 48, 49, 51 | ltled 11358 |
. . . . . . . . . . . . . . . 16
β’ (π β 0 β€ 3) |
53 | | 5re 12295 |
. . . . . . . . . . . . . . . . . 18
β’ 5 β
β |
54 | 53 | a1i 11 |
. . . . . . . . . . . . . . . . 17
β’ (π β 5 β
β) |
55 | 44 | nn0red 12529 |
. . . . . . . . . . . . . . . . 17
β’ (π β π β β) |
56 | | 3lt5 12386 |
. . . . . . . . . . . . . . . . . . 19
β’ 3 <
5 |
57 | 56 | a1i 11 |
. . . . . . . . . . . . . . . . . 18
β’ (π β 3 < 5) |
58 | 49, 54, 57 | ltled 11358 |
. . . . . . . . . . . . . . . . 17
β’ (π β 3 β€ 5) |
59 | | cyc3conja.1 |
. . . . . . . . . . . . . . . . 17
β’ (π β 5 β€ π) |
60 | 49, 54, 55, 58, 59 | letrd 11367 |
. . . . . . . . . . . . . . . 16
β’ (π β 3 β€ π) |
61 | 40, 45, 47, 52, 60 | elfzd 13488 |
. . . . . . . . . . . . . . 15
β’ (π β 3 β (0...π)) |
62 | | cyc3conja.c |
. . . . . . . . . . . . . . . 16
β’ πΆ = (π β (β‘β― β {3})) |
63 | | cyc3conja.m |
. . . . . . . . . . . . . . . 16
β’ π = (toCycβπ·) |
64 | 62, 26, 41, 63, 27 | cycpmgcl 32290 |
. . . . . . . . . . . . . . 15
β’ ((π· β Fin β§ 3 β
(0...π)) β πΆ β (Baseβπ)) |
65 | 8, 61, 64 | syl2anc 585 |
. . . . . . . . . . . . . 14
β’ (π β πΆ β (Baseβπ)) |
66 | | cyc3conja.t |
. . . . . . . . . . . . . 14
β’ (π β π β πΆ) |
67 | 65, 66 | sseldd 3982 |
. . . . . . . . . . . . 13
β’ (π β π β (Baseβπ)) |
68 | 67 | ad8antr 739 |
. . . . . . . . . . . 12
β’
(((((((((π β§ π β (Baseβπ)) β§ π = ((π + π) β π)) β§ Β¬ π β π΄) β§ π’ β ({π€ β Word π· β£ π€:dom π€β1-1βπ·} β© (β‘β― β {3}))) β§ (πβπ’) = π) β§ π₯ β (π· β ran π’)) β§ π¦ β (π· β ran π’)) β§ π₯ β π¦) β π β (Baseβπ)) |
69 | 63, 10, 15, 17, 19, 22 | cycpm2tr 32256 |
. . . . . . . . . . . . . 14
β’
(((((((((π β§ π β (Baseβπ)) β§ π = ((π + π) β π)) β§ Β¬ π β π΄) β§ π’ β ({π€ β Word π· β£ π€:dom π€β1-1βπ·} β© (β‘β― β {3}))) β§ (πβπ’) = π) β§ π₯ β (π· β ran π’)) β§ π¦ β (π· β ran π’)) β§ π₯ β π¦) β (πββ¨βπ₯π¦ββ©) = ((pmTrspβπ·)β{π₯, π¦})) |
70 | 69 | reseq1d 5978 |
. . . . . . . . . . . . 13
β’
(((((((((π β§ π β (Baseβπ)) β§ π = ((π + π) β π)) β§ Β¬ π β π΄) β§ π’ β ({π€ β Word π· β£ π€:dom π€β1-1βπ·} β© (β‘β― β {3}))) β§ (πβπ’) = π) β§ π₯ β (π· β ran π’)) β§ π¦ β (π· β ran π’)) β§ π₯ β π¦) β ((πββ¨βπ₯π¦ββ©) βΎ ran π’) = (((pmTrspβπ·)β{π₯, π¦}) βΎ ran π’)) |
71 | 15, 17 | s2cld 14818 |
. . . . . . . . . . . . . . . 16
β’
(((((((((π β§ π β (Baseβπ)) β§ π = ((π + π) β π)) β§ Β¬ π β π΄) β§ π’ β ({π€ β Word π· β£ π€:dom π€β1-1βπ·} β© (β‘β― β {3}))) β§ (πβπ’) = π) β§ π₯ β (π· β ran π’)) β§ π¦ β (π· β ran π’)) β§ π₯ β π¦) β β¨βπ₯π¦ββ© β Word π·) |
72 | 15, 17, 19 | s2f1 32089 |
. . . . . . . . . . . . . . . 16
β’
(((((((((π β§ π β (Baseβπ)) β§ π = ((π + π) β π)) β§ Β¬ π β π΄) β§ π’ β ({π€ β Word π· β£ π€:dom π€β1-1βπ·} β© (β‘β― β {3}))) β§ (πβπ’) = π) β§ π₯ β (π· β ran π’)) β§ π¦ β (π· β ran π’)) β§ π₯ β π¦) β β¨βπ₯π¦ββ©:dom β¨βπ₯π¦ββ©β1-1βπ·) |
73 | 63, 10, 71, 72 | tocycfvres2 32248 |
. . . . . . . . . . . . . . 15
β’
(((((((((π β§ π β (Baseβπ)) β§ π = ((π + π) β π)) β§ Β¬ π β π΄) β§ π’ β ({π€ β Word π· β£ π€:dom π€β1-1βπ·} β© (β‘β― β {3}))) β§ (πβπ’) = π) β§ π₯ β (π· β ran π’)) β§ π¦ β (π· β ran π’)) β§ π₯ β π¦) β ((πββ¨βπ₯π¦ββ©) βΎ (π· β ran β¨βπ₯π¦ββ©)) = ( I βΎ (π· β ran β¨βπ₯π¦ββ©))) |
74 | 73 | reseq1d 5978 |
. . . . . . . . . . . . . 14
β’
(((((((((π β§ π β (Baseβπ)) β§ π = ((π + π) β π)) β§ Β¬ π β π΄) β§ π’ β ({π€ β Word π· β£ π€:dom π€β1-1βπ·} β© (β‘β― β {3}))) β§ (πβπ’) = π) β§ π₯ β (π· β ran π’)) β§ π¦ β (π· β ran π’)) β§ π₯ β π¦) β (((πββ¨βπ₯π¦ββ©) βΎ (π· β ran β¨βπ₯π¦ββ©)) βΎ ran π’) = (( I βΎ (π· β ran β¨βπ₯π¦ββ©)) βΎ ran π’)) |
75 | | simplr 768 |
. . . . . . . . . . . . . . . . . . . . . 22
β’
((((((π β§ π β (Baseβπ)) β§ π = ((π + π) β π)) β§ Β¬ π β π΄) β§ π’ β ({π€ β Word π· β£ π€:dom π€β1-1βπ·} β© (β‘β― β {3}))) β§ (πβπ’) = π) β π’ β ({π€ β Word π· β£ π€:dom π€β1-1βπ·} β© (β‘β― β {3}))) |
76 | 75 | elin1d 4197 |
. . . . . . . . . . . . . . . . . . . . 21
β’
((((((π β§ π β (Baseβπ)) β§ π = ((π + π) β π)) β§ Β¬ π β π΄) β§ π’ β ({π€ β Word π· β£ π€:dom π€β1-1βπ·} β© (β‘β― β {3}))) β§ (πβπ’) = π) β π’ β {π€ β Word π· β£ π€:dom π€β1-1βπ·}) |
77 | | id 22 |
. . . . . . . . . . . . . . . . . . . . . . 23
β’ (π€ = π’ β π€ = π’) |
78 | | dmeq 5901 |
. . . . . . . . . . . . . . . . . . . . . . 23
β’ (π€ = π’ β dom π€ = dom π’) |
79 | | eqidd 2734 |
. . . . . . . . . . . . . . . . . . . . . . 23
β’ (π€ = π’ β π· = π·) |
80 | 77, 78, 79 | f1eq123d 6822 |
. . . . . . . . . . . . . . . . . . . . . 22
β’ (π€ = π’ β (π€:dom π€β1-1βπ· β π’:dom π’β1-1βπ·)) |
81 | 80 | elrab 3682 |
. . . . . . . . . . . . . . . . . . . . 21
β’ (π’ β {π€ β Word π· β£ π€:dom π€β1-1βπ·} β (π’ β Word π· β§ π’:dom π’β1-1βπ·)) |
82 | 76, 81 | sylib 217 |
. . . . . . . . . . . . . . . . . . . 20
β’
((((((π β§ π β (Baseβπ)) β§ π = ((π + π) β π)) β§ Β¬ π β π΄) β§ π’ β ({π€ β Word π· β£ π€:dom π€β1-1βπ·} β© (β‘β― β {3}))) β§ (πβπ’) = π) β (π’ β Word π· β§ π’:dom π’β1-1βπ·)) |
83 | 82 | simprd 497 |
. . . . . . . . . . . . . . . . . . 19
β’
((((((π β§ π β (Baseβπ)) β§ π = ((π + π) β π)) β§ Β¬ π β π΄) β§ π’ β ({π€ β Word π· β£ π€:dom π€β1-1βπ·} β© (β‘β― β {3}))) β§ (πβπ’) = π) β π’:dom π’β1-1βπ·) |
84 | | f1f 6784 |
. . . . . . . . . . . . . . . . . . 19
β’ (π’:dom π’β1-1βπ· β π’:dom π’βΆπ·) |
85 | | frn 6721 |
. . . . . . . . . . . . . . . . . . 19
β’ (π’:dom π’βΆπ· β ran π’ β π·) |
86 | 83, 84, 85 | 3syl 18 |
. . . . . . . . . . . . . . . . . 18
β’
((((((π β§ π β (Baseβπ)) β§ π = ((π + π) β π)) β§ Β¬ π β π΄) β§ π’ β ({π€ β Word π· β£ π€:dom π€β1-1βπ·} β© (β‘β― β {3}))) β§ (πβπ’) = π) β ran π’ β π·) |
87 | 86 | ad3antrrr 729 |
. . . . . . . . . . . . . . . . 17
β’
(((((((((π β§ π β (Baseβπ)) β§ π = ((π + π) β π)) β§ Β¬ π β π΄) β§ π’ β ({π€ β Word π· β£ π€:dom π€β1-1βπ·} β© (β‘β― β {3}))) β§ (πβπ’) = π) β§ π₯ β (π· β ran π’)) β§ π¦ β (π· β ran π’)) β§ π₯ β π¦) β ran π’ β π·) |
88 | 14, 16 | prssd 4824 |
. . . . . . . . . . . . . . . . 17
β’
(((((((((π β§ π β (Baseβπ)) β§ π = ((π + π) β π)) β§ Β¬ π β π΄) β§ π’ β ({π€ β Word π· β£ π€:dom π€β1-1βπ·} β© (β‘β― β {3}))) β§ (πβπ’) = π) β§ π₯ β (π· β ran π’)) β§ π¦ β (π· β ran π’)) β§ π₯ β π¦) β {π₯, π¦} β (π· β ran π’)) |
89 | | ssconb 4136 |
. . . . . . . . . . . . . . . . . 18
β’ (({π₯, π¦} β π· β§ ran π’ β π·) β ({π₯, π¦} β (π· β ran π’) β ran π’ β (π· β {π₯, π¦}))) |
90 | 89 | biimpa 478 |
. . . . . . . . . . . . . . . . 17
β’ ((({π₯, π¦} β π· β§ ran π’ β π·) β§ {π₯, π¦} β (π· β ran π’)) β ran π’ β (π· β {π₯, π¦})) |
91 | 18, 87, 88, 90 | syl21anc 837 |
. . . . . . . . . . . . . . . 16
β’
(((((((((π β§ π β (Baseβπ)) β§ π = ((π + π) β π)) β§ Β¬ π β π΄) β§ π’ β ({π€ β Word π· β£ π€:dom π€β1-1βπ·} β© (β‘β― β {3}))) β§ (πβπ’) = π) β§ π₯ β (π· β ran π’)) β§ π¦ β (π· β ran π’)) β§ π₯ β π¦) β ran π’ β (π· β {π₯, π¦})) |
92 | 14, 16 | s2rn 32088 |
. . . . . . . . . . . . . . . . 17
β’
(((((((((π β§ π β (Baseβπ)) β§ π = ((π + π) β π)) β§ Β¬ π β π΄) β§ π’ β ({π€ β Word π· β£ π€:dom π€β1-1βπ·} β© (β‘β― β {3}))) β§ (πβπ’) = π) β§ π₯ β (π· β ran π’)) β§ π¦ β (π· β ran π’)) β§ π₯ β π¦) β ran β¨βπ₯π¦ββ© = {π₯, π¦}) |
93 | 92 | difeq2d 4121 |
. . . . . . . . . . . . . . . 16
β’
(((((((((π β§ π β (Baseβπ)) β§ π = ((π + π) β π)) β§ Β¬ π β π΄) β§ π’ β ({π€ β Word π· β£ π€:dom π€β1-1βπ·} β© (β‘β― β {3}))) β§ (πβπ’) = π) β§ π₯ β (π· β ran π’)) β§ π¦ β (π· β ran π’)) β§ π₯ β π¦) β (π· β ran β¨βπ₯π¦ββ©) = (π· β {π₯, π¦})) |
94 | 91, 93 | sseqtrrd 4022 |
. . . . . . . . . . . . . . 15
β’
(((((((((π β§ π β (Baseβπ)) β§ π = ((π + π) β π)) β§ Β¬ π β π΄) β§ π’ β ({π€ β Word π· β£ π€:dom π€β1-1βπ·} β© (β‘β― β {3}))) β§ (πβπ’) = π) β§ π₯ β (π· β ran π’)) β§ π¦ β (π· β ran π’)) β§ π₯ β π¦) β ran π’ β (π· β ran β¨βπ₯π¦ββ©)) |
95 | 94 | resabs1d 6010 |
. . . . . . . . . . . . . 14
β’
(((((((((π β§ π β (Baseβπ)) β§ π = ((π + π) β π)) β§ Β¬ π β π΄) β§ π’ β ({π€ β Word π· β£ π€:dom π€β1-1βπ·} β© (β‘β― β {3}))) β§ (πβπ’) = π) β§ π₯ β (π· β ran π’)) β§ π¦ β (π· β ran π’)) β§ π₯ β π¦) β (((πββ¨βπ₯π¦ββ©) βΎ (π· β ran β¨βπ₯π¦ββ©)) βΎ ran π’) = ((πββ¨βπ₯π¦ββ©) βΎ ran π’)) |
96 | 94 | resabs1d 6010 |
. . . . . . . . . . . . . 14
β’
(((((((((π β§ π β (Baseβπ)) β§ π = ((π + π) β π)) β§ Β¬ π β π΄) β§ π’ β ({π€ β Word π· β£ π€:dom π€β1-1βπ·} β© (β‘β― β {3}))) β§ (πβπ’) = π) β§ π₯ β (π· β ran π’)) β§ π¦ β (π· β ran π’)) β§ π₯ β π¦) β (( I βΎ (π· β ran β¨βπ₯π¦ββ©)) βΎ ran π’) = ( I βΎ ran π’)) |
97 | 74, 95, 96 | 3eqtr3d 2781 |
. . . . . . . . . . . . 13
β’
(((((((((π β§ π β (Baseβπ)) β§ π = ((π + π) β π)) β§ Β¬ π β π΄) β§ π’ β ({π€ β Word π· β£ π€:dom π€β1-1βπ·} β© (β‘β― β {3}))) β§ (πβπ’) = π) β§ π₯ β (π· β ran π’)) β§ π¦ β (π· β ran π’)) β§ π₯ β π¦) β ((πββ¨βπ₯π¦ββ©) βΎ ran π’) = ( I βΎ ran π’)) |
98 | 70, 97 | eqtr3d 2775 |
. . . . . . . . . . . 12
β’
(((((((((π β§ π β (Baseβπ)) β§ π = ((π + π) β π)) β§ Β¬ π β π΄) β§ π’ β ({π€ β Word π· β£ π€:dom π€β1-1βπ·} β© (β‘β― β {3}))) β§ (πβπ’) = π) β§ π₯ β (π· β ran π’)) β§ π¦ β (π· β ran π’)) β§ π₯ β π¦) β (((pmTrspβπ·)β{π₯, π¦}) βΎ ran π’) = ( I βΎ ran π’)) |
99 | | simp-4r 783 |
. . . . . . . . . . . . . 14
β’
(((((((((π β§ π β (Baseβπ)) β§ π = ((π + π) β π)) β§ Β¬ π β π΄) β§ π’ β ({π€ β Word π· β£ π€:dom π€β1-1βπ·} β© (β‘β― β {3}))) β§ (πβπ’) = π) β§ π₯ β (π· β ran π’)) β§ π¦ β (π· β ran π’)) β§ π₯ β π¦) β (πβπ’) = π) |
100 | 99 | reseq1d 5978 |
. . . . . . . . . . . . 13
β’
(((((((((π β§ π β (Baseβπ)) β§ π = ((π + π) β π)) β§ Β¬ π β π΄) β§ π’ β ({π€ β Word π· β£ π€:dom π€β1-1βπ·} β© (β‘β― β {3}))) β§ (πβπ’) = π) β§ π₯ β (π· β ran π’)) β§ π¦ β (π· β ran π’)) β§ π₯ β π¦) β ((πβπ’) βΎ (π· β ran π’)) = (π βΎ (π· β ran π’))) |
101 | 82 | simpld 496 |
. . . . . . . . . . . . . . 15
β’
((((((π β§ π β (Baseβπ)) β§ π = ((π + π) β π)) β§ Β¬ π β π΄) β§ π’ β ({π€ β Word π· β£ π€:dom π€β1-1βπ·} β© (β‘β― β {3}))) β§ (πβπ’) = π) β π’ β Word π·) |
102 | 101 | ad3antrrr 729 |
. . . . . . . . . . . . . 14
β’
(((((((((π β§ π β (Baseβπ)) β§ π = ((π + π) β π)) β§ Β¬ π β π΄) β§ π’ β ({π€ β Word π· β£ π€:dom π€β1-1βπ·} β© (β‘β― β {3}))) β§ (πβπ’) = π) β§ π₯ β (π· β ran π’)) β§ π¦ β (π· β ran π’)) β§ π₯ β π¦) β π’ β Word π·) |
103 | 83 | ad3antrrr 729 |
. . . . . . . . . . . . . 14
β’
(((((((((π β§ π β (Baseβπ)) β§ π = ((π + π) β π)) β§ Β¬ π β π΄) β§ π’ β ({π€ β Word π· β£ π€:dom π€β1-1βπ·} β© (β‘β― β {3}))) β§ (πβπ’) = π) β§ π₯ β (π· β ran π’)) β§ π¦ β (π· β ran π’)) β§ π₯ β π¦) β π’:dom π’β1-1βπ·) |
104 | 63, 10, 102, 103 | tocycfvres2 32248 |
. . . . . . . . . . . . 13
β’
(((((((((π β§ π β (Baseβπ)) β§ π = ((π + π) β π)) β§ Β¬ π β π΄) β§ π’ β ({π€ β Word π· β£ π€:dom π€β1-1βπ·} β© (β‘β― β {3}))) β§ (πβπ’) = π) β§ π₯ β (π· β ran π’)) β§ π¦ β (π· β ran π’)) β§ π₯ β π¦) β ((πβπ’) βΎ (π· β ran π’)) = ( I βΎ (π· β ran π’))) |
105 | 100, 104 | eqtr3d 2775 |
. . . . . . . . . . . 12
β’
(((((((((π β§ π β (Baseβπ)) β§ π = ((π + π) β π)) β§ Β¬ π β π΄) β§ π’ β ({π€ β Word π· β£ π€:dom π€β1-1βπ·} β© (β‘β― β {3}))) β§ (πβπ’) = π) β§ π₯ β (π· β ran π’)) β§ π¦ β (π· β ran π’)) β§ π₯ β π¦) β (π βΎ (π· β ran π’)) = ( I βΎ (π· β ran π’))) |
106 | | disjdif 4470 |
. . . . . . . . . . . . 13
β’ (ran
π’ β© (π· β ran π’)) = β
|
107 | 106 | a1i 11 |
. . . . . . . . . . . 12
β’
(((((((((π β§ π β (Baseβπ)) β§ π = ((π + π) β π)) β§ Β¬ π β π΄) β§ π’ β ({π€ β Word π· β£ π€:dom π€β1-1βπ·} β© (β‘β― β {3}))) β§ (πβπ’) = π) β§ π₯ β (π· β ran π’)) β§ π¦ β (π· β ran π’)) β§ π₯ β π¦) β (ran π’ β© (π· β ran π’)) = β
) |
108 | | undif 4480 |
. . . . . . . . . . . . 13
β’ (ran
π’ β π· β (ran π’ βͺ (π· β ran π’)) = π·) |
109 | 87, 108 | sylib 217 |
. . . . . . . . . . . 12
β’
(((((((((π β§ π β (Baseβπ)) β§ π = ((π + π) β π)) β§ Β¬ π β π΄) β§ π’ β ({π€ β Word π· β£ π€:dom π€β1-1βπ·} β© (β‘β― β {3}))) β§ (πβπ’) = π) β§ π₯ β (π· β ran π’)) β§ π¦ β (π· β ran π’)) β§ π₯ β π¦) β (ran π’ βͺ (π· β ran π’)) = π·) |
110 | 26, 27, 39, 68, 98, 105, 107, 109 | symgcom 32222 |
. . . . . . . . . . 11
β’
(((((((((π β§ π β (Baseβπ)) β§ π = ((π + π) β π)) β§ Β¬ π β π΄) β§ π’ β ({π€ β Word π· β£ π€:dom π€β1-1βπ·} β© (β‘β― β {3}))) β§ (πβπ’) = π) β§ π₯ β (π· β ran π’)) β§ π¦ β (π· β ran π’)) β§ π₯ β π¦) β (((pmTrspβπ·)β{π₯, π¦}) β π) = (π β ((pmTrspβπ·)β{π₯, π¦}))) |
111 | 110 | coeq2d 5860 |
. . . . . . . . . 10
β’
(((((((((π β§ π β (Baseβπ)) β§ π = ((π + π) β π)) β§ Β¬ π β π΄) β§ π’ β ({π€ β Word π· β£ π€:dom π€β1-1βπ·} β© (β‘β― β {3}))) β§ (πβπ’) = π) β§ π₯ β (π· β ran π’)) β§ π¦ β (π· β ran π’)) β§ π₯ β π¦) β (π β (((pmTrspβπ·)β{π₯, π¦}) β π)) = (π β (π β ((pmTrspβπ·)β{π₯, π¦})))) |
112 | | cyc3conja.p |
. . . . . . . . . . . . . . 15
β’ + =
(+gβπ) |
113 | 26, 27, 112 | symgov 19244 |
. . . . . . . . . . . . . 14
β’ ((π β (Baseβπ) β§ ((pmTrspβπ·)β{π₯, π¦}) β (Baseβπ)) β (π + ((pmTrspβπ·)β{π₯, π¦})) = (π β ((pmTrspβπ·)β{π₯, π¦}))) |
114 | 11, 39, 113 | syl2anc 585 |
. . . . . . . . . . . . 13
β’
(((((((((π β§ π β (Baseβπ)) β§ π = ((π + π) β π)) β§ Β¬ π β π΄) β§ π’ β ({π€ β Word π· β£ π€:dom π€β1-1βπ·} β© (β‘β― β {3}))) β§ (πβπ’) = π) β§ π₯ β (π· β ran π’)) β§ π¦ β (π· β ran π’)) β§ π₯ β π¦) β (π + ((pmTrspβπ·)β{π₯, π¦})) = (π β ((pmTrspβπ·)β{π₯, π¦}))) |
115 | 26, 27, 112 | symgcl 19245 |
. . . . . . . . . . . . . 14
β’ ((π β (Baseβπ) β§ ((pmTrspβπ·)β{π₯, π¦}) β (Baseβπ)) β (π + ((pmTrspβπ·)β{π₯, π¦})) β (Baseβπ)) |
116 | 11, 39, 115 | syl2anc 585 |
. . . . . . . . . . . . 13
β’
(((((((((π β§ π β (Baseβπ)) β§ π = ((π + π) β π)) β§ Β¬ π β π΄) β§ π’ β ({π€ β Word π· β£ π€:dom π€β1-1βπ·} β© (β‘β― β {3}))) β§ (πβπ’) = π) β§ π₯ β (π· β ran π’)) β§ π¦ β (π· β ran π’)) β§ π₯ β π¦) β (π + ((pmTrspβπ·)β{π₯, π¦})) β (Baseβπ)) |
117 | 114, 116 | eqeltrrd 2835 |
. . . . . . . . . . . 12
β’
(((((((((π β§ π β (Baseβπ)) β§ π = ((π + π) β π)) β§ Β¬ π β π΄) β§ π’ β ({π€ β Word π· β£ π€:dom π€β1-1βπ·} β© (β‘β― β {3}))) β§ (πβπ’) = π) β§ π₯ β (π· β ran π’)) β§ π¦ β (π· β ran π’)) β§ π₯ β π¦) β (π β ((pmTrspβπ·)β{π₯, π¦})) β (Baseβπ)) |
118 | 26, 27, 112 | symgov 19244 |
. . . . . . . . . . . 12
β’ (((π β ((pmTrspβπ·)β{π₯, π¦})) β (Baseβπ) β§ π β (Baseβπ)) β ((π β ((pmTrspβπ·)β{π₯, π¦})) + π) = ((π β ((pmTrspβπ·)β{π₯, π¦})) β π)) |
119 | 117, 68, 118 | syl2anc 585 |
. . . . . . . . . . 11
β’
(((((((((π β§ π β (Baseβπ)) β§ π = ((π + π) β π)) β§ Β¬ π β π΄) β§ π’ β ({π€ β Word π· β£ π€:dom π€β1-1βπ·} β© (β‘β― β {3}))) β§ (πβπ’) = π) β§ π₯ β (π· β ran π’)) β§ π¦ β (π· β ran π’)) β§ π₯ β π¦) β ((π β ((pmTrspβπ·)β{π₯, π¦})) + π) = ((π β ((pmTrspβπ·)β{π₯, π¦})) β π)) |
120 | | coass 6261 |
. . . . . . . . . . 11
β’ ((π β ((pmTrspβπ·)β{π₯, π¦})) β π) = (π β (((pmTrspβπ·)β{π₯, π¦}) β π)) |
121 | 119, 120 | eqtrdi 2789 |
. . . . . . . . . 10
β’
(((((((((π β§ π β (Baseβπ)) β§ π = ((π + π) β π)) β§ Β¬ π β π΄) β§ π’ β ({π€ β Word π· β£ π€:dom π€β1-1βπ·} β© (β‘β― β {3}))) β§ (πβπ’) = π) β§ π₯ β (π· β ran π’)) β§ π¦ β (π· β ran π’)) β§ π₯ β π¦) β ((π β ((pmTrspβπ·)β{π₯, π¦})) + π) = (π β (((pmTrspβπ·)β{π₯, π¦}) β π))) |
122 | | coass 6261 |
. . . . . . . . . . 11
β’ ((π β π) β ((pmTrspβπ·)β{π₯, π¦})) = (π β (π β ((pmTrspβπ·)β{π₯, π¦}))) |
123 | 122 | a1i 11 |
. . . . . . . . . 10
β’
(((((((((π β§ π β (Baseβπ)) β§ π = ((π + π) β π)) β§ Β¬ π β π΄) β§ π’ β ({π€ β Word π· β£ π€:dom π€β1-1βπ·} β© (β‘β― β {3}))) β§ (πβπ’) = π) β§ π₯ β (π· β ran π’)) β§ π¦ β (π· β ran π’)) β§ π₯ β π¦) β ((π β π) β ((pmTrspβπ·)β{π₯, π¦})) = (π β (π β ((pmTrspβπ·)β{π₯, π¦})))) |
124 | 111, 121,
123 | 3eqtr4d 2783 |
. . . . . . . . 9
β’
(((((((((π β§ π β (Baseβπ)) β§ π = ((π + π) β π)) β§ Β¬ π β π΄) β§ π’ β ({π€ β Word π· β£ π€:dom π€β1-1βπ·} β© (β‘β― β {3}))) β§ (πβπ’) = π) β§ π₯ β (π· β ran π’)) β§ π¦ β (π· β ran π’)) β§ π₯ β π¦) β ((π β ((pmTrspβπ·)β{π₯, π¦})) + π) = ((π β π) β ((pmTrspβπ·)β{π₯, π¦}))) |
125 | | cnvco 5883 |
. . . . . . . . . 10
β’ β‘(π β ((pmTrspβπ·)β{π₯, π¦})) = (β‘((pmTrspβπ·)β{π₯, π¦}) β β‘π) |
126 | 125 | a1i 11 |
. . . . . . . . 9
β’
(((((((((π β§ π β (Baseβπ)) β§ π = ((π + π) β π)) β§ Β¬ π β π΄) β§ π’ β ({π€ β Word π· β£ π€:dom π€β1-1βπ·} β© (β‘β― β {3}))) β§ (πβπ’) = π) β§ π₯ β (π· β ran π’)) β§ π¦ β (π· β ran π’)) β§ π₯ β π¦) β β‘(π β ((pmTrspβπ·)β{π₯, π¦})) = (β‘((pmTrspβπ·)β{π₯, π¦}) β β‘π)) |
127 | 124, 126 | coeq12d 5862 |
. . . . . . . 8
β’
(((((((((π β§ π β (Baseβπ)) β§ π = ((π + π) β π)) β§ Β¬ π β π΄) β§ π’ β ({π€ β Word π· β£ π€:dom π€β1-1βπ·} β© (β‘β― β {3}))) β§ (πβπ’) = π) β§ π₯ β (π· β ran π’)) β§ π¦ β (π· β ran π’)) β§ π₯ β π¦) β (((π β ((pmTrspβπ·)β{π₯, π¦})) + π) β β‘(π β ((pmTrspβπ·)β{π₯, π¦}))) = (((π β π) β ((pmTrspβπ·)β{π₯, π¦})) β (β‘((pmTrspβπ·)β{π₯, π¦}) β β‘π))) |
128 | | coass 6261 |
. . . . . . . . . 10
β’ ((((π β π) β ((pmTrspβπ·)β{π₯, π¦})) β β‘((pmTrspβπ·)β{π₯, π¦})) β β‘π) = (((π β π) β ((pmTrspβπ·)β{π₯, π¦})) β (β‘((pmTrspβπ·)β{π₯, π¦}) β β‘π)) |
129 | | coass 6261 |
. . . . . . . . . . 11
β’ (((π β π) β ((pmTrspβπ·)β{π₯, π¦})) β β‘((pmTrspβπ·)β{π₯, π¦})) = ((π β π) β (((pmTrspβπ·)β{π₯, π¦}) β β‘((pmTrspβπ·)β{π₯, π¦}))) |
130 | 129 | coeq1i 5857 |
. . . . . . . . . 10
β’ ((((π β π) β ((pmTrspβπ·)β{π₯, π¦})) β β‘((pmTrspβπ·)β{π₯, π¦})) β β‘π) = (((π β π) β (((pmTrspβπ·)β{π₯, π¦}) β β‘((pmTrspβπ·)β{π₯, π¦}))) β β‘π) |
131 | 128, 130 | eqtr3i 2763 |
. . . . . . . . 9
β’ (((π β π) β ((pmTrspβπ·)β{π₯, π¦})) β (β‘((pmTrspβπ·)β{π₯, π¦}) β β‘π)) = (((π β π) β (((pmTrspβπ·)β{π₯, π¦}) β β‘((pmTrspβπ·)β{π₯, π¦}))) β β‘π) |
132 | 131 | a1i 11 |
. . . . . . . 8
β’
(((((((((π β§ π β (Baseβπ)) β§ π = ((π + π) β π)) β§ Β¬ π β π΄) β§ π’ β ({π€ β Word π· β£ π€:dom π€β1-1βπ·} β© (β‘β― β {3}))) β§ (πβπ’) = π) β§ π₯ β (π· β ran π’)) β§ π¦ β (π· β ran π’)) β§ π₯ β π¦) β (((π β π) β ((pmTrspβπ·)β{π₯, π¦})) β (β‘((pmTrspβπ·)β{π₯, π¦}) β β‘π)) = (((π β π) β (((pmTrspβπ·)β{π₯, π¦}) β β‘((pmTrspβπ·)β{π₯, π¦}))) β β‘π)) |
133 | 26, 27, 112 | symgov 19244 |
. . . . . . . . . . . . . 14
β’ ((π β (Baseβπ) β§ π β (Baseβπ)) β (π + π) = (π β π)) |
134 | 11, 68, 133 | syl2anc 585 |
. . . . . . . . . . . . 13
β’
(((((((((π β§ π β (Baseβπ)) β§ π = ((π + π) β π)) β§ Β¬ π β π΄) β§ π’ β ({π€ β Word π· β£ π€:dom π€β1-1βπ·} β© (β‘β― β {3}))) β§ (πβπ’) = π) β§ π₯ β (π· β ran π’)) β§ π¦ β (π· β ran π’)) β§ π₯ β π¦) β (π + π) = (π β π)) |
135 | 26, 27, 112 | symgcl 19245 |
. . . . . . . . . . . . . 14
β’ ((π β (Baseβπ) β§ π β (Baseβπ)) β (π + π) β (Baseβπ)) |
136 | 11, 68, 135 | syl2anc 585 |
. . . . . . . . . . . . 13
β’
(((((((((π β§ π β (Baseβπ)) β§ π = ((π + π) β π)) β§ Β¬ π β π΄) β§ π’ β ({π€ β Word π· β£ π€:dom π€β1-1βπ·} β© (β‘β― β {3}))) β§ (πβπ’) = π) β§ π₯ β (π· β ran π’)) β§ π¦ β (π· β ran π’)) β§ π₯ β π¦) β (π + π) β (Baseβπ)) |
137 | 134, 136 | eqeltrrd 2835 |
. . . . . . . . . . . 12
β’
(((((((((π β§ π β (Baseβπ)) β§ π = ((π + π) β π)) β§ Β¬ π β π΄) β§ π’ β ({π€ β Word π· β£ π€:dom π€β1-1βπ·} β© (β‘β― β {3}))) β§ (πβπ’) = π) β§ π₯ β (π· β ran π’)) β§ π¦ β (π· β ran π’)) β§ π₯ β π¦) β (π β π) β (Baseβπ)) |
138 | 26, 27 | symgbasf 19236 |
. . . . . . . . . . . 12
β’ ((π β π) β (Baseβπ) β (π β π):π·βΆπ·) |
139 | | fcoi1 6762 |
. . . . . . . . . . . 12
β’ ((π β π):π·βΆπ· β ((π β π) β ( I βΎ π·)) = (π β π)) |
140 | 137, 138,
139 | 3syl 18 |
. . . . . . . . . . 11
β’
(((((((((π β§ π β (Baseβπ)) β§ π = ((π + π) β π)) β§ Β¬ π β π΄) β§ π’ β ({π€ β Word π· β£ π€:dom π€β1-1βπ·} β© (β‘β― β {3}))) β§ (πβπ’) = π) β§ π₯ β (π· β ran π’)) β§ π¦ β (π· β ran π’)) β§ π₯ β π¦) β ((π β π) β ( I βΎ π·)) = (π β π)) |
141 | 26, 27 | elsymgbas 19234 |
. . . . . . . . . . . . . . 15
β’ (π· β Fin β
(((pmTrspβπ·)β{π₯, π¦}) β (Baseβπ) β ((pmTrspβπ·)β{π₯, π¦}):π·β1-1-ontoβπ·)) |
142 | 141 | biimpa 478 |
. . . . . . . . . . . . . 14
β’ ((π· β Fin β§
((pmTrspβπ·)β{π₯, π¦}) β (Baseβπ)) β ((pmTrspβπ·)β{π₯, π¦}):π·β1-1-ontoβπ·) |
143 | 10, 39, 142 | syl2anc 585 |
. . . . . . . . . . . . 13
β’
(((((((((π β§ π β (Baseβπ)) β§ π = ((π + π) β π)) β§ Β¬ π β π΄) β§ π’ β ({π€ β Word π· β£ π€:dom π€β1-1βπ·} β© (β‘β― β {3}))) β§ (πβπ’) = π) β§ π₯ β (π· β ran π’)) β§ π¦ β (π· β ran π’)) β§ π₯ β π¦) β ((pmTrspβπ·)β{π₯, π¦}):π·β1-1-ontoβπ·) |
144 | | f1ococnv2 6857 |
. . . . . . . . . . . . 13
β’
(((pmTrspβπ·)β{π₯, π¦}):π·β1-1-ontoβπ· β (((pmTrspβπ·)β{π₯, π¦}) β β‘((pmTrspβπ·)β{π₯, π¦})) = ( I βΎ π·)) |
145 | 143, 144 | syl 17 |
. . . . . . . . . . . 12
β’
(((((((((π β§ π β (Baseβπ)) β§ π = ((π + π) β π)) β§ Β¬ π β π΄) β§ π’ β ({π€ β Word π· β£ π€:dom π€β1-1βπ·} β© (β‘β― β {3}))) β§ (πβπ’) = π) β§ π₯ β (π· β ran π’)) β§ π¦ β (π· β ran π’)) β§ π₯ β π¦) β (((pmTrspβπ·)β{π₯, π¦}) β β‘((pmTrspβπ·)β{π₯, π¦})) = ( I βΎ π·)) |
146 | 145 | coeq2d 5860 |
. . . . . . . . . . 11
β’
(((((((((π β§ π β (Baseβπ)) β§ π = ((π + π) β π)) β§ Β¬ π β π΄) β§ π’ β ({π€ β Word π· β£ π€:dom π€β1-1βπ·} β© (β‘β― β {3}))) β§ (πβπ’) = π) β§ π₯ β (π· β ran π’)) β§ π¦ β (π· β ran π’)) β§ π₯ β π¦) β ((π β π) β (((pmTrspβπ·)β{π₯, π¦}) β β‘((pmTrspβπ·)β{π₯, π¦}))) = ((π β π) β ( I βΎ π·))) |
147 | 140, 146,
134 | 3eqtr4d 2783 |
. . . . . . . . . 10
β’
(((((((((π β§ π β (Baseβπ)) β§ π = ((π + π) β π)) β§ Β¬ π β π΄) β§ π’ β ({π€ β Word π· β£ π€:dom π€β1-1βπ·} β© (β‘β― β {3}))) β§ (πβπ’) = π) β§ π₯ β (π· β ran π’)) β§ π¦ β (π· β ran π’)) β§ π₯ β π¦) β ((π β π) β (((pmTrspβπ·)β{π₯, π¦}) β β‘((pmTrspβπ·)β{π₯, π¦}))) = (π + π)) |
148 | 147 | coeq1d 5859 |
. . . . . . . . 9
β’
(((((((((π β§ π β (Baseβπ)) β§ π = ((π + π) β π)) β§ Β¬ π β π΄) β§ π’ β ({π€ β Word π· β£ π€:dom π€β1-1βπ·} β© (β‘β― β {3}))) β§ (πβπ’) = π) β§ π₯ β (π· β ran π’)) β§ π¦ β (π· β ran π’)) β§ π₯ β π¦) β (((π β π) β (((pmTrspβπ·)β{π₯, π¦}) β β‘((pmTrspβπ·)β{π₯, π¦}))) β β‘π) = ((π + π) β β‘π)) |
149 | | cyc3conja.l |
. . . . . . . . . . 11
β’ β =
(-gβπ) |
150 | 26, 27, 149 | symgsubg 32226 |
. . . . . . . . . 10
β’ (((π + π) β (Baseβπ) β§ π β (Baseβπ)) β ((π + π) β π) = ((π + π) β β‘π)) |
151 | 136, 11, 150 | syl2anc 585 |
. . . . . . . . 9
β’
(((((((((π β§ π β (Baseβπ)) β§ π = ((π + π) β π)) β§ Β¬ π β π΄) β§ π’ β ({π€ β Word π· β£ π€:dom π€β1-1βπ·} β© (β‘β― β {3}))) β§ (πβπ’) = π) β§ π₯ β (π· β ran π’)) β§ π¦ β (π· β ran π’)) β§ π₯ β π¦) β ((π + π) β π) = ((π + π) β β‘π)) |
152 | 148, 151 | eqtr4d 2776 |
. . . . . . . 8
β’
(((((((((π β§ π β (Baseβπ)) β§ π = ((π + π) β π)) β§ Β¬ π β π΄) β§ π’ β ({π€ β Word π· β£ π€:dom π€β1-1βπ·} β© (β‘β― β {3}))) β§ (πβπ’) = π) β§ π₯ β (π· β ran π’)) β§ π¦ β (π· β ran π’)) β§ π₯ β π¦) β (((π β π) β (((pmTrspβπ·)β{π₯, π¦}) β β‘((pmTrspβπ·)β{π₯, π¦}))) β β‘π) = ((π + π) β π)) |
153 | 127, 132,
152 | 3eqtrd 2777 |
. . . . . . 7
β’
(((((((((π β§ π β (Baseβπ)) β§ π = ((π + π) β π)) β§ Β¬ π β π΄) β§ π’ β ({π€ β Word π· β£ π€:dom π€β1-1βπ·} β© (β‘β― β {3}))) β§ (πβπ’) = π) β§ π₯ β (π· β ran π’)) β§ π¦ β (π· β ran π’)) β§ π₯ β π¦) β (((π β ((pmTrspβπ·)β{π₯, π¦})) + π) β β‘(π β ((pmTrspβπ·)β{π₯, π¦}))) = ((π + π) β π)) |
154 | 26 | symggrp 19261 |
. . . . . . . . . . 11
β’ (π· β Fin β π β Grp) |
155 | 8, 154 | syl 17 |
. . . . . . . . . 10
β’ (π β π β Grp) |
156 | 155 | ad8antr 739 |
. . . . . . . . 9
β’
(((((((((π β§ π β (Baseβπ)) β§ π = ((π + π) β π)) β§ Β¬ π β π΄) β§ π’ β ({π€ β Word π· β£ π€:dom π€β1-1βπ·} β© (β‘β― β {3}))) β§ (πβπ’) = π) β§ π₯ β (π· β ran π’)) β§ π¦ β (π· β ran π’)) β§ π₯ β π¦) β π β Grp) |
157 | 27, 112 | grpcl 18823 |
. . . . . . . . 9
β’ ((π β Grp β§ (π β ((pmTrspβπ·)β{π₯, π¦})) β (Baseβπ) β§ π β (Baseβπ)) β ((π β ((pmTrspβπ·)β{π₯, π¦})) + π) β (Baseβπ)) |
158 | 156, 117,
68, 157 | syl3anc 1372 |
. . . . . . . 8
β’
(((((((((π β§ π β (Baseβπ)) β§ π = ((π + π) β π)) β§ Β¬ π β π΄) β§ π’ β ({π€ β Word π· β£ π€:dom π€β1-1βπ·} β© (β‘β― β {3}))) β§ (πβπ’) = π) β§ π₯ β (π· β ran π’)) β§ π¦ β (π· β ran π’)) β§ π₯ β π¦) β ((π β ((pmTrspβπ·)β{π₯, π¦})) + π) β (Baseβπ)) |
159 | 26, 27, 149 | symgsubg 32226 |
. . . . . . . 8
β’ ((((π β ((pmTrspβπ·)β{π₯, π¦})) + π) β (Baseβπ) β§ (π β ((pmTrspβπ·)β{π₯, π¦})) β (Baseβπ)) β (((π β ((pmTrspβπ·)β{π₯, π¦})) + π) β (π β ((pmTrspβπ·)β{π₯, π¦}))) = (((π β ((pmTrspβπ·)β{π₯, π¦})) + π) β β‘(π β ((pmTrspβπ·)β{π₯, π¦})))) |
160 | 158, 117,
159 | syl2anc 585 |
. . . . . . 7
β’
(((((((((π β§ π β (Baseβπ)) β§ π = ((π + π) β π)) β§ Β¬ π β π΄) β§ π’ β ({π€ β Word π· β£ π€:dom π€β1-1βπ·} β© (β‘β― β {3}))) β§ (πβπ’) = π) β§ π₯ β (π· β ran π’)) β§ π¦ β (π· β ran π’)) β§ π₯ β π¦) β (((π β ((pmTrspβπ·)β{π₯, π¦})) + π) β (π β ((pmTrspβπ·)β{π₯, π¦}))) = (((π β ((pmTrspβπ·)β{π₯, π¦})) + π) β β‘(π β ((pmTrspβπ·)β{π₯, π¦})))) |
161 | | simp-7r 789 |
. . . . . . 7
β’
(((((((((π β§ π β (Baseβπ)) β§ π = ((π + π) β π)) β§ Β¬ π β π΄) β§ π’ β ({π€ β Word π· β£ π€:dom π€β1-1βπ·} β© (β‘β― β {3}))) β§ (πβπ’) = π) β§ π₯ β (π· β ran π’)) β§ π¦ β (π· β ran π’)) β§ π₯ β π¦) β π = ((π + π) β π)) |
162 | 153, 160,
161 | 3eqtr4rd 2784 |
. . . . . 6
β’
(((((((((π β§ π β (Baseβπ)) β§ π = ((π + π) β π)) β§ Β¬ π β π΄) β§ π’ β ({π€ β Word π· β£ π€:dom π€β1-1βπ·} β© (β‘β― β {3}))) β§ (πβπ’) = π) β§ π₯ β (π· β ran π’)) β§ π¦ β (π· β ran π’)) β§ π₯ β π¦) β π = (((π β ((pmTrspβπ·)β{π₯, π¦})) + π) β (π β ((pmTrspβπ·)β{π₯, π¦})))) |
163 | 34, 38, 162 | rspcedvd 3614 |
. . . . 5
β’
(((((((((π β§ π β (Baseβπ)) β§ π = ((π + π) β π)) β§ Β¬ π β π΄) β§ π’ β ({π€ β Word π· β£ π€:dom π€β1-1βπ·} β© (β‘β― β {3}))) β§ (πβπ’) = π) β§ π₯ β (π· β ran π’)) β§ π¦ β (π· β ran π’)) β§ π₯ β π¦) β βπ β π΄ π = ((π + π) β π)) |
164 | 8 | difexd 5328 |
. . . . . . 7
β’ (π β (π· β ran π’) β V) |
165 | 164 | ad5antr 733 |
. . . . . 6
β’
((((((π β§ π β (Baseβπ)) β§ π = ((π + π) β π)) β§ Β¬ π β π΄) β§ π’ β ({π€ β Word π· β£ π€:dom π€β1-1βπ·} β© (β‘β― β {3}))) β§ (πβπ’) = π) β (π· β ran π’) β V) |
166 | | 3p2e5 12359 |
. . . . . . . . . . 11
β’ (3 + 2) =
5 |
167 | 166, 59 | eqbrtrid 5182 |
. . . . . . . . . 10
β’ (π β (3 + 2) β€ π) |
168 | | 2re 12282 |
. . . . . . . . . . . 12
β’ 2 β
β |
169 | 168 | a1i 11 |
. . . . . . . . . . 11
β’ (π β 2 β
β) |
170 | 49, 169, 55 | leaddsub2d 11812 |
. . . . . . . . . 10
β’ (π β ((3 + 2) β€ π β 2 β€ (π β 3))) |
171 | 167, 170 | mpbid 231 |
. . . . . . . . 9
β’ (π β 2 β€ (π β 3)) |
172 | 171 | ad5antr 733 |
. . . . . . . 8
β’
((((((π β§ π β (Baseβπ)) β§ π = ((π + π) β π)) β§ Β¬ π β π΄) β§ π’ β ({π€ β Word π· β£ π€:dom π€β1-1βπ·} β© (β‘β― β {3}))) β§ (πβπ’) = π) β 2 β€ (π β 3)) |
173 | 41 | a1i 11 |
. . . . . . . . 9
β’
((((((π β§ π β (Baseβπ)) β§ π = ((π + π) β π)) β§ Β¬ π β π΄) β§ π’ β ({π€ β Word π· β£ π€:dom π€β1-1βπ·} β© (β‘β― β {3}))) β§ (πβπ’) = π) β π = (β―βπ·)) |
174 | 75 | elin2d 4198 |
. . . . . . . . . . 11
β’
((((((π β§ π β (Baseβπ)) β§ π = ((π + π) β π)) β§ Β¬ π β π΄) β§ π’ β ({π€ β Word π· β£ π€:dom π€β1-1βπ·} β© (β‘β― β {3}))) β§ (πβπ’) = π) β π’ β (β‘β― β {3})) |
175 | | hashf 14294 |
. . . . . . . . . . . . 13
β’
β―:VβΆ(β0 βͺ {+β}) |
176 | | ffn 6714 |
. . . . . . . . . . . . 13
β’
(β―:VβΆ(β0 βͺ {+β}) β β―
Fn V) |
177 | | fniniseg 7057 |
. . . . . . . . . . . . 13
β’ (β―
Fn V β (π’ β
(β‘β― β {3}) β (π’ β V β§
(β―βπ’) =
3))) |
178 | 175, 176,
177 | mp2b 10 |
. . . . . . . . . . . 12
β’ (π’ β (β‘β― β {3}) β (π’ β V β§
(β―βπ’) =
3)) |
179 | 178 | simprbi 498 |
. . . . . . . . . . 11
β’ (π’ β (β‘β― β {3}) β
(β―βπ’) =
3) |
180 | 174, 179 | syl 17 |
. . . . . . . . . 10
β’
((((((π β§ π β (Baseβπ)) β§ π = ((π + π) β π)) β§ Β¬ π β π΄) β§ π’ β ({π€ β Word π· β£ π€:dom π€β1-1βπ·} β© (β‘β― β {3}))) β§ (πβπ’) = π) β (β―βπ’) = 3) |
181 | | vex 3479 |
. . . . . . . . . . . 12
β’ π’ β V |
182 | 181 | dmex 7897 |
. . . . . . . . . . 11
β’ dom π’ β V |
183 | | hashf1rn 14308 |
. . . . . . . . . . 11
β’ ((dom
π’ β V β§ π’:dom π’β1-1βπ·) β (β―βπ’) = (β―βran π’)) |
184 | 182, 83, 183 | sylancr 588 |
. . . . . . . . . 10
β’
((((((π β§ π β (Baseβπ)) β§ π = ((π + π) β π)) β§ Β¬ π β π΄) β§ π’ β ({π€ β Word π· β£ π€:dom π€β1-1βπ·} β© (β‘β― β {3}))) β§ (πβπ’) = π) β (β―βπ’) = (β―βran π’)) |
185 | 180, 184 | eqtr3d 2775 |
. . . . . . . . 9
β’
((((((π β§ π β (Baseβπ)) β§ π = ((π + π) β π)) β§ Β¬ π β π΄) β§ π’ β ({π€ β Word π· β£ π€:dom π€β1-1βπ·} β© (β‘β― β {3}))) β§ (πβπ’) = π) β 3 = (β―βran π’)) |
186 | 173, 185 | oveq12d 7422 |
. . . . . . . 8
β’
((((((π β§ π β (Baseβπ)) β§ π = ((π + π) β π)) β§ Β¬ π β π΄) β§ π’ β ({π€ β Word π· β£ π€:dom π€β1-1βπ·} β© (β‘β― β {3}))) β§ (πβπ’) = π) β (π β 3) = ((β―βπ·) β (β―βran
π’))) |
187 | 172, 186 | breqtrd 5173 |
. . . . . . 7
β’
((((((π β§ π β (Baseβπ)) β§ π = ((π + π) β π)) β§ Β¬ π β π΄) β§ π’ β ({π€ β Word π· β£ π€:dom π€β1-1βπ·} β© (β‘β― β {3}))) β§ (πβπ’) = π) β 2 β€ ((β―βπ·) β (β―βran
π’))) |
188 | | hashssdif 14368 |
. . . . . . . 8
β’ ((π· β Fin β§ ran π’ β π·) β (β―β(π· β ran π’)) = ((β―βπ·) β (β―βran π’))) |
189 | 9, 86, 188 | syl2anc 585 |
. . . . . . 7
β’
((((((π β§ π β (Baseβπ)) β§ π = ((π + π) β π)) β§ Β¬ π β π΄) β§ π’ β ({π€ β Word π· β£ π€:dom π€β1-1βπ·} β© (β‘β― β {3}))) β§ (πβπ’) = π) β (β―β(π· β ran π’)) = ((β―βπ·) β (β―βran π’))) |
190 | 187, 189 | breqtrrd 5175 |
. . . . . 6
β’
((((((π β§ π β (Baseβπ)) β§ π = ((π + π) β π)) β§ Β¬ π β π΄) β§ π’ β ({π€ β Word π· β£ π€:dom π€β1-1βπ·} β© (β‘β― β {3}))) β§ (πβπ’) = π) β 2 β€ (β―β(π· β ran π’))) |
191 | | hashge2el2dif 14437 |
. . . . . 6
β’ (((π· β ran π’) β V β§ 2 β€ (β―β(π· β ran π’))) β βπ₯ β (π· β ran π’)βπ¦ β (π· β ran π’)π₯ β π¦) |
192 | 165, 190,
191 | syl2anc 585 |
. . . . 5
β’
((((((π β§ π β (Baseβπ)) β§ π = ((π + π) β π)) β§ Β¬ π β π΄) β§ π’ β ({π€ β Word π· β£ π€:dom π€β1-1βπ·} β© (β‘β― β {3}))) β§ (πβπ’) = π) β βπ₯ β (π· β ran π’)βπ¦ β (π· β ran π’)π₯ β π¦) |
193 | 163, 192 | r19.29vva 3214 |
. . . 4
β’
((((((π β§ π β (Baseβπ)) β§ π = ((π + π) β π)) β§ Β¬ π β π΄) β§ π’ β ({π€ β Word π· β£ π€:dom π€β1-1βπ·} β© (β‘β― β {3}))) β§ (πβπ’) = π) β βπ β π΄ π = ((π + π) β π)) |
194 | | nfcv 2904 |
. . . . . 6
β’
β²π’π |
195 | 63, 26, 27 | tocycf 32254 |
. . . . . . 7
β’ (π· β Fin β π:{π€ β Word π· β£ π€:dom π€β1-1βπ·}βΆ(Baseβπ)) |
196 | | ffn 6714 |
. . . . . . 7
β’ (π:{π€ β Word π· β£ π€:dom π€β1-1βπ·}βΆ(Baseβπ) β π Fn {π€ β Word π· β£ π€:dom π€β1-1βπ·}) |
197 | 8, 195, 196 | 3syl 18 |
. . . . . 6
β’ (π β π Fn {π€ β Word π· β£ π€:dom π€β1-1βπ·}) |
198 | 66, 62 | eleqtrdi 2844 |
. . . . . 6
β’ (π β π β (π β (β‘β― β {3}))) |
199 | 194, 197,
198 | fvelimad 6955 |
. . . . 5
β’ (π β βπ’ β ({π€ β Word π· β£ π€:dom π€β1-1βπ·} β© (β‘β― β {3}))(πβπ’) = π) |
200 | 199 | ad3antrrr 729 |
. . . 4
β’ ((((π β§ π β (Baseβπ)) β§ π = ((π + π) β π)) β§ Β¬ π β π΄) β βπ’ β ({π€ β Word π· β£ π€:dom π€β1-1βπ·} β© (β‘β― β {3}))(πβπ’) = π) |
201 | 193, 200 | r19.29a 3163 |
. . 3
β’ ((((π β§ π β (Baseβπ)) β§ π = ((π + π) β π)) β§ Β¬ π β π΄) β βπ β π΄ π = ((π + π) β π)) |
202 | 7, 201 | pm2.61dan 812 |
. 2
β’ (((π β§ π β (Baseβπ)) β§ π = ((π + π) β π)) β βπ β π΄ π = ((π + π) β π)) |
203 | | cyc3conja.q |
. . 3
β’ (π β π β πΆ) |
204 | 62, 26, 41, 63, 27, 112, 149, 61, 8, 203, 66 | cycpmconjs 32293 |
. 2
β’ (π β βπ β (Baseβπ)π = ((π + π) β π)) |
205 | 202, 204 | r19.29a 3163 |
1
β’ (π β βπ β π΄ π = ((π + π) β π)) |