| Alternative 1 | |
|---|---|
| Error | 0.83% |
| Cost | 14656 |
\[\begin{array}{l}
t_0 := \frac{x - lo}{hi}\\
\frac{{\left(\left(x - lo\right) \cdot \frac{lo}{hi \cdot hi}\right)}^{2} - {t_0}^{2}}{t_0 \cdot \left(\frac{lo}{hi} + -1\right)}
\end{array}
\]
(FPCore (lo hi x) :precision binary64 (/ (- x lo) (- hi lo)))
(FPCore (lo hi x)
:precision binary64
(let* ((t_0 (/ (- x lo) hi)))
(/
(pow t_0 3.0)
(+
(pow (* (- x lo) (/ lo (* hi hi))) 2.0)
(+ (pow t_0 2.0) (* (/ lo hi) (* t_0 (/ (- lo x) hi))))))))double code(double lo, double hi, double x) {
return (x - lo) / (hi - lo);
}
double code(double lo, double hi, double x) {
double t_0 = (x - lo) / hi;
return pow(t_0, 3.0) / (pow(((x - lo) * (lo / (hi * hi))), 2.0) + (pow(t_0, 2.0) + ((lo / hi) * (t_0 * ((lo - x) / hi)))));
}
real(8) function code(lo, hi, x)
real(8), intent (in) :: lo
real(8), intent (in) :: hi
real(8), intent (in) :: x
code = (x - lo) / (hi - lo)
end function
real(8) function code(lo, hi, x)
real(8), intent (in) :: lo
real(8), intent (in) :: hi
real(8), intent (in) :: x
real(8) :: t_0
t_0 = (x - lo) / hi
code = (t_0 ** 3.0d0) / ((((x - lo) * (lo / (hi * hi))) ** 2.0d0) + ((t_0 ** 2.0d0) + ((lo / hi) * (t_0 * ((lo - x) / hi)))))
end function
public static double code(double lo, double hi, double x) {
return (x - lo) / (hi - lo);
}
public static double code(double lo, double hi, double x) {
double t_0 = (x - lo) / hi;
return Math.pow(t_0, 3.0) / (Math.pow(((x - lo) * (lo / (hi * hi))), 2.0) + (Math.pow(t_0, 2.0) + ((lo / hi) * (t_0 * ((lo - x) / hi)))));
}
def code(lo, hi, x): return (x - lo) / (hi - lo)
def code(lo, hi, x): t_0 = (x - lo) / hi return math.pow(t_0, 3.0) / (math.pow(((x - lo) * (lo / (hi * hi))), 2.0) + (math.pow(t_0, 2.0) + ((lo / hi) * (t_0 * ((lo - x) / hi)))))
function code(lo, hi, x) return Float64(Float64(x - lo) / Float64(hi - lo)) end
function code(lo, hi, x) t_0 = Float64(Float64(x - lo) / hi) return Float64((t_0 ^ 3.0) / Float64((Float64(Float64(x - lo) * Float64(lo / Float64(hi * hi))) ^ 2.0) + Float64((t_0 ^ 2.0) + Float64(Float64(lo / hi) * Float64(t_0 * Float64(Float64(lo - x) / hi)))))) end
function tmp = code(lo, hi, x) tmp = (x - lo) / (hi - lo); end
function tmp = code(lo, hi, x) t_0 = (x - lo) / hi; tmp = (t_0 ^ 3.0) / ((((x - lo) * (lo / (hi * hi))) ^ 2.0) + ((t_0 ^ 2.0) + ((lo / hi) * (t_0 * ((lo - x) / hi))))); end
code[lo_, hi_, x_] := N[(N[(x - lo), $MachinePrecision] / N[(hi - lo), $MachinePrecision]), $MachinePrecision]
code[lo_, hi_, x_] := Block[{t$95$0 = N[(N[(x - lo), $MachinePrecision] / hi), $MachinePrecision]}, N[(N[Power[t$95$0, 3.0], $MachinePrecision] / N[(N[Power[N[(N[(x - lo), $MachinePrecision] * N[(lo / N[(hi * hi), $MachinePrecision]), $MachinePrecision]), $MachinePrecision], 2.0], $MachinePrecision] + N[(N[Power[t$95$0, 2.0], $MachinePrecision] + N[(N[(lo / hi), $MachinePrecision] * N[(t$95$0 * N[(N[(lo - x), $MachinePrecision] / hi), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]]
\frac{x - lo}{hi - lo}
\begin{array}{l}
t_0 := \frac{x - lo}{hi}\\
\frac{{t_0}^{3}}{{\left(\left(x - lo\right) \cdot \frac{lo}{hi \cdot hi}\right)}^{2} + \left({t_0}^{2} + \frac{lo}{hi} \cdot \left(t_0 \cdot \frac{lo - x}{hi}\right)\right)}
\end{array}
Results
Initial program 96.87
Taylor expanded in hi around inf 100
Simplified90.61
[Start]100 | \[ \left(\frac{x}{hi} + \frac{lo \cdot \left(x - lo\right)}{{hi}^{2}}\right) - \frac{lo}{hi}
\] |
|---|---|
+-commutative [=>]100 | \[ \color{blue}{\left(\frac{lo \cdot \left(x - lo\right)}{{hi}^{2}} + \frac{x}{hi}\right)} - \frac{lo}{hi}
\] |
associate--l+ [=>]100 | \[ \color{blue}{\frac{lo \cdot \left(x - lo\right)}{{hi}^{2}} + \left(\frac{x}{hi} - \frac{lo}{hi}\right)}
\] |
*-commutative [=>]100 | \[ \frac{\color{blue}{\left(x - lo\right) \cdot lo}}{{hi}^{2}} + \left(\frac{x}{hi} - \frac{lo}{hi}\right)
\] |
unpow2 [=>]100 | \[ \frac{\left(x - lo\right) \cdot lo}{\color{blue}{hi \cdot hi}} + \left(\frac{x}{hi} - \frac{lo}{hi}\right)
\] |
times-frac [=>]90.61 | \[ \color{blue}{\frac{x - lo}{hi} \cdot \frac{lo}{hi}} + \left(\frac{x}{hi} - \frac{lo}{hi}\right)
\] |
div-sub [<=]90.61 | \[ \frac{x - lo}{hi} \cdot \frac{lo}{hi} + \color{blue}{\frac{x - lo}{hi}}
\] |
Applied egg-rr0.79
Taylor expanded in hi around inf 100
Simplified0.79
[Start]100 | \[ \frac{\frac{{\left(x - lo\right)}^{3}}{{hi}^{3}}}{{\left(\left(x - lo\right) \cdot \frac{lo}{hi \cdot hi}\right)}^{2} + \left({\left(\frac{x - lo}{hi}\right)}^{2} - \frac{lo}{hi} \cdot {\left(\frac{x - lo}{hi}\right)}^{2}\right)}
\] |
|---|---|
cube-div [<=]0.79 | \[ \frac{\color{blue}{{\left(\frac{x - lo}{hi}\right)}^{3}}}{{\left(\left(x - lo\right) \cdot \frac{lo}{hi \cdot hi}\right)}^{2} + \left({\left(\frac{x - lo}{hi}\right)}^{2} - \frac{lo}{hi} \cdot {\left(\frac{x - lo}{hi}\right)}^{2}\right)}
\] |
Applied egg-rr0.8
Final simplification0.8
| Alternative 1 | |
|---|---|
| Error | 0.83% |
| Cost | 14656 |
| Alternative 2 | |
|---|---|
| Error | 78.12% |
| Cost | 2752 |
| Alternative 3 | |
|---|---|
| Error | 80.5% |
| Cost | 448 |
| Alternative 4 | |
|---|---|
| Error | 81.22% |
| Cost | 320 |
| Alternative 5 | |
|---|---|
| Error | 81.2% |
| Cost | 256 |
| Alternative 6 | |
|---|---|
| Error | 81.32% |
| Cost | 64 |
herbie shell --seed 2023090
(FPCore (lo hi x)
:name "xlohi (overflows)"
:precision binary64
:pre (and (< lo -1e+308) (> hi 1e+308))
(/ (- x lo) (- hi lo)))