\[\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: 34.5 s
Input Error: 0.3
Output Error: 0.3
Log: ⚲
Profile: 🕒
\(\left(\log \left(x + y\right) + \log z\right) + \left(\left(-t\right) + \left(a - 0.5\right) \cdot \log t\right)\)
  1. Started with
    \[\left(\left(\log \left(x + y\right) + \log z\right) - t\right) + \left(a - 0.5\right) \cdot \log t\]
    0.3
  2. Using strategy rm
    0.3
  3. Applied sub-neg to get
    \[\color{red}{\left(\left(\log \left(x + y\right) + \log z\right) - t\right)} + \left(a - 0.5\right) \cdot \log t \leadsto \color{blue}{\left(\left(\log \left(x + y\right) + \log z\right) + \left(-t\right)\right)} + \left(a - 0.5\right) \cdot \log t\]
    0.3
  4. Applied associate-+l+ to get
    \[\color{red}{\left(\left(\log \left(x + y\right) + \log z\right) + \left(-t\right)\right) + \left(a - 0.5\right) \cdot \log t} \leadsto \color{blue}{\left(\log \left(x + y\right) + \log z\right) + \left(\left(-t\right) + \left(a - 0.5\right) \cdot \log t\right)}\]
    0.3

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