\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 -5.3927648088213951 \cdot 10^{132}:\\
\;\;\;\;{\left(\frac{-1 \cdot x.im}{\mathsf{hypot}\left(y.re, y.im\right)}\right)}^{1}\\
\mathbf{elif}\;y.re \le -1.2987370292207596 \cdot 10^{-142}:\\
\;\;\;\;\frac{x.im}{\frac{\mathsf{fma}\left(y.re, y.re, y.im \cdot y.im\right)}{y.re}} - \frac{x.re}{\frac{\mathsf{fma}\left(y.re, y.re, y.im \cdot y.im\right)}{y.im}}\\
\mathbf{elif}\;y.re \le 6.1765680479198497 \cdot 10^{-128}:\\
\;\;\;\;{\left(\frac{\frac{x.im \cdot y.re - x.re \cdot y.im}{\mathsf{hypot}\left(y.re, y.im\right)}}{\mathsf{hypot}\left(y.re, y.im\right)}\right)}^{1}\\
\mathbf{elif}\;y.re \le 1.45382927677037052 \cdot 10^{189}:\\
\;\;\;\;{\left(\frac{\frac{y.re}{\frac{{\left(\sqrt{\mathsf{hypot}\left(y.re, y.im\right)}\right)}^{3}}{x.im}} - \frac{y.im}{\frac{{\left(\sqrt{\mathsf{hypot}\left(y.re, y.im\right)}\right)}^{3}}{x.re}}}{\sqrt{\mathsf{hypot}\left(y.re, y.im\right)}}\right)}^{1}\\
\mathbf{else}:\\
\;\;\;\;{\left(\frac{x.im}{\mathsf{hypot}\left(y.re, y.im\right)}\right)}^{1}\\
\end{array}double f(double x_re, double x_im, double y_re, double y_im) {
double r80762 = x_im;
double r80763 = y_re;
double r80764 = r80762 * r80763;
double r80765 = x_re;
double r80766 = y_im;
double r80767 = r80765 * r80766;
double r80768 = r80764 - r80767;
double r80769 = r80763 * r80763;
double r80770 = r80766 * r80766;
double r80771 = r80769 + r80770;
double r80772 = r80768 / r80771;
return r80772;
}
double f(double x_re, double x_im, double y_re, double y_im) {
double r80773 = y_re;
double r80774 = -5.392764808821395e+132;
bool r80775 = r80773 <= r80774;
double r80776 = -1.0;
double r80777 = x_im;
double r80778 = r80776 * r80777;
double r80779 = y_im;
double r80780 = hypot(r80773, r80779);
double r80781 = r80778 / r80780;
double r80782 = 1.0;
double r80783 = pow(r80781, r80782);
double r80784 = -1.2987370292207596e-142;
bool r80785 = r80773 <= r80784;
double r80786 = r80779 * r80779;
double r80787 = fma(r80773, r80773, r80786);
double r80788 = r80787 / r80773;
double r80789 = r80777 / r80788;
double r80790 = x_re;
double r80791 = r80787 / r80779;
double r80792 = r80790 / r80791;
double r80793 = r80789 - r80792;
double r80794 = 6.17656804791985e-128;
bool r80795 = r80773 <= r80794;
double r80796 = r80777 * r80773;
double r80797 = r80790 * r80779;
double r80798 = r80796 - r80797;
double r80799 = r80798 / r80780;
double r80800 = r80799 / r80780;
double r80801 = pow(r80800, r80782);
double r80802 = 1.4538292767703705e+189;
bool r80803 = r80773 <= r80802;
double r80804 = sqrt(r80780);
double r80805 = 3.0;
double r80806 = pow(r80804, r80805);
double r80807 = r80806 / r80777;
double r80808 = r80773 / r80807;
double r80809 = r80806 / r80790;
double r80810 = r80779 / r80809;
double r80811 = r80808 - r80810;
double r80812 = r80811 / r80804;
double r80813 = pow(r80812, r80782);
double r80814 = r80777 / r80780;
double r80815 = pow(r80814, r80782);
double r80816 = r80803 ? r80813 : r80815;
double r80817 = r80795 ? r80801 : r80816;
double r80818 = r80785 ? r80793 : r80817;
double r80819 = r80775 ? r80783 : r80818;
return r80819;
}



Bits error versus x.re



Bits error versus x.im



Bits error versus y.re



Bits error versus y.im
if y.re < -5.392764808821395e+132Initial program 44.3
rmApplied add-sqr-sqrt44.3
Applied *-un-lft-identity44.3
Applied times-frac44.3
Simplified44.3
Simplified29.0
rmApplied pow129.0
Applied pow129.0
Applied pow-prod-down29.0
Simplified28.9
Taylor expanded around -inf 14.7
if -5.392764808821395e+132 < y.re < -1.2987370292207596e-142Initial program 16.4
rmApplied div-sub16.4
Simplified13.8
Simplified12.1
if -1.2987370292207596e-142 < y.re < 6.17656804791985e-128Initial program 22.6
rmApplied add-sqr-sqrt22.6
Applied *-un-lft-identity22.6
Applied times-frac22.6
Simplified22.6
Simplified12.4
rmApplied pow112.4
Applied pow112.4
Applied pow-prod-down12.4
Simplified12.2
if 6.17656804791985e-128 < y.re < 1.4538292767703705e+189Initial program 21.0
rmApplied add-sqr-sqrt21.0
Applied *-un-lft-identity21.0
Applied times-frac21.0
Simplified21.0
Simplified13.2
rmApplied pow113.2
Applied pow113.2
Applied pow-prod-down13.2
Simplified13.1
rmApplied add-sqr-sqrt13.3
Applied associate-/r*13.4
rmApplied div-sub13.4
Applied div-sub13.4
Simplified11.9
Simplified12.2
if 1.4538292767703705e+189 < y.re Initial program 44.5
rmApplied add-sqr-sqrt44.5
Applied *-un-lft-identity44.5
Applied times-frac44.5
Simplified44.5
Simplified32.0
rmApplied pow132.0
Applied pow132.0
Applied pow-prod-down32.0
Simplified32.0
Taylor expanded around inf 12.6
Final simplification12.6
herbie shell --seed 2020056 +o rules:numerics
(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))))