\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 r3327712 = N;
double r3327713 = 1.0;
double r3327714 = r3327712 + r3327713;
double r3327715 = atan(r3327714);
double r3327716 = atan(r3327712);
double r3327717 = r3327715 - r3327716;
return r3327717;
}
double f(double N) {
double r3327718 = 1.0;
double r3327719 = N;
double r3327720 = r3327719 + r3327718;
double r3327721 = r3327720 * r3327719;
double r3327722 = r3327721 + r3327718;
double r3327723 = atan2(r3327718, r3327722);
return r3327723;
}




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