\sqrt{re \cdot re + im \cdot im}\begin{array}{l}
\mathbf{if}\;re \le -6.380870002726310342811700587071868218435 \cdot 10^{59}:\\
\;\;\;\;-re\\
\mathbf{elif}\;re \le 2.566938280750767851167015199229297462562 \cdot 10^{114}:\\
\;\;\;\;\sqrt{re \cdot re + im \cdot im}\\
\mathbf{else}:\\
\;\;\;\;re\\
\end{array}double f(double re, double im) {
double r60838 = re;
double r60839 = r60838 * r60838;
double r60840 = im;
double r60841 = r60840 * r60840;
double r60842 = r60839 + r60841;
double r60843 = sqrt(r60842);
return r60843;
}
double f(double re, double im) {
double r60844 = re;
double r60845 = -6.38087000272631e+59;
bool r60846 = r60844 <= r60845;
double r60847 = -r60844;
double r60848 = 2.566938280750768e+114;
bool r60849 = r60844 <= r60848;
double r60850 = r60844 * r60844;
double r60851 = im;
double r60852 = r60851 * r60851;
double r60853 = r60850 + r60852;
double r60854 = sqrt(r60853);
double r60855 = r60849 ? r60854 : r60844;
double r60856 = r60846 ? r60847 : r60855;
return r60856;
}



Bits error versus re



Bits error versus im
Results
if re < -6.38087000272631e+59Initial program 44.7
Taylor expanded around -inf 12.7
Simplified12.7
if -6.38087000272631e+59 < re < 2.566938280750768e+114Initial program 21.7
if 2.566938280750768e+114 < re Initial program 53.4
Taylor expanded around inf 9.6
Final simplification18.0
herbie shell --seed 2019326
(FPCore (re im)
:name "math.abs on complex"
:precision binary64
(sqrt (+ (* re re) (* im im))))