\frac{\left(\frac{\left(-b\right)}{\left(\sqrt{\left(\left(b \cdot b\right) - \left(\left(4\right) \cdot \left(a \cdot c\right)\right)\right)}\right)}\right)}{\left(\left(2\right) \cdot a\right)}\frac{\frac{\sqrt{b \cdot b - \left(c \cdot a\right) \cdot 4} - b}{2}}{a}double f(double a, double b, double c) {
double r1588701 = b;
double r1588702 = -r1588701;
double r1588703 = r1588701 * r1588701;
double r1588704 = 4.0;
double r1588705 = /* ERROR: no posit support in C */;
double r1588706 = a;
double r1588707 = c;
double r1588708 = r1588706 * r1588707;
double r1588709 = r1588705 * r1588708;
double r1588710 = r1588703 - r1588709;
double r1588711 = sqrt(r1588710);
double r1588712 = r1588702 + r1588711;
double r1588713 = 2.0;
double r1588714 = /* ERROR: no posit support in C */;
double r1588715 = r1588714 * r1588706;
double r1588716 = r1588712 / r1588715;
return r1588716;
}
double f(double a, double b, double c) {
double r1588717 = b;
double r1588718 = r1588717 * r1588717;
double r1588719 = c;
double r1588720 = a;
double r1588721 = r1588719 * r1588720;
double r1588722 = 4.0;
double r1588723 = r1588721 * r1588722;
double r1588724 = r1588718 - r1588723;
double r1588725 = sqrt(r1588724);
double r1588726 = r1588725 - r1588717;
double r1588727 = 2.0;
double r1588728 = r1588726 / r1588727;
double r1588729 = r1588728 / r1588720;
return r1588729;
}



Bits error versus a



Bits error versus b



Bits error versus c
Initial program 1.5
Simplified1.5
rmApplied associate-/r*1.5
Final simplification1.5
herbie shell --seed 2019130
(FPCore (a b c)
:name "quadp (p42, positive)"
(/.p16 (+.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (real->posit16 4) (*.p16 a c))))) (*.p16 (real->posit16 2) a)))