mirror of
https://gitlab.com/libeigen/eigen.git
synced 2025-08-13 12:19:12 +08:00
simplifying
This commit is contained in:
parent
0abb148b7d
commit
6a8b52b3aa
@ -260,11 +260,11 @@ L200:
|
|||||||
}
|
}
|
||||||
/* L230: */
|
/* L230: */
|
||||||
}
|
}
|
||||||
temp1 = ei_enorm<Scalar>(n, &wa3[1]) / fnorm;
|
temp1 = ei_abs2(ei_enorm<Scalar>(n, &wa3[1]) / fnorm);
|
||||||
temp2 = ei_sqrt(par) * pnorm / fnorm;
|
temp2 = ei_abs2( ei_sqrt(par) * pnorm / fnorm);
|
||||||
/* Computing 2nd power */
|
/* Computing 2nd power */
|
||||||
prered = temp1 * temp1 + temp2 * temp2 / p5;
|
prered = temp1 + temp2 / p5;
|
||||||
dirder = -(temp1 * temp1 + temp2 * temp2);
|
dirder = -(temp1 + temp2);
|
||||||
|
|
||||||
/* compute the ratio of the actual to the predicted */
|
/* compute the ratio of the actual to the predicted */
|
||||||
/* reduction. */
|
/* reduction. */
|
||||||
|
@ -262,11 +262,11 @@ L200:
|
|||||||
}
|
}
|
||||||
/* L230: */
|
/* L230: */
|
||||||
}
|
}
|
||||||
temp1 = ei_enorm<Scalar>(n, &wa3[1]) / fnorm;
|
temp1 = ei_abs2(ei_enorm<Scalar>(n, &wa3[1]) / fnorm);
|
||||||
temp2 = ei_sqrt(par) * pnorm / fnorm;
|
temp2 = ei_abs2( ei_sqrt(par) * pnorm / fnorm);
|
||||||
/* Computing 2nd power */
|
/* Computing 2nd power */
|
||||||
prered = temp1 * temp1 + temp2 * temp2 / p5;
|
prered = temp1 + temp2 / p5;
|
||||||
dirder = -(temp1 * temp1 + temp2 * temp2);
|
dirder = -(temp1 + temp2);
|
||||||
|
|
||||||
/* compute the ratio of the actual to the predicted */
|
/* compute the ratio of the actual to the predicted */
|
||||||
/* reduction. */
|
/* reduction. */
|
||||||
|
@ -284,11 +284,11 @@ L240:
|
|||||||
}
|
}
|
||||||
/* L270: */
|
/* L270: */
|
||||||
}
|
}
|
||||||
temp1 = ei_enorm<Scalar>(n, &wa3[1]) / fnorm;
|
temp1 = ei_abs2(ei_enorm<Scalar>(n, &wa3[1]) / fnorm);
|
||||||
temp2 = ei_sqrt(par) * pnorm / fnorm;
|
temp2 = ei_abs2( ei_sqrt(par) * pnorm / fnorm);
|
||||||
/* Computing 2nd power */
|
/* Computing 2nd power */
|
||||||
prered = temp1 * temp1 + temp2 * temp2 / p5;
|
prered = temp1 + temp2 / p5;
|
||||||
dirder = -(temp1 * temp1 + temp2 * temp2);
|
dirder = -(temp1 + temp2);
|
||||||
|
|
||||||
/* compute the ratio of the actual to the predicted */
|
/* compute the ratio of the actual to the predicted */
|
||||||
/* reduction. */
|
/* reduction. */
|
||||||
|
Loading…
x
Reference in New Issue
Block a user