\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{1}{\sqrt[3]{\tan k}} \cdot \left(\left(\frac{1}{\sqrt[3]{\tan k}} \cdot \frac{1}{\sqrt[3]{\tan k}}\right) \cdot \frac{\frac{2}{t}}{\frac{k}{\ell}}\right)}{\frac{k}{\ell} \cdot \sin k}double f(double t, double l, double k) {
double r13712765 = 2.0;
double r13712766 = t;
double r13712767 = 3.0;
double r13712768 = pow(r13712766, r13712767);
double r13712769 = l;
double r13712770 = r13712769 * r13712769;
double r13712771 = r13712768 / r13712770;
double r13712772 = k;
double r13712773 = sin(r13712772);
double r13712774 = r13712771 * r13712773;
double r13712775 = tan(r13712772);
double r13712776 = r13712774 * r13712775;
double r13712777 = 1.0;
double r13712778 = r13712772 / r13712766;
double r13712779 = pow(r13712778, r13712765);
double r13712780 = r13712777 + r13712779;
double r13712781 = r13712780 - r13712777;
double r13712782 = r13712776 * r13712781;
double r13712783 = r13712765 / r13712782;
return r13712783;
}
double f(double t, double l, double k) {
double r13712784 = 1.0;
double r13712785 = k;
double r13712786 = tan(r13712785);
double r13712787 = cbrt(r13712786);
double r13712788 = r13712784 / r13712787;
double r13712789 = r13712788 * r13712788;
double r13712790 = 2.0;
double r13712791 = t;
double r13712792 = r13712790 / r13712791;
double r13712793 = l;
double r13712794 = r13712785 / r13712793;
double r13712795 = r13712792 / r13712794;
double r13712796 = r13712789 * r13712795;
double r13712797 = r13712788 * r13712796;
double r13712798 = sin(r13712785);
double r13712799 = r13712794 * r13712798;
double r13712800 = r13712797 / r13712799;
return r13712800;
}



Bits error versus t



Bits error versus l



Bits error versus k
Results
Initial program 46.8
Simplified30.2
rmApplied associate-/r/30.1
Applied times-frac30.0
Applied associate-/l*27.9
Simplified15.2
rmApplied div-inv15.2
Applied times-frac15.3
Simplified4.0
rmApplied frac-times1.0
rmApplied add-cube-cbrt1.4
Applied add-cube-cbrt1.4
Applied times-frac1.4
Applied associate-*r*1.4
Simplified1.4
Final simplification1.4
herbie shell --seed 2019158
(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))))