\frac{\left(\frac{\left(x.re \cdot y.re\right)}{\left(x.im \cdot y.im\right)}\right)}{\left(\frac{\left(y.re \cdot y.re\right)}{\left(y.im \cdot y.im\right)}\right)}\frac{x.re \cdot y.re + x.im \cdot y.im}{\left(\mathsf{qma}\left(\left(\left(y.re \cdot y.re\right)\right), y.im, y.im\right)\right)}double f(double x_re, double x_im, double y_re, double y_im) {
double r757396 = x_re;
double r757397 = y_re;
double r757398 = r757396 * r757397;
double r757399 = x_im;
double r757400 = y_im;
double r757401 = r757399 * r757400;
double r757402 = r757398 + r757401;
double r757403 = r757397 * r757397;
double r757404 = r757400 * r757400;
double r757405 = r757403 + r757404;
double r757406 = r757402 / r757405;
return r757406;
}
double f(double x_re, double x_im, double y_re, double y_im) {
double r757407 = x_re;
double r757408 = y_re;
double r757409 = r757407 * r757408;
double r757410 = x_im;
double r757411 = y_im;
double r757412 = r757410 * r757411;
double r757413 = r757409 + r757412;
double r757414 = r757408 * r757408;
double r757415 = /*Error: no posit support in C */;
double r757416 = /*Error: no posit support in C */;
double r757417 = /*Error: no posit support in C */;
double r757418 = r757413 / r757417;
return r757418;
}



Bits error versus x.re



Bits error versus x.im



Bits error versus y.re



Bits error versus y.im
Initial program 1.1
rmApplied introduce-quire1.1
Applied insert-quire-fdp-add1.1
Final simplification1.1
herbie shell --seed 2019152
(FPCore (x.re x.im y.re y.im)
:name "_divideComplex, real part"
(/.p16 (+.p16 (*.p16 x.re y.re) (*.p16 x.im y.im)) (+.p16 (*.p16 y.re y.re) (*.p16 y.im y.im))))