Lines Matching refs:wa1
114 static void dradf2(int ido,int l1,float *cc,float *ch,float *wa1){
144 tr2=wa1[i-2]*cc[t3-1]+wa1[i-1]*cc[t3];
145 ti2=wa1[i-2]*cc[t3]-wa1[i-1]*cc[t3-1];
169 static void dradf4(int ido,int l1,float *cc,float *ch,float *wa1,
211 cr2=wa1[i-2]*cc[t3-1]+wa1[i-1]*cc[t3];
212 ci2=wa1[i-2]*cc[t3]-wa1[i-1]*cc[t3-1];
634 static void dradb2(int ido,int l1,float *cc,float *ch,float *wa1){
667 ch[t6-1]=wa1[i-2]*tr2-wa1[i-1]*ti2;
668 ch[t6]=wa1[i-2]*ti2+wa1[i-1]*tr2;
686 static void dradb3(int ido,int l1,float *cc,float *ch,float *wa1,
740 ch[t9-1]=wa1[i-2]*dr2-wa1[i-1]*di2;
741 ch[t9]=wa1[i-2]*di2+wa1[i-1]*dr2;
749 static void dradb4(int ido,int l1,float *cc,float *ch,float *wa1,
805 ch[(t8=t7+t0)-1]=wa1[i-2]*cr2-wa1[i-1]*ci2;
806 ch[t8]=wa1[i-2]*ci2+wa1[i-1]*cr2;
