\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 29.4
Simplified29.4
Applied log1p-udef_binary6429.4
Applied diff-log_binary6429.3
Applied expm1-log1p-u_binary6429.9
Simplified0.6
Applied log1p-expm1-u_binary640.6
Simplified0.0
Final simplification0.0
herbie shell --seed 2022067
(FPCore (N)
:name "2log (problem 3.3.6)"
:precision binary64
(- (log (+ N 1.0)) (log N)))