\frac{\frac{\frac{\left(\left(a + 10^{3}\right) + 1\right) \cdot \left(\left(a + 10^{3}\right) - 1\right)}{a}}{10^{3}}}{2} - 1\frac{\frac{\frac{\left(\left(a + 10^{3}\right) + 1\right) \cdot \left(\left(a + 10^{3}\right) - 1\right)}{a}}{10^{3}}}{2} - 1double code(double a) {
return ((double) (((double) (((double) (((double) (((double) (((double) (((double) (a + 1000.0)) + 1.0)) * ((double) (((double) (a + 1000.0)) - 1.0)))) / a)) / 1000.0)) / 2.0)) - 1.0));
}
double code(double a) {
return ((double) (((double) (((double) (((double) (((double) (((double) (((double) (a + 1000.0)) + 1.0)) * ((double) (((double) (a + 1000.0)) - 1.0)))) / a)) / 1000.0)) / 2.0)) - 1.0));
}



Bits error versus a
Results
Initial program 16.8
Final simplification16.8
herbie shell --seed 2020153
(FPCore (a)
:name "(- (/ (/ (/ (* (+ (+ a 1000) 1) (- (+ a 1000) 1)) a) 1000) 2) 1)"
:precision binary64
(- (/ (/ (/ (* (+ (+ a 1000.0) 1.0) (- (+ a 1000.0) 1.0)) a) 1000.0) 2.0) 1.0))