\left(0.5\right) \cdot \left(\sqrt{\left(\left(2.0\right) \cdot \left(\frac{\left(\sqrt{\left(\frac{\left(re \cdot re\right)}{\left(im \cdot im\right)}\right)}\right)}{re}\right)\right)}\right)0.5 \cdot \sqrt{2.0 \cdot \left(\sqrt{\left(\mathsf{qma}\left(\left(\left(re \cdot re\right)\right), im, im\right)\right)} + re\right)}double f(double re, double im) {
double r455770 = 0.5;
double r455771 = /* ERROR: no posit support in C */;
double r455772 = 2.0;
double r455773 = /* ERROR: no posit support in C */;
double r455774 = re;
double r455775 = r455774 * r455774;
double r455776 = im;
double r455777 = r455776 * r455776;
double r455778 = r455775 + r455777;
double r455779 = sqrt(r455778);
double r455780 = r455779 + r455774;
double r455781 = r455773 * r455780;
double r455782 = sqrt(r455781);
double r455783 = r455771 * r455782;
return r455783;
}
double f(double re, double im) {
double r455784 = 0.5;
double r455785 = 2.0;
double r455786 = re;
double r455787 = r455786 * r455786;
double r455788 = /*Error: no posit support in C */;
double r455789 = im;
double r455790 = /*Error: no posit support in C */;
double r455791 = /*Error: no posit support in C */;
double r455792 = sqrt(r455791);
double r455793 = r455792 + r455786;
double r455794 = r455785 * r455793;
double r455795 = sqrt(r455794);
double r455796 = r455784 * r455795;
return r455796;
}



Bits error versus re



Bits error versus im
Initial program 2.1
rmApplied introduce-quire2.1
Applied insert-quire-fdp-add2.1
Final simplification2.1
herbie shell --seed 2019153
(FPCore (re im)
:name "math.sqrt on complex, real part"
(*.p16 (real->posit16 0.5) (sqrt.p16 (*.p16 (real->posit16 2.0) (+.p16 (sqrt.p16 (+.p16 (*.p16 re re) (*.p16 im im))) re)))))