Lines Matching refs:wk1i
1041 double wk1r, wk1i, wk2r, wk2i, wk3r, wk3i; in cft1st() local
1088 wk1i = w[k2 + 1]; in cft1st()
1089 wk3r = wk1r - 2 * wk2i * wk1i; in cft1st()
1090 wk3i = 2 * wk2i * wk1r - wk1i; in cft1st()
1107 a[j + 2] = wk1r * x0r - wk1i * x0i; in cft1st()
1108 a[j + 3] = wk1r * x0i + wk1i * x0r; in cft1st()
1114 wk1i = w[k2 + 3]; in cft1st()
1115 wk3r = wk1r - 2 * wk2r * wk1i; in cft1st()
1116 wk3i = 2 * wk2r * wk1r - wk1i; in cft1st()
1133 a[j + 10] = wk1r * x0r - wk1i * x0i; in cft1st()
1134 a[j + 11] = wk1r * x0i + wk1i * x0r; in cft1st()
1146 double wk1r, wk1i, wk2r, wk2i, wk3r, wk3i; in cftmdl() local
1205 wk1i = w[k2 + 1]; in cftmdl()
1206 wk3r = wk1r - 2 * wk2i * wk1i; in cftmdl()
1207 wk3i = 2 * wk2i * wk1r - wk1i; in cftmdl()
1228 a[j1] = wk1r * x0r - wk1i * x0i; in cftmdl()
1229 a[j1 + 1] = wk1r * x0i + wk1i * x0r; in cftmdl()
1236 wk1i = w[k2 + 3]; in cftmdl()
1237 wk3r = wk1r - 2 * wk2r * wk1i; in cftmdl()
1238 wk3i = 2 * wk2r * wk1r - wk1i; in cftmdl()
1259 a[j1] = wk1r * x0r - wk1i * x0i; in cftmdl()
1260 a[j1 + 1] = wk1r * x0i + wk1i * x0r; in cftmdl()