Lines Matching refs:dval

146 	dval(&rv) = 0.;
350 	dval(&rv) = y;
356 		dval(&rv) = tens[k - 9] * dval(&rv) + z;
381 				/* rv = */ rounded_product(dval(&rv), tens[e]);
398 				dval(&rv) *= tens[i];
405 				/* rv = */ rounded_product(dval(&rv), tens[e]);
411 				/* rv = */ rounded_product(dval(&rv), tens[e]);
425 			/* rv = */ rounded_quotient(dval(&rv), tens[-e]);
457 			dval(&rv) *= tens[i];
480 				dval(&rv0) = 1e300;
481 				dval(&rv0) *= dval(&rv0);
503 					dval(&rv) *= bigtens[j];
506 			dval(&rv) *= bigtens[j];
523 			dval(&rv) /= tens[i];
532 					dval(&rv) *= tinytens[j];
549 					dval(&rv) *= tinytens[j];
551 			dval(&rv0) = dval(&rv);
552 			dval(&rv) *= tinytens[j];
553 			if (!dval(&rv)) {
554 				dval(&rv) = 2.*dval(&rv0);
555 				dval(&rv) *= tinytens[j];
557 				if (!dval(&rv)) {
559 					dval(&rv) = 0.;
582 		bb = d2b(dval(&rv), &bbe, &bbbits);	/* rv = bb * 2^bbe */
676 						dval(&adj) = 1.;
681 					dval(&adj) = -1.;
693 							dval(&adj) = -0.5;
706 						dval(&rv) += adj*ulp(&rv);
712 					dval(&rv) += adj.d*ulp(&rv);
716 			dval(&adj) = ratio(delta, bs);
718 				dval(&adj) = 1.;
725 					dval(&adj) = y;
735 				dval(&adj) *= ulp(&rv);
737 					dval(&rv) += adj;
739 					dval(&rv) -= adj;
745 			dval(&adj) *= ulp(&rv);
749 				dval(&rv) += adj.d;
752 				dval(&rv) -= adj.d;
869 				dval(&rv) += sulp(&rv, scale);
871 				dval(&rv) += ulp(&rv);
876 				dval(&rv) -= sulp(&rv, scale);
878 				dval(&rv) -= ulp(&rv);
881 				if (!dval(&rv))
893 				aadj = dval(&aadj1) = 1.;
900 				dval(&aadj1) = -1.;
910 				dval(&aadj1) = -aadj;
915 			dval(&aadj1) = dsign ? aadj : -aadj;
919 					dval(&aadj1) -= 0.5;
923 					dval(&aadj1) += 0.5;
927 				dval(&aadj1) += 0.5;
935 			dval(&rv0) = dval(&rv);
937 			dval(&adj) = dval(&aadj1) * ulp(&rv);
938 			dval(&rv) += dval(&adj);
957 					dval(&aadj1) = dsign ? aadj : -aadj;
961 			dval(&adj) = dval(&aadj1) * ulp(&rv);
962 			dval(&rv) += dval(&adj);
966 				dval(&rv0) = dval(&rv);
968 				dval(&adj) = dval(&aadj1) * ulp(&rv);
969 				dval(&rv) += adj;
987 				dval(&adj) = dval(&aadj1) * ulp(&rv);
988 				dval(&rv) += adj;
999 				dval(&aadj1) = (double)(int)(aadj + 0.5);
1001 					dval(&aadj1) = -dval(&aadj1);
1003 			dval(&adj) = dval(&aadj1) * ulp(&rv);
1004 			dval(&rv) += adj;
1042 			dval(&rv0) += 1.;
1052 		dval(&rv) *= dval(&rv0);
1067 		dval(&rv0) = 1e-300;
1068 		dval(&rv0) *= dval(&rv0);
1074 	return sign ? -dval(&rv) : dval(&rv);