\[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: 3.7 s
Input Error: 6.3
Output Error: 2.8
Log: ⚲
Profile: 🕒
\(\frac{y}{\frac{z}{x}}\)
  1. Started with
    \[x \cdot \frac{\frac{y}{z} \cdot t}{t}\]
    6.3
  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.8
  3. Applied taylor to get
    \[x \cdot \frac{y}{z} \leadsto \frac{y \cdot x}{z}\]
    2.8
  4. Taylor expanded around 0 to get
    \[\color{red}{\frac{y \cdot x}{z}} \leadsto \color{blue}{\frac{y \cdot x}{z}}\]
    2.8
  5. Using strategy rm
    2.8
  6. Applied associate-/l* to get
    \[\color{red}{\frac{y \cdot x}{z}} \leadsto \color{blue}{\frac{y}{\frac{z}{x}}}\]
    2.8
  7. Removed slow pow expressions

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