| Alternative 1 | |
|---|---|
| Error | 6.7 |
| Cost | 85640 |
(FPCore (t l k) :precision binary64 (/ 2.0 (* (* (* (/ (pow t 3.0) (* l l)) (sin k)) (tan k)) (+ (+ 1.0 (pow (/ k t) 2.0)) 1.0))))
(FPCore (t l k)
:precision binary64
(let* ((t_1 (pow (cbrt l) 2.0))
(t_2 (pow (sin k) 2.0))
(t_3 (* (/ k l) t))
(t_4 (* (sin k) (tan k)))
(t_5 (+ 2.0 (pow (/ k t) 2.0)))
(t_6 (cbrt (* t_5 t_4)))
(t_7 (* t (pow (cbrt k) 2.0))))
(if (<= k -6e+134)
(* 2.0 (/ (cos k) (* (* t_2 (/ k l)) t_3)))
(if (<= k -3.2e-155)
(/ (* (/ 2.0 t) (/ t_1 t_6)) (pow (* t (/ t_6 t_1)) 2.0))
(if (<= k 6e-120)
(* (/ 1.0 (pow (/ t_7 (cbrt l)) 2.0)) (* (cbrt l) (/ l t_7)))
(if (<= k 1.18e+51)
(/
(* (/ 2.0 (cbrt t_5)) (/ (/ t_1 t) (cbrt t_4)))
(pow (* t_6 (/ t t_1)) 2.0))
(* 2.0 (/ (cos k) (* (/ k l) (* t_2 t_3))))))))))double code(double t, double l, double k) {
return 2.0 / ((((pow(t, 3.0) / (l * l)) * sin(k)) * tan(k)) * ((1.0 + pow((k / t), 2.0)) + 1.0));
}
double code(double t, double l, double k) {
double t_1 = pow(cbrt(l), 2.0);
double t_2 = pow(sin(k), 2.0);
double t_3 = (k / l) * t;
double t_4 = sin(k) * tan(k);
double t_5 = 2.0 + pow((k / t), 2.0);
double t_6 = cbrt((t_5 * t_4));
double t_7 = t * pow(cbrt(k), 2.0);
double tmp;
if (k <= -6e+134) {
tmp = 2.0 * (cos(k) / ((t_2 * (k / l)) * t_3));
} else if (k <= -3.2e-155) {
tmp = ((2.0 / t) * (t_1 / t_6)) / pow((t * (t_6 / t_1)), 2.0);
} else if (k <= 6e-120) {
tmp = (1.0 / pow((t_7 / cbrt(l)), 2.0)) * (cbrt(l) * (l / t_7));
} else if (k <= 1.18e+51) {
tmp = ((2.0 / cbrt(t_5)) * ((t_1 / t) / cbrt(t_4))) / pow((t_6 * (t / t_1)), 2.0);
} else {
tmp = 2.0 * (cos(k) / ((k / l) * (t_2 * t_3)));
}
return tmp;
}
public static double code(double t, double l, double k) {
return 2.0 / ((((Math.pow(t, 3.0) / (l * l)) * Math.sin(k)) * Math.tan(k)) * ((1.0 + Math.pow((k / t), 2.0)) + 1.0));
}
public static double code(double t, double l, double k) {
double t_1 = Math.pow(Math.cbrt(l), 2.0);
double t_2 = Math.pow(Math.sin(k), 2.0);
double t_3 = (k / l) * t;
double t_4 = Math.sin(k) * Math.tan(k);
double t_5 = 2.0 + Math.pow((k / t), 2.0);
double t_6 = Math.cbrt((t_5 * t_4));
double t_7 = t * Math.pow(Math.cbrt(k), 2.0);
double tmp;
if (k <= -6e+134) {
tmp = 2.0 * (Math.cos(k) / ((t_2 * (k / l)) * t_3));
} else if (k <= -3.2e-155) {
tmp = ((2.0 / t) * (t_1 / t_6)) / Math.pow((t * (t_6 / t_1)), 2.0);
} else if (k <= 6e-120) {
tmp = (1.0 / Math.pow((t_7 / Math.cbrt(l)), 2.0)) * (Math.cbrt(l) * (l / t_7));
} else if (k <= 1.18e+51) {
tmp = ((2.0 / Math.cbrt(t_5)) * ((t_1 / t) / Math.cbrt(t_4))) / Math.pow((t_6 * (t / t_1)), 2.0);
} else {
tmp = 2.0 * (Math.cos(k) / ((k / l) * (t_2 * t_3)));
}
return tmp;
}
function code(t, l, k) return Float64(2.0 / Float64(Float64(Float64(Float64((t ^ 3.0) / Float64(l * l)) * sin(k)) * tan(k)) * Float64(Float64(1.0 + (Float64(k / t) ^ 2.0)) + 1.0))) end
function code(t, l, k) t_1 = cbrt(l) ^ 2.0 t_2 = sin(k) ^ 2.0 t_3 = Float64(Float64(k / l) * t) t_4 = Float64(sin(k) * tan(k)) t_5 = Float64(2.0 + (Float64(k / t) ^ 2.0)) t_6 = cbrt(Float64(t_5 * t_4)) t_7 = Float64(t * (cbrt(k) ^ 2.0)) tmp = 0.0 if (k <= -6e+134) tmp = Float64(2.0 * Float64(cos(k) / Float64(Float64(t_2 * Float64(k / l)) * t_3))); elseif (k <= -3.2e-155) tmp = Float64(Float64(Float64(2.0 / t) * Float64(t_1 / t_6)) / (Float64(t * Float64(t_6 / t_1)) ^ 2.0)); elseif (k <= 6e-120) tmp = Float64(Float64(1.0 / (Float64(t_7 / cbrt(l)) ^ 2.0)) * Float64(cbrt(l) * Float64(l / t_7))); elseif (k <= 1.18e+51) tmp = Float64(Float64(Float64(2.0 / cbrt(t_5)) * Float64(Float64(t_1 / t) / cbrt(t_4))) / (Float64(t_6 * Float64(t / t_1)) ^ 2.0)); else tmp = Float64(2.0 * Float64(cos(k) / Float64(Float64(k / l) * Float64(t_2 * t_3)))); end return tmp end
code[t_, l_, k_] := N[(2.0 / N[(N[(N[(N[(N[Power[t, 3.0], $MachinePrecision] / N[(l * l), $MachinePrecision]), $MachinePrecision] * N[Sin[k], $MachinePrecision]), $MachinePrecision] * N[Tan[k], $MachinePrecision]), $MachinePrecision] * N[(N[(1.0 + N[Power[N[(k / t), $MachinePrecision], 2.0], $MachinePrecision]), $MachinePrecision] + 1.0), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]
code[t_, l_, k_] := Block[{t$95$1 = N[Power[N[Power[l, 1/3], $MachinePrecision], 2.0], $MachinePrecision]}, Block[{t$95$2 = N[Power[N[Sin[k], $MachinePrecision], 2.0], $MachinePrecision]}, Block[{t$95$3 = N[(N[(k / l), $MachinePrecision] * t), $MachinePrecision]}, Block[{t$95$4 = N[(N[Sin[k], $MachinePrecision] * N[Tan[k], $MachinePrecision]), $MachinePrecision]}, Block[{t$95$5 = N[(2.0 + N[Power[N[(k / t), $MachinePrecision], 2.0], $MachinePrecision]), $MachinePrecision]}, Block[{t$95$6 = N[Power[N[(t$95$5 * t$95$4), $MachinePrecision], 1/3], $MachinePrecision]}, Block[{t$95$7 = N[(t * N[Power[N[Power[k, 1/3], $MachinePrecision], 2.0], $MachinePrecision]), $MachinePrecision]}, If[LessEqual[k, -6e+134], N[(2.0 * N[(N[Cos[k], $MachinePrecision] / N[(N[(t$95$2 * N[(k / l), $MachinePrecision]), $MachinePrecision] * t$95$3), $MachinePrecision]), $MachinePrecision]), $MachinePrecision], If[LessEqual[k, -3.2e-155], N[(N[(N[(2.0 / t), $MachinePrecision] * N[(t$95$1 / t$95$6), $MachinePrecision]), $MachinePrecision] / N[Power[N[(t * N[(t$95$6 / t$95$1), $MachinePrecision]), $MachinePrecision], 2.0], $MachinePrecision]), $MachinePrecision], If[LessEqual[k, 6e-120], N[(N[(1.0 / N[Power[N[(t$95$7 / N[Power[l, 1/3], $MachinePrecision]), $MachinePrecision], 2.0], $MachinePrecision]), $MachinePrecision] * N[(N[Power[l, 1/3], $MachinePrecision] * N[(l / t$95$7), $MachinePrecision]), $MachinePrecision]), $MachinePrecision], If[LessEqual[k, 1.18e+51], N[(N[(N[(2.0 / N[Power[t$95$5, 1/3], $MachinePrecision]), $MachinePrecision] * N[(N[(t$95$1 / t), $MachinePrecision] / N[Power[t$95$4, 1/3], $MachinePrecision]), $MachinePrecision]), $MachinePrecision] / N[Power[N[(t$95$6 * N[(t / t$95$1), $MachinePrecision]), $MachinePrecision], 2.0], $MachinePrecision]), $MachinePrecision], N[(2.0 * N[(N[Cos[k], $MachinePrecision] / N[(N[(k / l), $MachinePrecision] * N[(t$95$2 * t$95$3), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]]]]]]]]]]]]
\frac{2}{\left(\left(\frac{{t}^{3}}{\ell \cdot \ell} \cdot \sin k\right) \cdot \tan k\right) \cdot \left(\left(1 + {\left(\frac{k}{t}\right)}^{2}\right) + 1\right)}
\begin{array}{l}
t_1 := {\left(\sqrt[3]{\ell}\right)}^{2}\\
t_2 := {\sin k}^{2}\\
t_3 := \frac{k}{\ell} \cdot t\\
t_4 := \sin k \cdot \tan k\\
t_5 := 2 + {\left(\frac{k}{t}\right)}^{2}\\
t_6 := \sqrt[3]{t_5 \cdot t_4}\\
t_7 := t \cdot {\left(\sqrt[3]{k}\right)}^{2}\\
\mathbf{if}\;k \leq -6 \cdot 10^{+134}:\\
\;\;\;\;2 \cdot \frac{\cos k}{\left(t_2 \cdot \frac{k}{\ell}\right) \cdot t_3}\\
\mathbf{elif}\;k \leq -3.2 \cdot 10^{-155}:\\
\;\;\;\;\frac{\frac{2}{t} \cdot \frac{t_1}{t_6}}{{\left(t \cdot \frac{t_6}{t_1}\right)}^{2}}\\
\mathbf{elif}\;k \leq 6 \cdot 10^{-120}:\\
\;\;\;\;\frac{1}{{\left(\frac{t_7}{\sqrt[3]{\ell}}\right)}^{2}} \cdot \left(\sqrt[3]{\ell} \cdot \frac{\ell}{t_7}\right)\\
\mathbf{elif}\;k \leq 1.18 \cdot 10^{+51}:\\
\;\;\;\;\frac{\frac{2}{\sqrt[3]{t_5}} \cdot \frac{\frac{t_1}{t}}{\sqrt[3]{t_4}}}{{\left(t_6 \cdot \frac{t}{t_1}\right)}^{2}}\\
\mathbf{else}:\\
\;\;\;\;2 \cdot \frac{\cos k}{\frac{k}{\ell} \cdot \left(t_2 \cdot t_3\right)}\\
\end{array}
Results
if k < -5.99999999999999993e134Initial program 33.5
Simplified33.5
[Start]33.5 | \[ \frac{2}{\left(\left(\frac{{t}^{3}}{\ell \cdot \ell} \cdot \sin k\right) \cdot \tan k\right) \cdot \left(\left(1 + {\left(\frac{k}{t}\right)}^{2}\right) + 1\right)}
\] |
|---|---|
associate-*l* [=>]33.5 | \[ \frac{2}{\color{blue}{\left(\frac{{t}^{3}}{\ell \cdot \ell} \cdot \sin k\right) \cdot \left(\tan k \cdot \left(\left(1 + {\left(\frac{k}{t}\right)}^{2}\right) + 1\right)\right)}}
\] |
+-commutative [=>]33.5 | \[ \frac{2}{\left(\frac{{t}^{3}}{\ell \cdot \ell} \cdot \sin k\right) \cdot \left(\tan k \cdot \color{blue}{\left(1 + \left(1 + {\left(\frac{k}{t}\right)}^{2}\right)\right)}\right)}
\] |
Taylor expanded in t around 0 23.7
Simplified6.3
[Start]23.7 | \[ 2 \cdot \frac{\cos k \cdot {\ell}^{2}}{{k}^{2} \cdot \left({\sin k}^{2} \cdot t\right)}
\] |
|---|---|
associate-/l* [=>]23.7 | \[ 2 \cdot \color{blue}{\frac{\cos k}{\frac{{k}^{2} \cdot \left({\sin k}^{2} \cdot t\right)}{{\ell}^{2}}}}
\] |
*-commutative [=>]23.7 | \[ 2 \cdot \frac{\cos k}{\frac{\color{blue}{\left({\sin k}^{2} \cdot t\right) \cdot {k}^{2}}}{{\ell}^{2}}}
\] |
associate-/l* [=>]23.7 | \[ 2 \cdot \frac{\cos k}{\color{blue}{\frac{{\sin k}^{2} \cdot t}{\frac{{\ell}^{2}}{{k}^{2}}}}}
\] |
unpow2 [=>]23.7 | \[ 2 \cdot \frac{\cos k}{\frac{{\sin k}^{2} \cdot t}{\frac{\color{blue}{\ell \cdot \ell}}{{k}^{2}}}}
\] |
unpow2 [=>]23.7 | \[ 2 \cdot \frac{\cos k}{\frac{{\sin k}^{2} \cdot t}{\frac{\ell \cdot \ell}{\color{blue}{k \cdot k}}}}
\] |
times-frac [=>]6.3 | \[ 2 \cdot \frac{\cos k}{\frac{{\sin k}^{2} \cdot t}{\color{blue}{\frac{\ell}{k} \cdot \frac{\ell}{k}}}}
\] |
Applied egg-rr2.7
if -5.99999999999999993e134 < k < -3.20000000000000013e-155Initial program 31.1
Simplified30.9
[Start]31.1 | \[ \frac{2}{\left(\left(\frac{{t}^{3}}{\ell \cdot \ell} \cdot \sin k\right) \cdot \tan k\right) \cdot \left(\left(1 + {\left(\frac{k}{t}\right)}^{2}\right) + 1\right)}
\] |
|---|---|
*-commutative [=>]31.1 | \[ \frac{2}{\color{blue}{\left(\left(1 + {\left(\frac{k}{t}\right)}^{2}\right) + 1\right) \cdot \left(\left(\frac{{t}^{3}}{\ell \cdot \ell} \cdot \sin k\right) \cdot \tan k\right)}}
\] |
distribute-rgt1-in [<=]31.1 | \[ \frac{2}{\color{blue}{\left(\frac{{t}^{3}}{\ell \cdot \ell} \cdot \sin k\right) \cdot \tan k + \left(1 + {\left(\frac{k}{t}\right)}^{2}\right) \cdot \left(\left(\frac{{t}^{3}}{\ell \cdot \ell} \cdot \sin k\right) \cdot \tan k\right)}}
\] |
*-commutative [=>]31.1 | \[ \frac{2}{\left(\frac{{t}^{3}}{\ell \cdot \ell} \cdot \sin k\right) \cdot \tan k + \color{blue}{\left(\left(\frac{{t}^{3}}{\ell \cdot \ell} \cdot \sin k\right) \cdot \tan k\right) \cdot \left(1 + {\left(\frac{k}{t}\right)}^{2}\right)}}
\] |
associate-*l* [=>]31.0 | \[ \frac{2}{\left(\frac{{t}^{3}}{\ell \cdot \ell} \cdot \sin k\right) \cdot \tan k + \color{blue}{\left(\frac{{t}^{3}}{\ell \cdot \ell} \cdot \sin k\right) \cdot \left(\tan k \cdot \left(1 + {\left(\frac{k}{t}\right)}^{2}\right)\right)}}
\] |
associate-*l* [=>]30.9 | \[ \frac{2}{\left(\frac{{t}^{3}}{\ell \cdot \ell} \cdot \sin k\right) \cdot \tan k + \color{blue}{\frac{{t}^{3}}{\ell \cdot \ell} \cdot \left(\sin k \cdot \left(\tan k \cdot \left(1 + {\left(\frac{k}{t}\right)}^{2}\right)\right)\right)}}
\] |
distribute-lft-in [=>]30.9 | \[ \frac{2}{\left(\frac{{t}^{3}}{\ell \cdot \ell} \cdot \sin k\right) \cdot \tan k + \frac{{t}^{3}}{\ell \cdot \ell} \cdot \left(\sin k \cdot \color{blue}{\left(\tan k \cdot 1 + \tan k \cdot {\left(\frac{k}{t}\right)}^{2}\right)}\right)}
\] |
*-rgt-identity [=>]30.9 | \[ \frac{2}{\left(\frac{{t}^{3}}{\ell \cdot \ell} \cdot \sin k\right) \cdot \tan k + \frac{{t}^{3}}{\ell \cdot \ell} \cdot \left(\sin k \cdot \left(\color{blue}{\tan k} + \tan k \cdot {\left(\frac{k}{t}\right)}^{2}\right)\right)}
\] |
distribute-lft-in [=>]30.9 | \[ \frac{2}{\left(\frac{{t}^{3}}{\ell \cdot \ell} \cdot \sin k\right) \cdot \tan k + \frac{{t}^{3}}{\ell \cdot \ell} \cdot \color{blue}{\left(\sin k \cdot \tan k + \sin k \cdot \left(\tan k \cdot {\left(\frac{k}{t}\right)}^{2}\right)\right)}}
\] |
Applied egg-rr10.0
Simplified10.0
[Start]10.0 | \[ \frac{1}{{\left(\sqrt[3]{\tan k \cdot \left(\left(2 + {\left(\frac{k}{t}\right)}^{2}\right) \cdot \sin k\right)} \cdot \frac{t}{{\left(\sqrt[3]{\ell}\right)}^{2}}\right)}^{2}} \cdot \frac{2}{\sqrt[3]{\tan k \cdot \left(\left(2 + {\left(\frac{k}{t}\right)}^{2}\right) \cdot \sin k\right)} \cdot \frac{t}{{\left(\sqrt[3]{\ell}\right)}^{2}}}
\] |
|---|---|
associate-*l/ [=>]10.0 | \[ \color{blue}{\frac{1 \cdot \frac{2}{\sqrt[3]{\tan k \cdot \left(\left(2 + {\left(\frac{k}{t}\right)}^{2}\right) \cdot \sin k\right)} \cdot \frac{t}{{\left(\sqrt[3]{\ell}\right)}^{2}}}}{{\left(\sqrt[3]{\tan k \cdot \left(\left(2 + {\left(\frac{k}{t}\right)}^{2}\right) \cdot \sin k\right)} \cdot \frac{t}{{\left(\sqrt[3]{\ell}\right)}^{2}}\right)}^{2}}}
\] |
Applied egg-rr10.0
Applied egg-rr10.0
Simplified10.0
[Start]10.0 | \[ \frac{\frac{\frac{2}{t}}{1} \cdot \frac{{\left(\sqrt[3]{\ell}\right)}^{2}}{\sqrt[3]{\left(2 + {\left(\frac{k}{t}\right)}^{2}\right) \cdot \left(\sin k \cdot \tan k\right)}}}{{\left(\frac{\sqrt[3]{\left(2 + {\left(\frac{k}{t}\right)}^{2}\right) \cdot \left(\sin k \cdot \tan k\right)}}{\frac{{\left(\sqrt[3]{\ell}\right)}^{2}}{t}}\right)}^{2}}
\] |
|---|---|
associate-/r/ [=>]10.0 | \[ \frac{\frac{\frac{2}{t}}{1} \cdot \frac{{\left(\sqrt[3]{\ell}\right)}^{2}}{\sqrt[3]{\left(2 + {\left(\frac{k}{t}\right)}^{2}\right) \cdot \left(\sin k \cdot \tan k\right)}}}{{\color{blue}{\left(\frac{\sqrt[3]{\left(2 + {\left(\frac{k}{t}\right)}^{2}\right) \cdot \left(\sin k \cdot \tan k\right)}}{{\left(\sqrt[3]{\ell}\right)}^{2}} \cdot t\right)}}^{2}}
\] |
if -3.20000000000000013e-155 < k < 6.00000000000000022e-120Initial program 37.3
Simplified58.6
[Start]37.3 | \[ \frac{2}{\left(\left(\frac{{t}^{3}}{\ell \cdot \ell} \cdot \sin k\right) \cdot \tan k\right) \cdot \left(\left(1 + {\left(\frac{k}{t}\right)}^{2}\right) + 1\right)}
\] |
|---|---|
*-commutative [=>]37.3 | \[ \frac{2}{\color{blue}{\left(\left(1 + {\left(\frac{k}{t}\right)}^{2}\right) + 1\right) \cdot \left(\left(\frac{{t}^{3}}{\ell \cdot \ell} \cdot \sin k\right) \cdot \tan k\right)}}
\] |
distribute-rgt1-in [<=]37.3 | \[ \frac{2}{\color{blue}{\left(\frac{{t}^{3}}{\ell \cdot \ell} \cdot \sin k\right) \cdot \tan k + \left(1 + {\left(\frac{k}{t}\right)}^{2}\right) \cdot \left(\left(\frac{{t}^{3}}{\ell \cdot \ell} \cdot \sin k\right) \cdot \tan k\right)}}
\] |
*-commutative [=>]37.3 | \[ \frac{2}{\left(\frac{{t}^{3}}{\ell \cdot \ell} \cdot \sin k\right) \cdot \tan k + \color{blue}{\left(\left(\frac{{t}^{3}}{\ell \cdot \ell} \cdot \sin k\right) \cdot \tan k\right) \cdot \left(1 + {\left(\frac{k}{t}\right)}^{2}\right)}}
\] |
associate-*l* [=>]37.3 | \[ \frac{2}{\left(\frac{{t}^{3}}{\ell \cdot \ell} \cdot \sin k\right) \cdot \tan k + \color{blue}{\left(\frac{{t}^{3}}{\ell \cdot \ell} \cdot \sin k\right) \cdot \left(\tan k \cdot \left(1 + {\left(\frac{k}{t}\right)}^{2}\right)\right)}}
\] |
associate-*l* [=>]58.0 | \[ \frac{2}{\left(\frac{{t}^{3}}{\ell \cdot \ell} \cdot \sin k\right) \cdot \tan k + \color{blue}{\frac{{t}^{3}}{\ell \cdot \ell} \cdot \left(\sin k \cdot \left(\tan k \cdot \left(1 + {\left(\frac{k}{t}\right)}^{2}\right)\right)\right)}}
\] |
distribute-lft-in [=>]58.0 | \[ \frac{2}{\left(\frac{{t}^{3}}{\ell \cdot \ell} \cdot \sin k\right) \cdot \tan k + \frac{{t}^{3}}{\ell \cdot \ell} \cdot \left(\sin k \cdot \color{blue}{\left(\tan k \cdot 1 + \tan k \cdot {\left(\frac{k}{t}\right)}^{2}\right)}\right)}
\] |
*-rgt-identity [=>]58.0 | \[ \frac{2}{\left(\frac{{t}^{3}}{\ell \cdot \ell} \cdot \sin k\right) \cdot \tan k + \frac{{t}^{3}}{\ell \cdot \ell} \cdot \left(\sin k \cdot \left(\color{blue}{\tan k} + \tan k \cdot {\left(\frac{k}{t}\right)}^{2}\right)\right)}
\] |
distribute-lft-in [=>]58.0 | \[ \frac{2}{\left(\frac{{t}^{3}}{\ell \cdot \ell} \cdot \sin k\right) \cdot \tan k + \frac{{t}^{3}}{\ell \cdot \ell} \cdot \color{blue}{\left(\sin k \cdot \tan k + \sin k \cdot \left(\tan k \cdot {\left(\frac{k}{t}\right)}^{2}\right)\right)}}
\] |
Taylor expanded in k around 0 58.5
Simplified35.9
[Start]58.5 | \[ \frac{{\ell}^{2}}{{k}^{2} \cdot {t}^{3}}
\] |
|---|---|
unpow2 [=>]58.5 | \[ \frac{\color{blue}{\ell \cdot \ell}}{{k}^{2} \cdot {t}^{3}}
\] |
associate-/l* [=>]58.2 | \[ \color{blue}{\frac{\ell}{\frac{{k}^{2} \cdot {t}^{3}}{\ell}}}
\] |
unpow2 [=>]58.2 | \[ \frac{\ell}{\frac{\color{blue}{\left(k \cdot k\right)} \cdot {t}^{3}}{\ell}}
\] |
associate-*l* [=>]35.9 | \[ \frac{\ell}{\frac{\color{blue}{k \cdot \left(k \cdot {t}^{3}\right)}}{\ell}}
\] |
Applied egg-rr3.7
if 6.00000000000000022e-120 < k < 1.18e51Initial program 28.8
Simplified28.7
[Start]28.8 | \[ \frac{2}{\left(\left(\frac{{t}^{3}}{\ell \cdot \ell} \cdot \sin k\right) \cdot \tan k\right) \cdot \left(\left(1 + {\left(\frac{k}{t}\right)}^{2}\right) + 1\right)}
\] |
|---|---|
*-commutative [=>]28.8 | \[ \frac{2}{\color{blue}{\left(\left(1 + {\left(\frac{k}{t}\right)}^{2}\right) + 1\right) \cdot \left(\left(\frac{{t}^{3}}{\ell \cdot \ell} \cdot \sin k\right) \cdot \tan k\right)}}
\] |
distribute-rgt1-in [<=]28.8 | \[ \frac{2}{\color{blue}{\left(\frac{{t}^{3}}{\ell \cdot \ell} \cdot \sin k\right) \cdot \tan k + \left(1 + {\left(\frac{k}{t}\right)}^{2}\right) \cdot \left(\left(\frac{{t}^{3}}{\ell \cdot \ell} \cdot \sin k\right) \cdot \tan k\right)}}
\] |
*-commutative [=>]28.8 | \[ \frac{2}{\left(\frac{{t}^{3}}{\ell \cdot \ell} \cdot \sin k\right) \cdot \tan k + \color{blue}{\left(\left(\frac{{t}^{3}}{\ell \cdot \ell} \cdot \sin k\right) \cdot \tan k\right) \cdot \left(1 + {\left(\frac{k}{t}\right)}^{2}\right)}}
\] |
associate-*l* [=>]28.8 | \[ \frac{2}{\left(\frac{{t}^{3}}{\ell \cdot \ell} \cdot \sin k\right) \cdot \tan k + \color{blue}{\left(\frac{{t}^{3}}{\ell \cdot \ell} \cdot \sin k\right) \cdot \left(\tan k \cdot \left(1 + {\left(\frac{k}{t}\right)}^{2}\right)\right)}}
\] |
associate-*l* [=>]28.7 | \[ \frac{2}{\left(\frac{{t}^{3}}{\ell \cdot \ell} \cdot \sin k\right) \cdot \tan k + \color{blue}{\frac{{t}^{3}}{\ell \cdot \ell} \cdot \left(\sin k \cdot \left(\tan k \cdot \left(1 + {\left(\frac{k}{t}\right)}^{2}\right)\right)\right)}}
\] |
distribute-lft-in [=>]28.7 | \[ \frac{2}{\left(\frac{{t}^{3}}{\ell \cdot \ell} \cdot \sin k\right) \cdot \tan k + \frac{{t}^{3}}{\ell \cdot \ell} \cdot \left(\sin k \cdot \color{blue}{\left(\tan k \cdot 1 + \tan k \cdot {\left(\frac{k}{t}\right)}^{2}\right)}\right)}
\] |
*-rgt-identity [=>]28.7 | \[ \frac{2}{\left(\frac{{t}^{3}}{\ell \cdot \ell} \cdot \sin k\right) \cdot \tan k + \frac{{t}^{3}}{\ell \cdot \ell} \cdot \left(\sin k \cdot \left(\color{blue}{\tan k} + \tan k \cdot {\left(\frac{k}{t}\right)}^{2}\right)\right)}
\] |
distribute-lft-in [=>]28.7 | \[ \frac{2}{\left(\frac{{t}^{3}}{\ell \cdot \ell} \cdot \sin k\right) \cdot \tan k + \frac{{t}^{3}}{\ell \cdot \ell} \cdot \color{blue}{\left(\sin k \cdot \tan k + \sin k \cdot \left(\tan k \cdot {\left(\frac{k}{t}\right)}^{2}\right)\right)}}
\] |
Applied egg-rr8.2
Simplified8.2
[Start]8.2 | \[ \frac{1}{{\left(\sqrt[3]{\tan k \cdot \left(\left(2 + {\left(\frac{k}{t}\right)}^{2}\right) \cdot \sin k\right)} \cdot \frac{t}{{\left(\sqrt[3]{\ell}\right)}^{2}}\right)}^{2}} \cdot \frac{2}{\sqrt[3]{\tan k \cdot \left(\left(2 + {\left(\frac{k}{t}\right)}^{2}\right) \cdot \sin k\right)} \cdot \frac{t}{{\left(\sqrt[3]{\ell}\right)}^{2}}}
\] |
|---|---|
associate-*l/ [=>]8.2 | \[ \color{blue}{\frac{1 \cdot \frac{2}{\sqrt[3]{\tan k \cdot \left(\left(2 + {\left(\frac{k}{t}\right)}^{2}\right) \cdot \sin k\right)} \cdot \frac{t}{{\left(\sqrt[3]{\ell}\right)}^{2}}}}{{\left(\sqrt[3]{\tan k \cdot \left(\left(2 + {\left(\frac{k}{t}\right)}^{2}\right) \cdot \sin k\right)} \cdot \frac{t}{{\left(\sqrt[3]{\ell}\right)}^{2}}\right)}^{2}}}
\] |
Applied egg-rr8.2
Simplified8.2
[Start]8.2 | \[ \frac{\frac{1}{\sqrt[3]{2 + {\left(\frac{k}{t}\right)}^{2}}} \cdot \frac{2 \cdot \frac{{\left(\sqrt[3]{\ell}\right)}^{2}}{t}}{\sqrt[3]{\sin k \cdot \tan k}}}{{\left(\sqrt[3]{\left(2 + {\left(\frac{k}{t}\right)}^{2}\right) \cdot \left(\sin k \cdot \tan k\right)} \cdot \frac{t}{{\left(\sqrt[3]{\ell}\right)}^{2}}\right)}^{2}}
\] |
|---|---|
associate-*r/ [=>]8.2 | \[ \frac{\color{blue}{\frac{\frac{1}{\sqrt[3]{2 + {\left(\frac{k}{t}\right)}^{2}}} \cdot \left(2 \cdot \frac{{\left(\sqrt[3]{\ell}\right)}^{2}}{t}\right)}{\sqrt[3]{\sin k \cdot \tan k}}}}{{\left(\sqrt[3]{\left(2 + {\left(\frac{k}{t}\right)}^{2}\right) \cdot \left(\sin k \cdot \tan k\right)} \cdot \frac{t}{{\left(\sqrt[3]{\ell}\right)}^{2}}\right)}^{2}}
\] |
associate-*l/ [=>]8.2 | \[ \frac{\frac{\color{blue}{\frac{1 \cdot \left(2 \cdot \frac{{\left(\sqrt[3]{\ell}\right)}^{2}}{t}\right)}{\sqrt[3]{2 + {\left(\frac{k}{t}\right)}^{2}}}}}{\sqrt[3]{\sin k \cdot \tan k}}}{{\left(\sqrt[3]{\left(2 + {\left(\frac{k}{t}\right)}^{2}\right) \cdot \left(\sin k \cdot \tan k\right)} \cdot \frac{t}{{\left(\sqrt[3]{\ell}\right)}^{2}}\right)}^{2}}
\] |
*-lft-identity [=>]8.2 | \[ \frac{\frac{\frac{\color{blue}{2 \cdot \frac{{\left(\sqrt[3]{\ell}\right)}^{2}}{t}}}{\sqrt[3]{2 + {\left(\frac{k}{t}\right)}^{2}}}}{\sqrt[3]{\sin k \cdot \tan k}}}{{\left(\sqrt[3]{\left(2 + {\left(\frac{k}{t}\right)}^{2}\right) \cdot \left(\sin k \cdot \tan k\right)} \cdot \frac{t}{{\left(\sqrt[3]{\ell}\right)}^{2}}\right)}^{2}}
\] |
associate-*l/ [<=]8.2 | \[ \frac{\frac{\color{blue}{\frac{2}{\sqrt[3]{2 + {\left(\frac{k}{t}\right)}^{2}}} \cdot \frac{{\left(\sqrt[3]{\ell}\right)}^{2}}{t}}}{\sqrt[3]{\sin k \cdot \tan k}}}{{\left(\sqrt[3]{\left(2 + {\left(\frac{k}{t}\right)}^{2}\right) \cdot \left(\sin k \cdot \tan k\right)} \cdot \frac{t}{{\left(\sqrt[3]{\ell}\right)}^{2}}\right)}^{2}}
\] |
associate-*r/ [<=]8.2 | \[ \frac{\color{blue}{\frac{2}{\sqrt[3]{2 + {\left(\frac{k}{t}\right)}^{2}}} \cdot \frac{\frac{{\left(\sqrt[3]{\ell}\right)}^{2}}{t}}{\sqrt[3]{\sin k \cdot \tan k}}}}{{\left(\sqrt[3]{\left(2 + {\left(\frac{k}{t}\right)}^{2}\right) \cdot \left(\sin k \cdot \tan k\right)} \cdot \frac{t}{{\left(\sqrt[3]{\ell}\right)}^{2}}\right)}^{2}}
\] |
if 1.18e51 < k Initial program 34.2
Simplified34.2
[Start]34.2 | \[ \frac{2}{\left(\left(\frac{{t}^{3}}{\ell \cdot \ell} \cdot \sin k\right) \cdot \tan k\right) \cdot \left(\left(1 + {\left(\frac{k}{t}\right)}^{2}\right) + 1\right)}
\] |
|---|---|
associate-*l* [=>]34.2 | \[ \frac{2}{\color{blue}{\left(\frac{{t}^{3}}{\ell \cdot \ell} \cdot \sin k\right) \cdot \left(\tan k \cdot \left(\left(1 + {\left(\frac{k}{t}\right)}^{2}\right) + 1\right)\right)}}
\] |
+-commutative [=>]34.2 | \[ \frac{2}{\left(\frac{{t}^{3}}{\ell \cdot \ell} \cdot \sin k\right) \cdot \left(\tan k \cdot \color{blue}{\left(1 + \left(1 + {\left(\frac{k}{t}\right)}^{2}\right)\right)}\right)}
\] |
Taylor expanded in t around 0 20.9
Simplified9.0
[Start]20.9 | \[ 2 \cdot \frac{\cos k \cdot {\ell}^{2}}{{k}^{2} \cdot \left({\sin k}^{2} \cdot t\right)}
\] |
|---|---|
associate-/l* [=>]21.0 | \[ 2 \cdot \color{blue}{\frac{\cos k}{\frac{{k}^{2} \cdot \left({\sin k}^{2} \cdot t\right)}{{\ell}^{2}}}}
\] |
*-commutative [=>]21.0 | \[ 2 \cdot \frac{\cos k}{\frac{\color{blue}{\left({\sin k}^{2} \cdot t\right) \cdot {k}^{2}}}{{\ell}^{2}}}
\] |
associate-/l* [=>]22.9 | \[ 2 \cdot \frac{\cos k}{\color{blue}{\frac{{\sin k}^{2} \cdot t}{\frac{{\ell}^{2}}{{k}^{2}}}}}
\] |
unpow2 [=>]23.0 | \[ 2 \cdot \frac{\cos k}{\frac{{\sin k}^{2} \cdot t}{\frac{\color{blue}{\ell \cdot \ell}}{{k}^{2}}}}
\] |
unpow2 [=>]23.0 | \[ 2 \cdot \frac{\cos k}{\frac{{\sin k}^{2} \cdot t}{\frac{\ell \cdot \ell}{\color{blue}{k \cdot k}}}}
\] |
times-frac [=>]9.0 | \[ 2 \cdot \frac{\cos k}{\frac{{\sin k}^{2} \cdot t}{\color{blue}{\frac{\ell}{k} \cdot \frac{\ell}{k}}}}
\] |
Applied egg-rr5.3
Final simplification6.1
| Alternative 1 | |
|---|---|
| Error | 6.7 |
| Cost | 85640 |
| Alternative 2 | |
|---|---|
| Error | 6.7 |
| Cost | 85640 |
| Alternative 3 | |
|---|---|
| Error | 6.7 |
| Cost | 85640 |
| Alternative 4 | |
|---|---|
| Error | 7.6 |
| Cost | 46348 |
| Alternative 5 | |
|---|---|
| Error | 6.8 |
| Cost | 46348 |
| Alternative 6 | |
|---|---|
| Error | 6.8 |
| Cost | 46348 |
| Alternative 7 | |
|---|---|
| Error | 7.8 |
| Cost | 46220 |
| Alternative 8 | |
|---|---|
| Error | 8.6 |
| Cost | 40080 |
| Alternative 9 | |
|---|---|
| Error | 8.6 |
| Cost | 40080 |
| Alternative 10 | |
|---|---|
| Error | 10.1 |
| Cost | 27016 |
| Alternative 11 | |
|---|---|
| Error | 9.9 |
| Cost | 26572 |
| Alternative 12 | |
|---|---|
| Error | 11.8 |
| Cost | 21268 |
| Alternative 13 | |
|---|---|
| Error | 11.8 |
| Cost | 21132 |
| Alternative 14 | |
|---|---|
| Error | 15.8 |
| Cost | 20488 |
| Alternative 15 | |
|---|---|
| Error | 11.8 |
| Cost | 20488 |
| Alternative 16 | |
|---|---|
| Error | 15.3 |
| Cost | 20361 |
| Alternative 17 | |
|---|---|
| Error | 15.3 |
| Cost | 20361 |
| Alternative 18 | |
|---|---|
| Error | 16.3 |
| Cost | 14672 |
| Alternative 19 | |
|---|---|
| Error | 22.9 |
| Cost | 14092 |
| Alternative 20 | |
|---|---|
| Error | 22.2 |
| Cost | 13836 |
| Alternative 21 | |
|---|---|
| Error | 21.9 |
| Cost | 13644 |
| Alternative 22 | |
|---|---|
| Error | 24.0 |
| Cost | 7436 |
| Alternative 23 | |
|---|---|
| Error | 22.7 |
| Cost | 7436 |
| Alternative 24 | |
|---|---|
| Error | 25.6 |
| Cost | 1489 |
| Alternative 25 | |
|---|---|
| Error | 25.3 |
| Cost | 1488 |
| Alternative 26 | |
|---|---|
| Error | 32.4 |
| Cost | 832 |
| Alternative 27 | |
|---|---|
| Error | 29.4 |
| Cost | 832 |
| Alternative 28 | |
|---|---|
| Error | 29.5 |
| Cost | 832 |
herbie shell --seed 2023039
(FPCore (t l k)
:name "Toniolo and Linder, Equation (10+)"
:precision binary64
(/ 2.0 (* (* (* (/ (pow t 3.0) (* l l)) (sin k)) (tan k)) (+ (+ 1.0 (pow (/ k t) 2.0)) 1.0))))