- Split input into 2 regimes
if J < -1.0489440444611064e-285 or 5.670632451969402e-290 < J
Initial program 15.7
\[\left(\left(-2 \cdot J\right) \cdot \cos \left(\frac{K}{2}\right)\right) \cdot \sqrt{1 + {\left(\frac{U}{\left(2 \cdot J\right) \cdot \cos \left(\frac{K}{2}\right)}\right)}^{2}}\]
Initial simplification6.6
\[\leadsto \sqrt{1^2 + \left(\frac{\frac{\frac{U}{2}}{J}}{\cos \left(\frac{K}{2}\right)}\right)^2}^* \cdot \left(\cos \left(\frac{K}{2}\right) \cdot \left(-2 \cdot J\right)\right)\]
- Using strategy
rm Applied associate-/l/6.5
\[\leadsto \sqrt{1^2 + \color{blue}{\left(\frac{\frac{U}{2}}{\cos \left(\frac{K}{2}\right) \cdot J}\right)}^2}^* \cdot \left(\cos \left(\frac{K}{2}\right) \cdot \left(-2 \cdot J\right)\right)\]
if -1.0489440444611064e-285 < J < 5.670632451969402e-290
Initial program 44.7
\[\left(\left(-2 \cdot J\right) \cdot \cos \left(\frac{K}{2}\right)\right) \cdot \sqrt{1 + {\left(\frac{U}{\left(2 \cdot J\right) \cdot \cos \left(\frac{K}{2}\right)}\right)}^{2}}\]
Initial simplification30.3
\[\leadsto \sqrt{1^2 + \left(\frac{\frac{\frac{U}{2}}{J}}{\cos \left(\frac{K}{2}\right)}\right)^2}^* \cdot \left(\cos \left(\frac{K}{2}\right) \cdot \left(-2 \cdot J\right)\right)\]
- Using strategy
rm Applied associate-/l/30.3
\[\leadsto \sqrt{1^2 + \color{blue}{\left(\frac{\frac{U}{2}}{\cos \left(\frac{K}{2}\right) \cdot J}\right)}^2}^* \cdot \left(\cos \left(\frac{K}{2}\right) \cdot \left(-2 \cdot J\right)\right)\]
- Using strategy
rm Applied add-sqr-sqrt30.5
\[\leadsto \color{blue}{\left(\sqrt{\sqrt{1^2 + \left(\frac{\frac{U}{2}}{\cos \left(\frac{K}{2}\right) \cdot J}\right)^2}^*} \cdot \sqrt{\sqrt{1^2 + \left(\frac{\frac{U}{2}}{\cos \left(\frac{K}{2}\right) \cdot J}\right)^2}^*}\right)} \cdot \left(\cos \left(\frac{K}{2}\right) \cdot \left(-2 \cdot J\right)\right)\]
Applied associate-*l*30.5
\[\leadsto \color{blue}{\sqrt{\sqrt{1^2 + \left(\frac{\frac{U}{2}}{\cos \left(\frac{K}{2}\right) \cdot J}\right)^2}^*} \cdot \left(\sqrt{\sqrt{1^2 + \left(\frac{\frac{U}{2}}{\cos \left(\frac{K}{2}\right) \cdot J}\right)^2}^*} \cdot \left(\cos \left(\frac{K}{2}\right) \cdot \left(-2 \cdot J\right)\right)\right)}\]
Taylor expanded around -inf 34.1
\[\leadsto \color{blue}{-1 \cdot U}\]
Simplified34.1
\[\leadsto \color{blue}{-U}\]
- Recombined 2 regimes into one program.
Final simplification7.5
\[\leadsto \begin{array}{l}
\mathbf{if}\;J \le -1.0489440444611064 \cdot 10^{-285} \lor \neg \left(J \le 5.670632451969402 \cdot 10^{-290}\right):\\
\;\;\;\;\left(\left(-2 \cdot J\right) \cdot \cos \left(\frac{K}{2}\right)\right) \cdot \sqrt{1^2 + \left(\frac{\frac{U}{2}}{\cos \left(\frac{K}{2}\right) \cdot J}\right)^2}^*\\
\mathbf{else}:\\
\;\;\;\;-U\\
\end{array}\]