- Split input into 2 regimes
if b < -0.064239501953125
Initial program 4.1
\[\frac{\left(\left(-b\right) - \left(\sqrt{\left(\left(b \cdot b\right) - \left(\left(real->posit(4)\right) \cdot \left(a \cdot c\right)\right)\right)}\right)\right)}{\left(\left(real->posit(2)\right) \cdot a\right)}\]
- Using strategy
rm Applied p16-flip--3.6
\[\leadsto \frac{\color{blue}{\left(\frac{\left(\left(\left(-b\right) \cdot \left(-b\right)\right) - \left(\left(\sqrt{\left(\left(b \cdot b\right) - \left(\left(real->posit(4)\right) \cdot \left(a \cdot c\right)\right)\right)}\right) \cdot \left(\sqrt{\left(\left(b \cdot b\right) - \left(\left(real->posit(4)\right) \cdot \left(a \cdot c\right)\right)\right)}\right)\right)\right)}{\left(\frac{\left(-b\right)}{\left(\sqrt{\left(\left(b \cdot b\right) - \left(\left(real->posit(4)\right) \cdot \left(a \cdot c\right)\right)\right)}\right)}\right)}\right)}}{\left(\left(real->posit(2)\right) \cdot a\right)}\]
Applied associate-/l/3.7
\[\leadsto \color{blue}{\frac{\left(\left(\left(-b\right) \cdot \left(-b\right)\right) - \left(\left(\sqrt{\left(\left(b \cdot b\right) - \left(\left(real->posit(4)\right) \cdot \left(a \cdot c\right)\right)\right)}\right) \cdot \left(\sqrt{\left(\left(b \cdot b\right) - \left(\left(real->posit(4)\right) \cdot \left(a \cdot c\right)\right)\right)}\right)\right)\right)}{\left(\left(\left(real->posit(2)\right) \cdot a\right) \cdot \left(\frac{\left(-b\right)}{\left(\sqrt{\left(\left(b \cdot b\right) - \left(\left(real->posit(4)\right) \cdot \left(a \cdot c\right)\right)\right)}\right)}\right)\right)}}\]
Simplified1.1
\[\leadsto \frac{\color{blue}{\left(\frac{\left(\left(\frac{\left(-b\right)}{b}\right) \cdot \left(\frac{\left(-b\right)}{\left(-b\right)}\right)\right)}{\left(\left(real->posit(4)\right) \cdot \left(a \cdot c\right)\right)}\right)}}{\left(\left(\left(real->posit(2)\right) \cdot a\right) \cdot \left(\frac{\left(-b\right)}{\left(\sqrt{\left(\left(b \cdot b\right) - \left(\left(real->posit(4)\right) \cdot \left(a \cdot c\right)\right)\right)}\right)}\right)\right)}\]
- Using strategy
rm Applied associate-/r*1.0
\[\leadsto \color{blue}{\frac{\left(\frac{\left(\frac{\left(\left(\frac{\left(-b\right)}{b}\right) \cdot \left(\frac{\left(-b\right)}{\left(-b\right)}\right)\right)}{\left(\left(real->posit(4)\right) \cdot \left(a \cdot c\right)\right)}\right)}{\left(\left(real->posit(2)\right) \cdot a\right)}\right)}{\left(\frac{\left(-b\right)}{\left(\sqrt{\left(\left(b \cdot b\right) - \left(\left(real->posit(4)\right) \cdot \left(a \cdot c\right)\right)\right)}\right)}\right)}}\]
if -0.064239501953125 < b
Initial program 0.7
\[\frac{\left(\left(-b\right) - \left(\sqrt{\left(\left(b \cdot b\right) - \left(\left(real->posit(4)\right) \cdot \left(a \cdot c\right)\right)\right)}\right)\right)}{\left(\left(real->posit(2)\right) \cdot a\right)}\]
- Using strategy
rm Applied associate-/r*0.7
\[\leadsto \color{blue}{\frac{\left(\frac{\left(\left(-b\right) - \left(\sqrt{\left(\left(b \cdot b\right) - \left(\left(real->posit(4)\right) \cdot \left(a \cdot c\right)\right)\right)}\right)\right)}{\left(real->posit(2)\right)}\right)}{a}}\]
- Recombined 2 regimes into one program.
Final simplification0.8
\[\leadsto \begin{array}{l}
\mathbf{if}\;b \le -0.064239501953125:\\
\;\;\;\;\frac{\frac{\left(\left(-b\right) + b\right) \cdot \left(\left(-b\right) + \left(-b\right)\right) + 4 \cdot \left(a \cdot c\right)}{2 \cdot a}}{\left(-b\right) + \sqrt{b \cdot b - 4 \cdot \left(a \cdot c\right)}}\\
\mathbf{else}:\\
\;\;\;\;\frac{\frac{\left(-b\right) - \sqrt{b \cdot b - 4 \cdot \left(a \cdot c\right)}}{2}}{a}\\
\end{array}\]