\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{\sqrt{\left(\mathsf{qms}\left(\left(\left(b \cdot b\right)\right), c, \left(a \cdot 4\right)\right)\right)} - b}{1.0} \cdot \frac{1.0}{2 \cdot a}double f(double a, double b, double c) {
double r581858 = b;
double r581859 = -r581858;
double r581860 = r581858 * r581858;
double r581861 = 4.0;
double r581862 = /* ERROR: no posit support in C */;
double r581863 = a;
double r581864 = c;
double r581865 = r581863 * r581864;
double r581866 = r581862 * r581865;
double r581867 = r581860 - r581866;
double r581868 = sqrt(r581867);
double r581869 = r581859 + r581868;
double r581870 = 2.0;
double r581871 = /* ERROR: no posit support in C */;
double r581872 = r581871 * r581863;
double r581873 = r581869 / r581872;
return r581873;
}
double f(double a, double b, double c) {
double r581874 = b;
double r581875 = r581874 * r581874;
double r581876 = /*Error: no posit support in C */;
double r581877 = c;
double r581878 = a;
double r581879 = 4.0;
double r581880 = r581878 * r581879;
double r581881 = /*Error: no posit support in C */;
double r581882 = /*Error: no posit support in C */;
double r581883 = sqrt(r581882);
double r581884 = r581883 - r581874;
double r581885 = 1.0;
double r581886 = r581884 / r581885;
double r581887 = 2.0;
double r581888 = r581887 * r581878;
double r581889 = r581885 / r581888;
double r581890 = r581886 * r581889;
return r581890;
}



Bits error versus a



Bits error versus b



Bits error versus c
Initial program 1.6
Simplified1.6
rmApplied associate-*l*1.5
rmApplied *p16-rgt-identity-expand1.5
Applied p16-times-frac1.6
rmApplied introduce-quire1.6
Applied insert-quire-fdp-sub1.5
rmApplied p16-*-un-lft-identity1.5
Applied *p16-rgt-identity-expand1.5
Applied p16-times-frac1.5
Applied associate-*l*1.6
Simplified1.6
Final simplification1.6
herbie shell --seed 2019154
(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)))