\pi \cdot \ell - \frac{1}{F \cdot F} \cdot \tan \left(\pi \cdot \ell\right)\pi \cdot \ell - \frac{\sqrt[3]{1} \cdot \sqrt[3]{1}}{F} \cdot \frac{\frac{1}{F}}{\frac{1}{\sqrt[3]{1} \cdot \tan \left(\pi \cdot \ell\right)}}double f(double F, double l) {
double r27849 = atan2(1.0, 0.0);
double r27850 = l;
double r27851 = r27849 * r27850;
double r27852 = 1.0;
double r27853 = F;
double r27854 = r27853 * r27853;
double r27855 = r27852 / r27854;
double r27856 = tan(r27851);
double r27857 = r27855 * r27856;
double r27858 = r27851 - r27857;
return r27858;
}
double f(double F, double l) {
double r27859 = atan2(1.0, 0.0);
double r27860 = l;
double r27861 = r27859 * r27860;
double r27862 = 1.0;
double r27863 = cbrt(r27862);
double r27864 = r27863 * r27863;
double r27865 = F;
double r27866 = r27864 / r27865;
double r27867 = 1.0;
double r27868 = r27867 / r27865;
double r27869 = tan(r27861);
double r27870 = r27863 * r27869;
double r27871 = r27867 / r27870;
double r27872 = r27868 / r27871;
double r27873 = r27866 * r27872;
double r27874 = r27861 - r27873;
return r27874;
}



Bits error versus F



Bits error versus l
Results
Initial program 17.1
rmApplied add-cube-cbrt17.1
Applied times-frac17.2
Applied associate-*l*13.1
rmApplied *-un-lft-identity13.1
Applied *-un-lft-identity13.1
Applied cbrt-prod13.1
Applied times-frac13.1
Applied associate-*l*13.1
Simplified13.0
rmApplied clear-num13.0
rmApplied div-inv13.0
Applied associate-/r*13.1
Final simplification13.1
herbie shell --seed 2019208 +o rules:numerics
(FPCore (F l)
:name "VandenBroeck and Keller, Equation (6)"
:precision binary64
(- (* PI l) (* (/ 1 (* F F)) (tan (* PI l)))))