\[\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: 44.9 s
Input Error: 30.2
Output Error: 1.1
Log:
Profile: 🕒
\(\begin{cases} \frac{e^{\log \left(x \cdot {z}^{y}\right) + \left(\log a \cdot \left(t - 1.0\right) - b\right)}}{y} & \text{when } y \le -1.1034621288808883 \cdot 10^{+29} \\ \frac{\left(x \cdot {z}^{y}\right) \cdot \frac{{a}^{\left(t - 1.0\right)}}{e^{b}}}{y} & \text{when } y \le 0.00021438459598903582 \\ \frac{e^{\log \left(x \cdot {z}^{y}\right) + \left(\log a \cdot \left(t - 1.0\right) - b\right)}}{y} & \text{otherwise} \end{cases}\)

    if y < -1.1034621288808883e+29 or 0.00021438459598903582 < y

    1. Started with
      \[\frac{x \cdot e^{\left(y \cdot \log z + \left(t - 1.0\right) \cdot \log a\right) - b}}{y}\]
      37.3
    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}}}\]
      27.2
    3. Using strategy rm
      27.2
    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}}\]
      27.2
    5. Applied associate-*l/ 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 \frac{{a}^{\left(t - 1.0\right)}}{e^{b}}}{y}}\]
      27.2
    6. Using strategy rm
      27.2
    7. Applied pow-to-exp to get
      \[\frac{\left(x \cdot {z}^{y}\right) \cdot \frac{\color{red}{{a}^{\left(t - 1.0\right)}}}{e^{b}}}{y} \leadsto \frac{\left(x \cdot {z}^{y}\right) \cdot \frac{\color{blue}{e^{\log a \cdot \left(t - 1.0\right)}}}{e^{b}}}{y}\]
      27.2
    8. Applied div-exp to get
      \[\frac{\left(x \cdot {z}^{y}\right) \cdot \color{red}{\frac{e^{\log a \cdot \left(t - 1.0\right)}}{e^{b}}}}{y} \leadsto \frac{\left(x \cdot {z}^{y}\right) \cdot \color{blue}{e^{\log a \cdot \left(t - 1.0\right) - b}}}{y}\]
      23.3
    9. Applied add-exp-log to get
      \[\frac{\color{red}{\left(x \cdot {z}^{y}\right)} \cdot e^{\log a \cdot \left(t - 1.0\right) - b}}{y} \leadsto \frac{\color{blue}{e^{\log \left(x \cdot {z}^{y}\right)}} \cdot e^{\log a \cdot \left(t - 1.0\right) - b}}{y}\]
      23.3
    10. Applied prod-exp to get
      \[\frac{\color{red}{e^{\log \left(x \cdot {z}^{y}\right)} \cdot e^{\log a \cdot \left(t - 1.0\right) - b}}}{y} \leadsto \frac{\color{blue}{e^{\log \left(x \cdot {z}^{y}\right) + \left(\log a \cdot \left(t - 1.0\right) - b\right)}}}{y}\]
      0.2

    if -1.1034621288808883e+29 < y < 0.00021438459598903582

    1. Started with
      \[\frac{x \cdot e^{\left(y \cdot \log z + \left(t - 1.0\right) \cdot \log a\right) - b}}{y}\]
      20.4
    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}}}\]
      14.0
    3. Using strategy rm
      14.0
    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}}\]
      14.0
    5. Applied associate-*l/ 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 \frac{{a}^{\left(t - 1.0\right)}}{e^{b}}}{y}}\]
      2.4

  1. Removed slow pow expressions

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