Lines Matching refs:wa1
116 static void dradf2(int ido,int l1,float *cc,float *ch,float *wa1){
146 tr2=wa1[i-2]*cc[t3-1]+wa1[i-1]*cc[t3];
147 ti2=wa1[i-2]*cc[t3]-wa1[i-1]*cc[t3-1];
171 static void dradf4(int ido,int l1,float *cc,float *ch,float *wa1,
213 cr2=wa1[i-2]*cc[t3-1]+wa1[i-1]*cc[t3];
214 ci2=wa1[i-2]*cc[t3]-wa1[i-1]*cc[t3-1];
636 static void dradb2(int ido,int l1,float *cc,float *ch,float *wa1){
669 ch[t6-1]=wa1[i-2]*tr2-wa1[i-1]*ti2;
670 ch[t6]=wa1[i-2]*ti2+wa1[i-1]*tr2;
688 static void dradb3(int ido,int l1,float *cc,float *ch,float *wa1,
742 ch[t9-1]=wa1[i-2]*dr2-wa1[i-1]*di2;
743 ch[t9]=wa1[i-2]*di2+wa1[i-1]*dr2;
751 static void dradb4(int ido,int l1,float *cc,float *ch,float *wa1,
807 ch[(t8=t7+t0)-1]=wa1[i-2]*cr2-wa1[i-1]*ci2;
808 ch[t8]=wa1[i-2]*ci2+wa1[i-1]*cr2;
