Lines Matching defs:ip
46 int ld, ii, ip, is, nq, nr;
87 ip=ifac[k1+2];
89 l2=l1*ip;
91 ipm=ip-1;
273 static void dradfg(int ido,int ip,int l1,int idl1,float *cc,float *c1,
284 arg=tpi/(float)ip;
287 ipph=(ip+1)>>1;
288 ipp2=ip;
292 t10=ip*ido;
298 for(j=1;j<ip;j++){
310 for(j=1;j<ip;j++){
328 for(j=1;j<ip;j++){
414 t3=(ip-1)*idl1;
578 int ip,iw,ido,idl1,ix2,ix3;
587 ip=ifac[kh+1];
588 l1=l2/ip;
591 iw-=(ip-1)*ido;
594 if(ip!=4)goto L102;
605 if(ip!=2)goto L104;
619 dradfg(ido,ip,l1,idl1,c,c,c,ch,ch,wa+iw-1);
624 dradfg(ido,ip,l1,idl1,ch,ch,ch,c,c,wa+iw-1);
842 static void dradbg(int ido,int ip,int l1,int idl1,float *cc,float *c1,
852 t10=ip*ido;
854 arg=tpi/(float)ip;
858 ipp2=ip;
859 ipph=(ip+1)>>1;
985 t3=(ip-1)*idl1;
1105 for(j=1;j<ip;j++){
1117 for(j=1;j<ip;j++){
1138 for(j=1;j<ip;j++){
1159 int nf,ip,iw,ix2,ix3,ido,idl1;
1167 ip=ifac[k1 + 2];
1168 l2=ip*l1;
1171 if(ip!=4)goto L103;
1183 if(ip!=2)goto L106;
1193 if(ip!=3)goto L109;
1205 /* if(ip!=5)goto L112;
1219 dradbg(ido,ip,l1,idl1,ch,ch,ch,c,c,wa+iw-1);
1221 dradbg(ido,ip,l1,idl1,c,c,c,ch,ch,wa+iw-1);
1226 iw+=(ip-1)*ido;
