\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)}2 \cdot \left(\frac{{\left(\frac{1}{{k}^{\left(\frac{2}{2}\right)}}\right)}^{1}}{\frac{\sin k}{\ell}} \cdot \left(\left(\left(\frac{\cos k}{\sin k} \cdot \ell\right) \cdot {\left(\frac{1}{{k}^{\left(\frac{2}{2}\right)}}\right)}^{1}\right) \cdot {\left(\frac{1}{{t}^{1}}\right)}^{1}\right)\right)double f(double t, double l, double k) {
double r6465352 = 2.0;
double r6465353 = t;
double r6465354 = 3.0;
double r6465355 = pow(r6465353, r6465354);
double r6465356 = l;
double r6465357 = r6465356 * r6465356;
double r6465358 = r6465355 / r6465357;
double r6465359 = k;
double r6465360 = sin(r6465359);
double r6465361 = r6465358 * r6465360;
double r6465362 = tan(r6465359);
double r6465363 = r6465361 * r6465362;
double r6465364 = 1.0;
double r6465365 = r6465359 / r6465353;
double r6465366 = pow(r6465365, r6465352);
double r6465367 = r6465364 + r6465366;
double r6465368 = r6465367 - r6465364;
double r6465369 = r6465363 * r6465368;
double r6465370 = r6465352 / r6465369;
return r6465370;
}
double f(double t, double l, double k) {
double r6465371 = 2.0;
double r6465372 = 1.0;
double r6465373 = k;
double r6465374 = 2.0;
double r6465375 = r6465371 / r6465374;
double r6465376 = pow(r6465373, r6465375);
double r6465377 = r6465372 / r6465376;
double r6465378 = 1.0;
double r6465379 = pow(r6465377, r6465378);
double r6465380 = sin(r6465373);
double r6465381 = l;
double r6465382 = r6465380 / r6465381;
double r6465383 = r6465379 / r6465382;
double r6465384 = cos(r6465373);
double r6465385 = r6465384 / r6465380;
double r6465386 = r6465385 * r6465381;
double r6465387 = r6465386 * r6465379;
double r6465388 = t;
double r6465389 = pow(r6465388, r6465378);
double r6465390 = r6465372 / r6465389;
double r6465391 = pow(r6465390, r6465378);
double r6465392 = r6465387 * r6465391;
double r6465393 = r6465383 * r6465392;
double r6465394 = r6465371 * r6465393;
return r6465394;
}



Bits error versus t



Bits error versus l



Bits error versus k
Results
Initial program 48.4
Simplified40.2
Taylor expanded around inf 21.8
rmApplied *-un-lft-identity21.8
Applied times-frac21.8
Applied unpow-prod-down21.8
Applied associate-*l*22.6
Simplified20.1
rmApplied times-frac16.3
Applied associate-*r*13.6
rmApplied *-un-lft-identity13.6
Applied *-un-lft-identity13.6
Applied times-frac13.6
Applied sqr-pow13.6
Applied *-un-lft-identity13.6
Applied times-frac13.4
Applied unpow-prod-down13.4
Applied times-frac9.0
Applied associate-*r*4.4
Simplified0.5
Final simplification0.5
herbie shell --seed 2019170 +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))))