0.5 \cdot \sqrt{2.0 \cdot \left(\sqrt{re \cdot re + im \cdot im} + re\right)}\begin{array}{l}
\mathbf{if}\;re \le -1.0974932438808633 \cdot 10^{+26}:\\
\;\;\;\;\frac{\sqrt{\left(im \cdot im\right) \cdot 2.0}}{\sqrt{\sqrt{im \cdot im + re \cdot re} - re}} \cdot 0.5\\
\mathbf{elif}\;re \le -4.4945327826415316 \cdot 10^{-20}:\\
\;\;\;\;\sqrt{\left(re + im\right) \cdot 2.0} \cdot 0.5\\
\mathbf{elif}\;re \le -7.961223836723572 \cdot 10^{-96}:\\
\;\;\;\;0.5 \cdot \sqrt{2.0 \cdot \frac{im \cdot im}{\sqrt{im \cdot im + re \cdot re} - re}}\\
\mathbf{elif}\;re \le -2.538815066158378 \cdot 10^{-267}:\\
\;\;\;\;\sqrt{\left(re + im\right) \cdot 2.0} \cdot 0.5\\
\mathbf{elif}\;re \le 1.8791426213625292 \cdot 10^{+66}:\\
\;\;\;\;\sqrt{\left(re + \sqrt{im \cdot im + re \cdot re}\right) \cdot 2.0} \cdot 0.5\\
\mathbf{else}:\\
\;\;\;\;\sqrt{\left(re + re\right) \cdot 2.0} \cdot 0.5\\
\end{array}double f(double re, double im) {
double r7714269 = 0.5;
double r7714270 = 2.0;
double r7714271 = re;
double r7714272 = r7714271 * r7714271;
double r7714273 = im;
double r7714274 = r7714273 * r7714273;
double r7714275 = r7714272 + r7714274;
double r7714276 = sqrt(r7714275);
double r7714277 = r7714276 + r7714271;
double r7714278 = r7714270 * r7714277;
double r7714279 = sqrt(r7714278);
double r7714280 = r7714269 * r7714279;
return r7714280;
}
double f(double re, double im) {
double r7714281 = re;
double r7714282 = -1.0974932438808633e+26;
bool r7714283 = r7714281 <= r7714282;
double r7714284 = im;
double r7714285 = r7714284 * r7714284;
double r7714286 = 2.0;
double r7714287 = r7714285 * r7714286;
double r7714288 = sqrt(r7714287);
double r7714289 = r7714281 * r7714281;
double r7714290 = r7714285 + r7714289;
double r7714291 = sqrt(r7714290);
double r7714292 = r7714291 - r7714281;
double r7714293 = sqrt(r7714292);
double r7714294 = r7714288 / r7714293;
double r7714295 = 0.5;
double r7714296 = r7714294 * r7714295;
double r7714297 = -4.4945327826415316e-20;
bool r7714298 = r7714281 <= r7714297;
double r7714299 = r7714281 + r7714284;
double r7714300 = r7714299 * r7714286;
double r7714301 = sqrt(r7714300);
double r7714302 = r7714301 * r7714295;
double r7714303 = -7.961223836723572e-96;
bool r7714304 = r7714281 <= r7714303;
double r7714305 = r7714285 / r7714292;
double r7714306 = r7714286 * r7714305;
double r7714307 = sqrt(r7714306);
double r7714308 = r7714295 * r7714307;
double r7714309 = -2.538815066158378e-267;
bool r7714310 = r7714281 <= r7714309;
double r7714311 = 1.8791426213625292e+66;
bool r7714312 = r7714281 <= r7714311;
double r7714313 = r7714281 + r7714291;
double r7714314 = r7714313 * r7714286;
double r7714315 = sqrt(r7714314);
double r7714316 = r7714315 * r7714295;
double r7714317 = r7714281 + r7714281;
double r7714318 = r7714317 * r7714286;
double r7714319 = sqrt(r7714318);
double r7714320 = r7714319 * r7714295;
double r7714321 = r7714312 ? r7714316 : r7714320;
double r7714322 = r7714310 ? r7714302 : r7714321;
double r7714323 = r7714304 ? r7714308 : r7714322;
double r7714324 = r7714298 ? r7714302 : r7714323;
double r7714325 = r7714283 ? r7714296 : r7714324;
return r7714325;
}




Bits error versus re




Bits error versus im
Results
| Original | 37.3 |
|---|---|
| Target | 32.5 |
| Herbie | 26.9 |
if re < -1.0974932438808633e+26Initial program 56.7
rmApplied add-exp-log59.1
rmApplied flip-+59.1
Applied associate-*r/59.1
Applied sqrt-div59.1
Simplified39.5
Simplified38.8
if -1.0974932438808633e+26 < re < -4.4945327826415316e-20 or -7.961223836723572e-96 < re < -2.538815066158378e-267Initial program 33.8
rmApplied add-exp-log35.7
Taylor expanded around 0 38.9
if -4.4945327826415316e-20 < re < -7.961223836723572e-96Initial program 38.9
rmApplied flip-+38.9
Simplified28.1
if -2.538815066158378e-267 < re < 1.8791426213625292e+66Initial program 21.6
if 1.8791426213625292e+66 < re Initial program 45.6
Taylor expanded around inf 11.6
Final simplification26.9
herbie shell --seed 2019163
(FPCore (re im)
:name "math.sqrt on complex, real part"
:herbie-target
(if (< re 0) (* 0.5 (* (sqrt 2) (sqrt (/ (* im im) (- (sqrt (+ (* re re) (* im im))) re))))) (* 0.5 (sqrt (* 2.0 (+ (sqrt (+ (* re re) (* im im))) re)))))
(* 0.5 (sqrt (* 2.0 (+ (sqrt (+ (* re re) (* im im))) re)))))