\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 r434225 = 0.5;
double r434226 = /* ERROR: no posit support in C */;
double r434227 = 2.0;
double r434228 = /* ERROR: no posit support in C */;
double r434229 = re;
double r434230 = r434229 * r434229;
double r434231 = im;
double r434232 = r434231 * r434231;
double r434233 = r434230 + r434232;
double r434234 = sqrt(r434233);
double r434235 = r434234 + r434229;
double r434236 = r434228 * r434235;
double r434237 = sqrt(r434236);
double r434238 = r434226 * r434237;
return r434238;
}
double f(double re, double im) {
double r434239 = 0.5;
double r434240 = 2.0;
double r434241 = re;
double r434242 = r434241 * r434241;
double r434243 = /*Error: no posit support in C */;
double r434244 = im;
double r434245 = /*Error: no posit support in C */;
double r434246 = /*Error: no posit support in C */;
double r434247 = sqrt(r434246);
double r434248 = r434247 + r434241;
double r434249 = r434240 * r434248;
double r434250 = sqrt(r434249);
double r434251 = r434239 * r434250;
return r434251;
}



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 2019158
(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)))))