\sqrt{0.5 \cdot \left(1 + \frac{x}{\sqrt{\left(4 \cdot p\right) \cdot p + x \cdot x}}\right)}\begin{array}{l}
\mathbf{if}\;x \le -1.727158006251015 \cdot 10^{-119}:\\
\;\;\;\;\sqrt{0.5 \cdot \frac{{1}^{3} + {\left(\frac{x}{\sqrt{\left(4 \cdot p\right) \cdot p + x \cdot x}}\right)}^{3}}{1 \cdot \left(1 - \frac{x}{{\left(e^{\sqrt[3]{\log \left(\sqrt{\left(4 \cdot p\right) \cdot p + x \cdot x}\right)} \cdot \sqrt[3]{\log \left(\sqrt{\left(4 \cdot p\right) \cdot p + x \cdot x}\right)}}\right)}^{\left(\sqrt[3]{\log \left(\sqrt{\left(4 \cdot p\right) \cdot p + x \cdot x}\right)}\right)}}\right) + \frac{x \cdot x}{\left(4 \cdot p\right) \cdot p + x \cdot x}}}\\
\mathbf{else}:\\
\;\;\;\;\sqrt{0.5 \cdot \left(1 + \frac{x}{\left|\sqrt[3]{\left(4 \cdot p\right) \cdot p + x \cdot x}\right| \cdot \sqrt{\sqrt[3]{\left(4 \cdot p\right) \cdot p + x \cdot x}}}\right)}\\
\end{array}double code(double p, double x) {
return ((double) sqrt(((double) (0.5 * ((double) (1.0 + ((double) (x / ((double) sqrt(((double) (((double) (((double) (4.0 * p)) * p)) + ((double) (x * x))))))))))))));
}
double code(double p, double x) {
double VAR;
if ((x <= -1.727158006251015e-119)) {
VAR = ((double) sqrt(((double) (0.5 * ((double) (((double) (((double) pow(1.0, 3.0)) + ((double) pow(((double) (x / ((double) sqrt(((double) (((double) (((double) (4.0 * p)) * p)) + ((double) (x * x)))))))), 3.0)))) / ((double) (((double) (1.0 * ((double) (1.0 - ((double) (x / ((double) pow(((double) exp(((double) (((double) cbrt(((double) log(((double) sqrt(((double) (((double) (((double) (4.0 * p)) * p)) + ((double) (x * x)))))))))) * ((double) cbrt(((double) log(((double) sqrt(((double) (((double) (((double) (4.0 * p)) * p)) + ((double) (x * x)))))))))))))), ((double) cbrt(((double) log(((double) sqrt(((double) (((double) (((double) (4.0 * p)) * p)) + ((double) (x * x)))))))))))))))))) + ((double) (((double) (x * x)) / ((double) (((double) (((double) (4.0 * p)) * p)) + ((double) (x * x))))))))))))));
} else {
VAR = ((double) sqrt(((double) (0.5 * ((double) (1.0 + ((double) (x / ((double) (((double) fabs(((double) cbrt(((double) (((double) (((double) (4.0 * p)) * p)) + ((double) (x * x)))))))) * ((double) sqrt(((double) cbrt(((double) (((double) (((double) (4.0 * p)) * p)) + ((double) (x * x))))))))))))))))));
}
return VAR;
}




Bits error versus p




Bits error versus x
Results
| Original | 13.4 |
|---|---|
| Target | 13.4 |
| Herbie | 13.5 |
if x < -1.727158006251015e-119Initial program 28.4
rmApplied flip3-+28.4
Simplified28.4
rmApplied add-exp-log28.4
rmApplied add-cube-cbrt28.4
Applied exp-prod28.4
if -1.727158006251015e-119 < x Initial program 1.6
rmApplied add-cube-cbrt1.7
Applied sqrt-prod1.7
Simplified1.7
Final simplification13.5
herbie shell --seed 2020174
(FPCore (p x)
:name "Given's Rotation SVD example"
:precision binary64
:pre (< 1e-150 (fabs x) 1e+150)
:herbie-target
(sqrt (+ 0.5 (/ (copysign 0.5 x) (hypot 1.0 (/ (* 2.0 p) x)))))
(sqrt (* 0.5 (+ 1.0 (/ x (sqrt (+ (* (* 4.0 p) p) (* x x))))))))