\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 r12064 = atan2(1.0, 0.0);
double r12065 = l;
double r12066 = r12064 * r12065;
double r12067 = 1.0;
double r12068 = F;
double r12069 = r12068 * r12068;
double r12070 = r12067 / r12069;
double r12071 = tan(r12066);
double r12072 = r12070 * r12071;
double r12073 = r12066 - r12072;
return r12073;
}
double f(double F, double l) {
double r12074 = atan2(1.0, 0.0);
double r12075 = l;
double r12076 = r12074 * r12075;
double r12077 = 1.0;
double r12078 = F;
double r12079 = r12077 / r12078;
double r12080 = 1.0;
double r12081 = r12080 / r12078;
double r12082 = sqrt(r12074);
double r12083 = sqrt(r12082);
double r12084 = r12083 * r12083;
double r12085 = r12084 * r12075;
double r12086 = r12084 * r12085;
double r12087 = tan(r12086);
double r12088 = r12081 * r12087;
double r12089 = r12079 * r12088;
double r12090 = r12076 - r12089;
return r12090;
}



Bits error versus F



Bits error versus l
Results
Initial program 16.5
rmApplied *-un-lft-identity16.5
Applied times-frac16.5
Applied associate-*l*12.1
rmApplied add-sqr-sqrt12.2
Applied associate-*l*12.1
rmApplied add-sqr-sqrt12.1
Applied sqrt-prod12.1
rmApplied add-sqr-sqrt12.1
Applied sqrt-prod12.1
Final simplification12.1
herbie shell --seed 2020047
(FPCore (F l)
:name "VandenBroeck and Keller, Equation (6)"
:precision binary64
(- (* PI l) (* (/ 1 (* F F)) (tan (* PI l)))))