Lines Matching full:aadj
1342 double aadj, aadj1, adj;
1774 if ((aadj = ratio(delta, bs)) <= 2.) {
1776 aadj = aadj1 = 1.;
1782 aadj = 1.;
1789 if (aadj < 2./FLT_RADIX)
1790 aadj = 1./FLT_RADIX;
1792 aadj *= 0.5;
1793 aadj1 = -aadj;
1797 aadj *= 0.5;
1798 aadj1 = dsign ? aadj : -aadj;
1864 * y <= (P-1)*Exp_msk1), we must adjust aadj to avoid
1868 if (y <= (P-1)*Exp_msk1 && aadj >= 1.) {
1869 aadj1 = (double)(int)(aadj + 0.5);
1880 L = aadj;
1881 aadj -= L;
1884 if (aadj < .4999999 || aadj > .5000001)
1887 else if (aadj < .4999999/FLT_RADIX)
