\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 r4035148 = N;
double r4035149 = 1.0;
double r4035150 = r4035148 + r4035149;
double r4035151 = atan(r4035150);
double r4035152 = atan(r4035148);
double r4035153 = r4035151 - r4035152;
return r4035153;
}
double f(double N) {
double r4035154 = 1.0;
double r4035155 = N;
double r4035156 = r4035155 + r4035154;
double r4035157 = r4035156 * r4035155;
double r4035158 = r4035157 + r4035154;
double r4035159 = atan2(r4035154, r4035158);
return r4035159;
}




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