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 r384219 = 1.0;
double r384220 = 0.5;
double r384221 = x;
double r384222 = hypot(r384219, r384221);
double r384223 = r384219 / r384222;
double r384224 = r384219 + r384223;
double r384225 = r384220 * r384224;
double r384226 = sqrt(r384225);
double r384227 = r384219 - r384226;
return r384227;
}
double f(double x) {
double r384228 = x;
double r384229 = -0.0028685451481684785;
bool r384230 = r384228 <= r384229;
double r384231 = 0.5;
double r384232 = -r384231;
double r384233 = 1.0;
double r384234 = hypot(r384233, r384228);
double r384235 = r384233 / r384234;
double r384236 = r384233 + r384235;
double r384237 = r384233 * r384233;
double r384238 = fma(r384232, r384236, r384237);
double r384239 = exp(r384238);
double r384240 = log(r384239);
double r384241 = 3.0;
double r384242 = pow(r384233, r384241);
double r384243 = r384231 * r384236;
double r384244 = sqrt(r384243);
double r384245 = pow(r384244, r384241);
double r384246 = r384242 + r384245;
double r384247 = r384240 / r384246;
double r384248 = r384244 * r384244;
double r384249 = r384233 * r384244;
double r384250 = r384248 - r384249;
double r384251 = r384237 + r384250;
double r384252 = r384247 * r384251;
double r384253 = log(r384252);
double r384254 = exp(r384253);
double r384255 = 0.0013432917583302852;
bool r384256 = r384228 <= r384255;
double r384257 = 0.25;
double r384258 = 2.0;
double r384259 = pow(r384228, r384258);
double r384260 = sqrt(r384233);
double r384261 = pow(r384260, r384241);
double r384262 = r384259 / r384261;
double r384263 = 1.0;
double r384264 = r384263 / r384260;
double r384265 = 0.1875;
double r384266 = 4.0;
double r384267 = pow(r384228, r384266);
double r384268 = 5.0;
double r384269 = pow(r384260, r384268);
double r384270 = r384267 / r384269;
double r384271 = r384265 * r384270;
double r384272 = fma(r384231, r384264, r384271);
double r384273 = r384231 - r384272;
double r384274 = fma(r384257, r384262, r384273);
double r384275 = r384233 + r384244;
double r384276 = r384274 / r384275;
double r384277 = r384238 / r384246;
double r384278 = r384277 * r384251;
double r384279 = log(r384278);
double r384280 = exp(r384279);
double r384281 = r384256 ? r384276 : r384280;
double r384282 = r384230 ? r384254 : r384281;
return r384282;
}



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)))))))