\pi \cdot \ell - \frac{1}{F \cdot F} \cdot \tan \left(\pi \cdot \ell\right)\begin{array}{l}
\mathbf{if}\;\pi \cdot \ell \le -1.54227830784148189 \cdot 10^{157}:\\
\;\;\;\;\pi \cdot \ell - \frac{1}{F} \cdot \left(\frac{1}{F} \cdot \tan \left(\left(\sqrt[3]{\pi \cdot \ell} \cdot \sqrt[3]{\pi \cdot \ell}\right) \cdot \sqrt[3]{\pi \cdot \ell}\right)\right)\\
\mathbf{elif}\;\pi \cdot \ell \le 1.08089408670032465 \cdot 10^{142}:\\
\;\;\;\;\pi \cdot \ell - \frac{1}{F} \cdot \left(1 \cdot \frac{\sin \left(\pi \cdot \ell\right)}{\left(\left(\frac{1}{24} \cdot \left({\pi}^{4} \cdot {\ell}^{4}\right) + 1\right) - \frac{1}{2} \cdot \left({\pi}^{2} \cdot {\ell}^{2}\right)\right) \cdot F}\right)\\
\mathbf{else}:\\
\;\;\;\;\pi \cdot \ell - \frac{1}{F \cdot F} \cdot \tan \left(\sqrt{\pi} \cdot \left(\sqrt{\pi} \cdot \ell\right)\right)\\
\end{array}double code(double F, double l) {
return ((((double) M_PI) * l) - ((1.0 / (F * F)) * tan((((double) M_PI) * l))));
}
double code(double F, double l) {
double temp;
if (((((double) M_PI) * l) <= -1.542278307841482e+157)) {
temp = ((((double) M_PI) * l) - ((1.0 / F) * ((1.0 / F) * tan(((cbrt((((double) M_PI) * l)) * cbrt((((double) M_PI) * l))) * cbrt((((double) M_PI) * l)))))));
} else {
double temp_1;
if (((((double) M_PI) * l) <= 1.0808940867003247e+142)) {
temp_1 = ((((double) M_PI) * l) - ((1.0 / F) * (1.0 * (sin((((double) M_PI) * l)) / ((((0.041666666666666664 * (pow(((double) M_PI), 4.0) * pow(l, 4.0))) + 1.0) - (0.5 * (pow(((double) M_PI), 2.0) * pow(l, 2.0)))) * F)))));
} else {
temp_1 = ((((double) M_PI) * l) - ((1.0 / (F * F)) * tan((sqrt(((double) M_PI)) * (sqrt(((double) M_PI)) * l)))));
}
temp = temp_1;
}
return temp;
}



Bits error versus F



Bits error versus l
Results
if (* PI l) < -1.542278307841482e+157Initial program 20.7
rmApplied *-un-lft-identity20.7
Applied times-frac20.7
Applied associate-*l*20.7
rmApplied add-cube-cbrt20.7
if -1.542278307841482e+157 < (* PI l) < 1.0808940867003247e+142Initial program 15.0
rmApplied *-un-lft-identity15.0
Applied times-frac15.1
Applied associate-*l*9.4
Taylor expanded around inf 9.4
Taylor expanded around 0 4.2
if 1.0808940867003247e+142 < (* PI l) Initial program 21.2
rmApplied add-sqr-sqrt21.2
Applied associate-*l*21.2
Final simplification8.8
herbie shell --seed 2020058
(FPCore (F l)
:name "VandenBroeck and Keller, Equation (6)"
:precision binary64
(- (* PI l) (* (/ 1 (* F F)) (tan (* PI l)))))