\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 r46830 = re;
double r46831 = r46830 * r46830;
double r46832 = im;
double r46833 = r46832 * r46832;
double r46834 = r46831 + r46833;
double r46835 = sqrt(r46834);
return r46835;
}
double f(double re, double im) {
double r46836 = re;
double r46837 = -6.38087000272631e+59;
bool r46838 = r46836 <= r46837;
double r46839 = -r46836;
double r46840 = 2.566938280750768e+114;
bool r46841 = r46836 <= r46840;
double r46842 = r46836 * r46836;
double r46843 = im;
double r46844 = r46843 * r46843;
double r46845 = r46842 + r46844;
double r46846 = sqrt(r46845);
double r46847 = r46841 ? r46846 : r46836;
double r46848 = r46838 ? r46839 : r46847;
return r46848;
}



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))))