\pi \cdot \ell - \frac{1}{F \cdot F} \cdot \tan \left(\pi \cdot \ell\right)\pi \cdot \ell - \frac{\frac{1}{\frac{F}{\tan \left(\pi \cdot \ell\right)}}}{F}double f(double F, double l) {
double r731434 = atan2(1.0, 0.0);
double r731435 = l;
double r731436 = r731434 * r731435;
double r731437 = 1.0;
double r731438 = F;
double r731439 = r731438 * r731438;
double r731440 = r731437 / r731439;
double r731441 = tan(r731436);
double r731442 = r731440 * r731441;
double r731443 = r731436 - r731442;
return r731443;
}
double f(double F, double l) {
double r731444 = atan2(1.0, 0.0);
double r731445 = l;
double r731446 = r731444 * r731445;
double r731447 = 1.0;
double r731448 = F;
double r731449 = tan(r731446);
double r731450 = r731448 / r731449;
double r731451 = r731447 / r731450;
double r731452 = r731451 / r731448;
double r731453 = r731446 - r731452;
return r731453;
}



Bits error versus F



Bits error versus l
Results
Initial program 8.7
Simplified8.2
rmApplied associate-/r*0.6
rmApplied clear-num0.7
Final simplification0.7
herbie shell --seed 2019125
(FPCore (F l)
:name "VandenBroeck and Keller, Equation (6)"
(- (* PI l) (* (/ 1 (* F F)) (tan (* PI l)))))