\left(x.re \cdot y.re\right) - \left(x.im \cdot y.im\right)
\left(\mathsf{qms}\left(\left(\left(x.re \cdot y.re\right)\right), x.im, y.im\right)\right)double f(double x_re, double x_im, double y_re, double y_im) {
double r3010071 = x_re;
double r3010072 = y_re;
double r3010073 = r3010071 * r3010072;
double r3010074 = x_im;
double r3010075 = y_im;
double r3010076 = r3010074 * r3010075;
double r3010077 = r3010073 - r3010076;
return r3010077;
}
double f(double x_re, double x_im, double y_re, double y_im) {
double r3010078 = x_re;
double r3010079 = y_re;
double r3010080 = r3010078 * r3010079;
double r3010081 = /*Error: no posit support in C */;
double r3010082 = x_im;
double r3010083 = y_im;
double r3010084 = /*Error: no posit support in C */;
double r3010085 = /*Error: no posit support in C */;
return r3010085;
}



Bits error versus x.re



Bits error versus x.im



Bits error versus y.re



Bits error versus y.im
Initial program 0.3
rmApplied introduce-quire0.3
Applied insert-quire-fdp-sub0.2
Final simplification0.2
herbie shell --seed 2019142 +o rules:numerics
(FPCore (x.re x.im y.re y.im)
:name "_multiplyComplex, real part"
(-.p16 (*.p16 x.re y.re) (*.p16 x.im y.im)))