0.5 \cdot \sqrt{2 \cdot \left(\sqrt{re \cdot re + im \cdot im} + re\right)}\begin{array}{l}
\mathbf{if}\;re \le -5.30337460350832072 \cdot 10^{-234}:\\
\;\;\;\;0.5 \cdot \sqrt{2 \cdot \frac{im \cdot im}{\sqrt{re \cdot re + im \cdot im} - re}}\\
\mathbf{elif}\;re \le 1.164285257168749 \cdot 10^{137}:\\
\;\;\;\;0.5 \cdot \sqrt{2 \cdot \left(\sqrt{re \cdot re + im \cdot im} + re\right)}\\
\mathbf{else}:\\
\;\;\;\;0.5 \cdot \sqrt{2 \cdot \left(2 \cdot re\right)}\\
\end{array}double f(double re, double im) {
double r168488 = 0.5;
double r168489 = 2.0;
double r168490 = re;
double r168491 = r168490 * r168490;
double r168492 = im;
double r168493 = r168492 * r168492;
double r168494 = r168491 + r168493;
double r168495 = sqrt(r168494);
double r168496 = r168495 + r168490;
double r168497 = r168489 * r168496;
double r168498 = sqrt(r168497);
double r168499 = r168488 * r168498;
return r168499;
}
double f(double re, double im) {
double r168500 = re;
double r168501 = -5.303374603508321e-234;
bool r168502 = r168500 <= r168501;
double r168503 = 0.5;
double r168504 = 2.0;
double r168505 = im;
double r168506 = r168505 * r168505;
double r168507 = r168500 * r168500;
double r168508 = r168507 + r168506;
double r168509 = sqrt(r168508);
double r168510 = r168509 - r168500;
double r168511 = r168506 / r168510;
double r168512 = r168504 * r168511;
double r168513 = sqrt(r168512);
double r168514 = r168503 * r168513;
double r168515 = 1.164285257168749e+137;
bool r168516 = r168500 <= r168515;
double r168517 = r168509 + r168500;
double r168518 = r168504 * r168517;
double r168519 = sqrt(r168518);
double r168520 = r168503 * r168519;
double r168521 = 2.0;
double r168522 = r168521 * r168500;
double r168523 = r168504 * r168522;
double r168524 = sqrt(r168523);
double r168525 = r168503 * r168524;
double r168526 = r168516 ? r168520 : r168525;
double r168527 = r168502 ? r168514 : r168526;
return r168527;
}




Bits error versus re




Bits error versus im
Results
| Original | 38.4 |
|---|---|
| Target | 33.1 |
| Herbie | 26.3 |
if re < -5.303374603508321e-234Initial program 47.0
rmApplied flip-+47.0
Simplified35.3
if -5.303374603508321e-234 < re < 1.164285257168749e+137Initial program 22.1
if 1.164285257168749e+137 < re Initial program 59.1
Taylor expanded around inf 9.1
Final simplification26.3
herbie shell --seed 2020024
(FPCore (re im)
:name "math.sqrt on complex, real part"
:precision binary64
:herbie-target
(if (< re 0.0) (* 0.5 (* (sqrt 2) (sqrt (/ (* im im) (- (sqrt (+ (* re re) (* im im))) re))))) (* 0.5 (sqrt (* 2 (+ (sqrt (+ (* re re) (* im im))) re)))))
(* 0.5 (sqrt (* 2 (+ (sqrt (+ (* re re) (* im im))) re)))))