\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 r13622508 = N;
double r13622509 = 1.0;
double r13622510 = r13622508 + r13622509;
double r13622511 = atan(r13622510);
double r13622512 = atan(r13622508);
double r13622513 = r13622511 - r13622512;
return r13622513;
}
double f(double N) {
double r13622514 = 1.0;
double r13622515 = N;
double r13622516 = r13622515 + r13622514;
double r13622517 = r13622516 * r13622515;
double r13622518 = r13622517 + r13622514;
double r13622519 = atan2(r13622514, r13622518);
return r13622519;
}




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