\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 r33597394 = N;
double r33597395 = 1.0;
double r33597396 = r33597394 + r33597395;
double r33597397 = atan(r33597396);
double r33597398 = atan(r33597394);
double r33597399 = r33597397 - r33597398;
return r33597399;
}
double f(double N) {
double r33597400 = 1.0;
double r33597401 = N;
double r33597402 = r33597401 + r33597400;
double r33597403 = r33597402 * r33597401;
double r33597404 = r33597403 + r33597400;
double r33597405 = atan2(r33597400, r33597404);
return r33597405;
}




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