\[\left(\frac{1}{\sqrt{\pi}} \cdot e^{\left|x\right| \cdot \left|x\right|}\right) \cdot \left(\left(\left(\frac{1}{\left|x\right|} + \frac{1}{2} \cdot \left(\left(\frac{1}{\left|x\right|} \cdot \frac{1}{\left|x\right|}\right) \cdot \frac{1}{\left|x\right|}\right)\right) + \frac{3}{4} \cdot \left(\left(\left(\left(\frac{1}{\left|x\right|} \cdot \frac{1}{\left|x\right|}\right) \cdot \frac{1}{\left|x\right|}\right) \cdot \frac{1}{\left|x\right|}\right) \cdot \frac{1}{\left|x\right|}\right)\right) + \frac{15}{8} \cdot \left(\left(\left(\left(\left(\left(\frac{1}{\left|x\right|} \cdot \frac{1}{\left|x\right|}\right) \cdot \frac{1}{\left|x\right|}\right) \cdot \frac{1}{\left|x\right|}\right) \cdot \frac{1}{\left|x\right|}\right) \cdot \frac{1}{\left|x\right|}\right) \cdot \frac{1}{\left|x\right|}\right)\right)\]
Test:
Jmat.Real.erfi, branch x greater than or equal to 5
Bits:
128 bits
Bits error versus x
Time: 1.4 m
Input Error: 1.5
Output Error: 0.7
Log: ⚲
Profile: 🕒
\(\frac{\left(\frac{1}{\left|x\right|} + \frac{\frac{15}{8}}{{\left(\left|x\right|\right)}^{7}}\right) + \left(\frac{\frac{1}{2}}{{\left(\left|x\right|\right)}^3} + \frac{\frac{1}{{\left(\left|x\right|\right)}^3}}{\left|x\right| \cdot \frac{\left|x\right|}{\frac{3}{4}}}\right)}{\frac{\sqrt{\pi}}{e^{\left|x\right| \cdot \left|x\right|}}}\)
  1. Started with
    \[\left(\frac{1}{\sqrt{\pi}} \cdot e^{\left|x\right| \cdot \left|x\right|}\right) \cdot \left(\left(\left(\frac{1}{\left|x\right|} + \frac{1}{2} \cdot \left(\left(\frac{1}{\left|x\right|} \cdot \frac{1}{\left|x\right|}\right) \cdot \frac{1}{\left|x\right|}\right)\right) + \frac{3}{4} \cdot \left(\left(\left(\left(\frac{1}{\left|x\right|} \cdot \frac{1}{\left|x\right|}\right) \cdot \frac{1}{\left|x\right|}\right) \cdot \frac{1}{\left|x\right|}\right) \cdot \frac{1}{\left|x\right|}\right)\right) + \frac{15}{8} \cdot \left(\left(\left(\left(\left(\left(\frac{1}{\left|x\right|} \cdot \frac{1}{\left|x\right|}\right) \cdot \frac{1}{\left|x\right|}\right) \cdot \frac{1}{\left|x\right|}\right) \cdot \frac{1}{\left|x\right|}\right) \cdot \frac{1}{\left|x\right|}\right) \cdot \frac{1}{\left|x\right|}\right)\right)\]
    1.5
  2. Applied simplify to get
    \[\color{red}{\left(\frac{1}{\sqrt{\pi}} \cdot e^{\left|x\right| \cdot \left|x\right|}\right) \cdot \left(\left(\left(\frac{1}{\left|x\right|} + \frac{1}{2} \cdot \left(\left(\frac{1}{\left|x\right|} \cdot \frac{1}{\left|x\right|}\right) \cdot \frac{1}{\left|x\right|}\right)\right) + \frac{3}{4} \cdot \left(\left(\left(\left(\frac{1}{\left|x\right|} \cdot \frac{1}{\left|x\right|}\right) \cdot \frac{1}{\left|x\right|}\right) \cdot \frac{1}{\left|x\right|}\right) \cdot \frac{1}{\left|x\right|}\right)\right) + \frac{15}{8} \cdot \left(\left(\left(\left(\left(\left(\frac{1}{\left|x\right|} \cdot \frac{1}{\left|x\right|}\right) \cdot \frac{1}{\left|x\right|}\right) \cdot \frac{1}{\left|x\right|}\right) \cdot \frac{1}{\left|x\right|}\right) \cdot \frac{1}{\left|x\right|}\right) \cdot \frac{1}{\left|x\right|}\right)\right)} \leadsto \color{blue}{\frac{\left(\left(\frac{{\left(\frac{1}{\left|x\right|}\right)}^3}{2} + \frac{1}{\left|x\right|}\right) + \left({\left(\frac{1}{\left|x\right|}\right)}^3 \cdot \left(\frac{1}{\left|x\right|} \cdot \frac{3}{4}\right)\right) \cdot \frac{1}{\left|x\right|}\right) + \frac{15}{8} \cdot \frac{{\left({\left(\frac{1}{\left|x\right|}\right)}^3\right)}^2}{\left|x\right|}}{\frac{\sqrt{\pi}}{e^{\left|x\right| \cdot \left|x\right|}}}}\]
    1.4
  3. Applied taylor to get
    \[\frac{\left(\left(\frac{{\left(\frac{1}{\left|x\right|}\right)}^3}{2} + \frac{1}{\left|x\right|}\right) + \left({\left(\frac{1}{\left|x\right|}\right)}^3 \cdot \left(\frac{1}{\left|x\right|} \cdot \frac{3}{4}\right)\right) \cdot \frac{1}{\left|x\right|}\right) + \frac{15}{8} \cdot \frac{{\left({\left(\frac{1}{\left|x\right|}\right)}^3\right)}^2}{\left|x\right|}}{\frac{\sqrt{\pi}}{e^{\left|x\right| \cdot \left|x\right|}}} \leadsto \frac{\left(\left(\frac{{\left(\frac{1}{\left|x\right|}\right)}^3}{2} + \frac{1}{\left|x\right|}\right) + \left({\left(\frac{1}{\left|x\right|}\right)}^3 \cdot \left(\frac{1}{\left|x\right|} \cdot \frac{3}{4}\right)\right) \cdot \frac{1}{\left|x\right|}\right) + \frac{15}{8} \cdot \frac{{\left({\left(\frac{1}{\left|x\right|}\right)}^3\right)}^2}{\left|x\right|}}{\frac{\sqrt{\pi}}{e^{\left|x\right| \cdot \left|x\right|}}}\]
    1.4
  4. Taylor expanded around 0 to get
    \[\frac{\left(\left(\frac{{\left(\frac{1}{\left|x\right|}\right)}^3}{2} + \frac{1}{\left|x\right|}\right) + \left({\left(\frac{1}{\left|x\right|}\right)}^3 \cdot \left(\frac{1}{\left|x\right|} \cdot \frac{3}{4}\right)\right) \cdot \frac{1}{\left|x\right|}\right) + \frac{15}{8} \cdot \frac{{\left({\left(\frac{1}{\left|x\right|}\right)}^3\right)}^2}{\left|x\right|}}{\frac{\color{red}{\sqrt{\pi}}}{e^{\left|x\right| \cdot \left|x\right|}}} \leadsto \frac{\left(\left(\frac{{\left(\frac{1}{\left|x\right|}\right)}^3}{2} + \frac{1}{\left|x\right|}\right) + \left({\left(\frac{1}{\left|x\right|}\right)}^3 \cdot \left(\frac{1}{\left|x\right|} \cdot \frac{3}{4}\right)\right) \cdot \frac{1}{\left|x\right|}\right) + \frac{15}{8} \cdot \frac{{\left({\left(\frac{1}{\left|x\right|}\right)}^3\right)}^2}{\left|x\right|}}{\frac{\color{blue}{\sqrt{\pi}}}{e^{\left|x\right| \cdot \left|x\right|}}}\]
    1.4
  5. Applied simplify to get
    \[\color{red}{\frac{\left(\left(\frac{{\left(\frac{1}{\left|x\right|}\right)}^3}{2} + \frac{1}{\left|x\right|}\right) + \left({\left(\frac{1}{\left|x\right|}\right)}^3 \cdot \left(\frac{1}{\left|x\right|} \cdot \frac{3}{4}\right)\right) \cdot \frac{1}{\left|x\right|}\right) + \frac{15}{8} \cdot \frac{{\left({\left(\frac{1}{\left|x\right|}\right)}^3\right)}^2}{\left|x\right|}}{\frac{\sqrt{\pi}}{e^{\left|x\right| \cdot \left|x\right|}}}} \leadsto \color{blue}{\frac{e^{\left|x\right| \cdot \left|x\right|}}{\sqrt{\pi}} \cdot \left(\left(\frac{\frac{1}{2}}{{\left(\left|x\right|\right)}^3} + \frac{\frac{15}{\frac{8}{1} \cdot \left|x\right|}}{{\left(\left|x\right| \cdot \left|x\right|\right)}^3}\right) + \left(\frac{{\left(\frac{1}{\left|x\right|}\right)}^3}{\frac{\left|x\right|}{\frac{\frac{3}{4}}{\left|x\right|}}} + \frac{1}{\left|x\right|}\right)\right)}\]
    1.0
  6. Using strategy rm
    1.0
  7. Applied cube-mult to get
    \[\frac{e^{\left|x\right| \cdot \left|x\right|}}{\sqrt{\pi}} \cdot \left(\left(\frac{\frac{1}{2}}{{\left(\left|x\right|\right)}^3} + \frac{\frac{15}{\frac{8}{1} \cdot \left|x\right|}}{\color{red}{{\left(\left|x\right| \cdot \left|x\right|\right)}^3}}\right) + \left(\frac{{\left(\frac{1}{\left|x\right|}\right)}^3}{\frac{\left|x\right|}{\frac{\frac{3}{4}}{\left|x\right|}}} + \frac{1}{\left|x\right|}\right)\right) \leadsto \frac{e^{\left|x\right| \cdot \left|x\right|}}{\sqrt{\pi}} \cdot \left(\left(\frac{\frac{1}{2}}{{\left(\left|x\right|\right)}^3} + \frac{\frac{15}{\frac{8}{1} \cdot \left|x\right|}}{\color{blue}{\left(\left|x\right| \cdot \left|x\right|\right) \cdot \left(\left(\left|x\right| \cdot \left|x\right|\right) \cdot \left(\left|x\right| \cdot \left|x\right|\right)\right)}}\right) + \left(\frac{{\left(\frac{1}{\left|x\right|}\right)}^3}{\frac{\left|x\right|}{\frac{\frac{3}{4}}{\left|x\right|}}} + \frac{1}{\left|x\right|}\right)\right)\]
    1.0
  8. Applied *-un-lft-identity to get
    \[\frac{e^{\left|x\right| \cdot \left|x\right|}}{\sqrt{\pi}} \cdot \left(\left(\frac{\frac{1}{2}}{{\left(\left|x\right|\right)}^3} + \frac{\color{red}{\frac{15}{\frac{8}{1} \cdot \left|x\right|}}}{\left(\left|x\right| \cdot \left|x\right|\right) \cdot \left(\left(\left|x\right| \cdot \left|x\right|\right) \cdot \left(\left|x\right| \cdot \left|x\right|\right)\right)}\right) + \left(\frac{{\left(\frac{1}{\left|x\right|}\right)}^3}{\frac{\left|x\right|}{\frac{\frac{3}{4}}{\left|x\right|}}} + \frac{1}{\left|x\right|}\right)\right) \leadsto \frac{e^{\left|x\right| \cdot \left|x\right|}}{\sqrt{\pi}} \cdot \left(\left(\frac{\frac{1}{2}}{{\left(\left|x\right|\right)}^3} + \frac{\color{blue}{1 \cdot \frac{15}{\frac{8}{1} \cdot \left|x\right|}}}{\left(\left|x\right| \cdot \left|x\right|\right) \cdot \left(\left(\left|x\right| \cdot \left|x\right|\right) \cdot \left(\left|x\right| \cdot \left|x\right|\right)\right)}\right) + \left(\frac{{\left(\frac{1}{\left|x\right|}\right)}^3}{\frac{\left|x\right|}{\frac{\frac{3}{4}}{\left|x\right|}}} + \frac{1}{\left|x\right|}\right)\right)\]
    1.0
  9. Applied times-frac to get
    \[\frac{e^{\left|x\right| \cdot \left|x\right|}}{\sqrt{\pi}} \cdot \left(\left(\frac{\frac{1}{2}}{{\left(\left|x\right|\right)}^3} + \color{red}{\frac{1 \cdot \frac{15}{\frac{8}{1} \cdot \left|x\right|}}{\left(\left|x\right| \cdot \left|x\right|\right) \cdot \left(\left(\left|x\right| \cdot \left|x\right|\right) \cdot \left(\left|x\right| \cdot \left|x\right|\right)\right)}}\right) + \left(\frac{{\left(\frac{1}{\left|x\right|}\right)}^3}{\frac{\left|x\right|}{\frac{\frac{3}{4}}{\left|x\right|}}} + \frac{1}{\left|x\right|}\right)\right) \leadsto \frac{e^{\left|x\right| \cdot \left|x\right|}}{\sqrt{\pi}} \cdot \left(\left(\frac{\frac{1}{2}}{{\left(\left|x\right|\right)}^3} + \color{blue}{\frac{1}{\left|x\right| \cdot \left|x\right|} \cdot \frac{\frac{15}{\frac{8}{1} \cdot \left|x\right|}}{\left(\left|x\right| \cdot \left|x\right|\right) \cdot \left(\left|x\right| \cdot \left|x\right|\right)}}\right) + \left(\frac{{\left(\frac{1}{\left|x\right|}\right)}^3}{\frac{\left|x\right|}{\frac{\frac{3}{4}}{\left|x\right|}}} + \frac{1}{\left|x\right|}\right)\right)\]
    1.0
  10. Applied simplify to get
    \[\frac{e^{\left|x\right| \cdot \left|x\right|}}{\sqrt{\pi}} \cdot \left(\left(\frac{\frac{1}{2}}{{\left(\left|x\right|\right)}^3} + \frac{1}{\left|x\right| \cdot \left|x\right|} \cdot \color{red}{\frac{\frac{15}{\frac{8}{1} \cdot \left|x\right|}}{\left(\left|x\right| \cdot \left|x\right|\right) \cdot \left(\left|x\right| \cdot \left|x\right|\right)}}\right) + \left(\frac{{\left(\frac{1}{\left|x\right|}\right)}^3}{\frac{\left|x\right|}{\frac{\frac{3}{4}}{\left|x\right|}}} + \frac{1}{\left|x\right|}\right)\right) \leadsto \frac{e^{\left|x\right| \cdot \left|x\right|}}{\sqrt{\pi}} \cdot \left(\left(\frac{\frac{1}{2}}{{\left(\left|x\right|\right)}^3} + \frac{1}{\left|x\right| \cdot \left|x\right|} \cdot \color{blue}{\frac{\frac{\frac{15}{8}}{\left|x\right|}}{\left(\left|x\right| \cdot \left|x\right|\right) \cdot \left(\left|x\right| \cdot \left|x\right|\right)}}\right) + \left(\frac{{\left(\frac{1}{\left|x\right|}\right)}^3}{\frac{\left|x\right|}{\frac{\frac{3}{4}}{\left|x\right|}}} + \frac{1}{\left|x\right|}\right)\right)\]
    1.0
  11. Applied taylor to get
    \[\frac{e^{\left|x\right| \cdot \left|x\right|}}{\sqrt{\pi}} \cdot \left(\left(\frac{\frac{1}{2}}{{\left(\left|x\right|\right)}^3} + \frac{1}{\left|x\right| \cdot \left|x\right|} \cdot \frac{\frac{\frac{15}{8}}{\left|x\right|}}{\left(\left|x\right| \cdot \left|x\right|\right) \cdot \left(\left|x\right| \cdot \left|x\right|\right)}\right) + \left(\frac{{\left(\frac{1}{\left|x\right|}\right)}^3}{\frac{\left|x\right|}{\frac{\frac{3}{4}}{\left|x\right|}}} + \frac{1}{\left|x\right|}\right)\right) \leadsto \frac{e^{\left|x\right| \cdot \left|x\right|}}{\sqrt{\pi}} \cdot \left(\left(\frac{\frac{1}{2}}{{\left(\left|x\right|\right)}^3} + \frac{\frac{15}{8}}{{\left(\left|x\right|\right)}^{7}}\right) + \left(\frac{{\left(\frac{1}{\left|x\right|}\right)}^3}{\frac{\left|x\right|}{\frac{\frac{3}{4}}{\left|x\right|}}} + \frac{1}{\left|x\right|}\right)\right)\]
    0.6
  12. Taylor expanded around 0 to get
    \[\frac{e^{\left|x\right| \cdot \left|x\right|}}{\sqrt{\pi}} \cdot \left(\left(\frac{\frac{1}{2}}{{\left(\left|x\right|\right)}^3} + \color{red}{\frac{\frac{15}{8}}{{\left(\left|x\right|\right)}^{7}}}\right) + \left(\frac{{\left(\frac{1}{\left|x\right|}\right)}^3}{\frac{\left|x\right|}{\frac{\frac{3}{4}}{\left|x\right|}}} + \frac{1}{\left|x\right|}\right)\right) \leadsto \frac{e^{\left|x\right| \cdot \left|x\right|}}{\sqrt{\pi}} \cdot \left(\left(\frac{\frac{1}{2}}{{\left(\left|x\right|\right)}^3} + \color{blue}{\frac{\frac{15}{8}}{{\left(\left|x\right|\right)}^{7}}}\right) + \left(\frac{{\left(\frac{1}{\left|x\right|}\right)}^3}{\frac{\left|x\right|}{\frac{\frac{3}{4}}{\left|x\right|}}} + \frac{1}{\left|x\right|}\right)\right)\]
    0.6
  13. Applied simplify to get
    \[\frac{e^{\left|x\right| \cdot \left|x\right|}}{\sqrt{\pi}} \cdot \left(\left(\frac{\frac{1}{2}}{{\left(\left|x\right|\right)}^3} + \frac{\frac{15}{8}}{{\left(\left|x\right|\right)}^{7}}\right) + \left(\frac{{\left(\frac{1}{\left|x\right|}\right)}^3}{\frac{\left|x\right|}{\frac{\frac{3}{4}}{\left|x\right|}}} + \frac{1}{\left|x\right|}\right)\right) \leadsto \frac{\left(\frac{1}{\left|x\right|} + \frac{\frac{15}{8}}{{\left(\left|x\right|\right)}^{7}}\right) + \left(\frac{\frac{1}{2}}{{\left(\left|x\right|\right)}^3} + \frac{\frac{1}{{\left(\left|x\right|\right)}^3}}{\left|x\right| \cdot \frac{\left|x\right|}{\frac{3}{4}}}\right)}{\frac{\sqrt{\pi}}{e^{\left|x\right| \cdot \left|x\right|}}}\]
    0.7
  14. Applied final simplification
  15. Removed slow pow expressions

Original test:


(lambda ((x default))
  #:name "Jmat.Real.erfi, branch x greater than or equal to 5"
  (* (* (/ 1 (sqrt PI)) (exp (* (fabs x) (fabs x)))) (+ (+ (+ (/ 1 (fabs x)) (* (/ 1 2) (* (* (/ 1 (fabs x)) (/ 1 (fabs x))) (/ 1 (fabs x))))) (* (/ 3 4) (* (* (* (* (/ 1 (fabs x)) (/ 1 (fabs x))) (/ 1 (fabs x))) (/ 1 (fabs x))) (/ 1 (fabs x))))) (* (/ 15 8) (* (* (* (* (* (* (/ 1 (fabs x)) (/ 1 (fabs x))) (/ 1 (fabs x))) (/ 1 (fabs x))) (/ 1 (fabs x))) (/ 1 (fabs x))) (/ 1 (fabs x)))))))