\sqrt{re \cdot re + im \cdot im}\begin{array}{l}
\mathbf{if}\;re \le -6.15241991167455 \cdot 10^{+150}:\\
\;\;\;\;-re\\
\mathbf{elif}\;re \le 1.8791426213625292 \cdot 10^{+66}:\\
\;\;\;\;\sqrt{im \cdot im + re \cdot re}\\
\mathbf{else}:\\
\;\;\;\;re\\
\end{array}double f(double re, double im) {
double r1721013 = re;
double r1721014 = r1721013 * r1721013;
double r1721015 = im;
double r1721016 = r1721015 * r1721015;
double r1721017 = r1721014 + r1721016;
double r1721018 = sqrt(r1721017);
return r1721018;
}
double f(double re, double im) {
double r1721019 = re;
double r1721020 = -6.15241991167455e+150;
bool r1721021 = r1721019 <= r1721020;
double r1721022 = -r1721019;
double r1721023 = 1.8791426213625292e+66;
bool r1721024 = r1721019 <= r1721023;
double r1721025 = im;
double r1721026 = r1721025 * r1721025;
double r1721027 = r1721019 * r1721019;
double r1721028 = r1721026 + r1721027;
double r1721029 = sqrt(r1721028);
double r1721030 = r1721024 ? r1721029 : r1721019;
double r1721031 = r1721021 ? r1721022 : r1721030;
return r1721031;
}



Bits error versus re



Bits error versus im
Results
if re < -6.15241991167455e+150Initial program 58.2
Taylor expanded around -inf 7.7
Simplified7.7
if -6.15241991167455e+150 < re < 1.8791426213625292e+66Initial program 20.3
if 1.8791426213625292e+66 < re Initial program 44.2
Taylor expanded around inf 11.7
Final simplification17.1
herbie shell --seed 2019163
(FPCore (re im)
:name "math.abs on complex"
(sqrt (+ (* re re) (* im im))))