\frac{\left(\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)}\left(\frac{\left(\left(-b\right) - \left(\sqrt{\left(\left(\mathsf{qms}\left(\left(\left(b \cdot b\right)\right), \left(\left(4\right) \cdot a\right), c\right)\right)\right)}\right)\right)}{\left(1.0\right)}\right) \cdot \left(\frac{\left(1.0\right)}{\left(\left(2\right) \cdot a\right)}\right)double f(double a, double b, double c) {
double r1259757 = b;
double r1259758 = -r1259757;
double r1259759 = r1259757 * r1259757;
double r1259760 = 4.0;
double r1259761 = /* ERROR: no posit support in C */;
double r1259762 = a;
double r1259763 = c;
double r1259764 = r1259762 * r1259763;
double r1259765 = r1259761 * r1259764;
double r1259766 = r1259759 - r1259765;
double r1259767 = sqrt(r1259766);
double r1259768 = r1259758 - r1259767;
double r1259769 = 2.0;
double r1259770 = /* ERROR: no posit support in C */;
double r1259771 = r1259770 * r1259762;
double r1259772 = r1259768 / r1259771;
return r1259772;
}
double f(double a, double b, double c) {
double r1259773 = b;
double r1259774 = -r1259773;
double r1259775 = r1259773 * r1259773;
double r1259776 = /*Error: no posit support in C */;
double r1259777 = 4.0;
double r1259778 = /* ERROR: no posit support in C */;
double r1259779 = a;
double r1259780 = r1259778 * r1259779;
double r1259781 = c;
double r1259782 = /*Error: no posit support in C */;
double r1259783 = /*Error: no posit support in C */;
double r1259784 = sqrt(r1259783);
double r1259785 = r1259774 - r1259784;
double r1259786 = 1.0;
double r1259787 = /* ERROR: no posit support in C */;
double r1259788 = r1259785 / r1259787;
double r1259789 = 2.0;
double r1259790 = /* ERROR: no posit support in C */;
double r1259791 = r1259790 * r1259779;
double r1259792 = r1259787 / r1259791;
double r1259793 = r1259788 * r1259792;
return r1259793;
}



Bits error versus a



Bits error versus b



Bits error versus c
Initial program 1.6
rmApplied -p16-rgt-identity-expand1.6
Applied associate--l-1.6
Simplified1.6
rmApplied introduce-quire1.6
Applied insert-quire-fdp-sub1.6
rmApplied *p16-rgt-identity-expand1.6
Applied p16-times-frac1.6
rmApplied p16-*-un-lft-identity1.6
Applied *p16-rgt-identity-expand1.6
Applied p16-times-frac1.6
Applied associate-*l*1.6
Simplified1.6
Final simplification1.6
herbie shell --seed 2019164
(FPCore (a b c)
:name "quadm (p42, negative)"
(/.p16 (-.p16 (neg.p16 b) (sqrt.p16 (-.p16 (*.p16 b b) (*.p16 (real->posit16 4) (*.p16 a c))))) (*.p16 (real->posit16 2) a)))