\tan^{-1} \left(N + 1\right) - \tan^{-1} N\tan^{-1}_* \frac{1}{\mathsf{fma}\left(N, N + 1, 1\right)}double f(double N) {
double r4575226 = N;
double r4575227 = 1.0;
double r4575228 = r4575226 + r4575227;
double r4575229 = atan(r4575228);
double r4575230 = atan(r4575226);
double r4575231 = r4575229 - r4575230;
return r4575231;
}
double f(double N) {
double r4575232 = 1.0;
double r4575233 = N;
double r4575234 = r4575233 + r4575232;
double r4575235 = fma(r4575233, r4575234, r4575232);
double r4575236 = atan2(r4575232, r4575235);
return r4575236;
}




Bits error versus N
| Original | 15.0 |
|---|---|
| Target | 0.4 |
| Herbie | 0.4 |
Initial program 15.0
rmApplied diff-atan13.8
Simplified0.4
Simplified0.4
Final simplification0.4
herbie shell --seed 2019158 +o rules:numerics
(FPCore (N)
:name "2atan (example 3.5)"
:herbie-target
(atan (/ 1 (+ 1 (* N (+ N 1)))))
(- (atan (+ N 1)) (atan N)))