\sqrt{re \cdot re + im \cdot im}\begin{array}{l}
\mathbf{if}\;re \le -1.1749852319542656 \cdot 10^{+99}:\\
\;\;\;\;-re\\
\mathbf{elif}\;re \le 6.852760898293699 \cdot 10^{+140}:\\
\;\;\;\;\sqrt{im \cdot im + re \cdot re}\\
\mathbf{else}:\\
\;\;\;\;re\\
\end{array}double f(double re, double im) {
double r1099711 = re;
double r1099712 = r1099711 * r1099711;
double r1099713 = im;
double r1099714 = r1099713 * r1099713;
double r1099715 = r1099712 + r1099714;
double r1099716 = sqrt(r1099715);
return r1099716;
}
double f(double re, double im) {
double r1099717 = re;
double r1099718 = -1.1749852319542656e+99;
bool r1099719 = r1099717 <= r1099718;
double r1099720 = -r1099717;
double r1099721 = 6.852760898293699e+140;
bool r1099722 = r1099717 <= r1099721;
double r1099723 = im;
double r1099724 = r1099723 * r1099723;
double r1099725 = r1099717 * r1099717;
double r1099726 = r1099724 + r1099725;
double r1099727 = sqrt(r1099726);
double r1099728 = r1099722 ? r1099727 : r1099717;
double r1099729 = r1099719 ? r1099720 : r1099728;
return r1099729;
}



Bits error versus re



Bits error versus im
Results
if re < -1.1749852319542656e+99Initial program 46.9
Taylor expanded around -inf 10.4
Simplified10.4
if -1.1749852319542656e+99 < re < 6.852760898293699e+140Initial program 20.3
if 6.852760898293699e+140 < re Initial program 55.8
Taylor expanded around inf 7.9
Final simplification16.9
herbie shell --seed 2019107
(FPCore (re im)
:name "math.abs on complex"
(sqrt (+ (* re re) (* im im))))