\frac{\left(\frac{\left(\frac{\left(\frac{\left(\left(\frac{\alpha}{\beta}\right) \cdot \left(\beta - \alpha\right)\right)}{\left(\frac{\left(\frac{\alpha}{\beta}\right)}{\left(\left(2\right) \cdot i\right)}\right)}\right)}{\left(\frac{\left(\frac{\left(\frac{\alpha}{\beta}\right)}{\left(\left(2\right) \cdot i\right)}\right)}{\left(2.0\right)}\right)}\right)}{\left(1.0\right)}\right)}{\left(2.0\right)}\frac{\frac{\frac{\alpha + \beta}{\frac{\left(\alpha + \beta\right) + 2 \cdot i}{\beta - \alpha}}}{\left(\left(\alpha + \beta\right) + 2 \cdot i\right) + 2.0} + 1.0}{2.0}double f(double alpha, double beta, double i) {
double r674349 = alpha;
double r674350 = beta;
double r674351 = r674349 + r674350;
double r674352 = r674350 - r674349;
double r674353 = r674351 * r674352;
double r674354 = 2.0;
double r674355 = /* ERROR: no posit support in C */;
double r674356 = i;
double r674357 = r674355 * r674356;
double r674358 = r674351 + r674357;
double r674359 = r674353 / r674358;
double r674360 = 2.0;
double r674361 = /* ERROR: no posit support in C */;
double r674362 = r674358 + r674361;
double r674363 = r674359 / r674362;
double r674364 = 1.0;
double r674365 = /* ERROR: no posit support in C */;
double r674366 = r674363 + r674365;
double r674367 = r674366 / r674361;
return r674367;
}
double f(double alpha, double beta, double i) {
double r674368 = alpha;
double r674369 = beta;
double r674370 = r674368 + r674369;
double r674371 = 2.0;
double r674372 = i;
double r674373 = r674371 * r674372;
double r674374 = r674370 + r674373;
double r674375 = r674369 - r674368;
double r674376 = r674374 / r674375;
double r674377 = r674370 / r674376;
double r674378 = 2.0;
double r674379 = r674374 + r674378;
double r674380 = r674377 / r674379;
double r674381 = 1.0;
double r674382 = r674380 + r674381;
double r674383 = r674382 / r674378;
return r674383;
}



Bits error versus alpha



Bits error versus beta



Bits error versus i
Initial program 0.9
rmApplied associate-/l*0.6
Final simplification0.6
herbie shell --seed 2019119
(FPCore (alpha beta i)
:name "Octave 3.8, jcobi/2"
:pre (and (>.p16 alpha (real->posit16 -1)) (>.p16 beta (real->posit16 -1)) (>.p16 i (real->posit16 0)))
(/.p16 (+.p16 (/.p16 (/.p16 (*.p16 (+.p16 alpha beta) (-.p16 beta alpha)) (+.p16 (+.p16 alpha beta) (*.p16 (real->posit16 2) i))) (+.p16 (+.p16 (+.p16 alpha beta) (*.p16 (real->posit16 2) i)) (real->posit16 2.0))) (real->posit16 1.0)) (real->posit16 2.0)))