\sqrt{re \cdot re + im \cdot im}
\mathsf{hypot}\left(re, im\right)
(FPCore modulus (re im) :precision binary64 (sqrt (+ (* re re) (* im im))))
(FPCore modulus (re im) :precision binary64 (hypot re im))
double modulus(double re, double im) {
return sqrt((re * re) + (im * im));
}
double modulus(double re, double im) {
return hypot(re, im);
}



Bits error versus re



Bits error versus im
Results
Initial program 29.8
Simplified0.0
Final simplification0.0
herbie shell --seed 2022067
(FPCore modulus (re im)
:name "math.abs on complex"
:precision binary64
(sqrt (+ (* re re) (* im im))))