\log \left(N + 1\right) - \log N
\mathsf{log1p}\left(\frac{1}{N}\right)
(FPCore (N) :precision binary64 (- (log (+ N 1.0)) (log N)))
(FPCore (N) :precision binary64 (log1p (/ 1.0 N)))
double code(double N) {
return log(N + 1.0) - log(N);
}
double code(double N) {
return log1p(1.0 / N);
}



Bits error versus N
Results
Initial program 30.0
Simplified30.0
rmApplied add-sqr-sqrt_binary6430.3
Simplified30.3
Simplified0.5
rmApplied rem-square-sqrt_binary640.0
Final simplification0.0
herbie shell --seed 2021211
(FPCore (N)
:name "2log (problem 3.3.6)"
:precision binary64
(- (log (+ N 1.0)) (log N)))