Metamath Proof Explorer


Theorem cycpmconjslem2

Description: Lemma for cycpmconjs . (Contributed by Thierry Arnoux, 14-Oct-2023)

Ref Expression
Hypotheses cycpmconjs.c C = M . -1 P
cycpmconjs.s S = SymGrp D
cycpmconjs.n N = D
cycpmconjs.m M = toCyc D
cycpmconjs.b B = Base S
cycpmconjs.a + ˙ = + S
cycpmconjs.l - ˙ = - S
cycpmconjs.p φ P 0 N
cycpmconjs.d φ D Fin
cycpmconjs.q φ Q C
Assertion cycpmconjslem2 φ q q : 0 ..^ N 1-1 onto D q -1 Q q = I 0 ..^ P cyclShift 1 I P ..^ N

Proof

Step Hyp Ref Expression
1 cycpmconjs.c C = M . -1 P
2 cycpmconjs.s S = SymGrp D
3 cycpmconjs.n N = D
4 cycpmconjs.m M = toCyc D
5 cycpmconjs.b B = Base S
6 cycpmconjs.a + ˙ = + S
7 cycpmconjs.l - ˙ = - S
8 cycpmconjs.p φ P 0 N
9 cycpmconjs.d φ D Fin
10 cycpmconjs.q φ Q C
11 fzofi 0 ..^ N Fin
12 diffi 0 ..^ N Fin 0 ..^ N dom u Fin
13 11 12 mp1i φ u w Word D | w : dom w 1-1 D . -1 P M u = Q 0 ..^ N dom u Fin
14 diffi D Fin D ran u Fin
15 9 14 syl φ D ran u Fin
16 15 ad2antrr φ u w Word D | w : dom w 1-1 D . -1 P M u = Q D ran u Fin
17 hashcl D Fin D 0
18 9 17 syl φ D 0
19 3 18 eqeltrid φ N 0
20 hashfzo0 N 0 0 ..^ N = N
21 19 20 syl φ 0 ..^ N = N
22 21 3 eqtrdi φ 0 ..^ N = D
23 22 ad2antrr φ u w Word D | w : dom w 1-1 D . -1 P M u = Q 0 ..^ N = D
24 simplr φ u w Word D | w : dom w 1-1 D . -1 P M u = Q u w Word D | w : dom w 1-1 D . -1 P
25 24 elin1d φ u w Word D | w : dom w 1-1 D . -1 P M u = Q u w Word D | w : dom w 1-1 D
26 elrabi u w Word D | w : dom w 1-1 D u Word D
27 wrdfin u Word D u Fin
28 25 26 27 3syl φ u w Word D | w : dom w 1-1 D . -1 P M u = Q u Fin
29 id w = u w = u
30 dmeq w = u dom w = dom u
31 eqidd w = u D = D
32 29 30 31 f1eq123d w = u w : dom w 1-1 D u : dom u 1-1 D
33 32 25 elrabrd φ u w Word D | w : dom w 1-1 D . -1 P M u = Q u : dom u 1-1 D
34 f1fun u : dom u 1-1 D Fun u
35 33 34 syl φ u w Word D | w : dom w 1-1 D . -1 P M u = Q Fun u
36 hashfundm u Fin Fun u u = dom u
37 28 35 36 syl2anc φ u w Word D | w : dom w 1-1 D . -1 P M u = Q u = dom u
38 24 dmexd φ u w Word D | w : dom w 1-1 D . -1 P M u = Q dom u V
39 hashf1rn dom u V u : dom u 1-1 D u = ran u
40 38 33 39 syl2anc φ u w Word D | w : dom w 1-1 D . -1 P M u = Q u = ran u
41 37 40 eqtr3d φ u w Word D | w : dom w 1-1 D . -1 P M u = Q dom u = ran u
42 23 41 oveq12d φ u w Word D | w : dom w 1-1 D . -1 P M u = Q 0 ..^ N dom u = D ran u
43 11 a1i φ u w Word D | w : dom w 1-1 D . -1 P M u = Q 0 ..^ N Fin
44 wrddm u Word D dom u = 0 ..^ u
45 25 26 44 3syl φ u w Word D | w : dom w 1-1 D . -1 P M u = Q dom u = 0 ..^ u
46 hashcl u Fin u 0
47 25 26 27 46 4syl φ u w Word D | w : dom w 1-1 D . -1 P M u = Q u 0
48 47 nn0zd φ u w Word D | w : dom w 1-1 D . -1 P M u = Q u
49 18 nn0zd φ D
50 3 49 eqeltrid φ N
51 50 ad2antrr φ u w Word D | w : dom w 1-1 D . -1 P M u = Q N
52 9 ad2antrr φ u w Word D | w : dom w 1-1 D . -1 P M u = Q D Fin
53 wrdf u Word D u : 0 ..^ u D
54 53 frnd u Word D ran u D
55 25 26 54 3syl φ u w Word D | w : dom w 1-1 D . -1 P M u = Q ran u D
56 hashss D Fin ran u D ran u D
57 52 55 56 syl2anc φ u w Word D | w : dom w 1-1 D . -1 P M u = Q ran u D
58 3 a1i φ u w Word D | w : dom w 1-1 D . -1 P M u = Q N = D
59 57 40 58 3brtr4d φ u w Word D | w : dom w 1-1 D . -1 P M u = Q u N
60 eluz1 u N u N u N
61 60 biimpar u N u N N u
62 48 51 59 61 syl12anc φ u w Word D | w : dom w 1-1 D . -1 P M u = Q N u
63 fzoss2 N u 0 ..^ u 0 ..^ N
64 62 63 syl φ u w Word D | w : dom w 1-1 D . -1 P M u = Q 0 ..^ u 0 ..^ N
65 45 64 eqsstrd φ u w Word D | w : dom w 1-1 D . -1 P M u = Q dom u 0 ..^ N
66 hashssdif 0 ..^ N Fin dom u 0 ..^ N 0 ..^ N dom u = 0 ..^ N dom u
67 43 65 66 syl2anc φ u w Word D | w : dom w 1-1 D . -1 P M u = Q 0 ..^ N dom u = 0 ..^ N dom u
68 hashssdif D Fin ran u D D ran u = D ran u
69 52 55 68 syl2anc φ u w Word D | w : dom w 1-1 D . -1 P M u = Q D ran u = D ran u
70 42 67 69 3eqtr4d φ u w Word D | w : dom w 1-1 D . -1 P M u = Q 0 ..^ N dom u = D ran u
71 hasheqf1o 0 ..^ N dom u Fin D ran u Fin 0 ..^ N dom u = D ran u f f : 0 ..^ N dom u 1-1 onto D ran u
72 71 biimpa 0 ..^ N dom u Fin D ran u Fin 0 ..^ N dom u = D ran u f f : 0 ..^ N dom u 1-1 onto D ran u
73 13 16 70 72 syl21anc φ u w Word D | w : dom w 1-1 D . -1 P M u = Q f f : 0 ..^ N dom u 1-1 onto D ran u
74 33 adantr φ u w Word D | w : dom w 1-1 D . -1 P M u = Q f : 0 ..^ N dom u 1-1 onto D ran u u : dom u 1-1 D
75 f1f1orn u : dom u 1-1 D u : dom u 1-1 onto ran u
76 74 75 syl φ u w Word D | w : dom w 1-1 D . -1 P M u = Q f : 0 ..^ N dom u 1-1 onto D ran u u : dom u 1-1 onto ran u
77 simpr φ u w Word D | w : dom w 1-1 D . -1 P M u = Q f : 0 ..^ N dom u 1-1 onto D ran u f : 0 ..^ N dom u 1-1 onto D ran u
78 disjdif dom u 0 ..^ N dom u =
79 78 a1i φ u w Word D | w : dom w 1-1 D . -1 P M u = Q f : 0 ..^ N dom u 1-1 onto D ran u dom u 0 ..^ N dom u =
80 disjdif ran u D ran u =
81 80 a1i φ u w Word D | w : dom w 1-1 D . -1 P M u = Q f : 0 ..^ N dom u 1-1 onto D ran u ran u D ran u =
82 f1oun u : dom u 1-1 onto ran u f : 0 ..^ N dom u 1-1 onto D ran u dom u 0 ..^ N dom u = ran u D ran u = u f : dom u 0 ..^ N dom u 1-1 onto ran u D ran u
83 76 77 79 81 82 syl22anc φ u w Word D | w : dom w 1-1 D . -1 P M u = Q f : 0 ..^ N dom u 1-1 onto D ran u u f : dom u 0 ..^ N dom u 1-1 onto ran u D ran u
84 eqidd φ u w Word D | w : dom w 1-1 D . -1 P M u = Q f : 0 ..^ N dom u 1-1 onto D ran u u f = u f
85 65 adantr φ u w Word D | w : dom w 1-1 D . -1 P M u = Q f : 0 ..^ N dom u 1-1 onto D ran u dom u 0 ..^ N
86 undif dom u 0 ..^ N dom u 0 ..^ N dom u = 0 ..^ N
87 85 86 sylib φ u w Word D | w : dom w 1-1 D . -1 P M u = Q f : 0 ..^ N dom u 1-1 onto D ran u dom u 0 ..^ N dom u = 0 ..^ N
88 undif ran u D ran u D ran u = D
89 55 88 sylib φ u w Word D | w : dom w 1-1 D . -1 P M u = Q ran u D ran u = D
90 89 adantr φ u w Word D | w : dom w 1-1 D . -1 P M u = Q f : 0 ..^ N dom u 1-1 onto D ran u ran u D ran u = D
91 84 87 90 f1oeq123d φ u w Word D | w : dom w 1-1 D . -1 P M u = Q f : 0 ..^ N dom u 1-1 onto D ran u u f : dom u 0 ..^ N dom u 1-1 onto ran u D ran u u f : 0 ..^ N 1-1 onto D
92 83 91 mpbid φ u w Word D | w : dom w 1-1 D . -1 P M u = Q f : 0 ..^ N dom u 1-1 onto D ran u u f : 0 ..^ N 1-1 onto D
93 f1ocnv u f : 0 ..^ N 1-1 onto D u f -1 : D 1-1 onto 0 ..^ N
94 92 93 syl φ u w Word D | w : dom w 1-1 D . -1 P M u = Q f : 0 ..^ N dom u 1-1 onto D ran u u f -1 : D 1-1 onto 0 ..^ N
95 1 2 3 4 5 cycpmgcl D Fin P 0 N C B
96 9 8 95 syl2anc φ C B
97 96 10 sseldd φ Q B
98 2 5 symgbasf1o Q B Q : D 1-1 onto D
99 97 98 syl φ Q : D 1-1 onto D
100 99 ad3antrrr φ u w Word D | w : dom w 1-1 D . -1 P M u = Q f : 0 ..^ N dom u 1-1 onto D ran u Q : D 1-1 onto D
101 f1oco u f -1 : D 1-1 onto 0 ..^ N Q : D 1-1 onto D u f -1 Q : D 1-1 onto 0 ..^ N
102 94 100 101 syl2anc φ u w Word D | w : dom w 1-1 D . -1 P M u = Q f : 0 ..^ N dom u 1-1 onto D ran u u f -1 Q : D 1-1 onto 0 ..^ N
103 f1oco u f -1 Q : D 1-1 onto 0 ..^ N u f : 0 ..^ N 1-1 onto D u f -1 Q u f : 0 ..^ N 1-1 onto 0 ..^ N
104 102 92 103 syl2anc φ u w Word D | w : dom w 1-1 D . -1 P M u = Q f : 0 ..^ N dom u 1-1 onto D ran u u f -1 Q u f : 0 ..^ N 1-1 onto 0 ..^ N
105 f1ofun u f -1 Q u f : 0 ..^ N 1-1 onto 0 ..^ N Fun u f -1 Q u f
106 funrel Fun u f -1 Q u f Rel u f -1 Q u f
107 104 105 106 3syl φ u w Word D | w : dom w 1-1 D . -1 P M u = Q f : 0 ..^ N dom u 1-1 onto D ran u Rel u f -1 Q u f
108 f1odm u f -1 Q u f : 0 ..^ N 1-1 onto 0 ..^ N dom u f -1 Q u f = 0 ..^ N
109 104 108 syl φ u w Word D | w : dom w 1-1 D . -1 P M u = Q f : 0 ..^ N dom u 1-1 onto D ran u dom u f -1 Q u f = 0 ..^ N
110 fzosplit P 0 N 0 ..^ N = 0 ..^ P P ..^ N
111 8 110 syl φ 0 ..^ N = 0 ..^ P P ..^ N
112 111 ad3antrrr φ u w Word D | w : dom w 1-1 D . -1 P M u = Q f : 0 ..^ N dom u 1-1 onto D ran u 0 ..^ N = 0 ..^ P P ..^ N
113 109 112 eqtrd φ u w Word D | w : dom w 1-1 D . -1 P M u = Q f : 0 ..^ N dom u 1-1 onto D ran u dom u f -1 Q u f = 0 ..^ P P ..^ N
114 reldmun Rel u f -1 Q u f dom u f -1 Q u f = 0 ..^ P P ..^ N u f -1 Q u f = u f -1 Q u f 0 ..^ P u f -1 Q u f P ..^ N
115 107 113 114 syl2anc φ u w Word D | w : dom w 1-1 D . -1 P M u = Q f : 0 ..^ N dom u 1-1 onto D ran u u f -1 Q u f = u f -1 Q u f 0 ..^ P u f -1 Q u f P ..^ N
116 resco u f -1 Q u f 0 ..^ P = u f -1 Q u f 0 ..^ P
117 116 a1i φ u w Word D | w : dom w 1-1 D . -1 P M u = Q f : 0 ..^ N dom u 1-1 onto D ran u u f -1 Q u f 0 ..^ P = u f -1 Q u f 0 ..^ P
118 25 26 syl φ u w Word D | w : dom w 1-1 D . -1 P M u = Q u Word D
119 wrdfn u Word D u Fn 0 ..^ u
120 118 119 syl φ u w Word D | w : dom w 1-1 D . -1 P M u = Q u Fn 0 ..^ u
121 24 elin2d φ u w Word D | w : dom w 1-1 D . -1 P M u = Q u . -1 P
122 hashf . : V 0 +∞
123 ffn . : V 0 +∞ . Fn V
124 fniniseg . Fn V u . -1 P u V u = P
125 122 123 124 mp2b u . -1 P u V u = P
126 125 simprbi u . -1 P u = P
127 121 126 syl φ u w Word D | w : dom w 1-1 D . -1 P M u = Q u = P
128 127 oveq2d φ u w Word D | w : dom w 1-1 D . -1 P M u = Q 0 ..^ u = 0 ..^ P
129 128 fneq2d φ u w Word D | w : dom w 1-1 D . -1 P M u = Q u Fn 0 ..^ u u Fn 0 ..^ P
130 120 129 mpbid φ u w Word D | w : dom w 1-1 D . -1 P M u = Q u Fn 0 ..^ P
131 130 adantr φ u w Word D | w : dom w 1-1 D . -1 P M u = Q f : 0 ..^ N dom u 1-1 onto D ran u u Fn 0 ..^ P
132 f1ofn f : 0 ..^ N dom u 1-1 onto D ran u f Fn 0 ..^ N dom u
133 77 132 syl φ u w Word D | w : dom w 1-1 D . -1 P M u = Q f : 0 ..^ N dom u 1-1 onto D ran u f Fn 0 ..^ N dom u
134 45 128 eqtrd φ u w Word D | w : dom w 1-1 D . -1 P M u = Q dom u = 0 ..^ P
135 134 ineq1d φ u w Word D | w : dom w 1-1 D . -1 P M u = Q dom u 0 ..^ N dom u = 0 ..^ P 0 ..^ N dom u
136 78 a1i φ u w Word D | w : dom w 1-1 D . -1 P M u = Q dom u 0 ..^ N dom u =
137 135 136 eqtr3d φ u w Word D | w : dom w 1-1 D . -1 P M u = Q 0 ..^ P 0 ..^ N dom u =
138 137 adantr φ u w Word D | w : dom w 1-1 D . -1 P M u = Q f : 0 ..^ N dom u 1-1 onto D ran u 0 ..^ P 0 ..^ N dom u =
139 fnunres1 u Fn 0 ..^ P f Fn 0 ..^ N dom u 0 ..^ P 0 ..^ N dom u = u f 0 ..^ P = u
140 131 133 138 139 syl3anc φ u w Word D | w : dom w 1-1 D . -1 P M u = Q f : 0 ..^ N dom u 1-1 onto D ran u u f 0 ..^ P = u
141 140 coeq2d φ u w Word D | w : dom w 1-1 D . -1 P M u = Q f : 0 ..^ N dom u 1-1 onto D ran u u f -1 Q u f 0 ..^ P = u f -1 Q u
142 resco u f -1 Q ran u = u f -1 Q ran u
143 resco u -1 M u ran u = u -1 M u ran u
144 143 a1i φ u w Word D | w : dom w 1-1 D . -1 P M u = Q f : 0 ..^ N dom u 1-1 onto D ran u u -1 M u ran u = u -1 M u ran u
145 cnvun u f -1 = u -1 f -1
146 145 reseq1i u f -1 ran u = u -1 f -1 ran u
147 f1ocnv u : dom u 1-1 onto ran u u -1 : ran u 1-1 onto dom u
148 f1ofn u -1 : ran u 1-1 onto dom u u -1 Fn ran u
149 74 75 147 148 4syl φ u w Word D | w : dom w 1-1 D . -1 P M u = Q f : 0 ..^ N dom u 1-1 onto D ran u u -1 Fn ran u
150 f1ocnv f : 0 ..^ N dom u 1-1 onto D ran u f -1 : D ran u 1-1 onto 0 ..^ N dom u
151 f1ofn f -1 : D ran u 1-1 onto 0 ..^ N dom u f -1 Fn D ran u
152 77 150 151 3syl φ u w Word D | w : dom w 1-1 D . -1 P M u = Q f : 0 ..^ N dom u 1-1 onto D ran u f -1 Fn D ran u
153 fnunres1 u -1 Fn ran u f -1 Fn D ran u ran u D ran u = u -1 f -1 ran u = u -1
154 149 152 81 153 syl3anc φ u w Word D | w : dom w 1-1 D . -1 P M u = Q f : 0 ..^ N dom u 1-1 onto D ran u u -1 f -1 ran u = u -1
155 146 154 eqtr2id φ u w Word D | w : dom w 1-1 D . -1 P M u = Q f : 0 ..^ N dom u 1-1 onto D ran u u -1 = u f -1 ran u
156 simplr φ u w Word D | w : dom w 1-1 D . -1 P M u = Q f : 0 ..^ N dom u 1-1 onto D ran u M u = Q
157 156 reseq1d φ u w Word D | w : dom w 1-1 D . -1 P M u = Q f : 0 ..^ N dom u 1-1 onto D ran u M u ran u = Q ran u
158 155 157 coeq12d φ u w Word D | w : dom w 1-1 D . -1 P M u = Q f : 0 ..^ N dom u 1-1 onto D ran u u -1 M u ran u = u f -1 ran u Q ran u
159 52 adantr φ u w Word D | w : dom w 1-1 D . -1 P M u = Q f : 0 ..^ N dom u 1-1 onto D ran u D Fin
160 118 adantr φ u w Word D | w : dom w 1-1 D . -1 P M u = Q f : 0 ..^ N dom u 1-1 onto D ran u u Word D
161 4 159 160 74 tocycfvres1 φ u w Word D | w : dom w 1-1 D . -1 P M u = Q f : 0 ..^ N dom u 1-1 onto D ran u M u ran u = u cyclShift 1 u -1
162 157 161 eqtr3d φ u w Word D | w : dom w 1-1 D . -1 P M u = Q f : 0 ..^ N dom u 1-1 onto D ran u Q ran u = u cyclShift 1 u -1
163 162 rneqd φ u w Word D | w : dom w 1-1 D . -1 P M u = Q f : 0 ..^ N dom u 1-1 onto D ran u ran Q ran u = ran u cyclShift 1 u -1
164 1zzd φ u w Word D | w : dom w 1-1 D . -1 P M u = Q f : 0 ..^ N dom u 1-1 onto D ran u 1
165 cshf1o u Word D u : dom u 1-1 D 1 u cyclShift 1 : dom u 1-1 onto ran u
166 160 74 164 165 syl3anc φ u w Word D | w : dom w 1-1 D . -1 P M u = Q f : 0 ..^ N dom u 1-1 onto D ran u u cyclShift 1 : dom u 1-1 onto ran u
167 76 147 syl φ u w Word D | w : dom w 1-1 D . -1 P M u = Q f : 0 ..^ N dom u 1-1 onto D ran u u -1 : ran u 1-1 onto dom u
168 f1oco u cyclShift 1 : dom u 1-1 onto ran u u -1 : ran u 1-1 onto dom u u cyclShift 1 u -1 : ran u 1-1 onto ran u
169 166 167 168 syl2anc φ u w Word D | w : dom w 1-1 D . -1 P M u = Q f : 0 ..^ N dom u 1-1 onto D ran u u cyclShift 1 u -1 : ran u 1-1 onto ran u
170 f1ofo u cyclShift 1 u -1 : ran u 1-1 onto ran u u cyclShift 1 u -1 : ran u onto ran u
171 forn u cyclShift 1 u -1 : ran u onto ran u ran u cyclShift 1 u -1 = ran u
172 169 170 171 3syl φ u w Word D | w : dom w 1-1 D . -1 P M u = Q f : 0 ..^ N dom u 1-1 onto D ran u ran u cyclShift 1 u -1 = ran u
173 163 172 eqtrd φ u w Word D | w : dom w 1-1 D . -1 P M u = Q f : 0 ..^ N dom u 1-1 onto D ran u ran Q ran u = ran u
174 ssid ran u ran u
175 173 174 eqsstrdi φ u w Word D | w : dom w 1-1 D . -1 P M u = Q f : 0 ..^ N dom u 1-1 onto D ran u ran Q ran u ran u
176 cores ran Q ran u ran u u f -1 ran u Q ran u = u f -1 Q ran u
177 175 176 syl φ u w Word D | w : dom w 1-1 D . -1 P M u = Q f : 0 ..^ N dom u 1-1 onto D ran u u f -1 ran u Q ran u = u f -1 Q ran u
178 144 158 177 3eqtrrd φ u w Word D | w : dom w 1-1 D . -1 P M u = Q f : 0 ..^ N dom u 1-1 onto D ran u u f -1 Q ran u = u -1 M u ran u
179 142 178 eqtrid φ u w Word D | w : dom w 1-1 D . -1 P M u = Q f : 0 ..^ N dom u 1-1 onto D ran u u f -1 Q ran u = u -1 M u ran u
180 179 coeq1d φ u w Word D | w : dom w 1-1 D . -1 P M u = Q f : 0 ..^ N dom u 1-1 onto D ran u u f -1 Q ran u u = u -1 M u ran u u
181 cores ran u ran u u -1 M u ran u u = u -1 M u u
182 174 181 mp1i φ u w Word D | w : dom w 1-1 D . -1 P M u = Q f : 0 ..^ N dom u 1-1 onto D ran u u -1 M u ran u u = u -1 M u u
183 180 182 eqtrd φ u w Word D | w : dom w 1-1 D . -1 P M u = Q f : 0 ..^ N dom u 1-1 onto D ran u u f -1 Q ran u u = u -1 M u u
184 cores ran u ran u u f -1 Q ran u u = u f -1 Q u
185 174 184 mp1i φ u w Word D | w : dom w 1-1 D . -1 P M u = Q f : 0 ..^ N dom u 1-1 onto D ran u u f -1 Q ran u u = u f -1 Q u
186 127 adantr φ u w Word D | w : dom w 1-1 D . -1 P M u = Q f : 0 ..^ N dom u 1-1 onto D ran u u = P
187 1 2 3 4 159 160 74 186 cycpmconjslem1 φ u w Word D | w : dom w 1-1 D . -1 P M u = Q f : 0 ..^ N dom u 1-1 onto D ran u u -1 M u u = I 0 ..^ P cyclShift 1
188 183 185 187 3eqtr3d φ u w Word D | w : dom w 1-1 D . -1 P M u = Q f : 0 ..^ N dom u 1-1 onto D ran u u f -1 Q u = I 0 ..^ P cyclShift 1
189 117 141 188 3eqtrd φ u w Word D | w : dom w 1-1 D . -1 P M u = Q f : 0 ..^ N dom u 1-1 onto D ran u u f -1 Q u f 0 ..^ P = I 0 ..^ P cyclShift 1
190 resco u f -1 Q u f P ..^ N = u f -1 Q u f P ..^ N
191 134 adantr φ u w Word D | w : dom w 1-1 D . -1 P M u = Q f : 0 ..^ N dom u 1-1 onto D ran u dom u = 0 ..^ P
192 191 difeq2d φ u w Word D | w : dom w 1-1 D . -1 P M u = Q f : 0 ..^ N dom u 1-1 onto D ran u 0 ..^ N dom u = 0 ..^ N 0 ..^ P
193 fzodif1 P 0 N 0 ..^ N 0 ..^ P = P ..^ N
194 8 193 syl φ 0 ..^ N 0 ..^ P = P ..^ N
195 194 ad3antrrr φ u w Word D | w : dom w 1-1 D . -1 P M u = Q f : 0 ..^ N dom u 1-1 onto D ran u 0 ..^ N 0 ..^ P = P ..^ N
196 192 195 eqtrd φ u w Word D | w : dom w 1-1 D . -1 P M u = Q f : 0 ..^ N dom u 1-1 onto D ran u 0 ..^ N dom u = P ..^ N
197 196 reseq2d φ u w Word D | w : dom w 1-1 D . -1 P M u = Q f : 0 ..^ N dom u 1-1 onto D ran u u f 0 ..^ N dom u = u f P ..^ N
198 fnunres2 u Fn 0 ..^ P f Fn 0 ..^ N dom u 0 ..^ P 0 ..^ N dom u = u f 0 ..^ N dom u = f
199 131 133 138 198 syl3anc φ u w Word D | w : dom w 1-1 D . -1 P M u = Q f : 0 ..^ N dom u 1-1 onto D ran u u f 0 ..^ N dom u = f
200 197 199 eqtr3d φ u w Word D | w : dom w 1-1 D . -1 P M u = Q f : 0 ..^ N dom u 1-1 onto D ran u u f P ..^ N = f
201 200 coeq2d φ u w Word D | w : dom w 1-1 D . -1 P M u = Q f : 0 ..^ N dom u 1-1 onto D ran u u f -1 Q u f P ..^ N = u f -1 Q f
202 190 201 eqtrid φ u w Word D | w : dom w 1-1 D . -1 P M u = Q f : 0 ..^ N dom u 1-1 onto D ran u u f -1 Q u f P ..^ N = u f -1 Q f
203 145 reseq1i u f -1 D ran u = u -1 f -1 D ran u
204 fnunres2 u -1 Fn ran u f -1 Fn D ran u ran u D ran u = u -1 f -1 D ran u = f -1
205 149 152 81 204 syl3anc φ u w Word D | w : dom w 1-1 D . -1 P M u = Q f : 0 ..^ N dom u 1-1 onto D ran u u -1 f -1 D ran u = f -1
206 203 205 eqtrid φ u w Word D | w : dom w 1-1 D . -1 P M u = Q f : 0 ..^ N dom u 1-1 onto D ran u u f -1 D ran u = f -1
207 156 reseq1d φ u w Word D | w : dom w 1-1 D . -1 P M u = Q f : 0 ..^ N dom u 1-1 onto D ran u M u D ran u = Q D ran u
208 4 159 160 74 tocycfvres2 φ u w Word D | w : dom w 1-1 D . -1 P M u = Q f : 0 ..^ N dom u 1-1 onto D ran u M u D ran u = I D ran u
209 207 208 eqtr3d φ u w Word D | w : dom w 1-1 D . -1 P M u = Q f : 0 ..^ N dom u 1-1 onto D ran u Q D ran u = I D ran u
210 206 209 coeq12d φ u w Word D | w : dom w 1-1 D . -1 P M u = Q f : 0 ..^ N dom u 1-1 onto D ran u u f -1 D ran u Q D ran u = f -1 I D ran u
211 209 rneqd φ u w Word D | w : dom w 1-1 D . -1 P M u = Q f : 0 ..^ N dom u 1-1 onto D ran u ran Q D ran u = ran I D ran u
212 rnresi ran I D ran u = D ran u
213 212 eqimssi ran I D ran u D ran u
214 211 213 eqsstrdi φ u w Word D | w : dom w 1-1 D . -1 P M u = Q f : 0 ..^ N dom u 1-1 onto D ran u ran Q D ran u D ran u
215 cores ran Q D ran u D ran u u f -1 D ran u Q D ran u = u f -1 Q D ran u
216 214 215 syl φ u w Word D | w : dom w 1-1 D . -1 P M u = Q f : 0 ..^ N dom u 1-1 onto D ran u u f -1 D ran u Q D ran u = u f -1 Q D ran u
217 resco u f -1 Q D ran u = u f -1 Q D ran u
218 216 217 eqtr4di φ u w Word D | w : dom w 1-1 D . -1 P M u = Q f : 0 ..^ N dom u 1-1 onto D ran u u f -1 D ran u Q D ran u = u f -1 Q D ran u
219 210 218 eqtr3d φ u w Word D | w : dom w 1-1 D . -1 P M u = Q f : 0 ..^ N dom u 1-1 onto D ran u f -1 I D ran u = u f -1 Q D ran u
220 219 coeq1d φ u w Word D | w : dom w 1-1 D . -1 P M u = Q f : 0 ..^ N dom u 1-1 onto D ran u f -1 I D ran u f = u f -1 Q D ran u f
221 f1of f -1 : D ran u 1-1 onto 0 ..^ N dom u f -1 : D ran u 0 ..^ N dom u
222 fcoi1 f -1 : D ran u 0 ..^ N dom u f -1 I D ran u = f -1
223 77 150 221 222 4syl φ u w Word D | w : dom w 1-1 D . -1 P M u = Q f : 0 ..^ N dom u 1-1 onto D ran u f -1 I D ran u = f -1
224 223 coeq1d φ u w Word D | w : dom w 1-1 D . -1 P M u = Q f : 0 ..^ N dom u 1-1 onto D ran u f -1 I D ran u f = f -1 f
225 f1ococnv1 f : 0 ..^ N dom u 1-1 onto D ran u f -1 f = I 0 ..^ N dom u
226 77 225 syl φ u w Word D | w : dom w 1-1 D . -1 P M u = Q f : 0 ..^ N dom u 1-1 onto D ran u f -1 f = I 0 ..^ N dom u
227 196 reseq2d φ u w Word D | w : dom w 1-1 D . -1 P M u = Q f : 0 ..^ N dom u 1-1 onto D ran u I 0 ..^ N dom u = I P ..^ N
228 224 226 227 3eqtrd φ u w Word D | w : dom w 1-1 D . -1 P M u = Q f : 0 ..^ N dom u 1-1 onto D ran u f -1 I D ran u f = I P ..^ N
229 f1of f : 0 ..^ N dom u 1-1 onto D ran u f : 0 ..^ N dom u D ran u
230 frn f : 0 ..^ N dom u D ran u ran f D ran u
231 cores ran f D ran u u f -1 Q D ran u f = u f -1 Q f
232 77 229 230 231 4syl φ u w Word D | w : dom w 1-1 D . -1 P M u = Q f : 0 ..^ N dom u 1-1 onto D ran u u f -1 Q D ran u f = u f -1 Q f
233 220 228 232 3eqtr3rd φ u w Word D | w : dom w 1-1 D . -1 P M u = Q f : 0 ..^ N dom u 1-1 onto D ran u u f -1 Q f = I P ..^ N
234 202 233 eqtrd φ u w Word D | w : dom w 1-1 D . -1 P M u = Q f : 0 ..^ N dom u 1-1 onto D ran u u f -1 Q u f P ..^ N = I P ..^ N
235 189 234 uneq12d φ u w Word D | w : dom w 1-1 D . -1 P M u = Q f : 0 ..^ N dom u 1-1 onto D ran u u f -1 Q u f 0 ..^ P u f -1 Q u f P ..^ N = I 0 ..^ P cyclShift 1 I P ..^ N
236 115 235 eqtrd φ u w Word D | w : dom w 1-1 D . -1 P M u = Q f : 0 ..^ N dom u 1-1 onto D ran u u f -1 Q u f = I 0 ..^ P cyclShift 1 I P ..^ N
237 vex u V
238 vex f V
239 237 238 unex u f V
240 f1oeq1 q = u f q : 0 ..^ N 1-1 onto D u f : 0 ..^ N 1-1 onto D
241 cnveq q = u f q -1 = u f -1
242 241 coeq1d q = u f q -1 Q = u f -1 Q
243 id q = u f q = u f
244 242 243 coeq12d q = u f q -1 Q q = u f -1 Q u f
245 244 eqeq1d q = u f q -1 Q q = I 0 ..^ P cyclShift 1 I P ..^ N u f -1 Q u f = I 0 ..^ P cyclShift 1 I P ..^ N
246 240 245 anbi12d q = u f q : 0 ..^ N 1-1 onto D q -1 Q q = I 0 ..^ P cyclShift 1 I P ..^ N u f : 0 ..^ N 1-1 onto D u f -1 Q u f = I 0 ..^ P cyclShift 1 I P ..^ N
247 239 246 spcev u f : 0 ..^ N 1-1 onto D u f -1 Q u f = I 0 ..^ P cyclShift 1 I P ..^ N q q : 0 ..^ N 1-1 onto D q -1 Q q = I 0 ..^ P cyclShift 1 I P ..^ N
248 92 236 247 syl2anc φ u w Word D | w : dom w 1-1 D . -1 P M u = Q f : 0 ..^ N dom u 1-1 onto D ran u q q : 0 ..^ N 1-1 onto D q -1 Q q = I 0 ..^ P cyclShift 1 I P ..^ N
249 73 248 exlimddv φ u w Word D | w : dom w 1-1 D . -1 P M u = Q q q : 0 ..^ N 1-1 onto D q -1 Q q = I 0 ..^ P cyclShift 1 I P ..^ N
250 nfcv _ u M
251 4 2 5 tocycf D Fin M : w Word D | w : dom w 1-1 D B
252 ffn M : w Word D | w : dom w 1-1 D B M Fn w Word D | w : dom w 1-1 D
253 9 251 252 3syl φ M Fn w Word D | w : dom w 1-1 D
254 10 1 eleqtrdi φ Q M . -1 P
255 250 253 254 fvelimad φ u w Word D | w : dom w 1-1 D . -1 P M u = Q
256 249 255 r19.29a φ q q : 0 ..^ N 1-1 onto D q -1 Q q = I 0 ..^ P cyclShift 1 I P ..^ N