\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{\left(\frac{\sqrt[3]{\sqrt{2}}}{k} \cdot \left(\frac{\sqrt{\sqrt{2}}}{\frac{\tan k}{\sqrt{\sqrt{2}}}} \cdot \ell\right)\right) \cdot \left(\sqrt[3]{\sqrt{2}} \cdot \sqrt[3]{\sqrt{2}}\right)}{\frac{t}{\frac{\ell}{k}} \cdot \sin k}double f(double t, double l, double k) {
double r3751985 = 2.0;
double r3751986 = t;
double r3751987 = 3.0;
double r3751988 = pow(r3751986, r3751987);
double r3751989 = l;
double r3751990 = r3751989 * r3751989;
double r3751991 = r3751988 / r3751990;
double r3751992 = k;
double r3751993 = sin(r3751992);
double r3751994 = r3751991 * r3751993;
double r3751995 = tan(r3751992);
double r3751996 = r3751994 * r3751995;
double r3751997 = 1.0;
double r3751998 = r3751992 / r3751986;
double r3751999 = pow(r3751998, r3751985);
double r3752000 = r3751997 + r3751999;
double r3752001 = r3752000 - r3751997;
double r3752002 = r3751996 * r3752001;
double r3752003 = r3751985 / r3752002;
return r3752003;
}
double f(double t, double l, double k) {
double r3752004 = 2.0;
double r3752005 = sqrt(r3752004);
double r3752006 = cbrt(r3752005);
double r3752007 = k;
double r3752008 = r3752006 / r3752007;
double r3752009 = sqrt(r3752005);
double r3752010 = tan(r3752007);
double r3752011 = r3752010 / r3752009;
double r3752012 = r3752009 / r3752011;
double r3752013 = l;
double r3752014 = r3752012 * r3752013;
double r3752015 = r3752008 * r3752014;
double r3752016 = r3752006 * r3752006;
double r3752017 = r3752015 * r3752016;
double r3752018 = t;
double r3752019 = r3752013 / r3752007;
double r3752020 = r3752018 / r3752019;
double r3752021 = sin(r3752007);
double r3752022 = r3752020 * r3752021;
double r3752023 = r3752017 / r3752022;
return r3752023;
}



Bits error versus t



Bits error versus l



Bits error versus k
Results
Initial program 47.3
Simplified16.7
rmApplied div-inv16.7
Applied add-sqr-sqrt16.9
Applied times-frac16.7
Applied times-frac15.3
Simplified7.4
Simplified5.3
rmApplied associate-/r/5.3
Applied times-frac4.5
Applied add-cube-cbrt4.5
Applied times-frac4.2
Applied associate-*l*3.1
Simplified3.1
rmApplied add-sqr-sqrt3.0
Applied associate-/l*3.0
rmApplied associate-*r/3.0
Applied associate-*r/3.0
Applied frac-times1.2
Final simplification1.2
herbie shell --seed 2019149
(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))))