1 - \sqrt{\frac{1}{2} \cdot \left(1 + \frac{1}{\mathsf{hypot}\left(1, x\right)}\right)}\begin{array}{l}
\mathbf{if}\;x \le -0.013043377732168978:\\
\;\;\;\;\frac{1 - \sqrt{\left(\frac{\frac{1}{2}}{\mathsf{hypot}\left(1, x\right)} + \frac{1}{2}\right) \cdot \sqrt{\frac{\frac{1}{2}}{\mathsf{hypot}\left(1, x\right)} + \frac{1}{2}}} \cdot \sqrt{{\left(\frac{\frac{1}{2}}{\mathsf{hypot}\left(1, x\right)} + \frac{1}{2}\right)}^{\frac{3}{2}}}}{\left(\left(\frac{\frac{1}{2}}{\mathsf{hypot}\left(1, x\right)} + \frac{1}{2}\right) + \sqrt{\frac{\frac{1}{2}}{\mathsf{hypot}\left(1, x\right)} + \frac{1}{2}}\right) + 1}\\
\mathbf{elif}\;x \le 0.01238224451402385:\\
\;\;\;\;\mathsf{fma}\left(\frac{1}{8}, x \cdot x, \mathsf{fma}\left(\left(\left(x \cdot x\right) \cdot \left(x \cdot x\right)\right) \cdot \left(x \cdot x\right), \frac{69}{1024}, \left(\left(x \cdot x\right) \cdot \left(x \cdot x\right)\right) \cdot \frac{-11}{128}\right)\right)\\
\mathbf{else}:\\
\;\;\;\;\frac{1 - \sqrt{\left(\frac{\frac{1}{2}}{\mathsf{hypot}\left(1, x\right)} + \frac{1}{2}\right) \cdot \sqrt{\frac{\frac{1}{2}}{\mathsf{hypot}\left(1, x\right)} + \frac{1}{2}}} \cdot \sqrt{{\left(\frac{\frac{1}{2}}{\mathsf{hypot}\left(1, x\right)} + \frac{1}{2}\right)}^{\frac{3}{2}}}}{\left(\left(\frac{\frac{1}{2}}{\mathsf{hypot}\left(1, x\right)} + \frac{1}{2}\right) + \sqrt{\frac{\frac{1}{2}}{\mathsf{hypot}\left(1, x\right)} + \frac{1}{2}}\right) + 1}\\
\end{array}double f(double x) {
double r7309441 = 1.0;
double r7309442 = 0.5;
double r7309443 = x;
double r7309444 = hypot(r7309441, r7309443);
double r7309445 = r7309441 / r7309444;
double r7309446 = r7309441 + r7309445;
double r7309447 = r7309442 * r7309446;
double r7309448 = sqrt(r7309447);
double r7309449 = r7309441 - r7309448;
return r7309449;
}
double f(double x) {
double r7309450 = x;
double r7309451 = -0.013043377732168978;
bool r7309452 = r7309450 <= r7309451;
double r7309453 = 1.0;
double r7309454 = 0.5;
double r7309455 = hypot(r7309453, r7309450);
double r7309456 = r7309454 / r7309455;
double r7309457 = r7309456 + r7309454;
double r7309458 = sqrt(r7309457);
double r7309459 = r7309457 * r7309458;
double r7309460 = sqrt(r7309459);
double r7309461 = 1.5;
double r7309462 = pow(r7309457, r7309461);
double r7309463 = sqrt(r7309462);
double r7309464 = r7309460 * r7309463;
double r7309465 = r7309453 - r7309464;
double r7309466 = r7309457 + r7309458;
double r7309467 = r7309466 + r7309453;
double r7309468 = r7309465 / r7309467;
double r7309469 = 0.01238224451402385;
bool r7309470 = r7309450 <= r7309469;
double r7309471 = 0.125;
double r7309472 = r7309450 * r7309450;
double r7309473 = r7309472 * r7309472;
double r7309474 = r7309473 * r7309472;
double r7309475 = 0.0673828125;
double r7309476 = -0.0859375;
double r7309477 = r7309473 * r7309476;
double r7309478 = fma(r7309474, r7309475, r7309477);
double r7309479 = fma(r7309471, r7309472, r7309478);
double r7309480 = r7309470 ? r7309479 : r7309468;
double r7309481 = r7309452 ? r7309468 : r7309480;
return r7309481;
}



Bits error versus x
if x < -0.013043377732168978 or 0.01238224451402385 < x Initial program 1.0
Simplified1.0
rmApplied flip3--1.6
Simplified1.0
Simplified0.1
rmApplied add-sqr-sqrt0.1
rmApplied pow10.1
Applied pow1/20.1
Applied pow-prod-up0.1
Simplified0.1
if -0.013043377732168978 < x < 0.01238224451402385Initial program 29.9
Simplified29.9
Taylor expanded around 0 0.0
Simplified0.0
Final simplification0.0
herbie shell --seed 2019164 +o rules:numerics
(FPCore (x)
:name "Given's Rotation SVD example, simplified"
(- 1 (sqrt (* 1/2 (+ 1 (/ 1 (hypot 1 x)))))))