Searched refs:wk1i (Results 1 – 1 of 1) sorted by relevance
1041 double wk1r, wk1i, wk2r, wk2i, wk3r, wk3i; in cft1st() local1088 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()[all …]