\[\frac{x}{x + y \cdot e^{2.0 \cdot \left(\frac{z \cdot \sqrt{t + a}}{t} - \left(b - c\right) \cdot \left(\left(a + \frac{5.0}{6.0}\right) - \frac{2.0}{t \cdot 3.0}\right)\right)}}\]
Test:
Numeric.SpecFunctions:invIncompleteBetaWorker from math-functions-0.1.5.2
Bits:
128 bits
Bits error versus x
Bits error versus y
Bits error versus z
Bits error versus t
Bits error versus a
Bits error versus b
Bits error versus c
Time: 40.5 s
Input Error: 0.6
Output Error: 0.6
Log: ⚲
Profile: 🕒
\(\frac{x}{(\left({\left(e^{2.0}\right)}^{\left(\frac{\sqrt{1}}{t} \cdot \frac{\sqrt{a + t}}{\frac{1}{z}} - \left(\left(\frac{5.0}{6.0} + a\right) - \frac{2.0}{3.0 \cdot t}\right) \cdot \left(b - c\right)\right)}\right) * y + x)_*}\)
  1. Started with
    \[\frac{x}{x + y \cdot e^{2.0 \cdot \left(\frac{z \cdot \sqrt{t + a}}{t} - \left(b - c\right) \cdot \left(\left(a + \frac{5.0}{6.0}\right) - \frac{2.0}{t \cdot 3.0}\right)\right)}}\]
    0.6
  2. Applied simplify to get
    \[\color{red}{\frac{x}{x + y \cdot e^{2.0 \cdot \left(\frac{z \cdot \sqrt{t + a}}{t} - \left(b - c\right) \cdot \left(\left(a + \frac{5.0}{6.0}\right) - \frac{2.0}{t \cdot 3.0}\right)\right)}}} \leadsto \color{blue}{\frac{x}{(\left({\left(e^{2.0}\right)}^{\left(\frac{\sqrt{a + t}}{\frac{t}{z}} - \left(\left(\frac{5.0}{6.0} + a\right) - \frac{2.0}{3.0 \cdot t}\right) \cdot \left(b - c\right)\right)}\right) * y + x)_*}}\]
    1.0
  3. Using strategy rm
    1.0
  4. Applied div-inv to get
    \[\frac{x}{(\left({\left(e^{2.0}\right)}^{\left(\frac{\sqrt{a + t}}{\color{red}{\frac{t}{z}}} - \left(\left(\frac{5.0}{6.0} + a\right) - \frac{2.0}{3.0 \cdot t}\right) \cdot \left(b - c\right)\right)}\right) * y + x)_*} \leadsto \frac{x}{(\left({\left(e^{2.0}\right)}^{\left(\frac{\sqrt{a + t}}{\color{blue}{t \cdot \frac{1}{z}}} - \left(\left(\frac{5.0}{6.0} + a\right) - \frac{2.0}{3.0 \cdot t}\right) \cdot \left(b - c\right)\right)}\right) * y + x)_*}\]
    1.0
  5. Applied *-un-lft-identity to get
    \[\frac{x}{(\left({\left(e^{2.0}\right)}^{\left(\frac{\sqrt{\color{red}{a + t}}}{t \cdot \frac{1}{z}} - \left(\left(\frac{5.0}{6.0} + a\right) - \frac{2.0}{3.0 \cdot t}\right) \cdot \left(b - c\right)\right)}\right) * y + x)_*} \leadsto \frac{x}{(\left({\left(e^{2.0}\right)}^{\left(\frac{\sqrt{\color{blue}{1 \cdot \left(a + t\right)}}}{t \cdot \frac{1}{z}} - \left(\left(\frac{5.0}{6.0} + a\right) - \frac{2.0}{3.0 \cdot t}\right) \cdot \left(b - c\right)\right)}\right) * y + x)_*}\]
    1.0
  6. Applied sqrt-prod to get
    \[\frac{x}{(\left({\left(e^{2.0}\right)}^{\left(\frac{\color{red}{\sqrt{1 \cdot \left(a + t\right)}}}{t \cdot \frac{1}{z}} - \left(\left(\frac{5.0}{6.0} + a\right) - \frac{2.0}{3.0 \cdot t}\right) \cdot \left(b - c\right)\right)}\right) * y + x)_*} \leadsto \frac{x}{(\left({\left(e^{2.0}\right)}^{\left(\frac{\color{blue}{\sqrt{1} \cdot \sqrt{a + t}}}{t \cdot \frac{1}{z}} - \left(\left(\frac{5.0}{6.0} + a\right) - \frac{2.0}{3.0 \cdot t}\right) \cdot \left(b - c\right)\right)}\right) * y + x)_*}\]
    1.0
  7. Applied times-frac to get
    \[\frac{x}{(\left({\left(e^{2.0}\right)}^{\left(\color{red}{\frac{\sqrt{1} \cdot \sqrt{a + t}}{t \cdot \frac{1}{z}}} - \left(\left(\frac{5.0}{6.0} + a\right) - \frac{2.0}{3.0 \cdot t}\right) \cdot \left(b - c\right)\right)}\right) * y + x)_*} \leadsto \frac{x}{(\left({\left(e^{2.0}\right)}^{\left(\color{blue}{\frac{\sqrt{1}}{t} \cdot \frac{\sqrt{a + t}}{\frac{1}{z}}} - \left(\left(\frac{5.0}{6.0} + a\right) - \frac{2.0}{3.0 \cdot t}\right) \cdot \left(b - c\right)\right)}\right) * y + x)_*}\]
    0.6
  8. Removed slow pow expressions

Original test:


(lambda ((x default) (y default) (z default) (t default) (a default) (b default) (c default))
  #:name "Numeric.SpecFunctions:invIncompleteBetaWorker from math-functions-0.1.5.2"
  (/ x (+ x (* y (exp (* 2.0 (- (/ (* z (sqrt (+ t a))) t) (* (- b c) (- (+ a (/ 5.0 6.0)) (/ 2.0 (* t 3.0)))))))))))