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.940844341770915 \cdot 10^{-249}:\\
\;\;\;\;\sqrt{2.0 \cdot \frac{im \cdot im}{\sqrt{im \cdot im + re \cdot re} - re}} \cdot 0.5\\
\mathbf{elif}\;re \le 1.0730314248253915 \cdot 10^{-288}:\\
\;\;\;\;\sqrt{2.0 \cdot \left(im + re\right)} \cdot 0.5\\
\mathbf{elif}\;re \le 2.1282394422164936 \cdot 10^{+111}:\\
\;\;\;\;0.5 \cdot \sqrt{2.0 \cdot \left(re + \sqrt{im \cdot im + re \cdot re}\right)}\\
\mathbf{else}:\\
\;\;\;\;0.5 \cdot \sqrt{\left(re + re\right) \cdot 2.0}\\
\end{array}double f(double re, double im) {
double r6235375 = 0.5;
double r6235376 = 2.0;
double r6235377 = re;
double r6235378 = r6235377 * r6235377;
double r6235379 = im;
double r6235380 = r6235379 * r6235379;
double r6235381 = r6235378 + r6235380;
double r6235382 = sqrt(r6235381);
double r6235383 = r6235382 + r6235377;
double r6235384 = r6235376 * r6235383;
double r6235385 = sqrt(r6235384);
double r6235386 = r6235375 * r6235385;
return r6235386;
}
double f(double re, double im) {
double r6235387 = re;
double r6235388 = -1.940844341770915e-249;
bool r6235389 = r6235387 <= r6235388;
double r6235390 = 2.0;
double r6235391 = im;
double r6235392 = r6235391 * r6235391;
double r6235393 = r6235387 * r6235387;
double r6235394 = r6235392 + r6235393;
double r6235395 = sqrt(r6235394);
double r6235396 = r6235395 - r6235387;
double r6235397 = r6235392 / r6235396;
double r6235398 = r6235390 * r6235397;
double r6235399 = sqrt(r6235398);
double r6235400 = 0.5;
double r6235401 = r6235399 * r6235400;
double r6235402 = 1.0730314248253915e-288;
bool r6235403 = r6235387 <= r6235402;
double r6235404 = r6235391 + r6235387;
double r6235405 = r6235390 * r6235404;
double r6235406 = sqrt(r6235405);
double r6235407 = r6235406 * r6235400;
double r6235408 = 2.1282394422164936e+111;
bool r6235409 = r6235387 <= r6235408;
double r6235410 = r6235387 + r6235395;
double r6235411 = r6235390 * r6235410;
double r6235412 = sqrt(r6235411);
double r6235413 = r6235400 * r6235412;
double r6235414 = r6235387 + r6235387;
double r6235415 = r6235414 * r6235390;
double r6235416 = sqrt(r6235415);
double r6235417 = r6235400 * r6235416;
double r6235418 = r6235409 ? r6235413 : r6235417;
double r6235419 = r6235403 ? r6235407 : r6235418;
double r6235420 = r6235389 ? r6235401 : r6235419;
return r6235420;
}




Bits error versus re




Bits error versus im
Results
| Original | 37.2 |
|---|---|
| Target | 32.4 |
| Herbie | 25.7 |
if re < -1.940844341770915e-249Initial program 46.4
rmApplied add-sqr-sqrt47.0
rmApplied flip-+47.0
Simplified35.6
Simplified35.6
if -1.940844341770915e-249 < re < 1.0730314248253915e-288Initial program 30.2
rmApplied add-sqr-sqrt30.3
Taylor expanded around 0 29.6
if 1.0730314248253915e-288 < re < 2.1282394422164936e+111Initial program 19.4
if 2.1282394422164936e+111 < re Initial program 50.2
Taylor expanded around inf 9.9
Final simplification25.7
herbie shell --seed 2019137
(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)))))