Metamath Proof Explorer


Theorem 1arithidomlem2

Description: Lemma for 1arithidom : induction step. (Contributed by Thierry Arnoux, 27-May-2025)

Ref Expression
Hypotheses 1arithidom.u U = Unit R
1arithidom.i P = RPrime R
1arithidom.m M = mulGrp R
1arithidom.t · ˙ = R
1arithidom.j J = 0 ..^ F
1arithidom.r φ R IDomn
1arithidom.f φ F Word P
1arithidom.g φ G Word P
1arithidom.1 φ M F = M G
1arithidomlem.1 φ Q P
1arithidomlem.2 φ g Word P k U M F = k · ˙ M g w u U 0 ..^ F w : 0 ..^ F 1-1 onto 0 ..^ F g = u · ˙ f F w
1arithidomlem.3 φ H Word P
1arithidomlem.4 φ k U M F ++ ⟨“ Q ”⟩ = k · ˙ M H
1arithidomlem.5 φ K 0 ..^ H
1arithidomlem.6 φ Q r R H K
1arithidomlem.7 φ T U
1arithidomlem.8 φ T · ˙ Q = H K
1arithidomlem.9 φ S : 0 ..^ H 1-1 onto 0 ..^ H
1arithidomlem.10 φ H S = H S prefix H 1 ++ ⟨“ H K ”⟩
1arithidomlem.11 φ N U
1arithidomlem.12 φ M F ++ ⟨“ Q ”⟩ = N · ˙ M H
1arithidomlem.13 φ D U 0 ..^ F
1arithidomlem.14 φ C : 0 ..^ F 1-1 onto 0 ..^ F
1arithidomlem.15 φ H S prefix H 1 = D · ˙ f F C
Assertion 1arithidomlem2 φ C ++ ⟨“ F ”⟩ S -1 : 0 ..^ F ++ ⟨“ Q ”⟩ 1-1 onto 0 ..^ F ++ ⟨“ Q ”⟩ H = D ++ ⟨“ T ”⟩ S -1 · ˙ f F ++ ⟨“ Q ”⟩ C ++ ⟨“ F ”⟩ S -1

Proof

