\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 r8290031 = N;
double r8290032 = 1.0;
double r8290033 = r8290031 + r8290032;
double r8290034 = atan(r8290033);
double r8290035 = atan(r8290031);
double r8290036 = r8290034 - r8290035;
return r8290036;
}
double f(double N) {
double r8290037 = 1.0;
double r8290038 = N;
double r8290039 = r8290038 + r8290037;
double r8290040 = r8290039 * r8290038;
double r8290041 = r8290040 + r8290037;
double r8290042 = atan2(r8290037, r8290041);
return r8290042;
}




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