\pi \cdot \ell - \frac{1}{F \cdot F} \cdot \tan \left(\pi \cdot \ell\right)\pi \cdot \ell - \frac{\frac{\sqrt[3]{1}}{\sqrt[3]{F} \cdot \sqrt[3]{F}}}{\frac{\sqrt[3]{F}}{\tan \left(\pi \cdot \ell\right)}} \cdot \frac{\sqrt[3]{1} \cdot \sqrt[3]{1}}{F}double f(double F, double l) {
double r29658 = atan2(1.0, 0.0);
double r29659 = l;
double r29660 = r29658 * r29659;
double r29661 = 1.0;
double r29662 = F;
double r29663 = r29662 * r29662;
double r29664 = r29661 / r29663;
double r29665 = tan(r29660);
double r29666 = r29664 * r29665;
double r29667 = r29660 - r29666;
return r29667;
}
double f(double F, double l) {
double r29668 = atan2(1.0, 0.0);
double r29669 = l;
double r29670 = r29668 * r29669;
double r29671 = 1.0;
double r29672 = cbrt(r29671);
double r29673 = F;
double r29674 = cbrt(r29673);
double r29675 = r29674 * r29674;
double r29676 = r29672 / r29675;
double r29677 = tan(r29670);
double r29678 = r29674 / r29677;
double r29679 = r29676 / r29678;
double r29680 = r29672 * r29672;
double r29681 = r29680 / r29673;
double r29682 = r29679 * r29681;
double r29683 = r29670 - r29682;
return r29683;
}



Bits error versus F



Bits error versus l
Results
Initial program 16.7
rmApplied add-cube-cbrt16.7
Applied times-frac16.7
Applied associate-*l*12.6
rmApplied *-un-lft-identity12.6
Applied *-un-lft-identity12.6
Applied cbrt-prod12.6
Applied times-frac12.6
Applied associate-*l*12.6
Simplified12.5
rmApplied associate-/l*12.5
rmApplied *-un-lft-identity12.5
Applied add-cube-cbrt12.7
Applied times-frac12.7
Applied associate-/r*12.7
Simplified12.7
Final simplification12.7
herbie shell --seed 2019305 +o rules:numerics
(FPCore (F l)
:name "VandenBroeck and Keller, Equation (6)"
:precision binary64
(- (* PI l) (* (/ 1 (* F F)) (tan (* PI l)))))