\tan^{-1} \left(N + 1\right) - \tan^{-1} N\tan^{-1}_* \frac{1}{1 + N \cdot \left(1 + N\right)}double f(double N) {
double r6076389 = N;
double r6076390 = 1.0;
double r6076391 = r6076389 + r6076390;
double r6076392 = atan(r6076391);
double r6076393 = atan(r6076389);
double r6076394 = r6076392 - r6076393;
return r6076394;
}
double f(double N) {
double r6076395 = 1.0;
double r6076396 = 1.0;
double r6076397 = N;
double r6076398 = r6076395 + r6076397;
double r6076399 = r6076397 * r6076398;
double r6076400 = r6076396 + r6076399;
double r6076401 = atan2(r6076395, r6076400);
return r6076401;
}




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