\pi \cdot \ell - \frac{1}{F \cdot F} \cdot \tan \left(\pi \cdot \ell\right)\pi \cdot \ell - \frac{1}{F} \cdot \left(\frac{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 r12618 = atan2(1.0, 0.0);
double r12619 = l;
double r12620 = r12618 * r12619;
double r12621 = 1.0;
double r12622 = F;
double r12623 = r12622 * r12622;
double r12624 = r12621 / r12623;
double r12625 = tan(r12620);
double r12626 = r12624 * r12625;
double r12627 = r12620 - r12626;
return r12627;
}
double f(double F, double l) {
double r12628 = atan2(1.0, 0.0);
double r12629 = l;
double r12630 = r12628 * r12629;
double r12631 = 1.0;
double r12632 = F;
double r12633 = r12631 / r12632;
double r12634 = 1.0;
double r12635 = r12634 / r12632;
double r12636 = sqrt(r12628);
double r12637 = sqrt(r12636);
double r12638 = r12637 * r12637;
double r12639 = r12638 * r12629;
double r12640 = r12638 * r12639;
double r12641 = tan(r12640);
double r12642 = r12635 * r12641;
double r12643 = r12633 * r12642;
double r12644 = r12630 - r12643;
return r12644;
}



Bits error versus F



Bits error versus l
Results
Initial program 17.1
rmApplied *-un-lft-identity17.1
Applied times-frac17.1
Applied associate-*l*12.8
rmApplied add-sqr-sqrt12.9
Applied associate-*l*12.9
rmApplied add-sqr-sqrt12.9
Applied sqrt-prod12.8
rmApplied add-sqr-sqrt12.8
Applied sqrt-prod12.8
Final simplification12.8
herbie shell --seed 2019351
(FPCore (F l)
:name "VandenBroeck and Keller, Equation (6)"
:precision binary64
(- (* PI l) (* (/ 1 (* F F)) (tan (* PI l)))))