\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 \left(\frac{\sqrt[3]{1}}{F} \cdot \tan \left(\left(\sqrt{\sqrt{\pi}} \cdot \sqrt{\sqrt{\pi}}\right) \cdot \left(\left(\sqrt{\sqrt{\pi}} \cdot \sqrt{\sqrt{\pi}}\right) \cdot \ell\right)\right)\right)double f(double F, double l) {
double r13953 = atan2(1.0, 0.0);
double r13954 = l;
double r13955 = r13953 * r13954;
double r13956 = 1.0;
double r13957 = F;
double r13958 = r13957 * r13957;
double r13959 = r13956 / r13958;
double r13960 = tan(r13955);
double r13961 = r13959 * r13960;
double r13962 = r13955 - r13961;
return r13962;
}
double f(double F, double l) {
double r13963 = atan2(1.0, 0.0);
double r13964 = l;
double r13965 = r13963 * r13964;
double r13966 = 1.0;
double r13967 = cbrt(r13966);
double r13968 = r13967 * r13967;
double r13969 = F;
double r13970 = r13968 / r13969;
double r13971 = r13967 / r13969;
double r13972 = sqrt(r13963);
double r13973 = sqrt(r13972);
double r13974 = r13973 * r13973;
double r13975 = r13974 * r13964;
double r13976 = r13974 * r13975;
double r13977 = tan(r13976);
double r13978 = r13971 * r13977;
double r13979 = r13970 * r13978;
double r13980 = r13965 - r13979;
return r13980;
}



Bits error versus F



Bits error versus l
Results
Initial program 16.5
rmApplied add-cube-cbrt16.5
Applied times-frac16.5
Applied associate-*l*12.1
rmApplied add-sqr-sqrt12.2
Applied associate-*l*12.1
rmApplied add-sqr-sqrt12.1
Applied sqrt-prod12.1
rmApplied add-sqr-sqrt12.1
Applied sqrt-prod12.1
Final simplification12.1
herbie shell --seed 2020047
(FPCore (F l)
:name "VandenBroeck and Keller, Equation (6)"
:precision binary64
(- (* PI l) (* (/ 1 (* F F)) (tan (* PI l)))))