\sqrt{re \cdot re + im \cdot im}\begin{array}{l}
\mathbf{if}\;re \le -2.94165857136038859 \cdot 10^{82}:\\
\;\;\;\;-1 \cdot re\\
\mathbf{elif}\;re \le 2.1505795000956337 \cdot 10^{57}:\\
\;\;\;\;\sqrt{re \cdot re + im \cdot im}\\
\mathbf{else}:\\
\;\;\;\;re\\
\end{array}double code(double re, double im) {
return ((double) sqrt(((double) (((double) (re * re)) + ((double) (im * im))))));
}
double code(double re, double im) {
double VAR;
if ((re <= -2.9416585713603886e+82)) {
VAR = ((double) (-1.0 * re));
} else {
double VAR_1;
if ((re <= 2.1505795000956337e+57)) {
VAR_1 = ((double) sqrt(((double) (((double) (re * re)) + ((double) (im * im))))));
} else {
VAR_1 = re;
}
VAR = VAR_1;
}
return VAR;
}



Bits error versus re



Bits error versus im
Results
if re < -2.94165857136038859e82Initial program 48.0
Taylor expanded around -inf 11.2
if -2.94165857136038859e82 < re < 2.1505795000956337e57Initial program 21.0
if 2.1505795000956337e57 < re Initial program 46.2
Taylor expanded around inf 11.0
Final simplification17.1
herbie shell --seed 2020162
(FPCore (re im)
:name "math.abs on complex"
:precision binary64
(sqrt (+ (* re re) (* im im))))