- Split input into 3 regimes
if F < 2.893215181645407e-231
Initial program 10.3
\[\pi \cdot \ell - \frac{1}{F \cdot F} \cdot \tan \left(\pi \cdot \ell\right)\]
Simplified10.3
\[\leadsto \color{blue}{(\left(\tan \left(\pi \cdot \ell\right)\right) \cdot \left(\frac{-1}{F \cdot F}\right) + \left(\pi \cdot \ell\right))_*}\]
if 2.893215181645407e-231 < F < 1.2908308852125874e-162
Initial program 60.1
\[\pi \cdot \ell - \frac{1}{F \cdot F} \cdot \tan \left(\pi \cdot \ell\right)\]
Simplified60.1
\[\leadsto \color{blue}{(\left(\tan \left(\pi \cdot \ell\right)\right) \cdot \left(\frac{-1}{F \cdot F}\right) + \left(\pi \cdot \ell\right))_*}\]
Taylor expanded around inf 60.1
\[\leadsto \color{blue}{\pi \cdot \ell - \frac{\sin \left(\pi \cdot \ell\right)}{{F}^{2} \cdot \cos \left(\pi \cdot \ell\right)}}\]
- Using strategy
rm Applied add-exp-log60.1
\[\leadsto \pi \cdot \ell - \frac{\sin \left(\pi \cdot \ell\right)}{{F}^{2} \cdot \color{blue}{e^{\log \left(\cos \left(\pi \cdot \ell\right)\right)}}}\]
Applied add-exp-log60.1
\[\leadsto \pi \cdot \ell - \frac{\sin \left(\pi \cdot \ell\right)}{\color{blue}{e^{\log \left({F}^{2}\right)}} \cdot e^{\log \left(\cos \left(\pi \cdot \ell\right)\right)}}\]
Applied prod-exp60.1
\[\leadsto \pi \cdot \ell - \frac{\sin \left(\pi \cdot \ell\right)}{\color{blue}{e^{\log \left({F}^{2}\right) + \log \left(\cos \left(\pi \cdot \ell\right)\right)}}}\]
Applied add-exp-log60.1
\[\leadsto \pi \cdot \ell - \frac{\color{blue}{e^{\log \left(\sin \left(\pi \cdot \ell\right)\right)}}}{e^{\log \left({F}^{2}\right) + \log \left(\cos \left(\pi \cdot \ell\right)\right)}}\]
Applied div-exp60.1
\[\leadsto \pi \cdot \ell - \color{blue}{e^{\log \left(\sin \left(\pi \cdot \ell\right)\right) - \left(\log \left({F}^{2}\right) + \log \left(\cos \left(\pi \cdot \ell\right)\right)\right)}}\]
Simplified34.4
\[\leadsto \pi \cdot \ell - e^{\color{blue}{\log \left(\sin \left(\pi \cdot \ell\right)\right) - (2 \cdot \left(\log F\right) + \left(\log \left(\cos \left(\pi \cdot \ell\right)\right)\right))_*}}\]
if 1.2908308852125874e-162 < F
Initial program 1.8
\[\pi \cdot \ell - \frac{1}{F \cdot F} \cdot \tan \left(\pi \cdot \ell\right)\]
Simplified1.8
\[\leadsto \color{blue}{(\left(\tan \left(\pi \cdot \ell\right)\right) \cdot \left(\frac{-1}{F \cdot F}\right) + \left(\pi \cdot \ell\right))_*}\]
Taylor expanded around inf 1.1
\[\leadsto \color{blue}{\pi \cdot \ell - \frac{\sin \left(\pi \cdot \ell\right)}{{F}^{2} \cdot \cos \left(\pi \cdot \ell\right)}}\]
- Recombined 3 regimes into one program.
Final simplification7.3
\[\leadsto \begin{array}{l}
\mathbf{if}\;F \le 2.893215181645407 \cdot 10^{-231}:\\
\;\;\;\;(\left(\tan \left(\pi \cdot \ell\right)\right) \cdot \left(\frac{-1}{F \cdot F}\right) + \left(\pi \cdot \ell\right))_*\\
\mathbf{elif}\;F \le 1.2908308852125874 \cdot 10^{-162}:\\
\;\;\;\;\pi \cdot \ell - e^{\log \left(\sin \left(\pi \cdot \ell\right)\right) - (2 \cdot \left(\log F\right) + \left(\log \left(\cos \left(\pi \cdot \ell\right)\right)\right))_*}\\
\mathbf{else}:\\
\;\;\;\;\pi \cdot \ell - \frac{\sin \left(\pi \cdot \ell\right)}{\cos \left(\pi \cdot \ell\right) \cdot {F}^{2}}\\
\end{array}\]