\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 r7216314 = N;
double r7216315 = 1.0;
double r7216316 = r7216314 + r7216315;
double r7216317 = atan(r7216316);
double r7216318 = atan(r7216314);
double r7216319 = r7216317 - r7216318;
return r7216319;
}
double f(double N) {
double r7216320 = 1.0;
double r7216321 = N;
double r7216322 = r7216321 + r7216320;
double r7216323 = r7216322 * r7216321;
double r7216324 = r7216323 + r7216320;
double r7216325 = atan2(r7216320, r7216324);
return r7216325;
}




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