\sqrt{re \cdot re + im \cdot im}\begin{array}{l}
\mathbf{if}\;re \le -6.52307626026875473 \cdot 10^{150}:\\
\;\;\;\;-re\\
\mathbf{elif}\;re \le 1.15840753764457407 \cdot 10^{105}:\\
\;\;\;\;\sqrt{re \cdot re + im \cdot im}\\
\mathbf{else}:\\
\;\;\;\;re\\
\end{array}double f(double re, double im) {
double r60650 = re;
double r60651 = r60650 * r60650;
double r60652 = im;
double r60653 = r60652 * r60652;
double r60654 = r60651 + r60653;
double r60655 = sqrt(r60654);
return r60655;
}
double f(double re, double im) {
double r60656 = re;
double r60657 = -6.523076260268755e+150;
bool r60658 = r60656 <= r60657;
double r60659 = -r60656;
double r60660 = 1.158407537644574e+105;
bool r60661 = r60656 <= r60660;
double r60662 = r60656 * r60656;
double r60663 = im;
double r60664 = r60663 * r60663;
double r60665 = r60662 + r60664;
double r60666 = sqrt(r60665);
double r60667 = r60661 ? r60666 : r60656;
double r60668 = r60658 ? r60659 : r60667;
return r60668;
}



Bits error versus re



Bits error versus im
Results
if re < -6.523076260268755e+150Initial program 63.1
Taylor expanded around -inf 7.6
Simplified7.6
if -6.523076260268755e+150 < re < 1.158407537644574e+105Initial program 20.8
if 1.158407537644574e+105 < re Initial program 51.1
Taylor expanded around inf 9.5
Final simplification17.3
herbie shell --seed 2020045
(FPCore (re im)
:name "math.abs on complex"
:precision binary64
(sqrt (+ (* re re) (* im im))))