\left({\left(a \cdot a + b \cdot b\right)}^{2} + 4 \cdot \left(\left(a \cdot a\right) \cdot \left(1 + a\right) + \left(b \cdot b\right) \cdot \left(1 - 3 \cdot a\right)\right)\right) - 1\sqrt{\mathsf{fma}\left(4, \mathsf{fma}\left(a \cdot a, 1 + a, \left(b \cdot b\right) \cdot \left(1 - 3 \cdot a\right)\right), {\left(\mathsf{fma}\left(a, a, b \cdot b\right)\right)}^{2}\right)} \cdot \sqrt{\mathsf{fma}\left(4, \mathsf{fma}\left(a \cdot a, 1 + a, \left(b \cdot b\right) \cdot \left(1 - 3 \cdot a\right)\right), {\left(\mathsf{fma}\left(a, a, b \cdot b\right)\right)}^{2}\right)} - 1double f(double a, double b) {
double r97754 = a;
double r97755 = r97754 * r97754;
double r97756 = b;
double r97757 = r97756 * r97756;
double r97758 = r97755 + r97757;
double r97759 = 2.0;
double r97760 = pow(r97758, r97759);
double r97761 = 4.0;
double r97762 = 1.0;
double r97763 = r97762 + r97754;
double r97764 = r97755 * r97763;
double r97765 = 3.0;
double r97766 = r97765 * r97754;
double r97767 = r97762 - r97766;
double r97768 = r97757 * r97767;
double r97769 = r97764 + r97768;
double r97770 = r97761 * r97769;
double r97771 = r97760 + r97770;
double r97772 = r97771 - r97762;
return r97772;
}
double f(double a, double b) {
double r97773 = 4.0;
double r97774 = a;
double r97775 = r97774 * r97774;
double r97776 = 1.0;
double r97777 = r97776 + r97774;
double r97778 = b;
double r97779 = r97778 * r97778;
double r97780 = 3.0;
double r97781 = r97780 * r97774;
double r97782 = r97776 - r97781;
double r97783 = r97779 * r97782;
double r97784 = fma(r97775, r97777, r97783);
double r97785 = fma(r97774, r97774, r97779);
double r97786 = 2.0;
double r97787 = pow(r97785, r97786);
double r97788 = fma(r97773, r97784, r97787);
double r97789 = sqrt(r97788);
double r97790 = r97789 * r97789;
double r97791 = r97790 - r97776;
return r97791;
}



Bits error versus a



Bits error versus b
Initial program 0.2
Simplified0.2
rmApplied add-sqr-sqrt0.2
Final simplification0.2
herbie shell --seed 2019304 +o rules:numerics
(FPCore (a b)
:name "Bouland and Aaronson, Equation (25)"
:precision binary64
(- (+ (pow (+ (* a a) (* b b)) 2) (* 4 (+ (* (* a a) (+ 1 a)) (* (* b b) (- 1 (* 3 a)))))) 1))