\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 r4340170 = N;
double r4340171 = 1.0;
double r4340172 = r4340170 + r4340171;
double r4340173 = atan(r4340172);
double r4340174 = atan(r4340170);
double r4340175 = r4340173 - r4340174;
return r4340175;
}
double f(double N) {
double r4340176 = 1.0;
double r4340177 = N;
double r4340178 = r4340177 + r4340176;
double r4340179 = 1.0;
double r4340180 = fma(r4340177, r4340178, r4340179);
double r4340181 = atan2(r4340176, r4340180);
return r4340181;
}




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