\[x \cdot \frac{\frac{y}{z} \cdot t}{t}\]
Test:
Graphics.Rendering.Chart.Backend.Diagrams:calcFontMetrics from Chart-diagrams-1.5.1
Bits:
128 bits
Bits error versus x
Bits error versus y
Bits error versus z
Bits error versus t
Time: 2.1 s
Input Error: 6.5
Output Error: 2.7
Log:
Profile: 🕒
\(x \cdot \frac{y}{z}\)
  1. Started with
    \[x \cdot \frac{\frac{y}{z} \cdot t}{t}\]
    6.5
  2. Applied simplify to get
    \[\color{red}{x \cdot \frac{\frac{y}{z} \cdot t}{t}} \leadsto \color{blue}{x \cdot \frac{y}{z}}\]
    2.7

Original test:


(lambda ((x default) (y default) (z default) (t default))
  #:name "Graphics.Rendering.Chart.Backend.Diagrams:calcFontMetrics from Chart-diagrams-1.5.1"
  (* x (/ (* (/ y z) t) t)))