\[\left(\left(\log \left(x + y\right) + \log z\right) - t\right) + \left(a - 0.5\right) \cdot \log t\]
Test:
Numeric.SpecFunctions:logGammaL 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
Time: 36.8 s
Input Error: 0.2
Output Error: 0.3
Log: ⚲
Profile: 🕒
\(\left(\left(\log \left(x + y\right) + \log z\right) - t\right) + {\left(\left(a - 0.5\right) \cdot \log t\right)}^{1}\)
  1. Started with
    \[\left(\left(\log \left(x + y\right) + \log z\right) - t\right) + \left(a - 0.5\right) \cdot \log t\]
    0.2
  2. Using strategy rm
    0.2
  3. Applied pow1 to get
    \[\left(\left(\log \left(x + y\right) + \log z\right) - t\right) + \left(a - 0.5\right) \cdot \color{red}{\log t} \leadsto \left(\left(\log \left(x + y\right) + \log z\right) - t\right) + \left(a - 0.5\right) \cdot \color{blue}{{\left(\log t\right)}^{1}}\]
    0.2
  4. Applied pow1 to get
    \[\left(\left(\log \left(x + y\right) + \log z\right) - t\right) + \color{red}{\left(a - 0.5\right)} \cdot {\left(\log t\right)}^{1} \leadsto \left(\left(\log \left(x + y\right) + \log z\right) - t\right) + \color{blue}{{\left(a - 0.5\right)}^{1}} \cdot {\left(\log t\right)}^{1}\]
    0.2
  5. Applied pow-prod-down to get
    \[\left(\left(\log \left(x + y\right) + \log z\right) - t\right) + \color{red}{{\left(a - 0.5\right)}^{1} \cdot {\left(\log t\right)}^{1}} \leadsto \left(\left(\log \left(x + y\right) + \log z\right) - t\right) + \color{blue}{{\left(\left(a - 0.5\right) \cdot \log t\right)}^{1}}\]
    0.3
  6. Removed slow pow expressions

Original test:


(lambda ((x default) (y default) (z default) (t default) (a default))
  #:name "Numeric.SpecFunctions:logGammaL from math-functions-0.1.5.2"
  (+ (- (+ (log (+ x y)) (log z)) t) (* (- a 0.5) (log t))))