\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 r6059224 = N;
double r6059225 = 1.0;
double r6059226 = r6059224 + r6059225;
double r6059227 = atan(r6059226);
double r6059228 = atan(r6059224);
double r6059229 = r6059227 - r6059228;
return r6059229;
}
double f(double N) {
double r6059230 = 1.0;
double r6059231 = 1.0;
double r6059232 = N;
double r6059233 = r6059230 + r6059232;
double r6059234 = r6059232 * r6059233;
double r6059235 = r6059231 + r6059234;
double r6059236 = atan2(r6059230, r6059235);
return r6059236;
}




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