- Split input into 2 regimes
if (* (* (cbrt (fma (/ c0 (* w 2)) (sqrt (fma (* (* (/ d D) (/ d D)) (/ c0 (* w h))) (* (* (/ d D) (/ d D)) (/ c0 (* w h))) (* M (- M)))) (* (/ c0 (* w 2)) (* (* (/ d D) (/ d D)) (/ c0 (* w h)))))) (cbrt (fma (/ c0 (* w 2)) (sqrt (fma (* (* (/ d D) (/ d D)) (/ c0 (* w h))) (* (* (/ d D) (/ d D)) (/ c0 (* w h))) (* M (- M)))) (* (/ c0 (* w 2)) (* (* (/ d D) (/ d D)) (/ c0 (* w h))))))) (cbrt (fma (/ c0 (* w 2)) (sqrt (fma (* (* (/ d D) (/ d D)) (/ c0 (* w h))) (* (* (/ d D) (/ d D)) (/ c0 (* w h))) (* M (- M)))) (* (/ c0 (* w 2)) (* (* (/ d D) (/ d D)) (/ c0 (* w h))))))) < 9.221866769331852e+291
Initial program 47.5
\[\frac{c0}{2 \cdot w} \cdot \left(\frac{c0 \cdot \left(d \cdot d\right)}{\left(w \cdot h\right) \cdot \left(D \cdot D\right)} + \sqrt{\frac{c0 \cdot \left(d \cdot d\right)}{\left(w \cdot h\right) \cdot \left(D \cdot D\right)} \cdot \frac{c0 \cdot \left(d \cdot d\right)}{\left(w \cdot h\right) \cdot \left(D \cdot D\right)} - M \cdot M}\right)\]
Initial simplification35.0
\[\leadsto (\left(\frac{c0}{w \cdot 2}\right) \cdot \left(\sqrt{(\left(\left(\frac{d}{D} \cdot \frac{d}{D}\right) \cdot \frac{c0}{w \cdot h}\right) \cdot \left(\left(\frac{d}{D} \cdot \frac{d}{D}\right) \cdot \frac{c0}{w \cdot h}\right) + \left(M \cdot \left(-M\right)\right))_*}\right) + \left(\frac{c0}{w \cdot 2} \cdot \left(\left(\frac{d}{D} \cdot \frac{d}{D}\right) \cdot \frac{c0}{w \cdot h}\right)\right))_*\]
- Using strategy
rm Applied fma-udef25.9
\[\leadsto \color{blue}{\frac{c0}{w \cdot 2} \cdot \sqrt{(\left(\left(\frac{d}{D} \cdot \frac{d}{D}\right) \cdot \frac{c0}{w \cdot h}\right) \cdot \left(\left(\frac{d}{D} \cdot \frac{d}{D}\right) \cdot \frac{c0}{w \cdot h}\right) + \left(M \cdot \left(-M\right)\right))_*} + \frac{c0}{w \cdot 2} \cdot \left(\left(\frac{d}{D} \cdot \frac{d}{D}\right) \cdot \frac{c0}{w \cdot h}\right)}\]
if 9.221866769331852e+291 < (* (* (cbrt (fma (/ c0 (* w 2)) (sqrt (fma (* (* (/ d D) (/ d D)) (/ c0 (* w h))) (* (* (/ d D) (/ d D)) (/ c0 (* w h))) (* M (- M)))) (* (/ c0 (* w 2)) (* (* (/ d D) (/ d D)) (/ c0 (* w h)))))) (cbrt (fma (/ c0 (* w 2)) (sqrt (fma (* (* (/ d D) (/ d D)) (/ c0 (* w h))) (* (* (/ d D) (/ d D)) (/ c0 (* w h))) (* M (- M)))) (* (/ c0 (* w 2)) (* (* (/ d D) (/ d D)) (/ c0 (* w h))))))) (cbrt (fma (/ c0 (* w 2)) (sqrt (fma (* (* (/ d D) (/ d D)) (/ c0 (* w h))) (* (* (/ d D) (/ d D)) (/ c0 (* w h))) (* M (- M)))) (* (/ c0 (* w 2)) (* (* (/ d D) (/ d D)) (/ c0 (* w h)))))))
Initial program 61.8
\[\frac{c0}{2 \cdot w} \cdot \left(\frac{c0 \cdot \left(d \cdot d\right)}{\left(w \cdot h\right) \cdot \left(D \cdot D\right)} + \sqrt{\frac{c0 \cdot \left(d \cdot d\right)}{\left(w \cdot h\right) \cdot \left(D \cdot D\right)} \cdot \frac{c0 \cdot \left(d \cdot d\right)}{\left(w \cdot h\right) \cdot \left(D \cdot D\right)} - M \cdot M}\right)\]
Initial simplification62.6
\[\leadsto (\left(\frac{c0}{w \cdot 2}\right) \cdot \left(\sqrt{(\left(\left(\frac{d}{D} \cdot \frac{d}{D}\right) \cdot \frac{c0}{w \cdot h}\right) \cdot \left(\left(\frac{d}{D} \cdot \frac{d}{D}\right) \cdot \frac{c0}{w \cdot h}\right) + \left(M \cdot \left(-M\right)\right))_*}\right) + \left(\frac{c0}{w \cdot 2} \cdot \left(\left(\frac{d}{D} \cdot \frac{d}{D}\right) \cdot \frac{c0}{w \cdot h}\right)\right))_*\]
Taylor expanded around inf 28.1
\[\leadsto \color{blue}{0}\]
- Recombined 2 regimes into one program.
Final simplification27.5
\[\leadsto \begin{array}{l}
\mathbf{if}\;\sqrt[3]{(\left(\frac{c0}{2 \cdot w}\right) \cdot \left(\sqrt{(\left(\frac{c0}{w \cdot h} \cdot \left(\frac{d}{D} \cdot \frac{d}{D}\right)\right) \cdot \left(\frac{c0}{w \cdot h} \cdot \left(\frac{d}{D} \cdot \frac{d}{D}\right)\right) + \left(\left(-M\right) \cdot M\right))_*}\right) + \left(\frac{c0}{2 \cdot w} \cdot \left(\frac{c0}{w \cdot h} \cdot \left(\frac{d}{D} \cdot \frac{d}{D}\right)\right)\right))_*} \cdot \left(\sqrt[3]{(\left(\frac{c0}{2 \cdot w}\right) \cdot \left(\sqrt{(\left(\frac{c0}{w \cdot h} \cdot \left(\frac{d}{D} \cdot \frac{d}{D}\right)\right) \cdot \left(\frac{c0}{w \cdot h} \cdot \left(\frac{d}{D} \cdot \frac{d}{D}\right)\right) + \left(\left(-M\right) \cdot M\right))_*}\right) + \left(\frac{c0}{2 \cdot w} \cdot \left(\frac{c0}{w \cdot h} \cdot \left(\frac{d}{D} \cdot \frac{d}{D}\right)\right)\right))_*} \cdot \sqrt[3]{(\left(\frac{c0}{2 \cdot w}\right) \cdot \left(\sqrt{(\left(\frac{c0}{w \cdot h} \cdot \left(\frac{d}{D} \cdot \frac{d}{D}\right)\right) \cdot \left(\frac{c0}{w \cdot h} \cdot \left(\frac{d}{D} \cdot \frac{d}{D}\right)\right) + \left(\left(-M\right) \cdot M\right))_*}\right) + \left(\frac{c0}{2 \cdot w} \cdot \left(\frac{c0}{w \cdot h} \cdot \left(\frac{d}{D} \cdot \frac{d}{D}\right)\right)\right))_*}\right) \le 9.221866769331852 \cdot 10^{+291}:\\
\;\;\;\;\frac{c0}{2 \cdot w} \cdot \left(\frac{c0}{w \cdot h} \cdot \left(\frac{d}{D} \cdot \frac{d}{D}\right)\right) + \frac{c0}{2 \cdot w} \cdot \sqrt{(\left(\frac{c0}{w \cdot h} \cdot \left(\frac{d}{D} \cdot \frac{d}{D}\right)\right) \cdot \left(\frac{c0}{w \cdot h} \cdot \left(\frac{d}{D} \cdot \frac{d}{D}\right)\right) + \left(\left(-M\right) \cdot M\right))_*}\\
\mathbf{else}:\\
\;\;\;\;0\\
\end{array}\]