\tan^{-1} \left(N + 1\right) - \tan^{-1} N\tan^{-1}_* \frac{1}{1 + \mathsf{fma}\left(N, N, N\right)}double f(double N) {
double r4278241 = N;
double r4278242 = 1.0;
double r4278243 = r4278241 + r4278242;
double r4278244 = atan(r4278243);
double r4278245 = atan(r4278241);
double r4278246 = r4278244 - r4278245;
return r4278246;
}
double f(double N) {
double r4278247 = 1.0;
double r4278248 = N;
double r4278249 = fma(r4278248, r4278248, r4278248);
double r4278250 = r4278247 + r4278249;
double r4278251 = atan2(r4278247, r4278250);
return r4278251;
}




Bits error versus N
| Original | 15.3 |
|---|---|
| Target | 0.4 |
| Herbie | 0.4 |
Initial program 15.3
rmApplied diff-atan14.1
Simplified0.4
Simplified0.4
Final simplification0.4
herbie shell --seed 2019143 +o rules:numerics
(FPCore (N)
:name "2atan (example 3.5)"
:herbie-target
(atan (/ 1 (+ 1 (* N (+ N 1)))))
(- (atan (+ N 1)) (atan N)))