276   int t0,t1,t2,t3,t4,t5,t6,t7,t8,t9,t10;  in dradfg()  local
422     t7=idl1;  in dradfg()
425       ch2[t4++]=c2[ik]+ar1*c2[t7++];  in dradfg()
445       t7=t2;  in dradfg()
450         ch2[t7++]+=ai2*c2[t9++];  in dradfg()
500     t7=t4;  in dradfg()
504       cc[t5]=ch[t7];  in dradfg()
507       t7+=ido;  in dradfg()
524     t7=t3;  in dradfg()
530         cc[i+t7-1]=ch[i+t8-1]+ch[i+t9-1];  in dradfg()
532         cc[i+t7]=ch[i+t8]+ch[i+t9];  in dradfg()
536       t7+=t10;  in dradfg()
556       t7=i+t3;  in dradfg()
560         cc[t7-1]=ch[t8-1]+ch[t9-1];  in dradfg()
562         cc[t7]=ch[t8]+ch[t9];  in dradfg()
565         t7+=t10;  in dradfg()
690   int i,k,t0,t1,t2,t3,t4,t5,t6,t7,t8,t9,t10;  in dradb3()  local
716     t7=t1+(t1<<1);  in dradb3()
717     t6=(t5=t7+t3);  in dradb3()
724       t7+=2;  in dradb3()
729       cr2=cc[t7-1]+(taur*tr2);  in dradb3()
730       ch[t8-1]=cc[t7-1]+tr2;  in dradb3()
732       ci2=cc[t7]+(taur*ti2);  in dradb3()
733       ch[t8]=cc[t7]+ti2;  in dradb3()
752   int i,k,t0,t1,t2,t3,t4,t5,t6,t7,t8;  in dradb4()  local
781     t7=t1;  in dradb4()
787       t7+=2;  in dradb4()
796       ch[t7-1]=tr2+tr3;  in dradb4()
798       ch[t7]=ti2+ti3;  in dradb4()
805       ch[(t8=t7+t0)-1]=wa1[i-2]*cr2-wa1[i-1]*ci2;  in dradb4()
843   int idij,ipph,i,j,k,l,ik,is,t0,t1,t2,t3,t4,t5,t6,t7,t8,t9,t10,  in dradbg()  local
891   t7=(t5=ido<<1);  in dradbg()
905     t5+=t7;  in dradbg()
913   t7=0;  in dradbg()
920     t7+=(ido<<1);  in dradbg()
921     t8=t7;  in dradbg()
947   t7=0;  in dradbg()
953     t7+=(ido<<1);  in dradbg()
954     t8=t7;  in dradbg()
955     t9=t7;  in dradbg()
994     t7=idl1;  in dradbg()
997       c2[t4++]=ch2[t6++]+ar1*ch2[t7++];  in dradbg()
1006     t7=t9-idl1;  in dradbg()
1009       t7-=idl1;  in dradbg()
1016       t12=t7;  in dradbg()