- Split input into 2 regimes
if J < -3.138216443546463e-214 or 2.5854915047549e-275 < J
Initial program 14.1
\[\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 simplification5.4
\[\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)\]
Taylor expanded around -inf 5.4
\[\leadsto \sqrt{1^2 + \color{blue}{\left(\frac{1}{2} \cdot \frac{U}{\cos \left(\frac{1}{2} \cdot K\right) \cdot J}\right)}^2}^* \cdot \left(\cos \left(\frac{K}{2}\right) \cdot \left(-2 \cdot J\right)\right)\]
if -3.138216443546463e-214 < J < 2.5854915047549e-275
Initial program 42.0
\[\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 simplification25.0
\[\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 add-cube-cbrt25.8
\[\leadsto \sqrt{1^2 + \left(\frac{\frac{\frac{U}{2}}{J}}{\cos \left(\frac{K}{2}\right)}\right)^2}^* \cdot \color{blue}{\left(\left(\sqrt[3]{\cos \left(\frac{K}{2}\right) \cdot \left(-2 \cdot J\right)} \cdot \sqrt[3]{\cos \left(\frac{K}{2}\right) \cdot \left(-2 \cdot J\right)}\right) \cdot \sqrt[3]{\cos \left(\frac{K}{2}\right) \cdot \left(-2 \cdot J\right)}\right)}\]
Taylor expanded around inf 33.0
\[\leadsto \color{blue}{-1 \cdot U}\]
Simplified33.0
\[\leadsto \color{blue}{-U}\]
- Recombined 2 regimes into one program.
Final simplification8.1
\[\leadsto \begin{array}{l}
\mathbf{if}\;J \le -3.138216443546463 \cdot 10^{-214} \lor \neg \left(J \le 2.5854915047549 \cdot 10^{-275}\right):\\
\;\;\;\;\left(\cos \left(\frac{K}{2}\right) \cdot \left(J \cdot -2\right)\right) \cdot \sqrt{1^2 + \left(\frac{1}{2} \cdot \frac{U}{J \cdot \cos \left(K \cdot \frac{1}{2}\right)}\right)^2}^*\\
\mathbf{else}:\\
\;\;\;\;-U\\
\end{array}\]