\[\sqrt{\frac{-2.839573235346269 \cdot 10^{-37}}{\left(a \cdot b\right) \cdot \left|a\right|}}\]
Test:
(sqrt (/ -2.839573235346269e-37 (* (* a b) (fabs a))))
Bits:
128 bits
Bits error versus a
Bits error versus b
Time: 9.4 s
Input Error: 24.6
Output Error: 8.8
Log:
Profile: 🕒
\(\begin{cases} \frac{\sqrt{\frac{\frac{-2.839573235346269 \cdot 10^{-37}}{b}}{a}}}{\sqrt{\left|a\right|}} & \text{when } b \le 7.845028771220709 \cdot 10^{+223} \\ \sqrt{\frac{1}{\frac{\left(a \cdot b\right) \cdot \left|a\right|}{-2.839573235346269 \cdot 10^{-37}}}} & \text{otherwise} \end{cases}\)

    if b < 7.845028771220709e+223

    1. Started with
      \[\sqrt{\frac{-2.839573235346269 \cdot 10^{-37}}{\left(a \cdot b\right) \cdot \left|a\right|}}\]
      25.4
    2. Using strategy rm
      25.4
    3. Applied associate-/r* to get
      \[\sqrt{\color{red}{\frac{-2.839573235346269 \cdot 10^{-37}}{\left(a \cdot b\right) \cdot \left|a\right|}}} \leadsto \sqrt{\color{blue}{\frac{\frac{-2.839573235346269 \cdot 10^{-37}}{a \cdot b}}{\left|a\right|}}}\]
      23.9
    4. Using strategy rm
      23.9
    5. Applied sqrt-div to get
      \[\color{red}{\sqrt{\frac{\frac{-2.839573235346269 \cdot 10^{-37}}{a \cdot b}}{\left|a\right|}}} \leadsto \color{blue}{\frac{\sqrt{\frac{-2.839573235346269 \cdot 10^{-37}}{a \cdot b}}}{\sqrt{\left|a\right|}}}\]
      8.9
    6. Applied taylor to get
      \[\frac{\sqrt{\frac{-2.839573235346269 \cdot 10^{-37}}{a \cdot b}}}{\sqrt{\left|a\right|}} \leadsto \frac{\sqrt{\frac{-2.839573235346269 \cdot 10^{-37}}{b \cdot a}}}{\sqrt{\left|a\right|}}\]
      8.9
    7. Taylor expanded around 0 to get
      \[\frac{\sqrt{\color{red}{\frac{-2.839573235346269 \cdot 10^{-37}}{b \cdot a}}}}{\sqrt{\left|a\right|}} \leadsto \frac{\sqrt{\color{blue}{\frac{-2.839573235346269 \cdot 10^{-37}}{b \cdot a}}}}{\sqrt{\left|a\right|}}\]
      8.9
    8. Applied simplify to get
      \[\frac{\sqrt{\frac{-2.839573235346269 \cdot 10^{-37}}{b \cdot a}}}{\sqrt{\left|a\right|}} \leadsto \frac{\sqrt{\frac{\frac{-2.839573235346269 \cdot 10^{-37}}{b}}{a}}}{\sqrt{\left|a\right|}}\]
      8.3

    9. Applied final simplification

    if 7.845028771220709e+223 < b

    1. Started with
      \[\sqrt{\frac{-2.839573235346269 \cdot 10^{-37}}{\left(a \cdot b\right) \cdot \left|a\right|}}\]
      14.7
    2. Using strategy rm
      14.7
    3. Applied clear-num to get
      \[\sqrt{\color{red}{\frac{-2.839573235346269 \cdot 10^{-37}}{\left(a \cdot b\right) \cdot \left|a\right|}}} \leadsto \sqrt{\color{blue}{\frac{1}{\frac{\left(a \cdot b\right) \cdot \left|a\right|}{-2.839573235346269 \cdot 10^{-37}}}}}\]
      15.2

  1. Removed slow pow expressions

Original test:


(lambda ((a default) (b default))
  #:name "(sqrt (/ -2.839573235346269e-37 (* (* a b) (fabs a))))"
  (sqrt (/ -2.839573235346269e-37 (* (* a b) (fabs a)))))