\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 r1736636 = N;
double r1736637 = 1.0;
double r1736638 = r1736636 + r1736637;
double r1736639 = atan(r1736638);
double r1736640 = atan(r1736636);
double r1736641 = r1736639 - r1736640;
return r1736641;
}
double f(double N) {
double r1736642 = 1.0;
double r1736643 = N;
double r1736644 = r1736643 + r1736642;
double r1736645 = r1736644 * r1736643;
double r1736646 = r1736645 + r1736642;
double r1736647 = atan2(r1736642, r1736646);
return r1736647;
}




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