- Split input into 2 regimes
if J < -1.3116701806814661e-216 or 1.231045929403379e-210 < J
Initial program 12.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}}\]
Simplified12.6
\[\leadsto \color{blue}{\sqrt{\frac{U}{2 \cdot \left(\cos \left(\frac{K}{2}\right) \cdot J\right)} \cdot \frac{U}{2 \cdot \left(\cos \left(\frac{K}{2}\right) \cdot J\right)} + 1} \cdot \left(-2 \cdot \left(\cos \left(\frac{K}{2}\right) \cdot J\right)\right)}\]
Taylor expanded around inf 12.6
\[\leadsto \sqrt{\frac{U}{2 \cdot \left(\cos \left(\frac{K}{2}\right) \cdot J\right)} \cdot \frac{U}{2 \cdot \left(\cos \left(\frac{K}{2}\right) \cdot J\right)} + 1} \cdot \left(-2 \cdot \color{blue}{\left(\cos \left(\frac{1}{2} \cdot K\right) \cdot J\right)}\right)\]
if -1.3116701806814661e-216 < J < 1.231045929403379e-210
Initial program 42.4
\[\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}}\]
Simplified42.4
\[\leadsto \color{blue}{\sqrt{\frac{U}{2 \cdot \left(\cos \left(\frac{K}{2}\right) \cdot J\right)} \cdot \frac{U}{2 \cdot \left(\cos \left(\frac{K}{2}\right) \cdot J\right)} + 1} \cdot \left(-2 \cdot \left(\cos \left(\frac{K}{2}\right) \cdot J\right)\right)}\]
Taylor expanded around inf 32.6
\[\leadsto \color{blue}{-1 \cdot U}\]
Simplified32.6
\[\leadsto \color{blue}{-U}\]
- Recombined 2 regimes into one program.
Final simplification15.9
\[\leadsto \begin{array}{l}
\mathbf{if}\;J \le -1.3116701806814661 \cdot 10^{-216}:\\
\;\;\;\;\left(-2 \cdot \left(J \cdot \cos \left(\frac{1}{2} \cdot K\right)\right)\right) \cdot \sqrt{1 + \frac{U}{2 \cdot \left(\cos \left(\frac{K}{2}\right) \cdot J\right)} \cdot \frac{U}{2 \cdot \left(\cos \left(\frac{K}{2}\right) \cdot J\right)}}\\
\mathbf{elif}\;J \le 1.231045929403379 \cdot 10^{-210}:\\
\;\;\;\;-U\\
\mathbf{else}:\\
\;\;\;\;\left(-2 \cdot \left(J \cdot \cos \left(\frac{1}{2} \cdot K\right)\right)\right) \cdot \sqrt{1 + \frac{U}{2 \cdot \left(\cos \left(\frac{K}{2}\right) \cdot J\right)} \cdot \frac{U}{2 \cdot \left(\cos \left(\frac{K}{2}\right) \cdot J\right)}}\\
\end{array}\]