Lines Matching refs:dd2
15 /* Subroutine */ int drotmg_(doublereal *dd1, doublereal *dd2, doublereal *
53 /* THE SECOND COMPONENT OF THE 2-VECTOR (DSQRT(DD1)*DX1,DSQRT(DD2)* */
68 /* OF DD1 AND DD2. ALL ACTUAL SCALING OF DATA IS DONE USING GAM. */
76 /* DD2 (input/output) DOUBLE PRECISION */
109 dp2 = *dd2 * *dy1;
137 *dd2 /= du;
152 dtemp = *dd2 / du;
153 *dd2 = *dd1 / du;
167 *dd2 = zero;
235 if (! (abs(*dd2) <= rgamsq)) {
238 if (*dd2 == zero) {
248 *dd2 *= d__1 * d__1;
254 if (! (abs(*dd2) >= gamsq)) {
264 *dd2 /= d__1 * d__1;
