Lines Matching refs:wa
38 static void drfti1(int n, float *wa, int *ifac){
99 wa[i++]=cos(arg);
100 wa[i++]=sin(arg);
272 float *c2,float *ch,float *ch2,float *wa){
319 ch[t3-1]=wa[idij-1]*c1[t3-1]+wa[idij]*c1[t3];
320 ch[t3]=wa[idij-1]*c1[t3]-wa[idij]*c1[t3-1];
336 ch[t3-1]=wa[idij-1]*c1[t3-1]+wa[idij]*c1[t3];
337 ch[t3]=wa[idij-1]*c1[t3]-wa[idij]*c1[t3-1];
573 static void drftf1(int n,float *c,float *ch,float *wa,int *ifac){
597 dradf4(ido,l1,ch,c,wa+iw-1,wa+ix2-1,wa+ix3-1);
599 dradf4(ido,l1,c,ch,wa+iw-1,wa+ix2-1,wa+ix3-1);
606 dradf2(ido,l1,c,ch,wa+iw-1);
610 dradf2(ido,l1,ch,c,wa+iw-1);
617 dradfg(ido,ip,l1,idl1,c,c,c,ch,ch,wa+iw-1);
622 dradfg(ido,ip,l1,idl1,ch,ch,ch,c,c,wa+iw-1);
841 float *c2,float *ch,float *ch2,float *wa){
1125 c1[t3-1]=wa[idij-1]*ch[t3-1]-wa[idij]*ch[t3];
1126 c1[t3]=wa[idij-1]*ch[t3]+wa[idij]*ch[t3-1];
1146 c1[t3-1]=wa[idij-1]*ch[t3-1]-wa[idij]*ch[t3];
1147 c1[t3]=wa[idij-1]*ch[t3]+wa[idij]*ch[t3-1];
1154 static void drftb1(int n, float *c, float *ch, float *wa, int *ifac){
1174 dradb4(ido,l1,ch,c,wa+iw-1,wa+ix2-1,wa+ix3-1);
1176 dradb4(ido,l1,c,ch,wa+iw-1,wa+ix2-1,wa+ix3-1);
1184 dradb2(ido,l1,ch,c,wa+iw-1);
1186 dradb2(ido,l1,c,ch,wa+iw-1);
1195 dradb3(ido,l1,ch,c,wa+iw-1,wa+ix2-1);
1197 dradb3(ido,l1,c,ch,wa+iw-1,wa+ix2-1);
1209 dradb5(ido,l1,ch,c,wa+iw-1,wa+ix2-1,wa+ix3-1,wa+ix4-1);
1211 dradb5(ido,l1,c,ch,wa+iw-1,wa+ix2-1,wa+ix3-1,wa+ix4-1);
1217 dradbg(ido,ip,l1,idl1,ch,ch,ch,c,c,wa+iw-1);
1219 dradbg(ido,ip,l1,idl1,c,c,c,ch,ch,wa+iw-1);
