\pi \cdot \ell - \frac{1}{F \cdot F} \cdot \tan \left(\pi \cdot \ell\right)\pi \cdot \ell - \frac{1}{F} \cdot \left(\left(\sqrt[3]{\frac{1}{F}} \cdot \sqrt[3]{\frac{1}{F}}\right) \cdot \left(\sqrt[3]{\frac{1}{F}} \cdot \tan \left(\pi \cdot \ell\right)\right)\right)double f(double F, double l) {
double r21372 = atan2(1.0, 0.0);
double r21373 = l;
double r21374 = r21372 * r21373;
double r21375 = 1.0;
double r21376 = F;
double r21377 = r21376 * r21376;
double r21378 = r21375 / r21377;
double r21379 = tan(r21374);
double r21380 = r21378 * r21379;
double r21381 = r21374 - r21380;
return r21381;
}
double f(double F, double l) {
double r21382 = atan2(1.0, 0.0);
double r21383 = l;
double r21384 = r21382 * r21383;
double r21385 = 1.0;
double r21386 = F;
double r21387 = r21385 / r21386;
double r21388 = 1.0;
double r21389 = r21388 / r21386;
double r21390 = cbrt(r21389);
double r21391 = r21390 * r21390;
double r21392 = tan(r21384);
double r21393 = r21390 * r21392;
double r21394 = r21391 * r21393;
double r21395 = r21387 * r21394;
double r21396 = r21384 - r21395;
return r21396;
}



Bits error versus F



Bits error versus l
Results
Initial program 16.7
rmApplied *-un-lft-identity16.7
Applied times-frac16.8
Applied associate-*l*12.2
rmApplied add-cube-cbrt12.4
Applied associate-*l*12.4
Final simplification12.4
herbie shell --seed 2020039
(FPCore (F l)
:name "VandenBroeck and Keller, Equation (6)"
:precision binary64
(- (* PI l) (* (/ 1 (* F F)) (tan (* PI l)))))