\[x + \frac{y - z}{\left(t + 1.0\right) - z} \cdot \left(a - x\right)\]
Test:
Hakyll.Web.Tags:renderTagCloud from hakyll-4.7.2.3
Bits:
128 bits
Bits error versus x
Bits error versus y
Bits error versus z
Bits error versus t
Bits error versus a
Time: 9.4 s
Input Error: 9.4
Output Error: 9.4
Log: ⚲
Profile: 🕒
\(\left(x + \frac{y - z}{\left(t + 1.0\right) - z} \cdot a\right) + \frac{y - z}{\left(t + 1.0\right) - z} \cdot \left(-x\right)\)
  1. Started with
    \[x + \frac{y - z}{\left(t + 1.0\right) - z} \cdot \left(a - x\right)\]
    9.4
  2. Using strategy rm
    9.4
  3. Applied sub-neg to get
    \[x + \frac{y - z}{\left(t + 1.0\right) - z} \cdot \color{red}{\left(a - x\right)} \leadsto x + \frac{y - z}{\left(t + 1.0\right) - z} \cdot \color{blue}{\left(a + \left(-x\right)\right)}\]
    9.4
  4. Applied distribute-lft-in to get
    \[x + \color{red}{\frac{y - z}{\left(t + 1.0\right) - z} \cdot \left(a + \left(-x\right)\right)} \leadsto x + \color{blue}{\left(\frac{y - z}{\left(t + 1.0\right) - z} \cdot a + \frac{y - z}{\left(t + 1.0\right) - z} \cdot \left(-x\right)\right)}\]
    9.4
  5. Applied associate-+r+ to get
    \[\color{red}{x + \left(\frac{y - z}{\left(t + 1.0\right) - z} \cdot a + \frac{y - z}{\left(t + 1.0\right) - z} \cdot \left(-x\right)\right)} \leadsto \color{blue}{\left(x + \frac{y - z}{\left(t + 1.0\right) - z} \cdot a\right) + \frac{y - z}{\left(t + 1.0\right) - z} \cdot \left(-x\right)}\]
    9.4

Original test:


(lambda ((x default) (y default) (z default) (t default) (a default))
  #:name "Hakyll.Web.Tags:renderTagCloud from hakyll-4.7.2.3"
  (+ x (* (/ (- y z) (- (+ t 1.0) z)) (- a x))))