\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}
\mathbf{if}\;t \le 2362365607704.0986328125:\\
\;\;\;\;\frac{2}{\frac{\mathsf{fma}\left(2, \left({\left(\frac{1}{{-1}^{2}}\right)}^{1} \cdot \frac{1}{\cos k}\right) \cdot \frac{\left(\sin k \cdot t\right) \cdot \left(\sin k \cdot t\right)}{\ell}, \frac{{\left(\frac{1}{{-1}^{2}}\right)}^{1}}{\cos k} \cdot \frac{\left(\sin k \cdot k\right) \cdot \left(\sin k \cdot k\right)}{\ell}\right)}{\frac{\ell}{{\left(\sqrt[3]{t}\right)}^{3}}}}\\
\mathbf{else}:\\
\;\;\;\;\frac{2}{\frac{\frac{\left(\frac{{\left(\sqrt[3]{t}\right)}^{3}}{\ell} \cdot \sin k\right) \cdot {\left(\sqrt[3]{t}\right)}^{3}}{\frac{\sqrt[3]{\ell}}{\sqrt[3]{{\left(\sqrt[3]{t}\right)}^{3}}}} \cdot \frac{\left(\left(1 + {\left(\frac{k}{t}\right)}^{2}\right) + 1\right) \cdot \tan k}{\frac{\sqrt[3]{\ell}}{\sqrt[3]{{\left(\sqrt[3]{t}\right)}^{3}}}}}{\frac{\sqrt[3]{\ell}}{\sqrt[3]{{\left(\sqrt[3]{t}\right)}^{3}}}}}\\
\end{array}double f(double t, double l, double k) {
double r3856550 = 2.0;
double r3856551 = t;
double r3856552 = 3.0;
double r3856553 = pow(r3856551, r3856552);
double r3856554 = l;
double r3856555 = r3856554 * r3856554;
double r3856556 = r3856553 / r3856555;
double r3856557 = k;
double r3856558 = sin(r3856557);
double r3856559 = r3856556 * r3856558;
double r3856560 = tan(r3856557);
double r3856561 = r3856559 * r3856560;
double r3856562 = 1.0;
double r3856563 = r3856557 / r3856551;
double r3856564 = pow(r3856563, r3856550);
double r3856565 = r3856562 + r3856564;
double r3856566 = r3856565 + r3856562;
double r3856567 = r3856561 * r3856566;
double r3856568 = r3856550 / r3856567;
return r3856568;
}
double f(double t, double l, double k) {
double r3856569 = t;
double r3856570 = 2362365607704.0986;
bool r3856571 = r3856569 <= r3856570;
double r3856572 = 2.0;
double r3856573 = 1.0;
double r3856574 = -1.0;
double r3856575 = pow(r3856574, r3856572);
double r3856576 = r3856573 / r3856575;
double r3856577 = 1.0;
double r3856578 = pow(r3856576, r3856577);
double r3856579 = k;
double r3856580 = cos(r3856579);
double r3856581 = r3856573 / r3856580;
double r3856582 = r3856578 * r3856581;
double r3856583 = sin(r3856579);
double r3856584 = r3856583 * r3856569;
double r3856585 = r3856584 * r3856584;
double r3856586 = l;
double r3856587 = r3856585 / r3856586;
double r3856588 = r3856582 * r3856587;
double r3856589 = r3856578 / r3856580;
double r3856590 = r3856583 * r3856579;
double r3856591 = r3856590 * r3856590;
double r3856592 = r3856591 / r3856586;
double r3856593 = r3856589 * r3856592;
double r3856594 = fma(r3856572, r3856588, r3856593);
double r3856595 = cbrt(r3856569);
double r3856596 = 3.0;
double r3856597 = pow(r3856595, r3856596);
double r3856598 = r3856586 / r3856597;
double r3856599 = r3856594 / r3856598;
double r3856600 = r3856572 / r3856599;
double r3856601 = r3856597 / r3856586;
double r3856602 = r3856601 * r3856583;
double r3856603 = r3856602 * r3856597;
double r3856604 = cbrt(r3856586);
double r3856605 = cbrt(r3856597);
double r3856606 = r3856604 / r3856605;
double r3856607 = r3856603 / r3856606;
double r3856608 = r3856579 / r3856569;
double r3856609 = pow(r3856608, r3856572);
double r3856610 = r3856577 + r3856609;
double r3856611 = r3856610 + r3856577;
double r3856612 = tan(r3856579);
double r3856613 = r3856611 * r3856612;
double r3856614 = r3856613 / r3856606;
double r3856615 = r3856607 * r3856614;
double r3856616 = r3856615 / r3856606;
double r3856617 = r3856572 / r3856616;
double r3856618 = r3856571 ? r3856600 : r3856617;
return r3856618;
}



Bits error versus t



Bits error versus l



Bits error versus k
if t < 2362365607704.0986Initial program 36.6
rmApplied add-cube-cbrt36.7
Applied unpow-prod-down36.7
Applied times-frac29.6
Applied associate-*l*28.0
rmApplied unpow-prod-down28.0
Applied associate-/l*22.5
rmApplied associate-*l/21.9
Applied associate-*l/21.5
Applied associate-*l/19.5
Taylor expanded around -inf 21.3
Simplified15.7
if 2362365607704.0986 < t Initial program 22.5
rmApplied add-cube-cbrt22.6
Applied unpow-prod-down22.6
Applied times-frac16.3
Applied associate-*l*14.4
rmApplied unpow-prod-down14.4
Applied associate-/l*8.2
rmApplied associate-*l/6.8
Applied associate-*l/3.8
Applied associate-*l/3.5
rmApplied add-cube-cbrt3.5
Applied add-cube-cbrt3.5
Applied times-frac3.5
Applied associate-/r*3.5
Simplified3.5
Final simplification12.1
herbie shell --seed 2019200 +o rules:numerics
(FPCore (t l k)
:name "Toniolo and Linder, Equation (10+)"
(/ 2.0 (* (* (* (/ (pow t 3.0) (* l l)) (sin k)) (tan k)) (+ (+ 1.0 (pow (/ k t) 2.0)) 1.0))))