\tan^{-1} \left(N + 1\right) - \tan^{-1} N\tan^{-1}_* \frac{1}{N \cdot N + \left(N + 1\right)}double f(double N) {
double r5307038 = N;
double r5307039 = 1.0;
double r5307040 = r5307038 + r5307039;
double r5307041 = atan(r5307040);
double r5307042 = atan(r5307038);
double r5307043 = r5307041 - r5307042;
return r5307043;
}
double f(double N) {
double r5307044 = 1.0;
double r5307045 = N;
double r5307046 = r5307045 * r5307045;
double r5307047 = r5307045 + r5307044;
double r5307048 = r5307046 + r5307047;
double r5307049 = atan2(r5307044, r5307048);
return r5307049;
}




Bits error versus N
Results
| Original | 14.9 |
|---|---|
| Target | 0.4 |
| Herbie | 0.4 |
Initial program 14.9
rmApplied diff-atan13.7
Simplified0.4
rmApplied add-sqr-sqrt1.0
Taylor expanded around 0 0.4
Simplified0.4
Final simplification0.4
herbie shell --seed 2019163
(FPCore (N)
:name "2atan (example 3.5)"
:herbie-target
(atan (/ 1 (+ 1 (* N (+ N 1)))))
(- (atan (+ N 1)) (atan N)))