Average Error: 58.5 → 30.6
Time: 4.6m
Precision: 64
Internal Precision: 7296
\[\frac{c0}{2 \cdot w} \cdot \left(\frac{c0 \cdot \left(d \cdot d\right)}{\left(w \cdot h\right) \cdot \left(D \cdot D\right)} + \sqrt{\frac{c0 \cdot \left(d \cdot d\right)}{\left(w \cdot h\right) \cdot \left(D \cdot D\right)} \cdot \frac{c0 \cdot \left(d \cdot d\right)}{\left(w \cdot h\right) \cdot \left(D \cdot D\right)} - M \cdot M}\right)\]
↓
\[\begin{array}{l} \mathbf{if}\;\frac{d}{D} \le -3.909600816699057 \cdot 10^{+40}:\\ \;\;\;\;0\\ \mathbf{if}\;\frac{d}{D} \le -3.109284329518049 \cdot 10^{-38}:\\ \;\;\;\;\frac{c0}{2 \cdot w} \cdot \sqrt[3]{{\left(\sqrt{(\left(\frac{\frac{c0}{h}}{w} \cdot \left(\frac{d}{D} \cdot \frac{d}{D}\right)\right) \cdot \left(\frac{\frac{c0}{h}}{w} \cdot \left(\frac{d}{D} \cdot \frac{d}{D}\right)\right) + \left(-M \cdot M\right))_*} + \frac{\frac{c0}{h}}{w} \cdot \left(\frac{d}{D} \cdot \frac{d}{D}\right)\right)}^{3}}\\ \mathbf{if}\;\frac{d}{D} \le 1.623426275451262 \cdot 10^{+104}:\\ \;\;\;\;\frac{\frac{M}{w + w} \cdot \left(c0 \cdot M\right)}{\frac{\frac{d}{D} \cdot \frac{d}{D}}{\frac{h \cdot w}{c0}} - \sqrt{(\left(\frac{\frac{d}{D} \cdot \frac{d}{D}}{\frac{h \cdot w}{c0}}\right) \cdot \left(\frac{\frac{d}{D} \cdot \frac{d}{D}}{\frac{h \cdot w}{c0}}\right) + \left(M \cdot \left(-M\right)\right))_*}}\\ \mathbf{else}:\\ \;\;\;\;0\\ \end{array}\]

Error

Bits error versus c0

Bits error versus w

Bits error versus h

Bits error versus D

Bits error versus d

Bits error versus M

