- Split input into 3 regimes
if J < -9.697315888830237e-63
Initial program 6.2
\[\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}}\]
Simplified6.2
\[\leadsto \color{blue}{\sqrt{{\left(\frac{U}{\left(\cos \left(\frac{K}{2}\right) \cdot J\right) \cdot 2}\right)}^{2} + 1} \cdot \left(\left(\cos \left(\frac{K}{2}\right) \cdot J\right) \cdot -2\right)}\]
- Using strategy
rm Applied add-cube-cbrt6.7
\[\leadsto \sqrt{{\left(\frac{U}{\left(\cos \left(\frac{K}{2}\right) \cdot J\right) \cdot 2}\right)}^{2} + 1} \cdot \left(\left(\color{blue}{\left(\left(\sqrt[3]{\cos \left(\frac{K}{2}\right)} \cdot \sqrt[3]{\cos \left(\frac{K}{2}\right)}\right) \cdot \sqrt[3]{\cos \left(\frac{K}{2}\right)}\right)} \cdot J\right) \cdot -2\right)\]
Applied associate-*l*6.7
\[\leadsto \sqrt{{\left(\frac{U}{\left(\cos \left(\frac{K}{2}\right) \cdot J\right) \cdot 2}\right)}^{2} + 1} \cdot \left(\color{blue}{\left(\left(\sqrt[3]{\cos \left(\frac{K}{2}\right)} \cdot \sqrt[3]{\cos \left(\frac{K}{2}\right)}\right) \cdot \left(\sqrt[3]{\cos \left(\frac{K}{2}\right)} \cdot J\right)\right)} \cdot -2\right)\]
- Using strategy
rm Applied add-cube-cbrt6.8
\[\leadsto \sqrt{{\left(\frac{U}{\left(\cos \left(\frac{K}{2}\right) \cdot J\right) \cdot 2}\right)}^{2} + 1} \cdot \left(\left(\left(\sqrt[3]{\cos \left(\frac{K}{2}\right)} \cdot \color{blue}{\left(\left(\sqrt[3]{\sqrt[3]{\cos \left(\frac{K}{2}\right)}} \cdot \sqrt[3]{\sqrt[3]{\cos \left(\frac{K}{2}\right)}}\right) \cdot \sqrt[3]{\sqrt[3]{\cos \left(\frac{K}{2}\right)}}\right)}\right) \cdot \left(\sqrt[3]{\cos \left(\frac{K}{2}\right)} \cdot J\right)\right) \cdot -2\right)\]
- Using strategy
rm Applied add-sqr-sqrt6.8
\[\leadsto \sqrt{\color{blue}{\sqrt{{\left(\frac{U}{\left(\cos \left(\frac{K}{2}\right) \cdot J\right) \cdot 2}\right)}^{2} + 1} \cdot \sqrt{{\left(\frac{U}{\left(\cos \left(\frac{K}{2}\right) \cdot J\right) \cdot 2}\right)}^{2} + 1}}} \cdot \left(\left(\left(\sqrt[3]{\cos \left(\frac{K}{2}\right)} \cdot \left(\left(\sqrt[3]{\sqrt[3]{\cos \left(\frac{K}{2}\right)}} \cdot \sqrt[3]{\sqrt[3]{\cos \left(\frac{K}{2}\right)}}\right) \cdot \sqrt[3]{\sqrt[3]{\cos \left(\frac{K}{2}\right)}}\right)\right) \cdot \left(\sqrt[3]{\cos \left(\frac{K}{2}\right)} \cdot J\right)\right) \cdot -2\right)\]
Applied sqrt-prod6.8
\[\leadsto \color{blue}{\left(\sqrt{\sqrt{{\left(\frac{U}{\left(\cos \left(\frac{K}{2}\right) \cdot J\right) \cdot 2}\right)}^{2} + 1}} \cdot \sqrt{\sqrt{{\left(\frac{U}{\left(\cos \left(\frac{K}{2}\right) \cdot J\right) \cdot 2}\right)}^{2} + 1}}\right)} \cdot \left(\left(\left(\sqrt[3]{\cos \left(\frac{K}{2}\right)} \cdot \left(\left(\sqrt[3]{\sqrt[3]{\cos \left(\frac{K}{2}\right)}} \cdot \sqrt[3]{\sqrt[3]{\cos \left(\frac{K}{2}\right)}}\right) \cdot \sqrt[3]{\sqrt[3]{\cos \left(\frac{K}{2}\right)}}\right)\right) \cdot \left(\sqrt[3]{\cos \left(\frac{K}{2}\right)} \cdot J\right)\right) \cdot -2\right)\]
Applied associate-*l*6.8
\[\leadsto \color{blue}{\sqrt{\sqrt{{\left(\frac{U}{\left(\cos \left(\frac{K}{2}\right) \cdot J\right) \cdot 2}\right)}^{2} + 1}} \cdot \left(\sqrt{\sqrt{{\left(\frac{U}{\left(\cos \left(\frac{K}{2}\right) \cdot J\right) \cdot 2}\right)}^{2} + 1}} \cdot \left(\left(\left(\sqrt[3]{\cos \left(\frac{K}{2}\right)} \cdot \left(\left(\sqrt[3]{\sqrt[3]{\cos \left(\frac{K}{2}\right)}} \cdot \sqrt[3]{\sqrt[3]{\cos \left(\frac{K}{2}\right)}}\right) \cdot \sqrt[3]{\sqrt[3]{\cos \left(\frac{K}{2}\right)}}\right)\right) \cdot \left(\sqrt[3]{\cos \left(\frac{K}{2}\right)} \cdot J\right)\right) \cdot -2\right)\right)}\]
- Using strategy
rm Applied add-cube-cbrt6.8
\[\leadsto \sqrt{\sqrt{\color{blue}{\left(\sqrt[3]{{\left(\frac{U}{\left(\cos \left(\frac{K}{2}\right) \cdot J\right) \cdot 2}\right)}^{2} + 1} \cdot \sqrt[3]{{\left(\frac{U}{\left(\cos \left(\frac{K}{2}\right) \cdot J\right) \cdot 2}\right)}^{2} + 1}\right) \cdot \sqrt[3]{{\left(\frac{U}{\left(\cos \left(\frac{K}{2}\right) \cdot J\right) \cdot 2}\right)}^{2} + 1}}}} \cdot \left(\sqrt{\sqrt{{\left(\frac{U}{\left(\cos \left(\frac{K}{2}\right) \cdot J\right) \cdot 2}\right)}^{2} + 1}} \cdot \left(\left(\left(\sqrt[3]{\cos \left(\frac{K}{2}\right)} \cdot \left(\left(\sqrt[3]{\sqrt[3]{\cos \left(\frac{K}{2}\right)}} \cdot \sqrt[3]{\sqrt[3]{\cos \left(\frac{K}{2}\right)}}\right) \cdot \sqrt[3]{\sqrt[3]{\cos \left(\frac{K}{2}\right)}}\right)\right) \cdot \left(\sqrt[3]{\cos \left(\frac{K}{2}\right)} \cdot J\right)\right) \cdot -2\right)\right)\]
Applied sqrt-prod6.8
\[\leadsto \sqrt{\color{blue}{\sqrt{\sqrt[3]{{\left(\frac{U}{\left(\cos \left(\frac{K}{2}\right) \cdot J\right) \cdot 2}\right)}^{2} + 1} \cdot \sqrt[3]{{\left(\frac{U}{\left(\cos \left(\frac{K}{2}\right) \cdot J\right) \cdot 2}\right)}^{2} + 1}} \cdot \sqrt{\sqrt[3]{{\left(\frac{U}{\left(\cos \left(\frac{K}{2}\right) \cdot J\right) \cdot 2}\right)}^{2} + 1}}}} \cdot \left(\sqrt{\sqrt{{\left(\frac{U}{\left(\cos \left(\frac{K}{2}\right) \cdot J\right) \cdot 2}\right)}^{2} + 1}} \cdot \left(\left(\left(\sqrt[3]{\cos \left(\frac{K}{2}\right)} \cdot \left(\left(\sqrt[3]{\sqrt[3]{\cos \left(\frac{K}{2}\right)}} \cdot \sqrt[3]{\sqrt[3]{\cos \left(\frac{K}{2}\right)}}\right) \cdot \sqrt[3]{\sqrt[3]{\cos \left(\frac{K}{2}\right)}}\right)\right) \cdot \left(\sqrt[3]{\cos \left(\frac{K}{2}\right)} \cdot J\right)\right) \cdot -2\right)\right)\]
Applied sqrt-prod6.9
\[\leadsto \color{blue}{\left(\sqrt{\sqrt{\sqrt[3]{{\left(\frac{U}{\left(\cos \left(\frac{K}{2}\right) \cdot J\right) \cdot 2}\right)}^{2} + 1} \cdot \sqrt[3]{{\left(\frac{U}{\left(\cos \left(\frac{K}{2}\right) \cdot J\right) \cdot 2}\right)}^{2} + 1}}} \cdot \sqrt{\sqrt{\sqrt[3]{{\left(\frac{U}{\left(\cos \left(\frac{K}{2}\right) \cdot J\right) \cdot 2}\right)}^{2} + 1}}}\right)} \cdot \left(\sqrt{\sqrt{{\left(\frac{U}{\left(\cos \left(\frac{K}{2}\right) \cdot J\right) \cdot 2}\right)}^{2} + 1}} \cdot \left(\left(\left(\sqrt[3]{\cos \left(\frac{K}{2}\right)} \cdot \left(\left(\sqrt[3]{\sqrt[3]{\cos \left(\frac{K}{2}\right)}} \cdot \sqrt[3]{\sqrt[3]{\cos \left(\frac{K}{2}\right)}}\right) \cdot \sqrt[3]{\sqrt[3]{\cos \left(\frac{K}{2}\right)}}\right)\right) \cdot \left(\sqrt[3]{\cos \left(\frac{K}{2}\right)} \cdot J\right)\right) \cdot -2\right)\right)\]
if -9.697315888830237e-63 < J < 5.176467849961619e-152
Initial program 37.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}}\]
Simplified37.7
\[\leadsto \color{blue}{\sqrt{{\left(\frac{U}{\left(\cos \left(\frac{K}{2}\right) \cdot J\right) \cdot 2}\right)}^{2} + 1} \cdot \left(\left(\cos \left(\frac{K}{2}\right) \cdot J\right) \cdot -2\right)}\]
Taylor expanded around inf 36.8
\[\leadsto \color{blue}{-2 \cdot \left(\sqrt{0.25} \cdot U\right)}\]
if 5.176467849961619e-152 < J
Initial program 10.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}}\]
Simplified10.4
\[\leadsto \color{blue}{\sqrt{{\left(\frac{U}{\left(\cos \left(\frac{K}{2}\right) \cdot J\right) \cdot 2}\right)}^{2} + 1} \cdot \left(\left(\cos \left(\frac{K}{2}\right) \cdot J\right) \cdot -2\right)}\]
- Using strategy
rm Applied add-cube-cbrt10.8
\[\leadsto \sqrt{{\left(\frac{U}{\left(\cos \left(\frac{K}{2}\right) \cdot J\right) \cdot 2}\right)}^{2} + 1} \cdot \left(\left(\color{blue}{\left(\left(\sqrt[3]{\cos \left(\frac{K}{2}\right)} \cdot \sqrt[3]{\cos \left(\frac{K}{2}\right)}\right) \cdot \sqrt[3]{\cos \left(\frac{K}{2}\right)}\right)} \cdot J\right) \cdot -2\right)\]
Applied associate-*l*10.8
\[\leadsto \sqrt{{\left(\frac{U}{\left(\cos \left(\frac{K}{2}\right) \cdot J\right) \cdot 2}\right)}^{2} + 1} \cdot \left(\color{blue}{\left(\left(\sqrt[3]{\cos \left(\frac{K}{2}\right)} \cdot \sqrt[3]{\cos \left(\frac{K}{2}\right)}\right) \cdot \left(\sqrt[3]{\cos \left(\frac{K}{2}\right)} \cdot J\right)\right)} \cdot -2\right)\]
- Using strategy
rm Applied add-cube-cbrt10.9
\[\leadsto \sqrt{{\left(\frac{U}{\left(\cos \left(\frac{K}{2}\right) \cdot J\right) \cdot 2}\right)}^{2} + 1} \cdot \left(\left(\left(\sqrt[3]{\cos \left(\frac{K}{2}\right)} \cdot \color{blue}{\left(\left(\sqrt[3]{\sqrt[3]{\cos \left(\frac{K}{2}\right)}} \cdot \sqrt[3]{\sqrt[3]{\cos \left(\frac{K}{2}\right)}}\right) \cdot \sqrt[3]{\sqrt[3]{\cos \left(\frac{K}{2}\right)}}\right)}\right) \cdot \left(\sqrt[3]{\cos \left(\frac{K}{2}\right)} \cdot J\right)\right) \cdot -2\right)\]
- Using strategy
rm Applied add-sqr-sqrt10.9
\[\leadsto \sqrt{\color{blue}{\sqrt{{\left(\frac{U}{\left(\cos \left(\frac{K}{2}\right) \cdot J\right) \cdot 2}\right)}^{2} + 1} \cdot \sqrt{{\left(\frac{U}{\left(\cos \left(\frac{K}{2}\right) \cdot J\right) \cdot 2}\right)}^{2} + 1}}} \cdot \left(\left(\left(\sqrt[3]{\cos \left(\frac{K}{2}\right)} \cdot \left(\left(\sqrt[3]{\sqrt[3]{\cos \left(\frac{K}{2}\right)}} \cdot \sqrt[3]{\sqrt[3]{\cos \left(\frac{K}{2}\right)}}\right) \cdot \sqrt[3]{\sqrt[3]{\cos \left(\frac{K}{2}\right)}}\right)\right) \cdot \left(\sqrt[3]{\cos \left(\frac{K}{2}\right)} \cdot J\right)\right) \cdot -2\right)\]
Applied sqrt-prod11.0
\[\leadsto \color{blue}{\left(\sqrt{\sqrt{{\left(\frac{U}{\left(\cos \left(\frac{K}{2}\right) \cdot J\right) \cdot 2}\right)}^{2} + 1}} \cdot \sqrt{\sqrt{{\left(\frac{U}{\left(\cos \left(\frac{K}{2}\right) \cdot J\right) \cdot 2}\right)}^{2} + 1}}\right)} \cdot \left(\left(\left(\sqrt[3]{\cos \left(\frac{K}{2}\right)} \cdot \left(\left(\sqrt[3]{\sqrt[3]{\cos \left(\frac{K}{2}\right)}} \cdot \sqrt[3]{\sqrt[3]{\cos \left(\frac{K}{2}\right)}}\right) \cdot \sqrt[3]{\sqrt[3]{\cos \left(\frac{K}{2}\right)}}\right)\right) \cdot \left(\sqrt[3]{\cos \left(\frac{K}{2}\right)} \cdot J\right)\right) \cdot -2\right)\]
Applied associate-*l*11.0
\[\leadsto \color{blue}{\sqrt{\sqrt{{\left(\frac{U}{\left(\cos \left(\frac{K}{2}\right) \cdot J\right) \cdot 2}\right)}^{2} + 1}} \cdot \left(\sqrt{\sqrt{{\left(\frac{U}{\left(\cos \left(\frac{K}{2}\right) \cdot J\right) \cdot 2}\right)}^{2} + 1}} \cdot \left(\left(\left(\sqrt[3]{\cos \left(\frac{K}{2}\right)} \cdot \left(\left(\sqrt[3]{\sqrt[3]{\cos \left(\frac{K}{2}\right)}} \cdot \sqrt[3]{\sqrt[3]{\cos \left(\frac{K}{2}\right)}}\right) \cdot \sqrt[3]{\sqrt[3]{\cos \left(\frac{K}{2}\right)}}\right)\right) \cdot \left(\sqrt[3]{\cos \left(\frac{K}{2}\right)} \cdot J\right)\right) \cdot -2\right)\right)}\]
- Recombined 3 regimes into one program.
Final simplification18.1
\[\leadsto \begin{array}{l}
\mathbf{if}\;J \le -9.697315888830236817320599117892605157675 \cdot 10^{-63}:\\
\;\;\;\;\left(\sqrt{\sqrt{\sqrt[3]{1 + {\left(\frac{U}{\left(\cos \left(\frac{K}{2}\right) \cdot J\right) \cdot 2}\right)}^{2}} \cdot \sqrt[3]{1 + {\left(\frac{U}{\left(\cos \left(\frac{K}{2}\right) \cdot J\right) \cdot 2}\right)}^{2}}}} \cdot \sqrt{\sqrt{\sqrt[3]{1 + {\left(\frac{U}{\left(\cos \left(\frac{K}{2}\right) \cdot J\right) \cdot 2}\right)}^{2}}}}\right) \cdot \left(\left(-2 \cdot \left(\left(\sqrt[3]{\cos \left(\frac{K}{2}\right)} \cdot \left(\sqrt[3]{\sqrt[3]{\cos \left(\frac{K}{2}\right)}} \cdot \left(\sqrt[3]{\sqrt[3]{\cos \left(\frac{K}{2}\right)}} \cdot \sqrt[3]{\sqrt[3]{\cos \left(\frac{K}{2}\right)}}\right)\right)\right) \cdot \left(\sqrt[3]{\cos \left(\frac{K}{2}\right)} \cdot J\right)\right)\right) \cdot \sqrt{\sqrt{1 + {\left(\frac{U}{\left(\cos \left(\frac{K}{2}\right) \cdot J\right) \cdot 2}\right)}^{2}}}\right)\\
\mathbf{elif}\;J \le 5.176467849961618590484301862929324273807 \cdot 10^{-152}:\\
\;\;\;\;-2 \cdot \left(U \cdot \sqrt{0.25}\right)\\
\mathbf{else}:\\
\;\;\;\;\sqrt{\sqrt{1 + {\left(\frac{U}{\left(\cos \left(\frac{K}{2}\right) \cdot J\right) \cdot 2}\right)}^{2}}} \cdot \left(\left(-2 \cdot \left(\left(\sqrt[3]{\cos \left(\frac{K}{2}\right)} \cdot \left(\sqrt[3]{\sqrt[3]{\cos \left(\frac{K}{2}\right)}} \cdot \left(\sqrt[3]{\sqrt[3]{\cos \left(\frac{K}{2}\right)}} \cdot \sqrt[3]{\sqrt[3]{\cos \left(\frac{K}{2}\right)}}\right)\right)\right) \cdot \left(\sqrt[3]{\cos \left(\frac{K}{2}\right)} \cdot J\right)\right)\right) \cdot \sqrt{\sqrt{1 + {\left(\frac{U}{\left(\cos \left(\frac{K}{2}\right) \cdot J\right) \cdot 2}\right)}^{2}}}\right)\\
\end{array}\]