- Split input into 3 regimes
if b < -3.0657800977732126e-95
Initial program 51.4
\[\frac{\left(-b\right) - \sqrt{b \cdot b - 4 \cdot \left(a \cdot c\right)}}{2 \cdot a}\]
Simplified51.4
\[\leadsto \color{blue}{\frac{\frac{\left(-b\right) - \sqrt{(\left(a \cdot c\right) \cdot -4 + \left(b \cdot b\right))_*}}{2}}{a}}\]
Taylor expanded around -inf 10.2
\[\leadsto \color{blue}{-1 \cdot \frac{c}{b}}\]
Simplified10.2
\[\leadsto \color{blue}{-\frac{c}{b}}\]
if -3.0657800977732126e-95 < b < 2.3666458014061715e+58
Initial program 12.7
\[\frac{\left(-b\right) - \sqrt{b \cdot b - 4 \cdot \left(a \cdot c\right)}}{2 \cdot a}\]
Simplified12.7
\[\leadsto \color{blue}{\frac{\frac{\left(-b\right) - \sqrt{(\left(a \cdot c\right) \cdot -4 + \left(b \cdot b\right))_*}}{2}}{a}}\]
Taylor expanded around -inf 12.7
\[\leadsto \frac{\frac{\left(-b\right) - \sqrt{\color{blue}{{b}^{2} - 4 \cdot \left(a \cdot c\right)}}}{2}}{a}\]
Simplified12.7
\[\leadsto \frac{\frac{\left(-b\right) - \sqrt{\color{blue}{(\left(a \cdot c\right) \cdot -4 + \left(b \cdot b\right))_*}}}{2}}{a}\]
if 2.3666458014061715e+58 < b
Initial program 38.2
\[\frac{\left(-b\right) - \sqrt{b \cdot b - 4 \cdot \left(a \cdot c\right)}}{2 \cdot a}\]
Simplified38.2
\[\leadsto \color{blue}{\frac{\frac{\left(-b\right) - \sqrt{(\left(a \cdot c\right) \cdot -4 + \left(b \cdot b\right))_*}}{2}}{a}}\]
Taylor expanded around -inf 38.2
\[\leadsto \frac{\frac{\left(-b\right) - \sqrt{\color{blue}{{b}^{2} - 4 \cdot \left(a \cdot c\right)}}}{2}}{a}\]
Simplified38.2
\[\leadsto \frac{\frac{\left(-b\right) - \sqrt{\color{blue}{(\left(a \cdot c\right) \cdot -4 + \left(b \cdot b\right))_*}}}{2}}{a}\]
- Using strategy
rm Applied *-un-lft-identity38.2
\[\leadsto \frac{\frac{\left(-b\right) - \sqrt{(\left(a \cdot c\right) \cdot -4 + \left(b \cdot b\right))_*}}{2}}{\color{blue}{1 \cdot a}}\]
Applied div-inv38.2
\[\leadsto \frac{\color{blue}{\left(\left(-b\right) - \sqrt{(\left(a \cdot c\right) \cdot -4 + \left(b \cdot b\right))_*}\right) \cdot \frac{1}{2}}}{1 \cdot a}\]
Applied times-frac38.3
\[\leadsto \color{blue}{\frac{\left(-b\right) - \sqrt{(\left(a \cdot c\right) \cdot -4 + \left(b \cdot b\right))_*}}{1} \cdot \frac{\frac{1}{2}}{a}}\]
Simplified38.2
\[\leadsto \color{blue}{\left(-\left(b + \sqrt{(a \cdot \left(c \cdot -4\right) + \left(b \cdot b\right))_*}\right)\right)} \cdot \frac{\frac{1}{2}}{a}\]
Simplified38.2
\[\leadsto \left(-\left(b + \sqrt{(a \cdot \left(c \cdot -4\right) + \left(b \cdot b\right))_*}\right)\right) \cdot \color{blue}{\frac{\frac{1}{2}}{a}}\]
Taylor expanded around inf 5.6
\[\leadsto \color{blue}{\frac{c}{b} - \frac{b}{a}}\]
- Recombined 3 regimes into one program.
Final simplification10.3
\[\leadsto \begin{array}{l}
\mathbf{if}\;b \le -3.0657800977732126 \cdot 10^{-95}:\\
\;\;\;\;-\frac{c}{b}\\
\mathbf{elif}\;b \le 2.3666458014061715 \cdot 10^{+58}:\\
\;\;\;\;\frac{\frac{\left(-b\right) - \sqrt{(\left(c \cdot a\right) \cdot -4 + \left(b \cdot b\right))_*}}{2}}{a}\\
\mathbf{else}:\\
\;\;\;\;\frac{c}{b} - \frac{b}{a}\\
\end{array}\]