| Alternative 1 | |
|---|---|
| Error | 0.0 |
| Cost | 2240 |
(FPCore (t) :precision binary64 (/ (+ 1.0 (* (/ (* 2.0 t) (+ 1.0 t)) (/ (* 2.0 t) (+ 1.0 t)))) (+ 2.0 (* (/ (* 2.0 t) (+ 1.0 t)) (/ (* 2.0 t) (+ 1.0 t))))))
(FPCore (t)
:precision binary64
(let* ((t_1 (/ (/ (* t (* t 4.0)) (+ 1.0 t)) (+ 1.0 t))))
(if (<= t -5e+154)
0.8333333333333334
(if (<= t 50000.0)
(/ (+ 1.0 t_1) (+ 2.0 t_1))
(/
1.0
(/
1.0
(-
0.8333333333333334
(/ (+ 0.2222222222222222 (/ -0.037037037037037035 t)) t))))))))double code(double t) {
return (1.0 + (((2.0 * t) / (1.0 + t)) * ((2.0 * t) / (1.0 + t)))) / (2.0 + (((2.0 * t) / (1.0 + t)) * ((2.0 * t) / (1.0 + t))));
}
double code(double t) {
double t_1 = ((t * (t * 4.0)) / (1.0 + t)) / (1.0 + t);
double tmp;
if (t <= -5e+154) {
tmp = 0.8333333333333334;
} else if (t <= 50000.0) {
tmp = (1.0 + t_1) / (2.0 + t_1);
} else {
tmp = 1.0 / (1.0 / (0.8333333333333334 - ((0.2222222222222222 + (-0.037037037037037035 / t)) / t)));
}
return tmp;
}
real(8) function code(t)
real(8), intent (in) :: t
code = (1.0d0 + (((2.0d0 * t) / (1.0d0 + t)) * ((2.0d0 * t) / (1.0d0 + t)))) / (2.0d0 + (((2.0d0 * t) / (1.0d0 + t)) * ((2.0d0 * t) / (1.0d0 + t))))
end function
real(8) function code(t)
real(8), intent (in) :: t
real(8) :: t_1
real(8) :: tmp
t_1 = ((t * (t * 4.0d0)) / (1.0d0 + t)) / (1.0d0 + t)
if (t <= (-5d+154)) then
tmp = 0.8333333333333334d0
else if (t <= 50000.0d0) then
tmp = (1.0d0 + t_1) / (2.0d0 + t_1)
else
tmp = 1.0d0 / (1.0d0 / (0.8333333333333334d0 - ((0.2222222222222222d0 + ((-0.037037037037037035d0) / t)) / t)))
end if
code = tmp
end function
public static double code(double t) {
return (1.0 + (((2.0 * t) / (1.0 + t)) * ((2.0 * t) / (1.0 + t)))) / (2.0 + (((2.0 * t) / (1.0 + t)) * ((2.0 * t) / (1.0 + t))));
}
public static double code(double t) {
double t_1 = ((t * (t * 4.0)) / (1.0 + t)) / (1.0 + t);
double tmp;
if (t <= -5e+154) {
tmp = 0.8333333333333334;
} else if (t <= 50000.0) {
tmp = (1.0 + t_1) / (2.0 + t_1);
} else {
tmp = 1.0 / (1.0 / (0.8333333333333334 - ((0.2222222222222222 + (-0.037037037037037035 / t)) / t)));
}
return tmp;
}
def code(t): return (1.0 + (((2.0 * t) / (1.0 + t)) * ((2.0 * t) / (1.0 + t)))) / (2.0 + (((2.0 * t) / (1.0 + t)) * ((2.0 * t) / (1.0 + t))))
def code(t): t_1 = ((t * (t * 4.0)) / (1.0 + t)) / (1.0 + t) tmp = 0 if t <= -5e+154: tmp = 0.8333333333333334 elif t <= 50000.0: tmp = (1.0 + t_1) / (2.0 + t_1) else: tmp = 1.0 / (1.0 / (0.8333333333333334 - ((0.2222222222222222 + (-0.037037037037037035 / t)) / t))) return tmp
function code(t) return Float64(Float64(1.0 + Float64(Float64(Float64(2.0 * t) / Float64(1.0 + t)) * Float64(Float64(2.0 * t) / Float64(1.0 + t)))) / Float64(2.0 + Float64(Float64(Float64(2.0 * t) / Float64(1.0 + t)) * Float64(Float64(2.0 * t) / Float64(1.0 + t))))) end
function code(t) t_1 = Float64(Float64(Float64(t * Float64(t * 4.0)) / Float64(1.0 + t)) / Float64(1.0 + t)) tmp = 0.0 if (t <= -5e+154) tmp = 0.8333333333333334; elseif (t <= 50000.0) tmp = Float64(Float64(1.0 + t_1) / Float64(2.0 + t_1)); else tmp = Float64(1.0 / Float64(1.0 / Float64(0.8333333333333334 - Float64(Float64(0.2222222222222222 + Float64(-0.037037037037037035 / t)) / t)))); end return tmp end
function tmp = code(t) tmp = (1.0 + (((2.0 * t) / (1.0 + t)) * ((2.0 * t) / (1.0 + t)))) / (2.0 + (((2.0 * t) / (1.0 + t)) * ((2.0 * t) / (1.0 + t)))); end
function tmp_2 = code(t) t_1 = ((t * (t * 4.0)) / (1.0 + t)) / (1.0 + t); tmp = 0.0; if (t <= -5e+154) tmp = 0.8333333333333334; elseif (t <= 50000.0) tmp = (1.0 + t_1) / (2.0 + t_1); else tmp = 1.0 / (1.0 / (0.8333333333333334 - ((0.2222222222222222 + (-0.037037037037037035 / t)) / t))); end tmp_2 = tmp; end
code[t_] := N[(N[(1.0 + N[(N[(N[(2.0 * t), $MachinePrecision] / N[(1.0 + t), $MachinePrecision]), $MachinePrecision] * N[(N[(2.0 * t), $MachinePrecision] / N[(1.0 + t), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]), $MachinePrecision] / N[(2.0 + N[(N[(N[(2.0 * t), $MachinePrecision] / N[(1.0 + t), $MachinePrecision]), $MachinePrecision] * N[(N[(2.0 * t), $MachinePrecision] / N[(1.0 + t), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]
code[t_] := Block[{t$95$1 = N[(N[(N[(t * N[(t * 4.0), $MachinePrecision]), $MachinePrecision] / N[(1.0 + t), $MachinePrecision]), $MachinePrecision] / N[(1.0 + t), $MachinePrecision]), $MachinePrecision]}, If[LessEqual[t, -5e+154], 0.8333333333333334, If[LessEqual[t, 50000.0], N[(N[(1.0 + t$95$1), $MachinePrecision] / N[(2.0 + t$95$1), $MachinePrecision]), $MachinePrecision], N[(1.0 / N[(1.0 / N[(0.8333333333333334 - N[(N[(0.2222222222222222 + N[(-0.037037037037037035 / t), $MachinePrecision]), $MachinePrecision] / t), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]]]]
\frac{1 + \frac{2 \cdot t}{1 + t} \cdot \frac{2 \cdot t}{1 + t}}{2 + \frac{2 \cdot t}{1 + t} \cdot \frac{2 \cdot t}{1 + t}}
\begin{array}{l}
t_1 := \frac{\frac{t \cdot \left(t \cdot 4\right)}{1 + t}}{1 + t}\\
\mathbf{if}\;t \leq -5 \cdot 10^{+154}:\\
\;\;\;\;0.8333333333333334\\
\mathbf{elif}\;t \leq 50000:\\
\;\;\;\;\frac{1 + t_1}{2 + t_1}\\
\mathbf{else}:\\
\;\;\;\;\frac{1}{\frac{1}{0.8333333333333334 - \frac{0.2222222222222222 + \frac{-0.037037037037037035}{t}}{t}}}\\
\end{array}
Results
if t < -5.00000000000000004e154Initial program 0.1
Simplified0
[Start]0.1 | \[ \frac{1 + \frac{2 \cdot t}{1 + t} \cdot \frac{2 \cdot t}{1 + t}}{2 + \frac{2 \cdot t}{1 + t} \cdot \frac{2 \cdot t}{1 + t}}
\] |
|---|---|
associate-/l* [=>]0.1 | \[ \frac{1 + \color{blue}{\frac{2}{\frac{1 + t}{t}}} \cdot \frac{2 \cdot t}{1 + t}}{2 + \frac{2 \cdot t}{1 + t} \cdot \frac{2 \cdot t}{1 + t}}
\] |
associate-/l* [=>]0.1 | \[ \frac{1 + \frac{2}{\frac{1 + t}{t}} \cdot \color{blue}{\frac{2}{\frac{1 + t}{t}}}}{2 + \frac{2 \cdot t}{1 + t} \cdot \frac{2 \cdot t}{1 + t}}
\] |
associate-/l* [=>]0.1 | \[ \frac{1 + \frac{2}{\frac{1 + t}{t}} \cdot \frac{2}{\frac{1 + t}{t}}}{2 + \color{blue}{\frac{2}{\frac{1 + t}{t}}} \cdot \frac{2 \cdot t}{1 + t}}
\] |
associate-/l* [=>]0 | \[ \frac{1 + \frac{2}{\frac{1 + t}{t}} \cdot \frac{2}{\frac{1 + t}{t}}}{2 + \frac{2}{\frac{1 + t}{t}} \cdot \color{blue}{\frac{2}{\frac{1 + t}{t}}}}
\] |
Taylor expanded in t around inf 0
if -5.00000000000000004e154 < t < 5e4Initial program 0.0
Simplified0.1
[Start]0.0 | \[ \frac{1 + \frac{2 \cdot t}{1 + t} \cdot \frac{2 \cdot t}{1 + t}}{2 + \frac{2 \cdot t}{1 + t} \cdot \frac{2 \cdot t}{1 + t}}
\] |
|---|---|
associate-*r/ [=>]0.0 | \[ \frac{1 + \color{blue}{\frac{\frac{2 \cdot t}{1 + t} \cdot \left(2 \cdot t\right)}{1 + t}}}{2 + \frac{2 \cdot t}{1 + t} \cdot \frac{2 \cdot t}{1 + t}}
\] |
associate-*l/ [=>]0.1 | \[ \frac{1 + \frac{\color{blue}{\frac{\left(2 \cdot t\right) \cdot \left(2 \cdot t\right)}{1 + t}}}{1 + t}}{2 + \frac{2 \cdot t}{1 + t} \cdot \frac{2 \cdot t}{1 + t}}
\] |
*-commutative [=>]0.1 | \[ \frac{1 + \frac{\frac{\color{blue}{\left(t \cdot 2\right)} \cdot \left(2 \cdot t\right)}{1 + t}}{1 + t}}{2 + \frac{2 \cdot t}{1 + t} \cdot \frac{2 \cdot t}{1 + t}}
\] |
associate-*l* [=>]0.1 | \[ \frac{1 + \frac{\frac{\color{blue}{t \cdot \left(2 \cdot \left(2 \cdot t\right)\right)}}{1 + t}}{1 + t}}{2 + \frac{2 \cdot t}{1 + t} \cdot \frac{2 \cdot t}{1 + t}}
\] |
associate-*r* [=>]0.1 | \[ \frac{1 + \frac{\frac{t \cdot \color{blue}{\left(\left(2 \cdot 2\right) \cdot t\right)}}{1 + t}}{1 + t}}{2 + \frac{2 \cdot t}{1 + t} \cdot \frac{2 \cdot t}{1 + t}}
\] |
*-commutative [<=]0.1 | \[ \frac{1 + \frac{\frac{t \cdot \color{blue}{\left(t \cdot \left(2 \cdot 2\right)\right)}}{1 + t}}{1 + t}}{2 + \frac{2 \cdot t}{1 + t} \cdot \frac{2 \cdot t}{1 + t}}
\] |
metadata-eval [=>]0.1 | \[ \frac{1 + \frac{\frac{t \cdot \left(t \cdot \color{blue}{4}\right)}{1 + t}}{1 + t}}{2 + \frac{2 \cdot t}{1 + t} \cdot \frac{2 \cdot t}{1 + t}}
\] |
associate-*r/ [=>]0.1 | \[ \frac{1 + \frac{\frac{t \cdot \left(t \cdot 4\right)}{1 + t}}{1 + t}}{2 + \color{blue}{\frac{\frac{2 \cdot t}{1 + t} \cdot \left(2 \cdot t\right)}{1 + t}}}
\] |
associate-*l/ [=>]0.1 | \[ \frac{1 + \frac{\frac{t \cdot \left(t \cdot 4\right)}{1 + t}}{1 + t}}{2 + \frac{\color{blue}{\frac{\left(2 \cdot t\right) \cdot \left(2 \cdot t\right)}{1 + t}}}{1 + t}}
\] |
*-commutative [=>]0.1 | \[ \frac{1 + \frac{\frac{t \cdot \left(t \cdot 4\right)}{1 + t}}{1 + t}}{2 + \frac{\frac{\color{blue}{\left(t \cdot 2\right)} \cdot \left(2 \cdot t\right)}{1 + t}}{1 + t}}
\] |
associate-*l* [=>]0.1 | \[ \frac{1 + \frac{\frac{t \cdot \left(t \cdot 4\right)}{1 + t}}{1 + t}}{2 + \frac{\frac{\color{blue}{t \cdot \left(2 \cdot \left(2 \cdot t\right)\right)}}{1 + t}}{1 + t}}
\] |
associate-*r* [=>]0.1 | \[ \frac{1 + \frac{\frac{t \cdot \left(t \cdot 4\right)}{1 + t}}{1 + t}}{2 + \frac{\frac{t \cdot \color{blue}{\left(\left(2 \cdot 2\right) \cdot t\right)}}{1 + t}}{1 + t}}
\] |
*-commutative [<=]0.1 | \[ \frac{1 + \frac{\frac{t \cdot \left(t \cdot 4\right)}{1 + t}}{1 + t}}{2 + \frac{\frac{t \cdot \color{blue}{\left(t \cdot \left(2 \cdot 2\right)\right)}}{1 + t}}{1 + t}}
\] |
metadata-eval [=>]0.1 | \[ \frac{1 + \frac{\frac{t \cdot \left(t \cdot 4\right)}{1 + t}}{1 + t}}{2 + \frac{\frac{t \cdot \left(t \cdot \color{blue}{4}\right)}{1 + t}}{1 + t}}
\] |
if 5e4 < t Initial program 0.1
Simplified0.0
[Start]0.1 | \[ \frac{1 + \frac{2 \cdot t}{1 + t} \cdot \frac{2 \cdot t}{1 + t}}{2 + \frac{2 \cdot t}{1 + t} \cdot \frac{2 \cdot t}{1 + t}}
\] |
|---|---|
associate-/l* [=>]0.1 | \[ \frac{1 + \color{blue}{\frac{2}{\frac{1 + t}{t}}} \cdot \frac{2 \cdot t}{1 + t}}{2 + \frac{2 \cdot t}{1 + t} \cdot \frac{2 \cdot t}{1 + t}}
\] |
associate-/l* [=>]0.1 | \[ \frac{1 + \frac{2}{\frac{1 + t}{t}} \cdot \color{blue}{\frac{2}{\frac{1 + t}{t}}}}{2 + \frac{2 \cdot t}{1 + t} \cdot \frac{2 \cdot t}{1 + t}}
\] |
associate-/l* [=>]0.1 | \[ \frac{1 + \frac{2}{\frac{1 + t}{t}} \cdot \frac{2}{\frac{1 + t}{t}}}{2 + \color{blue}{\frac{2}{\frac{1 + t}{t}}} \cdot \frac{2 \cdot t}{1 + t}}
\] |
associate-/l* [=>]0.0 | \[ \frac{1 + \frac{2}{\frac{1 + t}{t}} \cdot \frac{2}{\frac{1 + t}{t}}}{2 + \frac{2}{\frac{1 + t}{t}} \cdot \color{blue}{\frac{2}{\frac{1 + t}{t}}}}
\] |
Taylor expanded in t around inf 0.0
Simplified0.0
[Start]0.0 | \[ \left(0.037037037037037035 \cdot \frac{1}{{t}^{2}} + 0.8333333333333334\right) - 0.2222222222222222 \cdot \frac{1}{t}
\] |
|---|---|
associate--l+ [=>]0.0 | \[ \color{blue}{0.037037037037037035 \cdot \frac{1}{{t}^{2}} + \left(0.8333333333333334 - 0.2222222222222222 \cdot \frac{1}{t}\right)}
\] |
associate-*r/ [=>]0.0 | \[ \color{blue}{\frac{0.037037037037037035 \cdot 1}{{t}^{2}}} + \left(0.8333333333333334 - 0.2222222222222222 \cdot \frac{1}{t}\right)
\] |
metadata-eval [=>]0.0 | \[ \frac{\color{blue}{0.037037037037037035}}{{t}^{2}} + \left(0.8333333333333334 - 0.2222222222222222 \cdot \frac{1}{t}\right)
\] |
unpow2 [=>]0.0 | \[ \frac{0.037037037037037035}{\color{blue}{t \cdot t}} + \left(0.8333333333333334 - 0.2222222222222222 \cdot \frac{1}{t}\right)
\] |
associate-*r/ [=>]0.0 | \[ \frac{0.037037037037037035}{t \cdot t} + \left(0.8333333333333334 - \color{blue}{\frac{0.2222222222222222 \cdot 1}{t}}\right)
\] |
metadata-eval [=>]0.0 | \[ \frac{0.037037037037037035}{t \cdot t} + \left(0.8333333333333334 - \frac{\color{blue}{0.2222222222222222}}{t}\right)
\] |
Applied egg-rr0.0
Applied egg-rr0.0
Final simplification0.1
| Alternative 1 | |
|---|---|
| Error | 0.0 |
| Cost | 2240 |
| Alternative 2 | |
|---|---|
| Error | 0.3 |
| Cost | 2120 |
| Alternative 3 | |
|---|---|
| Error | 0.0 |
| Cost | 2120 |
| Alternative 4 | |
|---|---|
| Error | 0.3 |
| Cost | 1480 |
| Alternative 5 | |
|---|---|
| Error | 0.3 |
| Cost | 1352 |
| Alternative 6 | |
|---|---|
| Error | 0.3 |
| Cost | 1352 |
| Alternative 7 | |
|---|---|
| Error | 0.4 |
| Cost | 1224 |
| Alternative 8 | |
|---|---|
| Error | 0.4 |
| Cost | 1096 |
| Alternative 9 | |
|---|---|
| Error | 0.4 |
| Cost | 1096 |
| Alternative 10 | |
|---|---|
| Error | 0.4 |
| Cost | 841 |
| Alternative 11 | |
|---|---|
| Error | 0.5 |
| Cost | 585 |
| Alternative 12 | |
|---|---|
| Error | 0.8 |
| Cost | 584 |
| Alternative 13 | |
|---|---|
| Error | 0.9 |
| Cost | 328 |
| Alternative 14 | |
|---|---|
| Error | 25.6 |
| Cost | 64 |
herbie shell --seed 2022364
(FPCore (t)
:name "Kahan p13 Example 1"
:precision binary64
(/ (+ 1.0 (* (/ (* 2.0 t) (+ 1.0 t)) (/ (* 2.0 t) (+ 1.0 t)))) (+ 2.0 (* (/ (* 2.0 t) (+ 1.0 t)) (/ (* 2.0 t) (+ 1.0 t))))))