443     ti4, ti5, dr3, dr4, dr5, dr2, tr2, tr3, tr4, tr5;  in passfb5()  local
511         dr4 = cr3 + ci4;  in passfb5()
522         ch_ref(i - 1, k, 4) = wa3[i - 1] * dr4 - fsign*wa3[i] * di4;  in passfb5()
523         ch_ref(i, k, 4) = wa3[i - 1] * di4 + fsign*wa3[i] * dr4;  in passfb5()
950     ti4, ti5, dr3, dr4, dr5, dr2, tr2, tr3, tr4, tr5;  in radb5()  local
1009       dr4 = cr3 + ci4;  in radb5()
1020       ch_ref(i - 1, k, 4) = wa3[i - 2] * dr4 - wa3[i - 1] * di4;  in radb5()
1021       ch_ref(i, k, 4) = wa3[i - 2] * di4 + wa3[i - 1] * dr4;  in radb5()
1469   real ci2, di2, ci4, ci5, di3, di4, di5, ci3, cr2, cr3, dr2, dr3, dr4, dr5,  in radf5()  local
1510       dr4 = wa3[i - 2] * cc_ref(i - 1, k, 4) + wa3[i - 1] * cc_ref(i, k, 4);  in radf5()
1518       cr3 = dr3 + dr4;  in radf5()
1519       ci4 = dr4 - dr3;  in radf5()