0.5 \cdot \sqrt{2 \cdot \left(\sqrt{re \cdot re + im \cdot im} + re\right)}\begin{array}{l}
\mathbf{if}\;im \le -9.3593015844798508 \cdot 10^{-102}:\\
\;\;\;\;0.5 \cdot \sqrt{2 \cdot \frac{im \cdot im}{\sqrt{re \cdot re + im \cdot im} - re}}\\
\mathbf{elif}\;im \le 6.3025732191472324 \cdot 10^{-144}:\\
\;\;\;\;0.5 \cdot \sqrt{2 \cdot \left(re + re\right)}\\
\mathbf{elif}\;im \le 5.02207224652285003 \cdot 10^{121}:\\
\;\;\;\;0.5 \cdot \sqrt{2 \cdot \frac{im \cdot im}{\sqrt{re \cdot re + im \cdot im} - re}}\\
\mathbf{else}:\\
\;\;\;\;0.5 \cdot \sqrt{2 \cdot \left(im + re\right)}\\
\end{array}double code(double re, double im) {
return ((double) (0.5 * ((double) sqrt(((double) (2.0 * ((double) (((double) sqrt(((double) (((double) (re * re)) + ((double) (im * im)))))) + re))))))));
}
double code(double re, double im) {
double VAR;
if ((im <= -9.359301584479851e-102)) {
VAR = ((double) (0.5 * ((double) sqrt(((double) (2.0 * ((double) (((double) (im * im)) / ((double) (((double) sqrt(((double) (((double) (re * re)) + ((double) (im * im)))))) - re))))))))));
} else {
double VAR_1;
if ((im <= 6.302573219147232e-144)) {
VAR_1 = ((double) (0.5 * ((double) sqrt(((double) (2.0 * ((double) (re + re))))))));
} else {
double VAR_2;
if ((im <= 5.02207224652285e+121)) {
VAR_2 = ((double) (0.5 * ((double) sqrt(((double) (2.0 * ((double) (((double) (im * im)) / ((double) (((double) sqrt(((double) (((double) (re * re)) + ((double) (im * im)))))) - re))))))))));
} else {
VAR_2 = ((double) (0.5 * ((double) sqrt(((double) (2.0 * ((double) (im + re))))))));
}
VAR_1 = VAR_2;
}
VAR = VAR_1;
}
return VAR;
}




Bits error versus re




Bits error versus im
Results
| Original | 39.0 |
|---|---|
| Target | 33.8 |
| Herbie | 30.0 |
if im < -9.3593015844798508e-102 or 6.3025732191472324e-144 < im < 5.02207224652285003e121Initial program 32.9
rmApplied flip-+38.5
Simplified32.7
if -9.3593015844798508e-102 < im < 6.3025732191472324e-144Initial program 41.0
Taylor expanded around inf 36.3
if 5.02207224652285003e121 < im Initial program 56.1
Taylor expanded around 0 8.4
Final simplification30.0
herbie shell --seed 2020153
(FPCore (re im)
:name "math.sqrt on complex, real part"
:precision binary64
:herbie-target
(if (< re 0.0) (* 0.5 (* (sqrt 2.0) (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)))))