\frac{x.im \cdot y.re - x.re \cdot y.im}{y.re \cdot y.re + y.im \cdot y.im}\begin{array}{l}
\mathbf{if}\;y.re \le -8.92963265056487216 \cdot 10^{29}:\\
\;\;\;\;\frac{-1 \cdot x.im}{\sqrt{y.re \cdot y.re + y.im \cdot y.im}}\\
\mathbf{elif}\;y.re \le 1.76178820231422521 \cdot 10^{86}:\\
\;\;\;\;\frac{\frac{x.im \cdot y.re - x.re \cdot y.im}{\sqrt{y.re \cdot y.re + y.im \cdot y.im}}}{\sqrt{y.re \cdot y.re + y.im \cdot y.im}}\\
\mathbf{else}:\\
\;\;\;\;\frac{x.im}{\sqrt{y.re \cdot y.re + y.im \cdot y.im}}\\
\end{array}double code(double x_46_re, double x_46_im, double y_46_re, double y_46_im) {
return ((double) (((double) (((double) (x_46_im * y_46_re)) - ((double) (x_46_re * 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 ((y_46_re <= -8.929632650564872e+29)) {
VAR = ((double) (((double) (-1.0 * x_46_im)) / ((double) sqrt(((double) (((double) (y_46_re * y_46_re)) + ((double) (y_46_im * y_46_im))))))));
} else {
double VAR_1;
if ((y_46_re <= 1.7617882023142252e+86)) {
VAR_1 = ((double) (((double) (((double) (((double) (x_46_im * y_46_re)) - ((double) (x_46_re * 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_1 = ((double) (x_46_im / ((double) sqrt(((double) (((double) (y_46_re * y_46_re)) + ((double) (y_46_im * y_46_im))))))));
}
VAR = VAR_1;
}
return VAR;
}



Bits error versus x.re



Bits error versus x.im



Bits error versus y.re



Bits error versus y.im
Results
if y.re < -8.92963265056487216e29Initial program 34.8
rmApplied add-sqr-sqrt34.8
Applied associate-/r*34.8
Taylor expanded around -inf 36.7
if -8.92963265056487216e29 < y.re < 1.76178820231422521e86Initial program 18.9
rmApplied add-sqr-sqrt18.9
Applied associate-/r*18.8
if 1.76178820231422521e86 < y.re Initial program 38.3
rmApplied add-sqr-sqrt38.3
Applied associate-/r*38.3
Taylor expanded around inf 38.0
Final simplification26.6
herbie shell --seed 2020161
(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))))