175   float ci2,ci3,ci4,cr2,cr3,cr4,ti1,ti2,ti3,ti4,tr1,tr2,tr3,tr4;  in dradf4()  local
214       ci2=wa1[i-2]*cc[t3]-wa1[i-1]*cc[t3-1];  in dradf4()
224       ti1=ci2+ci4;  in dradf4()
225       ti4=ci2-ci4;  in dradf4()
693   float ci2,ci3,di2,di3,cr2,cr3,dr2,dr3,ti2,tr2;  in dradb3()  local
734       ci2=cc[t7]+(taur*ti2);  in dradb3()
740       di2=ci2+cr3;  in dradb3()
741       di3=ci2-cr3;  in dradb3()
755   float ci2,ci3,ci4,cr2,cr3,cr4,ti1,ti2,ti3,ti4,tr1,tr2,tr3,tr4;  in dradb4()  local
804       ci2=ti1+ti4;  in dradb4()
807       ch[(t8=t7+t0)-1]=wa1[i-2]*cr2-wa1[i-1]*ci2;  in dradb4()
808       ch[t8]=wa1[i-2]*ci2+wa1[i-1]*cr2;  in dradb4()