- Split input into 3 regimes
if F < -5.450711432177514e+16
Initial program 25.9
\[\left(-x \cdot \frac{1}{\tan B}\right) + \frac{F}{\sin B} \cdot {\left(\left(F \cdot F + 2\right) + 2 \cdot x\right)}^{\left(-\frac{1}{2}\right)}\]
Taylor expanded around -inf 0.2
\[\leadsto \left(-x \cdot \frac{1}{\tan B}\right) + \color{blue}{\left(\frac{1}{{F}^{2} \cdot \sin B} - \frac{1}{\sin B}\right)}\]
if -5.450711432177514e+16 < F < 31782045159358.96
Initial program 0.4
\[\left(-x \cdot \frac{1}{\tan B}\right) + \frac{F}{\sin B} \cdot {\left(\left(F \cdot F + 2\right) + 2 \cdot x\right)}^{\left(-\frac{1}{2}\right)}\]
Initial simplification0.3
\[\leadsto (\left({\left((x \cdot 2 + \left((F \cdot F + 2)_*\right))_*\right)}^{\left(-\frac{1}{2}\right)}\right) \cdot \left(\frac{F}{\sin B}\right) + \left(\frac{-x}{\tan B}\right))_*\]
- Using strategy
rm Applied add-sqr-sqrt0.3
\[\leadsto (\left({\color{blue}{\left(\sqrt{(x \cdot 2 + \left((F \cdot F + 2)_*\right))_*} \cdot \sqrt{(x \cdot 2 + \left((F \cdot F + 2)_*\right))_*}\right)}}^{\left(-\frac{1}{2}\right)}\right) \cdot \left(\frac{F}{\sin B}\right) + \left(\frac{-x}{\tan B}\right))_*\]
Applied unpow-prod-down0.3
\[\leadsto (\color{blue}{\left({\left(\sqrt{(x \cdot 2 + \left((F \cdot F + 2)_*\right))_*}\right)}^{\left(-\frac{1}{2}\right)} \cdot {\left(\sqrt{(x \cdot 2 + \left((F \cdot F + 2)_*\right))_*}\right)}^{\left(-\frac{1}{2}\right)}\right)} \cdot \left(\frac{F}{\sin B}\right) + \left(\frac{-x}{\tan B}\right))_*\]
if 31782045159358.96 < F
Initial program 24.9
\[\left(-x \cdot \frac{1}{\tan B}\right) + \frac{F}{\sin B} \cdot {\left(\left(F \cdot F + 2\right) + 2 \cdot x\right)}^{\left(-\frac{1}{2}\right)}\]
Taylor expanded around inf 0.2
\[\leadsto \left(-x \cdot \frac{1}{\tan B}\right) + \color{blue}{\left(\frac{1}{\sin B} - \frac{1}{{F}^{2} \cdot \sin B}\right)}\]
- Recombined 3 regimes into one program.
Final simplification0.3
\[\leadsto \begin{array}{l}
\mathbf{if}\;F \le -5.450711432177514 \cdot 10^{+16}:\\
\;\;\;\;\frac{1}{\tan B} \cdot \left(-x\right) + \left(\frac{1}{{F}^{2} \cdot \sin B} - \frac{1}{\sin B}\right)\\
\mathbf{elif}\;F \le 31782045159358.96:\\
\;\;\;\;(\left({\left(\sqrt{(x \cdot 2 + \left((F \cdot F + 2)_*\right))_*}\right)}^{\left(\frac{-1}{2}\right)} \cdot {\left(\sqrt{(x \cdot 2 + \left((F \cdot F + 2)_*\right))_*}\right)}^{\left(\frac{-1}{2}\right)}\right) \cdot \left(\frac{F}{\sin B}\right) + \left(\frac{-x}{\tan B}\right))_*\\
\mathbf{else}:\\
\;\;\;\;\left(\frac{1}{\sin B} - \frac{1}{{F}^{2} \cdot \sin B}\right) + \frac{1}{\tan B} \cdot \left(-x\right)\\
\end{array}\]