\[\frac{a}{\cot c} - \sqrt{b^2 + b^2}^*\]
Test:
(- (/ a (cotan c)) (hypot b b))
Bits:
128 bits
Bits error versus a
Bits error versus b
Bits error versus c
Time: 5.0 s
Input Error: 0.2
Output Error: 0.2
Log: ⚲
Profile: 🕒
\(\frac{a}{\cos c} \cdot \sin c - \sqrt{b^2 + b^2}^*\)
  1. Started with
    \[\frac{a}{\cot c} - \sqrt{b^2 + b^2}^*\]
    0.2
  2. Using strategy rm
    0.2
  3. Applied cotan-quot to get
    \[\frac{a}{\color{red}{\cot c}} - \sqrt{b^2 + b^2}^* \leadsto \frac{a}{\color{blue}{\frac{\cos c}{\sin c}}} - \sqrt{b^2 + b^2}^*\]
    0.2
  4. Applied associate-/r/ to get
    \[\color{red}{\frac{a}{\frac{\cos c}{\sin c}}} - \sqrt{b^2 + b^2}^* \leadsto \color{blue}{\frac{a}{\cos c} \cdot \sin c} - \sqrt{b^2 + b^2}^*\]
    0.2
  5. Removed slow pow expressions

Original test:


(lambda ((a default) (b default) (c default))
  #:name "(- (/ a (cotan c)) (hypot b b))"
  (- (/ a (cotan c)) (hypot b b)))