Lines Matching defs:ip
44 int ld, ii, ip, is, nq, nr;
85 ip=ifac[k1+2];
87 l2=l1*ip;
89 ipm=ip-1;
271 static void dradfg(int ido,int ip,int l1,int idl1,float *cc,float *c1,
282 arg=tpi/(float)ip;
285 ipph=(ip+1)>>1;
286 ipp2=ip;
290 t10=ip*ido;
296 for(j=1;j<ip;j++){
308 for(j=1;j<ip;j++){
326 for(j=1;j<ip;j++){
412 t3=(ip-1)*idl1;
576 int ip,iw,ido,idl1,ix2,ix3;
585 ip=ifac[kh+1];
586 l1=l2/ip;
589 iw-=(ip-1)*ido;
592 if(ip!=4)goto L102;
603 if(ip!=2)goto L104;
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);
840 static void dradbg(int ido,int ip,int l1,int idl1,float *cc,float *c1,
850 t10=ip*ido;
852 arg=tpi/(float)ip;
856 ipp2=ip;
857 ipph=(ip+1)>>1;
983 t3=(ip-1)*idl1;
1103 for(j=1;j<ip;j++){
1115 for(j=1;j<ip;j++){
1136 for(j=1;j<ip;j++){
1157 int nf,ip,iw,ix2,ix3,ido,idl1;
1165 ip=ifac[k1 + 2];
1166 l2=ip*l1;
1169 if(ip!=4)goto L103;
1181 if(ip!=2)goto L106;
1191 if(ip!=3)goto L109;
1203 /* if(ip!=5)goto L112;
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);
1224 iw+=(ip-1)*ido;
