\tan^{-1} \left(N + 1\right) - \tan^{-1} N\tan^{-1}_* \frac{1}{1 + \left(N + 1\right) \cdot N}double f(double N) {
double r130515 = N;
double r130516 = 1.0;
double r130517 = r130515 + r130516;
double r130518 = atan(r130517);
double r130519 = atan(r130515);
double r130520 = r130518 - r130519;
return r130520;
}
double f(double N) {
double r130521 = 1.0;
double r130522 = 1.0;
double r130523 = N;
double r130524 = r130523 + r130521;
double r130525 = r130524 * r130523;
double r130526 = r130522 + r130525;
double r130527 = atan2(r130521, r130526);
return r130527;
}




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