\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 -2.673221847358114621753000328052530955067 \cdot 10^{-199} \lor \neg \left(t \le 9.430149747819988364651382548473002399861 \cdot 10^{-188}\right):\\
\;\;\;\;\frac{\frac{1}{{\left(\sqrt[3]{t}\right)}^{3} \cdot \left(\frac{{\left(\sqrt[3]{t}\right)}^{3}}{\ell} \cdot \sin k\right)}}{\frac{\frac{\mathsf{fma}\left(2, 1, {\left(\frac{k}{t}\right)}^{2}\right)}{\frac{\ell}{{\left(\sqrt[3]{t}\right)}^{3}} \cdot \cos k}}{\frac{2}{\sin k}}}\\
\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 \sin k}}{\frac{\mathsf{fma}\left(2, 1, {\left(\frac{k}{t}\right)}^{2}\right)}{\frac{\ell}{{\left(\sqrt[3]{t}\right)}^{3}} \cdot \cos k}}\\
\end{array}double f(double t, double l, double k) {
double r121347 = 2.0;
double r121348 = t;
double r121349 = 3.0;
double r121350 = pow(r121348, r121349);
double r121351 = l;
double r121352 = r121351 * r121351;
double r121353 = r121350 / r121352;
double r121354 = k;
double r121355 = sin(r121354);
double r121356 = r121353 * r121355;
double r121357 = tan(r121354);
double r121358 = r121356 * r121357;
double r121359 = 1.0;
double r121360 = r121354 / r121348;
double r121361 = pow(r121360, r121347);
double r121362 = r121359 + r121361;
double r121363 = r121362 + r121359;
double r121364 = r121358 * r121363;
double r121365 = r121347 / r121364;
return r121365;
}
double f(double t, double l, double k) {
double r121366 = t;
double r121367 = -2.6732218473581146e-199;
bool r121368 = r121366 <= r121367;
double r121369 = 9.430149747819988e-188;
bool r121370 = r121366 <= r121369;
double r121371 = !r121370;
bool r121372 = r121368 || r121371;
double r121373 = 1.0;
double r121374 = cbrt(r121366);
double r121375 = 3.0;
double r121376 = pow(r121374, r121375);
double r121377 = l;
double r121378 = r121376 / r121377;
double r121379 = k;
double r121380 = sin(r121379);
double r121381 = r121378 * r121380;
double r121382 = r121376 * r121381;
double r121383 = r121373 / r121382;
double r121384 = 2.0;
double r121385 = 1.0;
double r121386 = r121379 / r121366;
double r121387 = 2.0;
double r121388 = pow(r121386, r121387);
double r121389 = fma(r121384, r121385, r121388);
double r121390 = r121377 / r121376;
double r121391 = cos(r121379);
double r121392 = r121390 * r121391;
double r121393 = r121389 / r121392;
double r121394 = r121387 / r121380;
double r121395 = r121393 / r121394;
double r121396 = r121383 / r121395;
double r121397 = r121379 * r121366;
double r121398 = r121397 / r121377;
double r121399 = 0.16666666666666666;
double r121400 = 3.0;
double r121401 = pow(r121379, r121400);
double r121402 = r121401 * r121366;
double r121403 = r121402 / r121377;
double r121404 = r121399 * r121403;
double r121405 = r121398 - r121404;
double r121406 = r121376 * r121405;
double r121407 = r121406 * r121380;
double r121408 = r121387 / r121407;
double r121409 = r121408 / r121393;
double r121410 = r121372 ? r121396 : r121409;
return r121410;
}



Bits error versus t



Bits error versus l



Bits error versus k
if t < -2.6732218473581146e-199 or 9.430149747819988e-188 < t Initial program 27.8
Simplified27.8
rmApplied add-cube-cbrt28.0
Applied unpow-prod-down28.0
Applied times-frac19.8
Applied associate-*l*17.9
rmApplied unpow-prod-down17.9
Applied associate-/l*13.0
rmApplied tan-quot13.0
Applied associate-*l/12.2
Applied frac-times11.0
Applied associate-/r/11.0
Applied associate-/l*10.0
rmApplied *-un-lft-identity10.0
Applied times-frac10.0
Applied associate-/l*8.3
if -2.6732218473581146e-199 < t < 9.430149747819988e-188Initial 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*53.7
rmApplied tan-quot53.7
Applied associate-*l/53.7
Applied frac-times54.0
Applied associate-/r/54.1
Applied associate-/l*52.3
Taylor expanded around 0 43.7
Final simplification12.8
herbie shell --seed 2019306 +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))))