Derivation

  1. Split input into 3 regimes

  2. if (/ d D) < -3.909600816699057e+40 or 1.623426275451262e+104 < (/ d D)

    1. Initial program 60.6

      \[\frac{c0}{2 \cdot w} \cdot \left(\frac{c0 \cdot \left(d \cdot d\right)}{\left(w \cdot h\right) \cdot \left(D \cdot D\right)} + \sqrt{\frac{c0 \cdot \left(d \cdot d\right)}{\left(w \cdot h\right) \cdot \left(D \cdot D\right)} \cdot \frac{c0 \cdot \left(d \cdot d\right)}{\left(w \cdot h\right) \cdot \left(D \cdot D\right)} - M \cdot M}\right)\]

    2. Taylor expanded around inf 29.7

      \[\leadsto \frac{c0}{2 \cdot w} \cdot \color{blue}{0}\]

    3. Applied simplify25.4

      \[\leadsto \color{blue}{0}\]

    if -3.909600816699057e+40 < (/ d D) < -3.109284329518049e-38

    1. Initial program 53.8

      \[\frac{c0}{2 \cdot w} \cdot \left(\frac{c0 \cdot \left(d \cdot d\right)}{\left(w \cdot h\right) \cdot \left(D \cdot D\right)} + \sqrt{\frac{c0 \cdot \left(d \cdot d\right)}{\left(w \cdot h\right) \cdot \left(D \cdot D\right)} \cdot \frac{c0 \cdot \left(d \cdot d\right)}{\left(w \cdot h\right) \cdot \left(D \cdot D\right)} - M \cdot M}\right)\]
    2. Using strategy rm

    3. Applied add-cbrt-cube55.0

      \[\leadsto \frac{c0}{2 \cdot w} \cdot \color{blue}{\sqrt[3]{\left(\left(\frac{c0 \cdot \left(d \cdot d\right)}{\left(w \cdot h\right) \cdot \left(D \cdot D\right)} + \sqrt{\frac{c0 \cdot \left(d \cdot d\right)}{\left(w \cdot h\right) \cdot \left(D \cdot D\right)} \cdot \frac{c0 \cdot \left(d \cdot d\right)}{\left(w \cdot h\right) \cdot \left(D \cdot D\right)} - M \cdot M}\right) \cdot \left(\frac{c0 \cdot \left(d \cdot d\right)}{\left(w \cdot h\right) \cdot \left(D \cdot D\right)} + \sqrt{\frac{c0 \cdot \left(d \cdot d\right)}{\left(w \cdot h\right) \cdot \left(D \cdot D\right)} \cdot \frac{c0 \cdot \left(d \cdot d\right)}{\left(w \cdot h\right) \cdot \left(D \cdot D\right)} - M \cdot M}\right)\right) \cdot \left(\frac{c0 \cdot \left(d \cdot d\right)}{\left(w \cdot h\right) \cdot \left(D \cdot D\right)} + \sqrt{\frac{c0 \cdot \left(d \cdot d\right)}{\left(w \cdot h\right) \cdot \left(D \cdot D\right)} \cdot \frac{c0 \cdot \left(d \cdot d\right)}{\left(w \cdot h\right) \cdot \left(D \cdot D\right)} - M \cdot M}\right)}}\]

    4. Applied simplify44.9

      \[\leadsto \frac{c0}{2 \cdot w} \cdot \sqrt[3]{\color{blue}{{\left(\sqrt{(\left(\frac{\frac{c0}{h}}{w} \cdot \left(\frac{d}{D} \cdot \frac{d}{D}\right)\right) \cdot \left(\frac{\frac{c0}{h}}{w} \cdot \left(\frac{d}{D} \cdot \frac{d}{D}\right)\right) + \left(-M \cdot M\right))_*} + \frac{\frac{c0}{h}}{w} \cdot \left(\frac{d}{D} \cdot \frac{d}{D}\right)\right)}^{3}}}\]

    if -3.109284329518049e-38 < (/ d D) < 1.623426275451262e+104

    1. Initial program 54.5

      \[\frac{c0}{2 \cdot w} \cdot \left(\frac{c0 \cdot \left(d \cdot d\right)}{\left(w \cdot h\right) \cdot \left(D \cdot D\right)} + \sqrt{\frac{c0 \cdot \left(d \cdot d\right)}{\left(w \cdot h\right) \cdot \left(D \cdot D\right)} \cdot \frac{c0 \cdot \left(d \cdot d\right)}{\left(w \cdot h\right) \cdot \left(D \cdot D\right)} - M \cdot M}\right)\]
    2. Using strategy rm

    3. Applied flip-+59.6

      \[\leadsto \frac{c0}{2 \cdot w} \cdot \color{blue}{\frac{\frac{c0 \cdot \left(d \cdot d\right)}{\left(w \cdot h\right) \cdot \left(D \cdot D\right)} \cdot \frac{c0 \cdot \left(d \cdot d\right)}{\left(w \cdot h\right) \cdot \left(D \cdot D\right)} - \sqrt{\frac{c0 \cdot \left(d \cdot d\right)}{\left(w \cdot h\right) \cdot \left(D \cdot D\right)} \cdot \frac{c0 \cdot \left(d \cdot d\right)}{\left(w \cdot h\right) \cdot \left(D \cdot D\right)} - M \cdot M} \cdot \sqrt{\frac{c0 \cdot \left(d \cdot d\right)}{\left(w \cdot h\right) \cdot \left(D \cdot D\right)} \cdot \frac{c0 \cdot \left(d \cdot d\right)}{\left(w \cdot h\right) \cdot \left(D \cdot D\right)} - M \cdot M}}{\frac{c0 \cdot \left(d \cdot d\right)}{\left(w \cdot h\right) \cdot \left(D \cdot D\right)} - \sqrt{\frac{c0 \cdot \left(d \cdot d\right)}{\left(w \cdot h\right) \cdot \left(D \cdot D\right)} \cdot \frac{c0 \cdot \left(d \cdot d\right)}{\left(w \cdot h\right) \cdot \left(D \cdot D\right)} - M \cdot M}}}\]

    4. Applied frac-times59.7

      \[\leadsto \color{blue}{\frac{c0 \cdot \left(\frac{c0 \cdot \left(d \cdot d\right)}{\left(w \cdot h\right) \cdot \left(D \cdot D\right)} \cdot \frac{c0 \cdot \left(d \cdot d\right)}{\left(w \cdot h\right) \cdot \left(D \cdot D\right)} - \sqrt{\frac{c0 \cdot \left(d \cdot d\right)}{\left(w \cdot h\right) \cdot \left(D \cdot D\right)} \cdot \frac{c0 \cdot \left(d \cdot d\right)}{\left(w \cdot h\right) \cdot \left(D \cdot D\right)} - M \cdot M} \cdot \sqrt{\frac{c0 \cdot \left(d \cdot d\right)}{\left(w \cdot h\right) \cdot \left(D \cdot D\right)} \cdot \frac{c0 \cdot \left(d \cdot d\right)}{\left(w \cdot h\right) \cdot \left(D \cdot D\right)} - M \cdot M}\right)}{\left(2 \cdot w\right) \cdot \left(\frac{c0 \cdot \left(d \cdot d\right)}{\left(w \cdot h\right) \cdot \left(D \cdot D\right)} - \sqrt{\frac{c0 \cdot \left(d \cdot d\right)}{\left(w \cdot h\right) \cdot \left(D \cdot D\right)} \cdot \frac{c0 \cdot \left(d \cdot d\right)}{\left(w \cdot h\right) \cdot \left(D \cdot D\right)} - M \cdot M}\right)}}\]

    5. Applied simplify52.4

      \[\leadsto \frac{\color{blue}{\left(0 + M \cdot M\right) \cdot c0}}{\left(2 \cdot w\right) \cdot \left(\frac{c0 \cdot \left(d \cdot d\right)}{\left(w \cdot h\right) \cdot \left(D \cdot D\right)} - \sqrt{\frac{c0 \cdot \left(d \cdot d\right)}{\left(w \cdot h\right) \cdot \left(D \cdot D\right)} \cdot \frac{c0 \cdot \left(d \cdot d\right)}{\left(w \cdot h\right) \cdot \left(D \cdot D\right)} - M \cdot M}\right)}\]
    6. Using strategy rm

    7. Applied log1p-expm1-u53.2

      \[\leadsto \color{blue}{\log_* (1 + (e^{\frac{\left(0 + M \cdot M\right) \cdot c0}{\left(2 \cdot w\right) \cdot \left(\frac{c0 \cdot \left(d \cdot d\right)}{\left(w \cdot h\right) \cdot \left(D \cdot D\right)} - \sqrt{\frac{c0 \cdot \left(d \cdot d\right)}{\left(w \cdot h\right) \cdot \left(D \cdot D\right)} \cdot \frac{c0 \cdot \left(d \cdot d\right)}{\left(w \cdot h\right) \cdot \left(D \cdot D\right)} - M \cdot M}\right)}} - 1)^*)}\]

    8. Applied simplify43.6

      \[\leadsto \log_* (1 + \color{blue}{(e^{\frac{\frac{M \cdot M}{w + w} \cdot c0}{\frac{c0}{h \cdot w} \cdot \left(\frac{d}{D} \cdot \frac{d}{D}\right) - \sqrt{(\left(\frac{c0}{h \cdot w} \cdot \left(\frac{d}{D} \cdot \frac{d}{D}\right)\right) \cdot \left(\frac{c0}{h \cdot w} \cdot \left(\frac{d}{D} \cdot \frac{d}{D}\right)\right) + \left(M \cdot \left(-M\right)\right))_*}}} - 1)^*})\]

    9. Taylor expanded around 0 52.7

      \[\leadsto \log_* (1 + (e^{\frac{\frac{M \cdot M}{w + w} \cdot c0}{\frac{c0}{h \cdot w} \cdot \left(\frac{d}{D} \cdot \frac{d}{D}\right) - \sqrt{(\left(\frac{c0}{h \cdot w} \cdot \left(\frac{d}{D} \cdot \frac{d}{D}\right)\right) \cdot \color{blue}{\left(\frac{{d}^{2} \cdot c0}{{D}^{2} \cdot \left(h \cdot w\right)}\right)} + \left(M \cdot \left(-M\right)\right))_*}}} - 1)^*)\]

    10. Applied simplify40.3

      \[\leadsto \color{blue}{\frac{\frac{M}{w + w} \cdot \left(c0 \cdot M\right)}{\frac{\frac{d}{D} \cdot \frac{d}{D}}{\frac{h \cdot w}{c0}} - \sqrt{(\left(\frac{\frac{d}{D} \cdot \frac{d}{D}}{\frac{h \cdot w}{c0}}\right) \cdot \left(\frac{\frac{d}{D} \cdot \frac{d}{D}}{\frac{h \cdot w}{c0}}\right) + \left(M \cdot \left(-M\right)\right))_*}}}\]
  3. Recombined 3 regimes into one program.

Runtime

Time bar (total: 4.6m)Debug logProfile

herbie shell --seed '#(1070355188 2193211668 3977393919 3454156579 3755371326 1656365382)' +o rules:numerics
(FPCore (c0 w h D d M)
  :name "Henrywood and Agarwal, Equation (13)"
  (* (/ c0 (* 2 w)) (+ (/ (* c0 (* d d)) (* (* w h) (* D D))) (sqrt (- (* (/ (* c0 (* d d)) (* (* w h) (* D D))) (/ (* c0 (* d d)) (* (* w h) (* D D)))) (* M M))))))