\sqrt{\left(\left(\left(\left(\frac{\left(\frac{\left(\frac{a}{b}\right)}{c}\right)}{\left(2\right)}\right) \cdot \left(\left(\frac{\left(\frac{\left(\frac{a}{b}\right)}{c}\right)}{\left(2\right)}\right) - a\right)\right) \cdot \left(\left(\frac{\left(\frac{\left(\frac{a}{b}\right)}{c}\right)}{\left(2\right)}\right) - b\right)\right) \cdot \left(\left(\frac{\left(\frac{\left(\frac{a}{b}\right)}{c}\right)}{\left(2\right)}\right) - c\right)\right)}\sqrt{\left(\frac{\frac{\left(a + b\right) + c}{2} \cdot \left(\left(\frac{\left(a + b\right) + c}{2} + a\right) \cdot \left(\frac{\left(a + b\right) + c}{2} - a\right)\right)}{\frac{\left(a + b\right) + c}{2} + a} \cdot \left(\frac{\left(a + b\right) + c}{2} - b\right)\right) \cdot \left(\frac{\left(a + b\right) + c}{2} - c\right)}double f(double a, double b, double c) {
double r1747436 = a;
double r1747437 = b;
double r1747438 = r1747436 + r1747437;
double r1747439 = c;
double r1747440 = r1747438 + r1747439;
double r1747441 = 2.0;
double r1747442 = /* ERROR: no posit support in C */;
double r1747443 = r1747440 / r1747442;
double r1747444 = r1747443 - r1747436;
double r1747445 = r1747443 * r1747444;
double r1747446 = r1747443 - r1747437;
double r1747447 = r1747445 * r1747446;
double r1747448 = r1747443 - r1747439;
double r1747449 = r1747447 * r1747448;
double r1747450 = sqrt(r1747449);
return r1747450;
}
double f(double a, double b, double c) {
double r1747451 = a;
double r1747452 = b;
double r1747453 = r1747451 + r1747452;
double r1747454 = c;
double r1747455 = r1747453 + r1747454;
double r1747456 = 2.0;
double r1747457 = r1747455 / r1747456;
double r1747458 = r1747457 + r1747451;
double r1747459 = r1747457 - r1747451;
double r1747460 = r1747458 * r1747459;
double r1747461 = r1747457 * r1747460;
double r1747462 = r1747461 / r1747458;
double r1747463 = r1747457 - r1747452;
double r1747464 = r1747462 * r1747463;
double r1747465 = r1747457 - r1747454;
double r1747466 = r1747464 * r1747465;
double r1747467 = sqrt(r1747466);
return r1747467;
}



Bits error versus a



Bits error versus b



Bits error versus c
Initial program 0.2
rmApplied p16-flip--0.2
Applied associate-*r/0.2
rmApplied difference-of-squares0.2
Final simplification0.2
herbie shell --seed 2019112 +o rules:numerics
(FPCore (a b c)
:name "Area of a triangle"
:pre (and (<.p16 (real->posit16 0) a) (<.p16 (real->posit16 0) b) (<.p16 (real->posit16 0) c))
(sqrt.p16 (*.p16 (*.p16 (*.p16 (/.p16 (+.p16 (+.p16 a b) c) (real->posit16 2)) (-.p16 (/.p16 (+.p16 (+.p16 a b) c) (real->posit16 2)) a)) (-.p16 (/.p16 (+.p16 (+.p16 a b) c) (real->posit16 2)) b)) (-.p16 (/.p16 (+.p16 (+.p16 a b) c) (real->posit16 2)) c))))