1 - \sqrt{0.5 \cdot \left(1 + \frac{1}{\mathsf{hypot}\left(1, x\right)}\right)}\begin{array}{l}
\mathbf{if}\;x \le -0.0023638476354078493:\\
\;\;\;\;\frac{\mathsf{fma}\left(-0.5, 1 + \sqrt[3]{{\left(\frac{1}{\mathsf{hypot}\left(1, x\right)}\right)}^{3}}, 1 \cdot 1\right)}{1 + \sqrt{0.5 \cdot \left(1 + \frac{1}{\mathsf{hypot}\left(1, x\right)}\right)}}\\
\mathbf{elif}\;x \le 0.001099911291066277:\\
\;\;\;\;\frac{\mathsf{fma}\left(0.25, \frac{{x}^{2}}{{\left(\sqrt{1}\right)}^{3}}, 0.5 - \mathsf{fma}\left(0.5, \frac{1}{\sqrt{1}}, 0.1875 \cdot \frac{{x}^{4}}{{\left(\sqrt{1}\right)}^{5}}\right)\right)}{1 + \sqrt{0.5 \cdot \left(1 + \frac{1}{\mathsf{hypot}\left(1, x\right)}\right)}}\\
\mathbf{else}:\\
\;\;\;\;\frac{\mathsf{fma}\left(-0.5, 1 + \frac{1}{\mathsf{hypot}\left(1, x\right)}, 1 \cdot 1\right)}{\mathsf{expm1}\left(\mathsf{expm1}\left(\mathsf{log1p}\left(\mathsf{log1p}\left(1 + \sqrt{0.5 \cdot \left(1 + \frac{1}{\mathsf{hypot}\left(1, x\right)}\right)}\right)\right)\right)\right)}\\
\end{array}double code(double x) {
return (1.0 - sqrt((0.5 * (1.0 + (1.0 / hypot(1.0, x))))));
}
double code(double x) {
double temp;
if ((x <= -0.0023638476354078493)) {
temp = (fma(-0.5, (1.0 + cbrt(pow((1.0 / hypot(1.0, x)), 3.0))), (1.0 * 1.0)) / (1.0 + sqrt((0.5 * (1.0 + (1.0 / hypot(1.0, x)))))));
} else {
double temp_1;
if ((x <= 0.0010999112910662773)) {
temp_1 = (fma(0.25, (pow(x, 2.0) / pow(sqrt(1.0), 3.0)), (0.5 - fma(0.5, (1.0 / sqrt(1.0)), (0.1875 * (pow(x, 4.0) / pow(sqrt(1.0), 5.0)))))) / (1.0 + sqrt((0.5 * (1.0 + (1.0 / hypot(1.0, x)))))));
} else {
temp_1 = (fma(-0.5, (1.0 + (1.0 / hypot(1.0, x))), (1.0 * 1.0)) / expm1(expm1(log1p(log1p((1.0 + sqrt((0.5 * (1.0 + (1.0 / hypot(1.0, x)))))))))));
}
temp = temp_1;
}
return temp;
}



Bits error versus x
Results
if x < -0.0023638476354078493Initial program 1.0
rmApplied flip--1.0
Simplified0.1
rmApplied add-cbrt-cube0.1
Applied add-cbrt-cube0.1
Applied cbrt-undiv0.1
Simplified0.1
if -0.0023638476354078493 < x < 0.0010999112910662773Initial program 30.1
rmApplied flip--30.1
Simplified30.1
Taylor expanded around 0 30.1
Simplified0.3
if 0.0010999112910662773 < x Initial program 1.1
rmApplied flip--1.1
Simplified0.1
rmApplied expm1-log1p-u0.1
rmApplied expm1-log1p-u0.1
Final simplification0.2
herbie shell --seed 2020057 +o rules:numerics
(FPCore (x)
:name "Given's Rotation SVD example, simplified"
:precision binary64
(- 1 (sqrt (* 0.5 (+ 1 (/ 1 (hypot 1 x)))))))