\tan^{-1} \left(N + 1\right) - \tan^{-1} N\tan^{-1}_* \frac{1}{\left(N + 1\right) \cdot N + 1}double f(double N) {
double r3978586 = N;
double r3978587 = 1.0;
double r3978588 = r3978586 + r3978587;
double r3978589 = atan(r3978588);
double r3978590 = atan(r3978586);
double r3978591 = r3978589 - r3978590;
return r3978591;
}
double f(double N) {
double r3978592 = 1.0;
double r3978593 = N;
double r3978594 = r3978593 + r3978592;
double r3978595 = r3978594 * r3978593;
double r3978596 = r3978595 + r3978592;
double r3978597 = atan2(r3978592, r3978596);
return r3978597;
}




Bits error versus N
Results
| Original | 15.4 |
|---|---|
| Target | 0.3 |
| Herbie | 0.3 |
Initial program 15.4
rmApplied diff-atan14.3
Simplified0.3
Final simplification0.3
herbie shell --seed 2019132
(FPCore (N)
:name "2atan (example 3.5)"
:herbie-target
(atan (/ 1 (+ 1 (* N (+ N 1)))))
(- (atan (+ N 1)) (atan N)))