\frac{x.im \cdot y.re - x.re \cdot y.im}{y.re \cdot y.re + y.im \cdot y.im}\frac{\left(x.im \cdot y.re - x.re \cdot y.im\right) \cdot \frac{1}{\sqrt{y.re \cdot y.re + y.im \cdot y.im}}}{\sqrt{y.re \cdot y.re + y.im \cdot y.im}}double f(double x_re, double x_im, double y_re, double y_im) {
double r39985 = x_im;
double r39986 = y_re;
double r39987 = r39985 * r39986;
double r39988 = x_re;
double r39989 = y_im;
double r39990 = r39988 * r39989;
double r39991 = r39987 - r39990;
double r39992 = r39986 * r39986;
double r39993 = r39989 * r39989;
double r39994 = r39992 + r39993;
double r39995 = r39991 / r39994;
return r39995;
}
double f(double x_re, double x_im, double y_re, double y_im) {
double r39996 = x_im;
double r39997 = y_re;
double r39998 = r39996 * r39997;
double r39999 = x_re;
double r40000 = y_im;
double r40001 = r39999 * r40000;
double r40002 = r39998 - r40001;
double r40003 = 1.0;
double r40004 = r39997 * r39997;
double r40005 = r40000 * r40000;
double r40006 = r40004 + r40005;
double r40007 = sqrt(r40006);
double r40008 = r40003 / r40007;
double r40009 = r40002 * r40008;
double r40010 = r40009 / r40007;
return r40010;
}



Bits error versus x.re



Bits error versus x.im



Bits error versus y.re



Bits error versus y.im
Results
Initial program 25.9
rmApplied add-sqr-sqrt25.9
Applied associate-/r*25.8
rmApplied div-inv25.9
Final simplification25.9
herbie shell --seed 2019323
(FPCore (x.re x.im y.re y.im)
:name "_divideComplex, imaginary part"
:precision binary64
(/ (- (* x.im y.re) (* x.re y.im)) (+ (* y.re y.re) (* y.im y.im))))