\frac{x - lo}{hi - lo}
\begin{array}{l}
t_0 := \sqrt[3]{\frac{hi}{lo}}\\
\left(1 + t_0 \cdot \left(\left(1 + \frac{hi}{lo}\right) \cdot \left(t_0 \cdot t_0\right)\right)\right) - \left(\frac{x}{lo} + \frac{x}{lo} \cdot \left(\frac{hi}{lo} \cdot \frac{hi}{lo}\right)\right)
\end{array}
(FPCore (lo hi x) :precision binary64 (/ (- x lo) (- hi lo)))
(FPCore (lo hi x)
:precision binary64
(let* ((t_0 (cbrt (/ hi lo))))
(-
(+ 1.0 (* t_0 (* (+ 1.0 (/ hi lo)) (* t_0 t_0))))
(+ (/ x lo) (* (/ x lo) (* (/ hi lo) (/ hi lo)))))))double code(double lo, double hi, double x) {
return (x - lo) / (hi - lo);
}
double code(double lo, double hi, double x) {
double t_0 = cbrt(hi / lo);
return (1.0 + (t_0 * ((1.0 + (hi / lo)) * (t_0 * t_0)))) - ((x / lo) + ((x / lo) * ((hi / lo) * (hi / lo))));
}



Bits error versus lo



Bits error versus hi



Bits error versus x
Results
Initial program 62.0
Taylor expanded in hi around 0 64.0
Simplified51.9
Taylor expanded in hi around inf 51.9
Applied add-cube-cbrt_binary6451.9
Applied associate-*r*_binary6451.9
Final simplification51.9
herbie shell --seed 2021275
(FPCore (lo hi x)
:name "(/ (- x lo) (- hi lo))"
:precision binary64
:pre (and (< lo -1e+308) (> hi 1e+308))
(/ (- x lo) (- hi lo)))