\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 r103248 = N;
double r103249 = 1.0;
double r103250 = r103248 + r103249;
double r103251 = atan(r103250);
double r103252 = atan(r103248);
double r103253 = r103251 - r103252;
return r103253;
}
double f(double N) {
double r103254 = 1.0;
double r103255 = N;
double r103256 = r103255 + r103254;
double r103257 = 1.0;
double r103258 = fma(r103255, r103256, r103257);
double r103259 = atan2(r103254, r103258);
return r103259;
}




Bits error versus N
| Original | 15.0 |
|---|---|
| Target | 0.3 |
| Herbie | 0.3 |
Initial program 15.0
rmApplied diff-atan13.7
Simplified0.3
Simplified0.3
Final simplification0.3
herbie shell --seed 2019199 +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)))