Step Hyp Ref Expression
1 1arithidom.u U = Unit R
2 1arithidom.i P = RPrime R
3 1arithidom.m M = mulGrp R
4 1arithidom.t · ˙ = R
5 1arithidom.j J = 0 ..^ F
6 1arithidom.r φ R IDomn
7 1arithidom.f φ F Word P
8 1arithidom.g φ G Word P
9 1arithidom.1 φ M F = M G
10 1arithidomlem.1 φ Q P
11 1arithidomlem.2 φ g Word P k U M F = k · ˙ M g w u U 0 ..^ F w : 0 ..^ F 1-1 onto 0 ..^ F g = u · ˙ f F w
12 1arithidomlem.3 φ H Word P
13 1arithidomlem.4 φ k U M F ++ ⟨“ Q ”⟩ = k · ˙ M H
14 1arithidomlem.5 φ K 0 ..^ H
15 1arithidomlem.6 φ Q r R H K
16 1arithidomlem.7 φ T U
17 1arithidomlem.8 φ T · ˙ Q = H K
18 1arithidomlem.9 φ S : 0 ..^ H 1-1 onto 0 ..^ H
19 1arithidomlem.10 φ H S = H S prefix H 1 ++ ⟨“ H K ”⟩
20 1arithidomlem.11 φ N U
21 1arithidomlem.12 φ M F ++ ⟨“ Q ”⟩ = N · ˙ M H
22 1arithidomlem.13 φ D U 0 ..^ F
23 1arithidomlem.14 φ C : 0 ..^ F 1-1 onto 0 ..^ F
24 1arithidomlem.15 φ H S prefix H 1 = D · ˙ f F C
25 ccatws1len F Word P F ++ ⟨“ Q ”⟩ = F + 1
26 7 25 syl φ F ++ ⟨“ Q ”⟩ = F + 1
27 24 dmeqd φ dom H S prefix H 1 = dom D · ˙ f F C
28 f1of S : 0 ..^ H 1-1 onto 0 ..^ H S : 0 ..^ H 0 ..^ H
29 iswrdi S : 0 ..^ H 0 ..^ H S Word 0 ..^ H
30 18 28 29 3syl φ S Word 0 ..^ H
31 eqidd φ H = H
32 31 12 wrdfd φ H : 0 ..^ H P
33 wrdco S Word 0 ..^ H H : 0 ..^ H P H S Word P
34 30 32 33 syl2anc φ H S Word P
35 elfzo0 K 0 ..^ H K 0 H K < H
36 35 simp2bi K 0 ..^ H H
37 nnm1nn0 H H 1 0
38 14 36 37 3syl φ H 1 0
39 lenco S Word 0 ..^ H H : 0 ..^ H P H S = S
40 30 32 39 syl2anc φ H S = S
41 lencl S Word 0 ..^ H S 0
42 30 41 syl φ S 0
43 40 42 eqeltrd φ H S 0
44 lencl H Word P H 0
45 12 44 syl φ H 0
46 45 nn0red φ H
47 46 lem1d φ H 1 H
48 18 28 syl φ S : 0 ..^ H 0 ..^ H
49 ffn S : 0 ..^ H 0 ..^ H S Fn 0 ..^ H
50 hashfn S Fn 0 ..^ H S = 0 ..^ H
51 48 49 50 3syl φ S = 0 ..^ H
52 hashfzo0 H 0 0 ..^ H = H
53 12 44 52 3syl φ 0 ..^ H = H
54 40 51 53 3eqtrrd φ H = H S
55 47 54 breqtrd φ H 1 H S
56 elfz2nn0 H 1 0 H S H 1 0 H S 0 H 1 H S
57 38 43 55 56 syl3anbrc φ H 1 0 H S
58 pfxfn H S Word P H 1 0 H S H S prefix H 1 Fn 0 ..^ H 1
59 34 57 58 syl2anc φ H S prefix H 1 Fn 0 ..^ H 1
60 59 fndmd φ dom H S prefix H 1 = 0 ..^ H 1
61 eqid Base R = Base R
62 6 idomringd φ R Ring
63 62 adantr φ x U y P R Ring
64 61 1 unitcl x U x Base R
65 64 ad2antrl φ x U y P x Base R
66 6 adantr φ x U y P R IDomn
67 simprr φ x U y P y P
68 61 2 66 67 rprmcl φ x U y P y Base R
69 61 4 63 65 68 ringcld φ x U y P x · ˙ y Base R
70 elmapi D U 0 ..^ F D : 0 ..^ F U
71 22 70 syl φ D : 0 ..^ F U
72 eqidd φ F = F
73 72 7 wrdfd φ F : 0 ..^ F P
74 f1of C : 0 ..^ F 1-1 onto 0 ..^ F C : 0 ..^ F 0 ..^ F
75 23 74 syl φ C : 0 ..^ F 0 ..^ F
76 73 75 fcod φ F C : 0 ..^ F P
77 ovexd φ 0 ..^ F V
78 inidm 0 ..^ F 0 ..^ F = 0 ..^ F
79 69 71 76 77 77 78 off φ D · ˙ f F C : 0 ..^ F Base R
80 79 fdmd φ dom D · ˙ f F C = 0 ..^ F
81 27 60 80 3eqtr3d φ 0 ..^ H 1 = 0 ..^ F
82 lencl F Word P F 0
83 7 82 syl φ F 0
84 38 83 fzo0opth φ 0 ..^ H 1 = 0 ..^ F H 1 = F
85 81 84 mpbid φ H 1 = F
86 85 oveq1d φ H - 1 + 1 = F + 1
87 14 36 syl φ H
88 87 nncnd φ H
89 npcan1 H H - 1 + 1 = H
90 88 89 syl φ H - 1 + 1 = H
91 86 90 eqtr3d φ F + 1 = H
92 26 91 eqtrd φ F ++ ⟨“ Q ”⟩ = H
93 92 oveq2d φ 0 ..^ F ++ ⟨“ Q ”⟩ = 0 ..^ H
94 eqid C = C
95 eqid 0 ..^ C + 1 = 0 ..^ C + 1
96 f1ofn C : 0 ..^ F 1-1 onto 0 ..^ F C Fn 0 ..^ F
97 hashfn C Fn 0 ..^ F C = 0 ..^ F
98 23 96 97 3syl φ C = 0 ..^ F
99 hashfzo0 F 0 0 ..^ F = F
100 83 99 syl φ 0 ..^ F = F
101 98 100 eqtrd φ C = F
102 101 oveq2d φ 0 ..^ C = 0 ..^ F
103 f1oeq23 0 ..^ C = 0 ..^ F 0 ..^ C = 0 ..^ F C : 0 ..^ C 1-1 onto 0 ..^ C C : 0 ..^ F 1-1 onto 0 ..^ F
104 103 biimpar 0 ..^ C = 0 ..^ F 0 ..^ C = 0 ..^ F C : 0 ..^ F 1-1 onto 0 ..^ F C : 0 ..^ C 1-1 onto 0 ..^ C
105 102 102 23 104 syl21anc φ C : 0 ..^ C 1-1 onto 0 ..^ C
106 94 95 105 ccatws1f1o φ C ++ ⟨“ C ”⟩ : 0 ..^ C + 1 1-1 onto 0 ..^ C + 1
107 101 s1eqd φ ⟨“ C ”⟩ = ⟨“ F ”⟩
108 107 oveq2d φ C ++ ⟨“ C ”⟩ = C ++ ⟨“ F ”⟩
109 101 oveq1d φ C + 1 = F + 1
110 109 91 eqtrd φ C + 1 = H
111 110 oveq2d φ 0 ..^ C + 1 = 0 ..^ H
112 108 111 111 f1oeq123d φ C ++ ⟨“ C ”⟩ : 0 ..^ C + 1 1-1 onto 0 ..^ C + 1 C ++ ⟨“ F ”⟩ : 0 ..^ H 1-1 onto 0 ..^ H
113 106 112 mpbid φ C ++ ⟨“ F ”⟩ : 0 ..^ H 1-1 onto 0 ..^ H
114 f1ocnv S : 0 ..^ H 1-1 onto 0 ..^ H S -1 : 0 ..^ H 1-1 onto 0 ..^ H
115 18 114 syl φ S -1 : 0 ..^ H 1-1 onto 0 ..^ H
116 f1oco C ++ ⟨“ F ”⟩ : 0 ..^ H 1-1 onto 0 ..^ H S -1 : 0 ..^ H 1-1 onto 0 ..^ H C ++ ⟨“ F ”⟩ S -1 : 0 ..^ H 1-1 onto 0 ..^ H
117 113 115 116 syl2anc φ C ++ ⟨“ F ”⟩ S -1 : 0 ..^ H 1-1 onto 0 ..^ H
118 f1oeq23 0 ..^ F ++ ⟨“ Q ”⟩ = 0 ..^ H 0 ..^ F ++ ⟨“ Q ”⟩ = 0 ..^ H C ++ ⟨“ F ”⟩ S -1 : 0 ..^ F ++ ⟨“ Q ”⟩ 1-1 onto 0 ..^ F ++ ⟨“ Q ”⟩ C ++ ⟨“ F ”⟩ S -1 : 0 ..^ H 1-1 onto 0 ..^ H
119 118 biimpar 0 ..^ F ++ ⟨“ Q ”⟩ = 0 ..^ H 0 ..^ F ++ ⟨“ Q ”⟩ = 0 ..^ H C ++ ⟨“ F ”⟩ S -1 : 0 ..^ H 1-1 onto 0 ..^ H C ++ ⟨“ F ”⟩ S -1 : 0 ..^ F ++ ⟨“ Q ”⟩ 1-1 onto 0 ..^ F ++ ⟨“ Q ”⟩
120 93 93 117 119 syl21anc φ C ++ ⟨“ F ”⟩ S -1 : 0 ..^ F ++ ⟨“ Q ”⟩ 1-1 onto 0 ..^ F ++ ⟨“ Q ”⟩
121 f1ofo S : 0 ..^ H 1-1 onto 0 ..^ H S : 0 ..^ H onto 0 ..^ H
122 18 121 syl φ S : 0 ..^ H onto 0 ..^ H
123 32 ffnd φ H Fn 0 ..^ H
124 iswrdi D : 0 ..^ F U D Word U
125 71 124 syl φ D Word U
126 ccatws1len D Word U D ++ ⟨“ T ”⟩ = D + 1
127 125 126 syl φ D ++ ⟨“ T ”⟩ = D + 1
128 elmapfn D U 0 ..^ F D Fn 0 ..^ F
129 hashfn D Fn 0 ..^ F D = 0 ..^ F
130 22 128 129 3syl φ D = 0 ..^ F
131 130 100 eqtrd φ D = F
132 131 oveq1d φ D + 1 = F + 1
133 127 132 91 3eqtrd φ D ++ ⟨“ T ”⟩ = H
134 133 oveq2d φ 0 ..^ D ++ ⟨“ T ”⟩ = 0 ..^ H
135 eqidd φ D ++ ⟨“ T ”⟩ = D ++ ⟨“ T ”⟩
136 ccatws1cl D Word U T U D ++ ⟨“ T ”⟩ Word U
137 125 16 136 syl2anc φ D ++ ⟨“ T ”⟩ Word U
138 135 137 wrdfd φ D ++ ⟨“ T ”⟩ : 0 ..^ D ++ ⟨“ T ”⟩ U
139 134 138 feq2dd φ D ++ ⟨“ T ”⟩ : 0 ..^ H U
140 139 ffnd φ D ++ ⟨“ T ”⟩ Fn 0 ..^ H
141 f1of S -1 : 0 ..^ H 1-1 onto 0 ..^ H S -1 : 0 ..^ H 0 ..^ H
142 18 114 141 3syl φ S -1 : 0 ..^ H 0 ..^ H
143 fnfco D ++ ⟨“ T ”⟩ Fn 0 ..^ H S -1 : 0 ..^ H 0 ..^ H D ++ ⟨“ T ”⟩ S -1 Fn 0 ..^ H
144 140 142 143 syl2anc φ D ++ ⟨“ T ”⟩ S -1 Fn 0 ..^ H
145 91 oveq2d φ 0 ..^ F + 1 = 0 ..^ H
146 26 eqcomd φ F + 1 = F ++ ⟨“ Q ”⟩
147 ccatws1cl F Word P Q P F ++ ⟨“ Q ”⟩ Word P
148 7 10 147 syl2anc φ F ++ ⟨“ Q ”⟩ Word P
149 146 148 wrdfd φ F ++ ⟨“ Q ”⟩ : 0 ..^ F + 1 P
150 145 149 feq2dd φ F ++ ⟨“ Q ”⟩ : 0 ..^ H P
151 150 ffnd φ F ++ ⟨“ Q ”⟩ Fn 0 ..^ H
152 fzossfzop1 F 0 0 ..^ F 0 ..^ F + 1
153 83 152 syl φ 0 ..^ F 0 ..^ F + 1
154 sswrd 0 ..^ F 0 ..^ F + 1 Word 0 ..^ F Word 0 ..^ F + 1
155 153 154 syl φ Word 0 ..^ F Word 0 ..^ F + 1
156 iswrdi C : 0 ..^ F 0 ..^ F C Word 0 ..^ F
157 75 156 syl φ C Word 0 ..^ F
158 155 157 sseldd φ C Word 0 ..^ F + 1
159 ccatws1len C Word 0 ..^ F + 1 C ++ ⟨“ F ”⟩ = C + 1
160 158 159 syl φ C ++ ⟨“ F ”⟩ = C + 1
161 160 109 91 3eqtrrd φ H = C ++ ⟨“ F ”⟩
162 153 145 sseqtrd φ 0 ..^ F 0 ..^ H
163 75 162 fssd φ C : 0 ..^ F 0 ..^ H
164 iswrdi C : 0 ..^ F 0 ..^ H C Word 0 ..^ H
165 163 164 syl φ C Word 0 ..^ H
166 fzonn0p1 F 0 F 0 ..^ F + 1
167 83 166 syl φ F 0 ..^ F + 1
168 167 145 eleqtrd φ F 0 ..^ H
169 ccatws1cl C Word 0 ..^ H F 0 ..^ H C ++ ⟨“ F ”⟩ Word 0 ..^ H
170 165 168 169 syl2anc φ C ++ ⟨“ F ”⟩ Word 0 ..^ H
171 161 170 wrdfd φ C ++ ⟨“ F ”⟩ : 0 ..^ H 0 ..^ H
172 171 142 fcod φ C ++ ⟨“ F ”⟩ S -1 : 0 ..^ H 0 ..^ H
173 fnfco F ++ ⟨“ Q ”⟩ Fn 0 ..^ H C ++ ⟨“ F ”⟩ S -1 : 0 ..^ H 0 ..^ H F ++ ⟨“ Q ”⟩ C ++ ⟨“ F ”⟩ S -1 Fn 0 ..^ H
174 151 172 173 syl2anc φ F ++ ⟨“ Q ”⟩ C ++ ⟨“ F ”⟩ S -1 Fn 0 ..^ H
175 ovexd φ 0 ..^ H V
176 inidm 0 ..^ H 0 ..^ H = 0 ..^ H
177 144 174 175 175 176 offn φ D ++ ⟨“ T ”⟩ S -1 · ˙ f F ++ ⟨“ Q ”⟩ C ++ ⟨“ F ”⟩ S -1 Fn 0 ..^ H
178 eqid F = F
179 178 7 10 23 ccatws1f1olast φ F ++ ⟨“ Q ”⟩ C ++ ⟨“ F ”⟩ = F C ++ ⟨“ Q ”⟩
180 179 oveq2d φ D ++ ⟨“ T ”⟩ · ˙ f F ++ ⟨“ Q ”⟩ C ++ ⟨“ F ”⟩ = D ++ ⟨“ T ”⟩ · ˙ f F C ++ ⟨“ Q ”⟩
181 16 s1cld φ ⟨“ T ”⟩ Word U
182 iswrdi F C : 0 ..^ F P F C Word P
183 76 182 syl φ F C Word P
184 10 s1cld φ ⟨“ Q ”⟩ Word P
185 lenco C Word 0 ..^ F F : 0 ..^ F P F C = C
186 157 73 185 syl2anc φ F C = C
187 98 186 130 3eqtr4rd φ D = F C
188 s1len ⟨“ T ”⟩ = 1
189 s1len ⟨“ Q ”⟩ = 1
190 188 189 eqtr4i ⟨“ T ”⟩ = ⟨“ Q ”⟩
191 190 a1i φ ⟨“ T ”⟩ = ⟨“ Q ”⟩
192 125 181 183 184 187 191 ofccat φ D ++ ⟨“ T ”⟩ · ˙ f F C ++ ⟨“ Q ”⟩ = D · ˙ f F C ++ ⟨“ T ”⟩ · ˙ f ⟨“ Q ”⟩
193 180 192 eqtrd φ D ++ ⟨“ T ”⟩ · ˙ f F ++ ⟨“ Q ”⟩ C ++ ⟨“ F ”⟩ = D · ˙ f F C ++ ⟨“ T ”⟩ · ˙ f ⟨“ Q ”⟩
194 150 171 fcod φ F ++ ⟨“ Q ”⟩ C ++ ⟨“ F ”⟩ : 0 ..^ H P
195 194 ffnd φ F ++ ⟨“ Q ”⟩ C ++ ⟨“ F ”⟩ Fn 0 ..^ H
196 140 195 142 175 175 175 176 ofco φ D ++ ⟨“ T ”⟩ · ˙ f F ++ ⟨“ Q ”⟩ C ++ ⟨“ F ”⟩ S -1 = D ++ ⟨“ T ”⟩ S -1 · ˙ f F ++ ⟨“ Q ”⟩ C ++ ⟨“ F ”⟩ S -1
197 196 coeq1d φ D ++ ⟨“ T ”⟩ · ˙ f F ++ ⟨“ Q ”⟩ C ++ ⟨“ F ”⟩ S -1 S = D ++ ⟨“ T ”⟩ S -1 · ˙ f F ++ ⟨“ Q ”⟩ C ++ ⟨“ F ”⟩ S -1 S
198 coass D ++ ⟨“ T ”⟩ · ˙ f F ++ ⟨“ Q ”⟩ C ++ ⟨“ F ”⟩ S -1 S = D ++ ⟨“ T ”⟩ · ˙ f F ++ ⟨“ Q ”⟩ C ++ ⟨“ F ”⟩ S -1 S
199 197 198 eqtr3di φ D ++ ⟨“ T ”⟩ S -1 · ˙ f F ++ ⟨“ Q ”⟩ C ++ ⟨“ F ”⟩ S -1 S = D ++ ⟨“ T ”⟩ · ˙ f F ++ ⟨“ Q ”⟩ C ++ ⟨“ F ”⟩ S -1 S
200 f1of1 S : 0 ..^ H 1-1 onto 0 ..^ H S : 0 ..^ H 1-1 0 ..^ H
201 18 200 syl φ S : 0 ..^ H 1-1 0 ..^ H
202 f1cocnv1 S : 0 ..^ H 1-1 0 ..^ H S -1 S = I 0 ..^ H
203 201 202 syl φ S -1 S = I 0 ..^ H
204 203 coeq2d φ D ++ ⟨“ T ”⟩ · ˙ f F ++ ⟨“ Q ”⟩ C ++ ⟨“ F ”⟩ S -1 S = D ++ ⟨“ T ”⟩ · ˙ f F ++ ⟨“ Q ”⟩ C ++ ⟨“ F ”⟩ I 0 ..^ H
205 69 139 194 175 175 176 off φ D ++ ⟨“ T ”⟩ · ˙ f F ++ ⟨“ Q ”⟩ C ++ ⟨“ F ”⟩ : 0 ..^ H Base R
206 fcoi1 D ++ ⟨“ T ”⟩ · ˙ f F ++ ⟨“ Q ”⟩ C ++ ⟨“ F ”⟩ : 0 ..^ H Base R D ++ ⟨“ T ”⟩ · ˙ f F ++ ⟨“ Q ”⟩ C ++ ⟨“ F ”⟩ I 0 ..^ H = D ++ ⟨“ T ”⟩ · ˙ f F ++ ⟨“ Q ”⟩ C ++ ⟨“ F ”⟩
207 205 206 syl φ D ++ ⟨“ T ”⟩ · ˙ f F ++ ⟨“ Q ”⟩ C ++ ⟨“ F ”⟩ I 0 ..^ H = D ++ ⟨“ T ”⟩ · ˙ f F ++ ⟨“ Q ”⟩ C ++ ⟨“ F ”⟩
208 199 204 207 3eqtrd φ D ++ ⟨“ T ”⟩ S -1 · ˙ f F ++ ⟨“ Q ”⟩ C ++ ⟨“ F ”⟩ S -1 S = D ++ ⟨“ T ”⟩ · ˙ f F ++ ⟨“ Q ”⟩ C ++ ⟨“ F ”⟩
209 ofs1 T U Q P ⟨“ T ”⟩ · ˙ f ⟨“ Q ”⟩ = ⟨“ T · ˙ Q ”⟩
210 16 10 209 syl2anc φ ⟨“ T ”⟩ · ˙ f ⟨“ Q ”⟩ = ⟨“ T · ˙ Q ”⟩
211 17 s1eqd φ ⟨“ T · ˙ Q ”⟩ = ⟨“ H K ”⟩
212 210 211 eqtr2d φ ⟨“ H K ”⟩ = ⟨“ T ”⟩ · ˙ f ⟨“ Q ”⟩
213 24 212 oveq12d φ H S prefix H 1 ++ ⟨“ H K ”⟩ = D · ˙ f F C ++ ⟨“ T ”⟩ · ˙ f ⟨“ Q ”⟩
214 193 208 213 3eqtr4rd φ H S prefix H 1 ++ ⟨“ H K ”⟩ = D ++ ⟨“ T ”⟩ S -1 · ˙ f F ++ ⟨“ Q ”⟩ C ++ ⟨“ F ”⟩ S -1 S
215 coass F ++ ⟨“ Q ”⟩ C ++ ⟨“ F ”⟩ S -1 = F ++ ⟨“ Q ”⟩ C ++ ⟨“ F ”⟩ S -1
216 215 oveq2i D ++ ⟨“ T ”⟩ S -1 · ˙ f F ++ ⟨“ Q ”⟩ C ++ ⟨“ F ”⟩ S -1 = D ++ ⟨“ T ”⟩ S -1 · ˙ f F ++ ⟨“ Q ”⟩ C ++ ⟨“ F ”⟩ S -1
217 216 coeq1i D ++ ⟨“ T ”⟩ S -1 · ˙ f F ++ ⟨“ Q ”⟩ C ++ ⟨“ F ”⟩ S -1 S = D ++ ⟨“ T ”⟩ S -1 · ˙ f F ++ ⟨“ Q ”⟩ C ++ ⟨“ F ”⟩ S -1 S
218 214 217 eqtrdi φ H S prefix H 1 ++ ⟨“ H K ”⟩ = D ++ ⟨“ T ”⟩ S -1 · ˙ f F ++ ⟨“ Q ”⟩ C ++ ⟨“ F ”⟩ S -1 S
219 19 218 eqtrd φ H S = D ++ ⟨“ T ”⟩ S -1 · ˙ f F ++ ⟨“ Q ”⟩ C ++ ⟨“ F ”⟩ S -1 S
220 cocan2 S : 0 ..^ H onto 0 ..^ H H Fn 0 ..^ H D ++ ⟨“ T ”⟩ S -1 · ˙ f F ++ ⟨“ Q ”⟩ C ++ ⟨“ F ”⟩ S -1 Fn 0 ..^ H H S = D ++ ⟨“ T ”⟩ S -1 · ˙ f F ++ ⟨“ Q ”⟩ C ++ ⟨“ F ”⟩ S -1 S H = D ++ ⟨“ T ”⟩ S -1 · ˙ f F ++ ⟨“ Q ”⟩ C ++ ⟨“ F ”⟩ S -1
221 220 biimpa S : 0 ..^ H onto 0 ..^ H H Fn 0 ..^ H D ++ ⟨“ T ”⟩ S -1 · ˙ f F ++ ⟨“ Q ”⟩ C ++ ⟨“ F ”⟩ S -1 Fn 0 ..^ H H S = D ++ ⟨“ T ”⟩ S -1 · ˙ f F ++ ⟨“ Q ”⟩ C ++ ⟨“ F ”⟩ S -1 S H = D ++ ⟨“ T ”⟩ S -1 · ˙ f F ++ ⟨“ Q ”⟩ C ++ ⟨“ F ”⟩ S -1
222 122 123 177 219 221 syl31anc φ H = D ++ ⟨“ T ”⟩ S -1 · ˙ f F ++ ⟨“ Q ”⟩ C ++ ⟨“ F ”⟩ S -1
223 120 222 jca φ C ++ ⟨“ F ”⟩ S -1 : 0 ..^ F ++ ⟨“ Q ”⟩ 1-1 onto 0 ..^ F ++ ⟨“ Q ”⟩ H = D ++ ⟨“ T ”⟩ S -1 · ˙ f F ++ ⟨“ Q ”⟩ C ++ ⟨“ F ”⟩ S -1