\pi \cdot \ell - \frac{1}{F \cdot F} \cdot \tan \left(\pi \cdot \ell\right)\pi \cdot \ell - \frac{\sqrt{1}}{F} \cdot \left(\frac{\sqrt{1}}{F} \cdot \tan \left(\sqrt{\pi} \cdot \left(\sqrt{\pi} \cdot \ell\right)\right)\right)double f(double F, double l) {
double r17216 = atan2(1.0, 0.0);
double r17217 = l;
double r17218 = r17216 * r17217;
double r17219 = 1.0;
double r17220 = F;
double r17221 = r17220 * r17220;
double r17222 = r17219 / r17221;
double r17223 = tan(r17218);
double r17224 = r17222 * r17223;
double r17225 = r17218 - r17224;
return r17225;
}
double f(double F, double l) {
double r17226 = atan2(1.0, 0.0);
double r17227 = l;
double r17228 = r17226 * r17227;
double r17229 = 1.0;
double r17230 = sqrt(r17229);
double r17231 = F;
double r17232 = r17230 / r17231;
double r17233 = sqrt(r17226);
double r17234 = r17233 * r17227;
double r17235 = r17233 * r17234;
double r17236 = tan(r17235);
double r17237 = r17232 * r17236;
double r17238 = r17232 * r17237;
double r17239 = r17228 - r17238;
return r17239;
}



Bits error versus F



Bits error versus l
Results
Initial program 16.5
rmApplied add-sqr-sqrt16.5
Applied times-frac16.6
Applied associate-*l*12.5
rmApplied add-sqr-sqrt12.6
Applied associate-*l*12.6
Final simplification12.6
herbie shell --seed 2019347 +o rules:numerics
(FPCore (F l)
:name "VandenBroeck and Keller, Equation (6)"
:precision binary64
(- (* PI l) (* (/ 1 (* F F)) (tan (* PI l)))))