\pi \cdot \ell - \frac{1}{F \cdot F} \cdot \tan \left(\pi \cdot \ell\right)\pi \cdot \ell - \frac{\tan \left(\pi \cdot \ell\right)}{F} \cdot \frac{1}{F}double f(double F, double l) {
double r283226 = atan2(1.0, 0.0);
double r283227 = l;
double r283228 = r283226 * r283227;
double r283229 = 1.0;
double r283230 = F;
double r283231 = r283230 * r283230;
double r283232 = r283229 / r283231;
double r283233 = tan(r283228);
double r283234 = r283232 * r283233;
double r283235 = r283228 - r283234;
return r283235;
}
double f(double F, double l) {
double r283236 = atan2(1.0, 0.0);
double r283237 = l;
double r283238 = r283236 * r283237;
double r283239 = tan(r283238);
double r283240 = F;
double r283241 = r283239 / r283240;
double r283242 = 1.0;
double r283243 = r283242 / r283240;
double r283244 = r283241 * r283243;
double r283245 = r283238 - r283244;
return r283245;
}



Bits error versus F



Bits error versus l
Results
Initial program 8.6
Simplified8.1
rmApplied *-un-lft-identity8.1
Applied times-frac0.7
Final simplification0.7
herbie shell --seed 2019128 +o rules:numerics
(FPCore (F l)
:name "VandenBroeck and Keller, Equation (6)"
(- (* PI l) (* (/ 1 (* F F)) (tan (* PI l)))))