Lines Matching defs:adj
104 U adj, aadj1, rv, rv0;
699 dval(&adj) = 1.;
704 dval(&adj) = -1.;
718 dval(&adj) = -0.5;
725 word0(&adj) += (2*P+1)*Exp_msk1 - y;
731 dval(&rv) += adj*ulp(&rv);
737 dval(&rv) += adj.d*ulp(&rv);
741 dval(&adj) = ratio(delta, bs);
742 if (adj.d < 1.)
743 dval(&adj) = 1.;
744 if (adj.d <= 0x7ffffffe) {
745 /* dval(&adj) = Rounding ? ceil(&adj) : floor(&adj); */
746 y = adj.d;
747 if (y != adj.d) {
750 dval(&adj) = y;
755 word0(&adj) += (2*P+1)*Exp_msk1 - y;
760 dval(&adj) *= ulp(&rv);
762 dval(&rv) += adj;
764 dval(&rv) -= adj;
770 dval(&adj) *= ulp(&rv);
774 dval(&rv) += adj.d;
777 dval(&rv) -= adj.d;
966 dval(&adj) = dval(&aadj1) * ulp(&rv);
967 dval(&rv) += dval(&adj);
990 dval(&adj) = dval(&aadj1) * ulp(&rv);
991 dval(&rv) += dval(&adj);
997 dval(&adj) = dval(&aadj1) * ulp(&rv);
998 dval(&rv) += dval(&adj);
1016 dval(&adj) = dval(&aadj1) * ulp(&rv);
1017 dval(&rv) += dval(&adj);
1020 /* Compute dval(&adj) so that the IEEE rounding rules will
1021 * correctly round rv + dval(&adj) in some half-way cases.
1032 dval(&adj) = dval(&aadj1) * ulp(&rv);
1033 dval(&rv) += adj;