\[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|}\]
Test:
Jmat.Real.erf
Bits:
128 bits
Bits error versus x
Time: 29.2 s
Input Error: 12.1
Output Error: 10.5
Log: ⚲
Profile: 🕒
\(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 \cdot \left({\left({-1.453152027}^2\right)}^{3} - {\left({\left(\frac{1}{1 + 0.3275911 \cdot \left|x\right|} \cdot 1.061405429\right)}^2\right)}^{3}\right)}{\left(\left(1 + \left|x\right| \cdot 0.3275911\right) \cdot \left(-1.453152027 - \frac{1.061405429}{1 + \left|x\right| \cdot 0.3275911}\right)\right) \cdot \left({\left(\frac{1.061405429}{1 + \left|x\right| \cdot 0.3275911}\right)}^2 \cdot \left({-1.453152027}^2 + {\left(\frac{1.061405429}{1 + \left|x\right| \cdot 0.3275911}\right)}^2\right) + {\left({-1.453152027}^2\right)}^2\right)}\right)\right)\right)\right) \cdot e^{-\left|x\right| \cdot \left|x\right|}\)
  1. Started with
    \[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|}\]
    12.1
  2. Using strategy rm
    12.1
  3. Applied flip-+ to get
    \[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 \color{red}{\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|} \leadsto 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 \color{blue}{\frac{{-1.453152027}^2 - {\left(\frac{1}{1 + 0.3275911 \cdot \left|x\right|} \cdot 1.061405429\right)}^2}{-1.453152027 - \frac{1}{1 + 0.3275911 \cdot \left|x\right|} \cdot 1.061405429}}\right)\right)\right)\right) \cdot e^{-\left|x\right| \cdot \left|x\right|}\]
    10.8
  4. Applied frac-times to get
    \[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 + \color{red}{\frac{1}{1 + 0.3275911 \cdot \left|x\right|} \cdot \frac{{-1.453152027}^2 - {\left(\frac{1}{1 + 0.3275911 \cdot \left|x\right|} \cdot 1.061405429\right)}^2}{-1.453152027 - \frac{1}{1 + 0.3275911 \cdot \left|x\right|} \cdot 1.061405429}}\right)\right)\right)\right) \cdot e^{-\left|x\right| \cdot \left|x\right|} \leadsto 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 + \color{blue}{\frac{1 \cdot \left({-1.453152027}^2 - {\left(\frac{1}{1 + 0.3275911 \cdot \left|x\right|} \cdot 1.061405429\right)}^2\right)}{\left(1 + 0.3275911 \cdot \left|x\right|\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|}\]
    10.8
  5. Applied simplify to get
    \[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 \cdot \left({-1.453152027}^2 - {\left(\frac{1}{1 + 0.3275911 \cdot \left|x\right|} \cdot 1.061405429\right)}^2\right)}{\color{red}{\left(1 + 0.3275911 \cdot \left|x\right|\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|} \leadsto 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 \cdot \left({-1.453152027}^2 - {\left(\frac{1}{1 + 0.3275911 \cdot \left|x\right|} \cdot 1.061405429\right)}^2\right)}{\color{blue}{\left(\left|x\right| \cdot 0.3275911 + 1\right) \cdot \left(-1.453152027 - \frac{1.061405429}{\left|x\right| \cdot 0.3275911 + 1}\right)}}\right)\right)\right)\right) \cdot e^{-\left|x\right| \cdot \left|x\right|}\]
    10.8
  6. Using strategy rm
    10.8
  7. Applied flip3-- to get
    \[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 \cdot \color{red}{\left({-1.453152027}^2 - {\left(\frac{1}{1 + 0.3275911 \cdot \left|x\right|} \cdot 1.061405429\right)}^2\right)}}{\left(\left|x\right| \cdot 0.3275911 + 1\right) \cdot \left(-1.453152027 - \frac{1.061405429}{\left|x\right| \cdot 0.3275911 + 1}\right)}\right)\right)\right)\right) \cdot e^{-\left|x\right| \cdot \left|x\right|} \leadsto 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 \cdot \color{blue}{\frac{{\left({-1.453152027}^2\right)}^{3} - {\left({\left(\frac{1}{1 + 0.3275911 \cdot \left|x\right|} \cdot 1.061405429\right)}^2\right)}^{3}}{{\left({-1.453152027}^2\right)}^2 + \left({\left({\left(\frac{1}{1 + 0.3275911 \cdot \left|x\right|} \cdot 1.061405429\right)}^2\right)}^2 + {-1.453152027}^2 \cdot {\left(\frac{1}{1 + 0.3275911 \cdot \left|x\right|} \cdot 1.061405429\right)}^2\right)}}}{\left(\left|x\right| \cdot 0.3275911 + 1\right) \cdot \left(-1.453152027 - \frac{1.061405429}{\left|x\right| \cdot 0.3275911 + 1}\right)}\right)\right)\right)\right) \cdot e^{-\left|x\right| \cdot \left|x\right|}\]
    10.5
  8. Applied associate-*r/ to get
    \[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{\color{red}{1 \cdot \frac{{\left({-1.453152027}^2\right)}^{3} - {\left({\left(\frac{1}{1 + 0.3275911 \cdot \left|x\right|} \cdot 1.061405429\right)}^2\right)}^{3}}{{\left({-1.453152027}^2\right)}^2 + \left({\left({\left(\frac{1}{1 + 0.3275911 \cdot \left|x\right|} \cdot 1.061405429\right)}^2\right)}^2 + {-1.453152027}^2 \cdot {\left(\frac{1}{1 + 0.3275911 \cdot \left|x\right|} \cdot 1.061405429\right)}^2\right)}}}{\left(\left|x\right| \cdot 0.3275911 + 1\right) \cdot \left(-1.453152027 - \frac{1.061405429}{\left|x\right| \cdot 0.3275911 + 1}\right)}\right)\right)\right)\right) \cdot e^{-\left|x\right| \cdot \left|x\right|} \leadsto 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{\color{blue}{\frac{1 \cdot \left({\left({-1.453152027}^2\right)}^{3} - {\left({\left(\frac{1}{1 + 0.3275911 \cdot \left|x\right|} \cdot 1.061405429\right)}^2\right)}^{3}\right)}{{\left({-1.453152027}^2\right)}^2 + \left({\left({\left(\frac{1}{1 + 0.3275911 \cdot \left|x\right|} \cdot 1.061405429\right)}^2\right)}^2 + {-1.453152027}^2 \cdot {\left(\frac{1}{1 + 0.3275911 \cdot \left|x\right|} \cdot 1.061405429\right)}^2\right)}}}{\left(\left|x\right| \cdot 0.3275911 + 1\right) \cdot \left(-1.453152027 - \frac{1.061405429}{\left|x\right| \cdot 0.3275911 + 1}\right)}\right)\right)\right)\right) \cdot e^{-\left|x\right| \cdot \left|x\right|}\]
    10.5
  9. Applied associate-/l/ to get
    \[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 + \color{red}{\frac{\frac{1 \cdot \left({\left({-1.453152027}^2\right)}^{3} - {\left({\left(\frac{1}{1 + 0.3275911 \cdot \left|x\right|} \cdot 1.061405429\right)}^2\right)}^{3}\right)}{{\left({-1.453152027}^2\right)}^2 + \left({\left({\left(\frac{1}{1 + 0.3275911 \cdot \left|x\right|} \cdot 1.061405429\right)}^2\right)}^2 + {-1.453152027}^2 \cdot {\left(\frac{1}{1 + 0.3275911 \cdot \left|x\right|} \cdot 1.061405429\right)}^2\right)}}{\left(\left|x\right| \cdot 0.3275911 + 1\right) \cdot \left(-1.453152027 - \frac{1.061405429}{\left|x\right| \cdot 0.3275911 + 1}\right)}}\right)\right)\right)\right) \cdot e^{-\left|x\right| \cdot \left|x\right|} \leadsto 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 + \color{blue}{\frac{1 \cdot \left({\left({-1.453152027}^2\right)}^{3} - {\left({\left(\frac{1}{1 + 0.3275911 \cdot \left|x\right|} \cdot 1.061405429\right)}^2\right)}^{3}\right)}{\left(\left(\left|x\right| \cdot 0.3275911 + 1\right) \cdot \left(-1.453152027 - \frac{1.061405429}{\left|x\right| \cdot 0.3275911 + 1}\right)\right) \cdot \left({\left({-1.453152027}^2\right)}^2 + \left({\left({\left(\frac{1}{1 + 0.3275911 \cdot \left|x\right|} \cdot 1.061405429\right)}^2\right)}^2 + {-1.453152027}^2 \cdot {\left(\frac{1}{1 + 0.3275911 \cdot \left|x\right|} \cdot 1.061405429\right)}^2\right)\right)}}\right)\right)\right)\right) \cdot e^{-\left|x\right| \cdot \left|x\right|}\]
    10.5
  10. Applied simplify to get
    \[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 \cdot \left({\left({-1.453152027}^2\right)}^{3} - {\left({\left(\frac{1}{1 + 0.3275911 \cdot \left|x\right|} \cdot 1.061405429\right)}^2\right)}^{3}\right)}{\color{red}{\left(\left(\left|x\right| \cdot 0.3275911 + 1\right) \cdot \left(-1.453152027 - \frac{1.061405429}{\left|x\right| \cdot 0.3275911 + 1}\right)\right) \cdot \left({\left({-1.453152027}^2\right)}^2 + \left({\left({\left(\frac{1}{1 + 0.3275911 \cdot \left|x\right|} \cdot 1.061405429\right)}^2\right)}^2 + {-1.453152027}^2 \cdot {\left(\frac{1}{1 + 0.3275911 \cdot \left|x\right|} \cdot 1.061405429\right)}^2\right)\right)}}\right)\right)\right)\right) \cdot e^{-\left|x\right| \cdot \left|x\right|} \leadsto 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 \cdot \left({\left({-1.453152027}^2\right)}^{3} - {\left({\left(\frac{1}{1 + 0.3275911 \cdot \left|x\right|} \cdot 1.061405429\right)}^2\right)}^{3}\right)}{\color{blue}{\left(\left(1 + \left|x\right| \cdot 0.3275911\right) \cdot \left(-1.453152027 - \frac{1.061405429}{1 + \left|x\right| \cdot 0.3275911}\right)\right) \cdot \left({\left(\frac{1.061405429}{1 + \left|x\right| \cdot 0.3275911}\right)}^2 \cdot \left({-1.453152027}^2 + {\left(\frac{1.061405429}{1 + \left|x\right| \cdot 0.3275911}\right)}^2\right) + {\left({-1.453152027}^2\right)}^2\right)}}\right)\right)\right)\right) \cdot e^{-\left|x\right| \cdot \left|x\right|}\]
    10.5
  11. Removed slow pow expressions

Original test:


(lambda ((x default))
  #:name "Jmat.Real.erf"
  (- 1 (* (* (/ 1 (+ 1 (* 0.3275911 (fabs x)))) (+ 0.254829592 (* (/ 1 (+ 1 (* 0.3275911 (fabs x)))) (+ -0.284496736 (* (/ 1 (+ 1 (* 0.3275911 (fabs x)))) (+ 1.421413741 (* (/ 1 (+ 1 (* 0.3275911 (fabs x)))) (+ -1.453152027 (* (/ 1 (+ 1 (* 0.3275911 (fabs x)))) 1.061405429))))))))) (exp (- (* (fabs x) (fabs x)))))))