940     int j, j1, j2, j3, l;  in cftfsub()  local
956             j3 = j2 + l;  in cftfsub()
961             x2r = a[j2] + a[j3];  in cftfsub()
962             x2i = a[j2 + 1] + a[j3 + 1];  in cftfsub()
963             x3r = a[j2] - a[j3];  in cftfsub()
964             x3i = a[j2 + 1] - a[j3 + 1];  in cftfsub()
971             a[j3] = x1r + x3i;  in cftfsub()
972             a[j3 + 1] = x1i - x3r;  in cftfsub()
990     int j, j1, j2, j3, l;  in cftbsub()  local
1006             j3 = j2 + l;  in cftbsub()
1011             x2r = a[j2] + a[j3];  in cftbsub()
1012             x2i = a[j2 + 1] + a[j3 + 1];  in cftbsub()
1013             x3r = a[j2] - a[j3];  in cftbsub()
1014             x3i = a[j2 + 1] - a[j3 + 1];  in cftbsub()
1021             a[j3] = x1r + x3i;  in cftbsub()
1022             a[j3 + 1] = x1i + x3r;  in cftbsub()
1145     int j, j1, j2, j3, k, k1, k2, m, m2;  in cftmdl()  local
1153         j3 = j2 + l;  in cftmdl()
1158         x2r = a[j2] + a[j3];  in cftmdl()
1159         x2i = a[j2 + 1] + a[j3 + 1];  in cftmdl()
1160         x3r = a[j2] - a[j3];  in cftmdl()
1161         x3i = a[j2 + 1] - a[j3 + 1];  in cftmdl()
1168         a[j3] = x1r + x3i;  in cftmdl()
1169         a[j3 + 1] = x1i - x3r;  in cftmdl()
1175         j3 = j2 + l;  in cftmdl()
1180         x2r = a[j2] + a[j3];  in cftmdl()
1181         x2i = a[j2 + 1] + a[j3 + 1];  in cftmdl()
1182         x3r = a[j2] - a[j3];  in cftmdl()
1183         x3i = a[j2 + 1] - a[j3 + 1];  in cftmdl()
1194         a[j3] = wk1r * (x0i - x0r);  in cftmdl()
1195         a[j3 + 1] = wk1r * (x0i + x0r);  in cftmdl()
1211             j3 = j2 + l;  in cftmdl()
1216             x2r = a[j2] + a[j3];  in cftmdl()
1217             x2i = a[j2 + 1] + a[j3 + 1];  in cftmdl()
1218             x3r = a[j2] - a[j3];  in cftmdl()
1219             x3i = a[j2 + 1] - a[j3 + 1];  in cftmdl()
1232             a[j3] = wk3r * x0r - wk3i * x0i;  in cftmdl()
1233             a[j3 + 1] = wk3r * x0i + wk3i * x0r;  in cftmdl()
1242             j3 = j2 + l;  in cftmdl()
1247             x2r = a[j2] + a[j3];  in cftmdl()
1248             x2i = a[j2 + 1] + a[j3 + 1];  in cftmdl()
1249             x3r = a[j2] - a[j3];  in cftmdl()
1250             x3i = a[j2 + 1] - a[j3 + 1];  in cftmdl()
1263             a[j3] = wk3r * x0r - wk3i * x0i;  in cftmdl()
1264             a[j3 + 1] = wk3r * x0i + wk3i * x0r;  in cftmdl()