\[\frac{\left(\left(\left(x \cdot y + z\right) \cdot y + 27464.7644705\right) \cdot y + 230661.510616\right) \cdot y + t}{\left(\left(\left(y + a\right) \cdot y + b\right) \cdot y + c\right) \cdot y + i}\]
Test:
Numeric.SpecFunctions:logGamma 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
Bits error versus i
Time: 19.7 s
Input Error: 28.2
Output Error: 28.5
Log:
Profile: 🕒
\((\left((\left((y * x + z)_*\right) * \left(y \cdot y\right) + \left((y * 27464.7644705 + 230661.510616)_*\right))_*\right) * y + t)_* \cdot \frac{1}{(\left(y \cdot y\right) * \left((\left(y + a\right) * y + b)_*\right) + \left((y * c + i)_*\right))_*}\)
  1. Started with
    \[\frac{\left(\left(\left(x \cdot y + z\right) \cdot y + 27464.7644705\right) \cdot y + 230661.510616\right) \cdot y + t}{\left(\left(\left(y + a\right) \cdot y + b\right) \cdot y + c\right) \cdot y + i}\]
    28.2
  2. Applied simplify to get
    \[\color{red}{\frac{\left(\left(\left(x \cdot y + z\right) \cdot y + 27464.7644705\right) \cdot y + 230661.510616\right) \cdot y + t}{\left(\left(\left(y + a\right) \cdot y + b\right) \cdot y + c\right) \cdot y + i}} \leadsto \color{blue}{\frac{(\left((\left((y * x + z)_*\right) * \left(y \cdot y\right) + \left((y * 27464.7644705 + 230661.510616)_*\right))_*\right) * y + t)_*}{(\left(y \cdot y\right) * \left((\left(y + a\right) * y + b)_*\right) + \left((y * c + i)_*\right))_*}}\]
    28.5
  3. Using strategy rm
    28.5
  4. Applied div-inv to get
    \[\color{red}{\frac{(\left((\left((y * x + z)_*\right) * \left(y \cdot y\right) + \left((y * 27464.7644705 + 230661.510616)_*\right))_*\right) * y + t)_*}{(\left(y \cdot y\right) * \left((\left(y + a\right) * y + b)_*\right) + \left((y * c + i)_*\right))_*}} \leadsto \color{blue}{(\left((\left((y * x + z)_*\right) * \left(y \cdot y\right) + \left((y * 27464.7644705 + 230661.510616)_*\right))_*\right) * y + t)_* \cdot \frac{1}{(\left(y \cdot y\right) * \left((\left(y + a\right) * y + b)_*\right) + \left((y * c + i)_*\right))_*}}\]
    28.5

  5. Removed slow pow expressions

Original test:


(lambda ((x default) (y default) (z default) (t default) (a default) (b default) (c default) (i default))
  #:name "Numeric.SpecFunctions:logGamma from math-functions-0.1.5.2"
  (/ (+ (* (+ (* (+ (* (+ (* x y) z) y) 27464.7644705) y) 230661.510616) y) t) (+ (* (+ (* (+ (* (+ y a) y) b) y) c) y) i)))