Lines Matching refs:ajp
280 REAL c1, c2, c3, cd, aa, aj, ak, ajm, ajp, akm, akp;
502 ajp = Re [k1] + Re [k3];
508 Re [kk] = akp + ajp;
510 ajp = akp - ajp;
526 Re [k2] = ajp;
533 Re [k2] = ajp * c2 - bjp * s2;
536 Im [k2] = ajp * s2 + bjp * c2;
609 ajp = Re [k2] + Re [k3];
615 Re [kk] = aa + akp + ajp;
617 ak = akp * c72 + ajp * c2 + aa;
625 ak = akp * c2 + ajp * c72 + aa;