0.5 \cdot \sqrt{2 \cdot \left(\sqrt{re \cdot re + im \cdot im} - re\right)}\begin{array}{l}
\mathbf{if}\;re \leq -1.7420198540505493 \cdot 10^{+120}:\\
\;\;\;\;0.5 \cdot \sqrt{2 \cdot \left(re \cdot -2\right)}\\
\mathbf{elif}\;re \leq -3.1008566105069403 \cdot 10^{-26}:\\
\;\;\;\;0.5 \cdot \sqrt{2 \cdot \left(\sqrt{\sqrt{re \cdot re + im \cdot im}} \cdot \sqrt{\sqrt{re \cdot re + im \cdot im}} - re\right)}\\
\mathbf{elif}\;re \leq 1.34708212277854 \cdot 10^{-86}:\\
\;\;\;\;0.5 \cdot \sqrt{2 \cdot \left(im - re\right)}\\
\mathbf{elif}\;re \leq 4.1896358337725134 \cdot 10^{-17}:\\
\;\;\;\;0.5 \cdot \sqrt{2 \cdot \frac{im \cdot im}{re + \sqrt{re \cdot re + im \cdot im}}}\\
\mathbf{elif}\;re \leq 4.275965298853293 \cdot 10^{+229}:\\
\;\;\;\;0.5 \cdot \sqrt{2 \cdot \left(im - re\right)}\\
\mathbf{else}:\\
\;\;\;\;0.5 \cdot 0\\
\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 ((re <= -1.7420198540505493e+120)) {
VAR = ((double) (0.5 * ((double) sqrt(((double) (2.0 * ((double) (re * -2.0))))))));
} else {
double VAR_1;
if ((re <= -3.1008566105069403e-26)) {
VAR_1 = ((double) (0.5 * ((double) sqrt(((double) (2.0 * ((double) (((double) (((double) sqrt(((double) sqrt(((double) (((double) (re * re)) + ((double) (im * im)))))))) * ((double) sqrt(((double) sqrt(((double) (((double) (re * re)) + ((double) (im * im)))))))))) - re))))))));
} else {
double VAR_2;
if ((re <= 1.34708212277854e-86)) {
VAR_2 = ((double) (0.5 * ((double) sqrt(((double) (2.0 * ((double) (im - re))))))));
} else {
double VAR_3;
if ((re <= 4.1896358337725134e-17)) {
VAR_3 = ((double) (0.5 * ((double) sqrt(((double) (2.0 * (((double) (im * im)) / ((double) (re + ((double) sqrt(((double) (((double) (re * re)) + ((double) (im * im)))))))))))))));
} else {
double VAR_4;
if ((re <= 4.275965298853293e+229)) {
VAR_4 = ((double) (0.5 * ((double) sqrt(((double) (2.0 * ((double) (im - re))))))));
} else {
VAR_4 = ((double) (0.5 * 0.0));
}
VAR_3 = VAR_4;
}
VAR_2 = VAR_3;
}
VAR_1 = VAR_2;
}
VAR = VAR_1;
}
return VAR;
}



Bits error versus re



Bits error versus im
Results
if re < -1.7420198540505493e120Initial program 56.1
Taylor expanded around -inf 9.4
Simplified9.4
if -1.7420198540505493e120 < re < -3.1008566105069403e-26Initial program 15.0
rmApplied add-sqr-sqrt15.0
Applied sqrt-prod15.1
if -3.1008566105069403e-26 < re < 1.34708212277854e-86 or 4.189635833772513e-17 < re < 4.275965298853293e229Initial program 36.3
Taylor expanded around 0 22.0
if 1.34708212277854e-86 < re < 4.189635833772513e-17Initial program 40.5
rmApplied flip--40.5
Simplified30.7
Simplified30.7
if 4.275965298853293e229 < re Initial program 64.0
Taylor expanded around inf 47.0
Final simplification21.3
herbie shell --seed 2020199
(FPCore (re im)
:name "math.sqrt on complex, imaginary part, im greater than 0 branch"
:precision binary64
:pre (> im 0.0)
(* 0.5 (sqrt (* 2.0 (- (sqrt (+ (* re re) (* im im))) re)))))