Initial program 13.8
\[1 - \left(\frac{1}{1 + 0.3275911 \cdot \left|x\right|} \cdot \left(0.254829592 + \frac{1}{1 + 0.3275911 \cdot \left|x\right|} \cdot \left(-0.284496736 + \frac{1}{1 + 0.3275911 \cdot \left|x\right|} \cdot \left(1.421413741 + \frac{1}{1 + 0.3275911 \cdot \left|x\right|} \cdot \left(-1.453152027 + \frac{1}{1 + 0.3275911 \cdot \left|x\right|} \cdot 1.061405429\right)\right)\right)\right)\right) \cdot e^{-\left|x\right| \cdot \left|x\right|}\]
Applied simplify13.8
\[\leadsto \color{blue}{(\left(\frac{-1}{e^{\left|x\right| \cdot \left|x\right|}}\right) \cdot \left((\left(\frac{1}{(0.3275911 \cdot \left(\left|x\right|\right) + 1)_*} \cdot \frac{1}{(0.3275911 \cdot \left(\left|x\right|\right) + 1)_*}\right) \cdot \left((\left(\frac{1}{(0.3275911 \cdot \left(\left|x\right|\right) + 1)_*}\right) \cdot \left((\left(\frac{1}{(0.3275911 \cdot \left(\left|x\right|\right) + 1)_*}\right) \cdot \left(\frac{1.061405429}{(0.3275911 \cdot \left(\left|x\right|\right) + 1)_*} + -1.453152027\right) + 1.421413741)_*\right) + -0.284496736)_*\right) + \left(\frac{0.254829592}{(0.3275911 \cdot \left(\left|x\right|\right) + 1)_*}\right))_*\right) + 1)_*}\]
- Using strategy
rm Applied add-log-exp13.8
\[\leadsto \color{blue}{\log \left(e^{(\left(\frac{-1}{e^{\left|x\right| \cdot \left|x\right|}}\right) \cdot \left((\left(\frac{1}{(0.3275911 \cdot \left(\left|x\right|\right) + 1)_*} \cdot \frac{1}{(0.3275911 \cdot \left(\left|x\right|\right) + 1)_*}\right) \cdot \left((\left(\frac{1}{(0.3275911 \cdot \left(\left|x\right|\right) + 1)_*}\right) \cdot \left((\left(\frac{1}{(0.3275911 \cdot \left(\left|x\right|\right) + 1)_*}\right) \cdot \left(\frac{1.061405429}{(0.3275911 \cdot \left(\left|x\right|\right) + 1)_*} + -1.453152027\right) + 1.421413741)_*\right) + -0.284496736)_*\right) + \left(\frac{0.254829592}{(0.3275911 \cdot \left(\left|x\right|\right) + 1)_*}\right))_*\right) + 1)_*}\right)}\]
- Using strategy
rm Applied add-exp-log13.8
\[\leadsto \color{blue}{e^{\log \left(\log \left(e^{(\left(\frac{-1}{e^{\left|x\right| \cdot \left|x\right|}}\right) \cdot \left((\left(\frac{1}{(0.3275911 \cdot \left(\left|x\right|\right) + 1)_*} \cdot \frac{1}{(0.3275911 \cdot \left(\left|x\right|\right) + 1)_*}\right) \cdot \left((\left(\frac{1}{(0.3275911 \cdot \left(\left|x\right|\right) + 1)_*}\right) \cdot \left((\left(\frac{1}{(0.3275911 \cdot \left(\left|x\right|\right) + 1)_*}\right) \cdot \left(\frac{1.061405429}{(0.3275911 \cdot \left(\left|x\right|\right) + 1)_*} + -1.453152027\right) + 1.421413741)_*\right) + -0.284496736)_*\right) + \left(\frac{0.254829592}{(0.3275911 \cdot \left(\left|x\right|\right) + 1)_*}\right))_*\right) + 1)_*}\right)\right)}}\]
- Using strategy
rm Applied log1p-expm1-u13.8
\[\leadsto e^{\log \left(\log \left(e^{(\left(\frac{-1}{e^{\left|x\right| \cdot \left|x\right|}}\right) \cdot \left((\left(\frac{1}{(0.3275911 \cdot \left(\left|x\right|\right) + 1)_*} \cdot \frac{1}{(0.3275911 \cdot \left(\left|x\right|\right) + 1)_*}\right) \cdot \color{blue}{\left(\log_* (1 + (e^{(\left(\frac{1}{(0.3275911 \cdot \left(\left|x\right|\right) + 1)_*}\right) \cdot \left((\left(\frac{1}{(0.3275911 \cdot \left(\left|x\right|\right) + 1)_*}\right) \cdot \left(\frac{1.061405429}{(0.3275911 \cdot \left(\left|x\right|\right) + 1)_*} + -1.453152027\right) + 1.421413741)_*\right) + -0.284496736)_*} - 1)^*)\right)} + \left(\frac{0.254829592}{(0.3275911 \cdot \left(\left|x\right|\right) + 1)_*}\right))_*\right) + 1)_*}\right)\right)}\]