\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)}\frac{\frac{\frac{2}{\frac{\frac{k}{\ell}}{\frac{1}{t}}}}{\sin k}}{\frac{k}{\ell} \cdot \tan k}double f(double t, double l, double k) {
double r11408233 = 2.0;
double r11408234 = t;
double r11408235 = 3.0;
double r11408236 = pow(r11408234, r11408235);
double r11408237 = l;
double r11408238 = r11408237 * r11408237;
double r11408239 = r11408236 / r11408238;
double r11408240 = k;
double r11408241 = sin(r11408240);
double r11408242 = r11408239 * r11408241;
double r11408243 = tan(r11408240);
double r11408244 = r11408242 * r11408243;
double r11408245 = 1.0;
double r11408246 = r11408240 / r11408234;
double r11408247 = pow(r11408246, r11408233);
double r11408248 = r11408245 + r11408247;
double r11408249 = r11408248 - r11408245;
double r11408250 = r11408244 * r11408249;
double r11408251 = r11408233 / r11408250;
return r11408251;
}
double f(double t, double l, double k) {
double r11408252 = 2.0;
double r11408253 = k;
double r11408254 = l;
double r11408255 = r11408253 / r11408254;
double r11408256 = 1.0;
double r11408257 = t;
double r11408258 = r11408256 / r11408257;
double r11408259 = r11408255 / r11408258;
double r11408260 = r11408252 / r11408259;
double r11408261 = sin(r11408253);
double r11408262 = r11408260 / r11408261;
double r11408263 = tan(r11408253);
double r11408264 = r11408255 * r11408263;
double r11408265 = r11408262 / r11408264;
return r11408265;
}



Bits error versus t



Bits error versus l



Bits error versus k
Results
Initial program 46.8
Simplified26.3
Taylor expanded around 0 14.1
Simplified14.1
rmApplied *-un-lft-identity14.1
Applied div-inv14.2
Applied *-un-lft-identity14.2
Applied times-frac10.1
Applied times-frac2.8
Applied *-un-lft-identity2.8
Applied times-frac2.5
Applied times-frac1.6
Simplified1.6
rmApplied associate-*l/1.6
Applied associate-/l/1.2
Final simplification1.2
herbie shell --seed 2019133
(FPCore (t l k)
:name "Toniolo and Linder, Equation (10-)"
(/ 2 (* (* (* (/ (pow t 3) (* l l)) (sin k)) (tan k)) (- (+ 1 (pow (/ k t) 2)) 1))))