1 - \sqrt{0.5 \cdot \left(1 + \frac{1}{\mathsf{hypot}\left(1, x\right)}\right)}\begin{array}{l}
\mathbf{if}\;x \le -0.002868545148168478477190834752263981499709:\\
\;\;\;\;e^{\log \left(\frac{\log \left(e^{\mathsf{fma}\left(-0.5, 1 + \frac{1}{\mathsf{hypot}\left(1, x\right)}, 1 \cdot 1\right)}\right)}{{1}^{3} + {\left(\sqrt{0.5 \cdot \left(1 + \frac{1}{\mathsf{hypot}\left(1, x\right)}\right)}\right)}^{3}} \cdot \left(1 \cdot 1 + \left(\sqrt{0.5 \cdot \left(1 + \frac{1}{\mathsf{hypot}\left(1, x\right)}\right)} \cdot \sqrt{0.5 \cdot \left(1 + \frac{1}{\mathsf{hypot}\left(1, x\right)}\right)} - 1 \cdot \sqrt{0.5 \cdot \left(1 + \frac{1}{\mathsf{hypot}\left(1, x\right)}\right)}\right)\right)\right)}\\
\mathbf{elif}\;x \le 0.001343291758330285214778632152388126996811:\\
\;\;\;\;\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}:\\
\;\;\;\;e^{\log \left(\frac{\mathsf{fma}\left(-0.5, 1 + \frac{1}{\mathsf{hypot}\left(1, x\right)}, 1 \cdot 1\right)}{{1}^{3} + {\left(\sqrt{0.5 \cdot \left(1 + \frac{1}{\mathsf{hypot}\left(1, x\right)}\right)}\right)}^{3}} \cdot \left(1 \cdot 1 + \left(\sqrt{0.5 \cdot \left(1 + \frac{1}{\mathsf{hypot}\left(1, x\right)}\right)} \cdot \sqrt{0.5 \cdot \left(1 + \frac{1}{\mathsf{hypot}\left(1, x\right)}\right)} - 1 \cdot \sqrt{0.5 \cdot \left(1 + \frac{1}{\mathsf{hypot}\left(1, x\right)}\right)}\right)\right)\right)}\\
\end{array}double f(double x) {
double r383986 = 1.0;
double r383987 = 0.5;
double r383988 = x;
double r383989 = hypot(r383986, r383988);
double r383990 = r383986 / r383989;
double r383991 = r383986 + r383990;
double r383992 = r383987 * r383991;
double r383993 = sqrt(r383992);
double r383994 = r383986 - r383993;
return r383994;
}
double f(double x) {
double r383995 = x;
double r383996 = -0.0028685451481684785;
bool r383997 = r383995 <= r383996;
double r383998 = 0.5;
double r383999 = -r383998;
double r384000 = 1.0;
double r384001 = hypot(r384000, r383995);
double r384002 = r384000 / r384001;
double r384003 = r384000 + r384002;
double r384004 = r384000 * r384000;
double r384005 = fma(r383999, r384003, r384004);
double r384006 = exp(r384005);
double r384007 = log(r384006);
double r384008 = 3.0;
double r384009 = pow(r384000, r384008);
double r384010 = r383998 * r384003;
double r384011 = sqrt(r384010);
double r384012 = pow(r384011, r384008);
double r384013 = r384009 + r384012;
double r384014 = r384007 / r384013;
double r384015 = r384011 * r384011;
double r384016 = r384000 * r384011;
double r384017 = r384015 - r384016;
double r384018 = r384004 + r384017;
double r384019 = r384014 * r384018;
double r384020 = log(r384019);
double r384021 = exp(r384020);
double r384022 = 0.0013432917583302852;
bool r384023 = r383995 <= r384022;
double r384024 = 0.25;
double r384025 = 2.0;
double r384026 = pow(r383995, r384025);
double r384027 = sqrt(r384000);
double r384028 = pow(r384027, r384008);
double r384029 = r384026 / r384028;
double r384030 = 1.0;
double r384031 = r384030 / r384027;
double r384032 = 0.1875;
double r384033 = 4.0;
double r384034 = pow(r383995, r384033);
double r384035 = 5.0;
double r384036 = pow(r384027, r384035);
double r384037 = r384034 / r384036;
double r384038 = r384032 * r384037;
double r384039 = fma(r383998, r384031, r384038);
double r384040 = r383998 - r384039;
double r384041 = fma(r384024, r384029, r384040);
double r384042 = r384000 + r384011;
double r384043 = r384041 / r384042;
double r384044 = r384005 / r384013;
double r384045 = r384044 * r384018;
double r384046 = log(r384045);
double r384047 = exp(r384046);
double r384048 = r384023 ? r384043 : r384047;
double r384049 = r383997 ? r384021 : r384048;
return r384049;
}



Bits error versus x
if x < -0.0028685451481684785Initial program 1.0
rmApplied flip--1.0
Simplified0.1
rmApplied add-exp-log0.1
Applied add-exp-log0.1
Applied div-exp0.1
Simplified0.1
rmApplied flip3-+1.0
Applied associate-/r/0.1
rmApplied add-log-exp0.1
if -0.0028685451481684785 < x < 0.0013432917583302852Initial program 31.1
rmApplied flip--31.1
Simplified31.1
Taylor expanded around 0 31.1
Simplified0.2
if 0.0013432917583302852 < x Initial program 1.0
rmApplied flip--1.0
Simplified0.1
rmApplied add-exp-log0.1
Applied add-exp-log0.1
Applied div-exp0.1
Simplified0.1
rmApplied flip3-+1.0
Applied associate-/r/0.1
Final simplification0.2
herbie shell --seed 2019353 +o rules:numerics
(FPCore (x)
:name "Given's Rotation SVD example, simplified"
:precision binary64
(- 1 (sqrt (* 0.5 (+ 1 (/ 1 (hypot 1 x)))))))