Lines Matching refs:fw
63 float z,fw,f[20],fq[20],q[20]; local
80 for(j=0,fw=0.0;j<=jx;j++) fw += x[j]*f[jx+i-j]; q[i] = fw;
87 fw = (float)((__int32_t)(twon8* z));
88 iq[i] = (__int32_t)(z-two8*fw);
89 z = q[j-1]+fw;
139 for(j=0,fw=0.0;j<=jx;j++) fw += x[j]*f[jx+i-j];
140 q[i] = fw;
154 fw = (float)((__int32_t)(twon8*z));
155 iq[jz] = (__int32_t)(z-two8*fw);
157 iq[jz] = (__int32_t) fw;
162 fw = scalbnf(one,(int)q0);
164 q[i] = fw*(float)iq[i]; fw*=twon8;
169 for(fw=0.0,k=0;k<=jp&&k<=jz-i;k++) fw += PIo2[k]*q[i+k];
170 fq[jz-i] = fw;
176 fw = 0.0;
177 for (i=jz;i>=0;i--) fw += fq[i];
178 y[0] = (ih==0)? fw: -fw;
182 fw = 0.0;
183 for (i=jz;i>=0;i--) fw += fq[i];
184 y[0] = (ih==0)? fw: -fw;
185 fw = fq[0]-fw;
186 for (i=1;i<=jz;i++) fw += fq[i];
187 y[1] = (ih==0)? fw: -fw;
191 fw = fq[i-1]+fq[i];
192 fq[i] += fq[i-1]-fw;
193 fq[i-1] = fw;
196 fw = fq[i-1]+fq[i];
197 fq[i] += fq[i-1]-fw;
198 fq[i-1] = fw;
200 for (fw=0.0,i=jz;i>=2;i--) fw += fq[i];
202 y[0] = fq[0]; y[1] = fq[1]; y[2] = fw;
204 y[0] = -fq[0]; y[1] = -fq[1]; y[2] = -fw;