\pi \cdot \ell - \frac{1}{F \cdot F} \cdot \tan \left(\pi \cdot \ell\right)\pi \cdot \ell - \frac{\sqrt{1}}{F} \cdot \left(\tan \left(\sqrt{\sqrt[3]{\pi} \cdot \sqrt[3]{\pi}} \cdot \left(\left(\sqrt{\pi} \cdot \ell\right) \cdot \sqrt{\sqrt[3]{\pi}}\right)\right) \cdot \frac{\sqrt{1}}{F}\right)double f(double F, double l) {
double r937297 = atan2(1.0, 0.0);
double r937298 = l;
double r937299 = r937297 * r937298;
double r937300 = 1.0;
double r937301 = F;
double r937302 = r937301 * r937301;
double r937303 = r937300 / r937302;
double r937304 = tan(r937299);
double r937305 = r937303 * r937304;
double r937306 = r937299 - r937305;
return r937306;
}
double f(double F, double l) {
double r937307 = atan2(1.0, 0.0);
double r937308 = l;
double r937309 = r937307 * r937308;
double r937310 = 1.0;
double r937311 = sqrt(r937310);
double r937312 = F;
double r937313 = r937311 / r937312;
double r937314 = cbrt(r937307);
double r937315 = r937314 * r937314;
double r937316 = sqrt(r937315);
double r937317 = sqrt(r937307);
double r937318 = r937317 * r937308;
double r937319 = sqrt(r937314);
double r937320 = r937318 * r937319;
double r937321 = r937316 * r937320;
double r937322 = tan(r937321);
double r937323 = r937322 * r937313;
double r937324 = r937313 * r937323;
double r937325 = r937309 - r937324;
return r937325;
}



Bits error versus F



Bits error versus l
Results
Initial program 17.0
rmApplied add-sqr-sqrt17.0
Applied times-frac17.0
Applied associate-*l*12.8
rmApplied add-sqr-sqrt12.9
Applied associate-*l*12.9
rmApplied add-cube-cbrt13.0
Applied sqrt-prod12.9
Applied associate-*l*12.9
Final simplification12.9
herbie shell --seed 2019169 +o rules:numerics
(FPCore (F l)
:name "VandenBroeck and Keller, Equation (6)"
(- (* PI l) (* (/ 1.0 (* F F)) (tan (* PI l)))))