Lines Matching refs:wk3r
1041 double wk1r, wk1i, wk2r, wk2i, wk3r, wk3i; in cft1st() local
1089 wk3r = wk1r - 2 * wk2i * wk1i; in cft1st()
1111 a[j + 6] = wk3r * x0r - wk3i * x0i; in cft1st()
1112 a[j + 7] = wk3r * x0i + wk3i * x0r; in cft1st()
1115 wk3r = wk1r - 2 * wk2r * wk1i; in cft1st()
1137 a[j + 14] = wk3r * x0r - wk3i * x0i; in cft1st()
1138 a[j + 15] = wk3r * x0i + wk3i * x0r; in cft1st()
1146 double wk1r, wk1i, wk2r, wk2i, wk3r, wk3i; in cftmdl() local
1206 wk3r = wk1r - 2 * wk2i * wk1i; in cftmdl()
1232 a[j3] = wk3r * x0r - wk3i * x0i; in cftmdl()
1233 a[j3 + 1] = wk3r * x0i + wk3i * x0r; in cftmdl()
1237 wk3r = wk1r - 2 * wk2r * wk1i; in cftmdl()
1263 a[j3] = wk3r * x0r - wk3i * x0i; in cftmdl()
1264 a[j3 + 1] = wk3r * x0i + wk3i * x0r; in cftmdl()