\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 r7431830 = N;
double r7431831 = 1.0;
double r7431832 = r7431830 + r7431831;
double r7431833 = atan(r7431832);
double r7431834 = atan(r7431830);
double r7431835 = r7431833 - r7431834;
return r7431835;
}
double f(double N) {
double r7431836 = 1.0;
double r7431837 = 1.0;
double r7431838 = N;
double r7431839 = r7431836 + r7431838;
double r7431840 = r7431838 * r7431839;
double r7431841 = r7431837 + r7431840;
double r7431842 = atan2(r7431836, r7431841);
return r7431842;
}




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