Lines Matching defs:ah
410 double ah, al, t, xh, x, y, z;
432 ah = pio2;
435 ah = -pio2;
443 ah = mpi;
447 ah = al = zero;
456 ah += pio4;
458 inexact = (int)ah; /* inexact if ah != 0 */
460 return ((sy)? -ah : ah);
463 if ((int)ah == 0)
464 ah = y / x;
465 return ((sy)? -ah : ah);
476 inexact = (int)ah; /* inexact if ah != 0 */
478 return ((sy)? -ah : ah);
489 ah += TBL[k];
497 t = ah + (z + (al + (z * x) * (p1 + x * (p2 + x * (p3 + x * p4)))));