\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 r428772 = 0.5;
double r428773 = /* ERROR: no posit support in C */;
double r428774 = 2.0;
double r428775 = /* ERROR: no posit support in C */;
double r428776 = re;
double r428777 = r428776 * r428776;
double r428778 = im;
double r428779 = r428778 * r428778;
double r428780 = r428777 + r428779;
double r428781 = sqrt(r428780);
double r428782 = r428781 + r428776;
double r428783 = r428775 * r428782;
double r428784 = sqrt(r428783);
double r428785 = r428773 * r428784;
return r428785;
}
double f(double re, double im) {
double r428786 = 0.5;
double r428787 = 2.0;
double r428788 = re;
double r428789 = r428788 * r428788;
double r428790 = /*Error: no posit support in C */;
double r428791 = im;
double r428792 = /*Error: no posit support in C */;
double r428793 = /*Error: no posit support in C */;
double r428794 = sqrt(r428793);
double r428795 = r428794 + r428788;
double r428796 = r428787 * r428795;
double r428797 = sqrt(r428796);
double r428798 = r428786 * r428797;
return r428798;
}



Bits error versus re



Bits error versus im
Initial program 2.0
rmApplied introduce-quire2.0
Applied insert-quire-fdp-add2.0
Final simplification2.0
herbie shell --seed 2019152
(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)))))