\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 r28159 = atan2(1.0, 0.0);
double r28160 = l;
double r28161 = r28159 * r28160;
double r28162 = 1.0;
double r28163 = F;
double r28164 = r28163 * r28163;
double r28165 = r28162 / r28164;
double r28166 = tan(r28161);
double r28167 = r28165 * r28166;
double r28168 = r28161 - r28167;
return r28168;
}
double f(double F, double l) {
double r28169 = atan2(1.0, 0.0);
double r28170 = l;
double r28171 = r28169 * r28170;
double r28172 = 1.0;
double r28173 = sqrt(r28172);
double r28174 = F;
double r28175 = r28173 / r28174;
double r28176 = sqrt(r28169);
double r28177 = r28176 * r28170;
double r28178 = r28176 * r28177;
double r28179 = tan(r28178);
double r28180 = r28175 * r28179;
double r28181 = r28175 * r28180;
double r28182 = r28171 - r28181;
return r28182;
}



Bits error versus F



Bits error versus l
Results
Initial program 16.7
rmApplied add-sqr-sqrt16.7
Applied times-frac16.7
Applied associate-*l*12.2
rmApplied add-sqr-sqrt12.4
Applied associate-*l*12.3
Final simplification12.3
herbie shell --seed 2019326
(FPCore (F l)
:name "VandenBroeck and Keller, Equation (6)"
:precision binary64
(- (* PI l) (* (/ 1 (* F F)) (tan (* PI l)))))