\tan^{-1} \left(N + 1\right) - \tan^{-1} N\tan^{-1}_* \frac{1}{\sqrt{1 + N \cdot \left(1 + N\right)} \cdot \sqrt{1 + N \cdot \left(1 + N\right)}}(FPCore (N) :precision binary64 (- (atan (+ N 1.0)) (atan N)))
(FPCore (N) :precision binary64 (atan2 1.0 (* (sqrt (+ 1.0 (* N (+ 1.0 N)))) (sqrt (+ 1.0 (* N (+ 1.0 N)))))))
double code(double N) {
return atan(N + 1.0) - atan(N);
}
double code(double N) {
return atan2(1.0, (sqrt(1.0 + (N * (1.0 + N))) * sqrt(1.0 + (N * (1.0 + N)))));
}




Bits error versus N
Results
| Original | 14.8 |
|---|---|
| Target | 0.4 |
| Herbie | 0.4 |
Initial program 14.8
rmApplied diff-atan_binary64_262213.7
Simplified0.4
Simplified0.4
rmApplied add-sqr-sqrt_binary64_24870.4
Simplified0.4
Simplified0.4
Final simplification0.4
herbie shell --seed 2020356
(FPCore (N)
:name "2atan (example 3.5)"
:precision binary64
:herbie-target
(atan (/ 1.0 (+ 1.0 (* N (+ N 1.0)))))
(- (atan (+ N 1.0)) (atan N)))