\sqrt{re \cdot re + im \cdot im}\begin{array}{l}
\mathbf{if}\;re \le -4.1094940511471951 \cdot 10^{119}:\\
\;\;\;\;-re\\
\mathbf{elif}\;re \le 1.1032025771158766 \cdot 10^{142}:\\
\;\;\;\;\sqrt{re \cdot re + im \cdot im}\\
\mathbf{else}:\\
\;\;\;\;re\\
\end{array}double f(double re, double im) {
double r68947 = re;
double r68948 = r68947 * r68947;
double r68949 = im;
double r68950 = r68949 * r68949;
double r68951 = r68948 + r68950;
double r68952 = sqrt(r68951);
return r68952;
}
double f(double re, double im) {
double r68953 = re;
double r68954 = -4.109494051147195e+119;
bool r68955 = r68953 <= r68954;
double r68956 = -r68953;
double r68957 = 1.1032025771158766e+142;
bool r68958 = r68953 <= r68957;
double r68959 = r68953 * r68953;
double r68960 = im;
double r68961 = r68960 * r68960;
double r68962 = r68959 + r68961;
double r68963 = sqrt(r68962);
double r68964 = r68958 ? r68963 : r68953;
double r68965 = r68955 ? r68956 : r68964;
return r68965;
}



Bits error versus re



Bits error versus im
Results
if re < -4.109494051147195e+119Initial program 55.2
Taylor expanded around -inf 9.8
Simplified9.8
if -4.109494051147195e+119 < re < 1.1032025771158766e+142Initial program 20.7
if 1.1032025771158766e+142 < re Initial program 60.2
Taylor expanded around inf 8.9
Final simplification17.4
herbie shell --seed 2020042
(FPCore (re im)
:name "math.abs on complex"
:precision binary64
(sqrt (+ (* re re) (* im im))))