\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 -3.9931689423680292 \cdot 10^{-212} \lor \neg \left(t \le 3.5105653077207029 \cdot 10^{-198}\right):\\
\;\;\;\;\frac{\frac{2}{\tan k}}{\frac{\sqrt[3]{\mathsf{fma}\left(2, 1, {\left(\frac{k}{t}\right)}^{2}\right)}}{\frac{\ell}{{\left(\sqrt[3]{t}\right)}^{3}}}} \cdot \frac{\frac{1}{{\left(\sqrt[3]{t}\right)}^{3} \cdot \left(\frac{{\left(\sqrt[3]{t}\right)}^{3}}{\ell} \cdot \sin k\right)}}{\sqrt[3]{\mathsf{fma}\left(2, 1, {\left(\frac{k}{t}\right)}^{2}\right)} \cdot \sqrt[3]{\mathsf{fma}\left(2, 1, {\left(\frac{k}{t}\right)}^{2}\right)}}\\
\mathbf{else}:\\
\;\;\;\;\frac{\frac{2}{\left({\left(\sqrt[3]{t}\right)}^{3} \cdot \left(\frac{k \cdot t}{\ell} - \frac{1}{6} \cdot \frac{{k}^{3} \cdot t}{\ell}\right)\right) \cdot \tan k}}{\frac{\mathsf{fma}\left(2, 1, {\left(\frac{k}{t}\right)}^{2}\right)}{\frac{\ell}{{\left(\sqrt[3]{t}\right)}^{3}}}}\\
\end{array}double f(double t, double l, double k) {
double r167865 = 2.0;
double r167866 = t;
double r167867 = 3.0;
double r167868 = pow(r167866, r167867);
double r167869 = l;
double r167870 = r167869 * r167869;
double r167871 = r167868 / r167870;
double r167872 = k;
double r167873 = sin(r167872);
double r167874 = r167871 * r167873;
double r167875 = tan(r167872);
double r167876 = r167874 * r167875;
double r167877 = 1.0;
double r167878 = r167872 / r167866;
double r167879 = pow(r167878, r167865);
double r167880 = r167877 + r167879;
double r167881 = r167880 + r167877;
double r167882 = r167876 * r167881;
double r167883 = r167865 / r167882;
return r167883;
}
double f(double t, double l, double k) {
double r167884 = t;
double r167885 = -3.993168942368029e-212;
bool r167886 = r167884 <= r167885;
double r167887 = 3.510565307720703e-198;
bool r167888 = r167884 <= r167887;
double r167889 = !r167888;
bool r167890 = r167886 || r167889;
double r167891 = 2.0;
double r167892 = k;
double r167893 = tan(r167892);
double r167894 = r167891 / r167893;
double r167895 = 2.0;
double r167896 = 1.0;
double r167897 = r167892 / r167884;
double r167898 = pow(r167897, r167891);
double r167899 = fma(r167895, r167896, r167898);
double r167900 = cbrt(r167899);
double r167901 = l;
double r167902 = cbrt(r167884);
double r167903 = 3.0;
double r167904 = pow(r167902, r167903);
double r167905 = r167901 / r167904;
double r167906 = r167900 / r167905;
double r167907 = r167894 / r167906;
double r167908 = 1.0;
double r167909 = r167904 / r167901;
double r167910 = sin(r167892);
double r167911 = r167909 * r167910;
double r167912 = r167904 * r167911;
double r167913 = r167908 / r167912;
double r167914 = r167900 * r167900;
double r167915 = r167913 / r167914;
double r167916 = r167907 * r167915;
double r167917 = r167892 * r167884;
double r167918 = r167917 / r167901;
double r167919 = 0.16666666666666666;
double r167920 = 3.0;
double r167921 = pow(r167892, r167920);
double r167922 = r167921 * r167884;
double r167923 = r167922 / r167901;
double r167924 = r167919 * r167923;
double r167925 = r167918 - r167924;
double r167926 = r167904 * r167925;
double r167927 = r167926 * r167893;
double r167928 = r167891 / r167927;
double r167929 = r167899 / r167905;
double r167930 = r167928 / r167929;
double r167931 = r167890 ? r167916 : r167930;
return r167931;
}



Bits error versus t



Bits error versus l



Bits error versus k
if t < -3.993168942368029e-212 or 3.510565307720703e-198 < t Initial program 28.8
Simplified28.8
rmApplied add-cube-cbrt29.0
Applied unpow-prod-down29.0
Applied times-frac21.0
Applied associate-*l*19.1
rmApplied unpow-prod-down19.1
Applied associate-/l*13.7
rmApplied associate-*l/12.8
Applied associate-*l/11.4
Applied associate-/r/11.4
Applied associate-/l*10.0
rmApplied *-un-lft-identity10.0
Applied add-cube-cbrt10.0
Applied times-frac10.0
Applied *-un-lft-identity10.0
Applied times-frac10.0
Applied times-frac8.6
if -3.993168942368029e-212 < t < 3.510565307720703e-198Initial program 64.0
Simplified64.0
rmApplied add-cube-cbrt64.0
Applied unpow-prod-down64.0
Applied times-frac64.0
Applied associate-*l*64.0
rmApplied unpow-prod-down64.0
Applied associate-/l*55.7
rmApplied associate-*l/55.7
Applied associate-*l/55.7
Applied associate-/r/55.7
Applied associate-/l*53.9
Taylor expanded around 0 45.0
Final simplification12.5
herbie shell --seed 2020042 +o rules:numerics
(FPCore (t l k)
:name "Toniolo and Linder, Equation (10+)"
:precision binary64
(/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (+ (+ 1 (pow (/ k t) 2)) 1))))