\pi \cdot \ell - \frac{1}{F \cdot F} \cdot \tan \left(\pi \cdot \ell\right)\pi \cdot \ell - \frac{\sqrt{1}}{F} \cdot \frac{1}{\frac{\frac{F}{\tan \left(\pi \cdot \ell\right)}}{\sqrt{1}}}double f(double F, double l) {
double r18290 = atan2(1.0, 0.0);
double r18291 = l;
double r18292 = r18290 * r18291;
double r18293 = 1.0;
double r18294 = F;
double r18295 = r18294 * r18294;
double r18296 = r18293 / r18295;
double r18297 = tan(r18292);
double r18298 = r18296 * r18297;
double r18299 = r18292 - r18298;
return r18299;
}
double f(double F, double l) {
double r18300 = atan2(1.0, 0.0);
double r18301 = l;
double r18302 = r18300 * r18301;
double r18303 = 1.0;
double r18304 = sqrt(r18303);
double r18305 = F;
double r18306 = r18304 / r18305;
double r18307 = 1.0;
double r18308 = tan(r18302);
double r18309 = r18305 / r18308;
double r18310 = r18309 / r18304;
double r18311 = r18307 / r18310;
double r18312 = r18306 * r18311;
double r18313 = r18302 - r18312;
return r18313;
}



Bits error versus F



Bits error versus l
Results
Initial program 16.6
rmApplied add-sqr-sqrt16.6
Applied times-frac16.6
Applied associate-*l*12.3
rmApplied associate-*l/12.3
rmApplied associate-/l*12.3
rmApplied clear-num12.3
Final simplification12.3
herbie shell --seed 2020035
(FPCore (F l)
:name "VandenBroeck and Keller, Equation (6)"
:precision binary64
(- (* PI l) (* (/ 1 (* F F)) (tan (* PI l)))))