double code(double x_46_re, double x_46_im, double y_46_re, double y_46_im) {
return ((double) (((double) (((double) (x_46_re * y_46_re)) + ((double) (x_46_im * y_46_im)))) / ((double) (((double) (y_46_re * y_46_re)) + ((double) (y_46_im * y_46_im))))));
}
double code(double x_46_re, double x_46_im, double y_46_re, double y_46_im) {
double VAR;
if ((((double) (((double) (((double) (x_46_re * y_46_re)) + ((double) (x_46_im * y_46_im)))) / ((double) (((double) (y_46_re * y_46_re)) + ((double) (y_46_im * y_46_im)))))) <= 1.6816948944806213e+249)) {
VAR = ((double) (((double) (((double) (((double) (x_46_re * y_46_re)) + ((double) (x_46_im * y_46_im)))) / ((double) sqrt(((double) (((double) (y_46_re * y_46_re)) + ((double) (y_46_im * y_46_im)))))))) / ((double) sqrt(((double) (((double) (y_46_re * y_46_re)) + ((double) (y_46_im * y_46_im))))))));
} else {
VAR = ((double) (x_46_re / ((double) sqrt(((double) (((double) (y_46_re * y_46_re)) + ((double) (y_46_im * y_46_im))))))));
}
return VAR;
}



Bits error versus x.re



Bits error versus x.im



Bits error versus y.re



Bits error versus y.im
Results
if (/ (+ (* x.re y.re) (* x.im y.im)) (+ (* y.re y.re) (* y.im y.im))) < 1.6816948944806213e249Initial program 14.9
rmApplied add-sqr-sqrt14.9
Applied associate-/r*14.8
if 1.6816948944806213e249 < (/ (+ (* x.re y.re) (* x.im y.im)) (+ (* y.re y.re) (* y.im y.im))) Initial program 60.8
rmApplied add-sqr-sqrt60.8
Applied associate-/r*60.7
Taylor expanded around inf 60.2
Final simplification26.4
herbie shell --seed 2020181
(FPCore (x.re x.im y.re y.im)
:name "_divideComplex, real part"
:precision binary64
(/ (+ (* x.re y.re) (* x.im y.im)) (+ (* y.re y.re) (* y.im y.im))))