\[\frac{x \cdot e^{\left(y \cdot \log z + \left(t - 1.0\right) \cdot \log a\right) - b}}{y}\]
Test:
Numeric.SpecFunctions:incompleteBetaWorker 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
Time: 31.6 s
Input Error: 17.5
Output Error: 4.6
Log:
Profile: 🕒
\(\frac{\left(x \cdot {z}^{y}\right) \cdot {a}^{\left(t - 1.0\right)}}{\frac{1}{2} \cdot \left(y \cdot {b}^2\right) + \left(y + y \cdot b\right)}\)
  1. Started with
    \[\frac{x \cdot e^{\left(y \cdot \log z + \left(t - 1.0\right) \cdot \log a\right) - b}}{y}\]
    17.5
  2. Applied simplify to get
    \[\color{red}{\frac{x \cdot e^{\left(y \cdot \log z + \left(t - 1.0\right) \cdot \log a\right) - b}}{y}} \leadsto \color{blue}{\left(\frac{x}{y} \cdot {z}^{y}\right) \cdot \frac{{a}^{\left(t - 1.0\right)}}{e^{b}}}\]
    11.8
  3. Using strategy rm
    11.8
  4. Applied associate-*l/ to get
    \[\color{red}{\left(\frac{x}{y} \cdot {z}^{y}\right)} \cdot \frac{{a}^{\left(t - 1.0\right)}}{e^{b}} \leadsto \color{blue}{\frac{x \cdot {z}^{y}}{y}} \cdot \frac{{a}^{\left(t - 1.0\right)}}{e^{b}}\]
    9.9
  5. Applied frac-times to get
    \[\color{red}{\frac{x \cdot {z}^{y}}{y} \cdot \frac{{a}^{\left(t - 1.0\right)}}{e^{b}}} \leadsto \color{blue}{\frac{\left(x \cdot {z}^{y}\right) \cdot {a}^{\left(t - 1.0\right)}}{y \cdot e^{b}}}\]
    9.9
  6. Applied taylor to get
    \[\frac{\left(x \cdot {z}^{y}\right) \cdot {a}^{\left(t - 1.0\right)}}{y \cdot e^{b}} \leadsto \frac{\left(x \cdot {z}^{y}\right) \cdot {a}^{\left(t - 1.0\right)}}{\frac{1}{2} \cdot \left(y \cdot {b}^2\right) + \left(y + y \cdot b\right)}\]
    4.6
  7. Taylor expanded around 0 to get
    \[\frac{\left(x \cdot {z}^{y}\right) \cdot {a}^{\left(t - 1.0\right)}}{\color{red}{\frac{1}{2} \cdot \left(y \cdot {b}^2\right) + \left(y + y \cdot b\right)}} \leadsto \frac{\left(x \cdot {z}^{y}\right) \cdot {a}^{\left(t - 1.0\right)}}{\color{blue}{\frac{1}{2} \cdot \left(y \cdot {b}^2\right) + \left(y + y \cdot b\right)}}\]
    4.6

Original test:


(lambda ((x default) (y default) (z default) (t default) (a default) (b default))
  #:name "Numeric.SpecFunctions:incompleteBetaWorker from math-functions-0.1.5.2"
  (/ (* x (exp (- (+ (* y (log z)) (* (- t 1.0) (log a))) b))) y))