\[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: 22.2 s
Input Error: 13.8
Output Error: 13.8
Log:
Profile: 🕒
\(1 - \left(\frac{1}{1 + 0.3275911 \cdot \left|x\right|} \cdot \left(0.254829592 + \sqrt[3]{{\left(\left(-0.284496736 + \frac{1.421413741}{1 + \left|x\right| \cdot 0.3275911}\right) + \frac{\frac{1.061405429}{1 + \left|x\right| \cdot 0.3275911} + -1.453152027}{{\left(1 + \left|x\right| \cdot 0.3275911\right)}^2}\right)}^3 \cdot {\left(\frac{1}{\left|x\right| \cdot 0.3275911 + 1}\right)}^3}\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|}\]
    13.8
  2. Using strategy rm
    13.8
  3. Applied add-cbrt-cube 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 \color{red}{\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|} \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 \color{blue}{\sqrt[3]{{\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)}^3}}\right)\right) \cdot e^{-\left|x\right| \cdot \left|x\right|}\]
    13.8
  4. Applied add-cbrt-cube to get
    \[1 - \left(\frac{1}{1 + 0.3275911 \cdot \left|x\right|} \cdot \left(0.254829592 + \color{red}{\frac{1}{1 + 0.3275911 \cdot \left|x\right|}} \cdot \sqrt[3]{{\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)}^3}\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 + \color{blue}{\sqrt[3]{{\left(\frac{1}{1 + 0.3275911 \cdot \left|x\right|}\right)}^3}} \cdot \sqrt[3]{{\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)}^3}\right)\right) \cdot e^{-\left|x\right| \cdot \left|x\right|}\]
    13.8
  5. Applied cbrt-unprod to get
    \[1 - \left(\frac{1}{1 + 0.3275911 \cdot \left|x\right|} \cdot \left(0.254829592 + \color{red}{\sqrt[3]{{\left(\frac{1}{1 + 0.3275911 \cdot \left|x\right|}\right)}^3} \cdot \sqrt[3]{{\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)}^3}}\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 + \color{blue}{\sqrt[3]{{\left(\frac{1}{1 + 0.3275911 \cdot \left|x\right|}\right)}^3 \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)}^3}}\right)\right) \cdot e^{-\left|x\right| \cdot \left|x\right|}\]
    13.8
  6. Applied simplify to get
    \[1 - \left(\frac{1}{1 + 0.3275911 \cdot \left|x\right|} \cdot \left(0.254829592 + \sqrt[3]{\color{red}{{\left(\frac{1}{1 + 0.3275911 \cdot \left|x\right|}\right)}^3 \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)}^3}}\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 + \sqrt[3]{\color{blue}{{\left(\left(\frac{1.421413741}{\left|x\right| \cdot 0.3275911 + 1} + -0.284496736\right) + {\left(\frac{1}{\left|x\right| \cdot 0.3275911 + 1}\right)}^2 \cdot \left(\frac{1.061405429}{\left|x\right| \cdot 0.3275911 + 1} + -1.453152027\right)\right)}^3 \cdot {\left(\frac{1}{\left|x\right| \cdot 0.3275911 + 1}\right)}^3}}\right)\right) \cdot e^{-\left|x\right| \cdot \left|x\right|}\]
    13.8
  7. Applied simplify to get
    \[1 - \left(\frac{1}{1 + 0.3275911 \cdot \left|x\right|} \cdot \left(0.254829592 + \sqrt[3]{\color{red}{{\left(\left(\frac{1.421413741}{\left|x\right| \cdot 0.3275911 + 1} + -0.284496736\right) + {\left(\frac{1}{\left|x\right| \cdot 0.3275911 + 1}\right)}^2 \cdot \left(\frac{1.061405429}{\left|x\right| \cdot 0.3275911 + 1} + -1.453152027\right)\right)}^3} \cdot {\left(\frac{1}{\left|x\right| \cdot 0.3275911 + 1}\right)}^3}\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 + \sqrt[3]{\color{blue}{{\left(\left(-0.284496736 + \frac{1.421413741}{1 + \left|x\right| \cdot 0.3275911}\right) + \frac{\frac{1.061405429}{1 + \left|x\right| \cdot 0.3275911} + -1.453152027}{{\left(1 + \left|x\right| \cdot 0.3275911\right)}^2}\right)}^3} \cdot {\left(\frac{1}{\left|x\right| \cdot 0.3275911 + 1}\right)}^3}\right)\right) \cdot e^{-\left|x\right| \cdot \left|x\right|}\]
    13.8

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)))))))