Average Error: 58.6 → 29.3
Time: 5.0m
Precision: 64
Internal Precision: 7488
\[\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}\;\left(\sqrt{(\left(\left(\frac{d}{D} \cdot \frac{d}{D}\right) \cdot \frac{\frac{c0}{h}}{w}\right) \cdot \left(\left(\frac{d}{D} \cdot \frac{d}{D}\right) \cdot \frac{\frac{c0}{h}}{w}\right) + \left(M \cdot \left(-M\right)\right))_*} + \left(\frac{d}{D} \cdot \frac{d}{D}\right) \cdot \frac{\frac{c0}{h}}{w}\right) \cdot \frac{\frac{c0}{w \cdot 2}}{\frac{M \cdot M}{M \cdot M}} \le 5.2704185792358805 \cdot 10^{-102}:\\ \;\;\;\;\frac{\frac{M}{2} \cdot \left(\frac{M}{w} \cdot c0\right)}{\left(\frac{d}{D} \cdot \frac{d}{D}\right) \cdot \frac{\frac{c0}{h}}{w} - \sqrt{(\left(\left(\frac{d}{D} \cdot \frac{d}{D}\right) \cdot \frac{\frac{c0}{h}}{w}\right) \cdot \left(\left(\frac{d}{D} \cdot \frac{d}{D}\right) \cdot \frac{\frac{c0}{h}}{w}\right) + \left(M \cdot \left(-M\right)\right))_*}}\\ \mathbf{if}\;\left(\sqrt{(\left(\left(\frac{d}{D} \cdot \frac{d}{D}\right) \cdot \frac{\frac{c0}{h}}{w}\right) \cdot \left(\left(\frac{d}{D} \cdot \frac{d}{D}\right) \cdot \frac{\frac{c0}{h}}{w}\right) + \left(M \cdot \left(-M\right)\right))_*} + \left(\frac{d}{D} \cdot \frac{d}{D}\right) \cdot \frac{\frac{c0}{h}}{w}\right) \cdot \frac{\frac{c0}{w \cdot 2}}{\frac{M \cdot M}{M \cdot M}} \le +\infty:\\ \;\;\;\;\left(\sqrt{(\left(\left(\frac{d}{D} \cdot \frac{d}{D}\right) \cdot \frac{\frac{c0}{h}}{w}\right) \cdot \left(\left(\frac{d}{D} \cdot \frac{d}{D}\right) \cdot \frac{\frac{c0}{h}}{w}\right) + \left(M \cdot \left(-M\right)\right))_*} + \left(\frac{d}{D} \cdot \frac{d}{D}\right) \cdot \frac{\frac{c0}{h}}{w}\right) \cdot \frac{\frac{c0}{w \cdot 2}}{\frac{M \cdot M}{M \cdot M}}\\ \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 (* (/ (/ c0 (* 2 w)) (/ (+ 0 (* M M)) (* M M))) (+ (* (/ (/ c0 h) w) (* (/ d D) (/ d D))) (sqrt (fma (* (/ (/ c0 h) w) (* (/ d D) (/ d D))) (* (/ (/ c0 h) w) (* (/ d D) (/ d D))) (* M (- M)))))) < 5.2704185792358805e-102

    1. Initial program 55.1

      \[\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-+60.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 simplify51.6

      \[\leadsto \frac{c0}{2 \cdot w} \cdot \frac{\color{blue}{0 + 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}}\]

    5. Taylor expanded around 0 51.6

      \[\leadsto \frac{c0}{2 \cdot w} \cdot \frac{0 + 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 \color{blue}{\frac{{d}^{2} \cdot c0}{{D}^{2} \cdot \left(h \cdot w\right)}} - M \cdot M}}\]

    6. Applied simplify38.2

      \[\leadsto \color{blue}{\frac{\frac{c0}{\frac{w \cdot 2}{M \cdot M}}}{\frac{\frac{c0}{h}}{w} \cdot \left(\frac{d}{D} \cdot \frac{d}{D}\right) - \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 \left(-M\right)\right))_*}}}\]
    7. Using strategy rm

    8. Applied *-un-lft-identity38.2

      \[\leadsto \frac{\frac{c0}{\frac{w \cdot 2}{M \cdot M}}}{\color{blue}{1 \cdot \left(\frac{\frac{c0}{h}}{w} \cdot \left(\frac{d}{D} \cdot \frac{d}{D}\right) - \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 \left(-M\right)\right))_*}\right)}}\]

    9. Applied associate-/r*38.2

      \[\leadsto \color{blue}{\frac{\frac{\frac{c0}{\frac{w \cdot 2}{M \cdot M}}}{1}}{\frac{\frac{c0}{h}}{w} \cdot \left(\frac{d}{D} \cdot \frac{d}{D}\right) - \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 \left(-M\right)\right))_*}}}\]

    10. Applied simplify36.6

      \[\leadsto \frac{\color{blue}{\left(\frac{M}{w} \cdot c0\right) \cdot \frac{M}{2}}}{\frac{\frac{c0}{h}}{w} \cdot \left(\frac{d}{D} \cdot \frac{d}{D}\right) - \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 \left(-M\right)\right))_*}}\]

    if 5.2704185792358805e-102 < (* (/ (/ c0 (* 2 w)) (/ (+ 0 (* M M)) (* M M))) (+ (* (/ (/ c0 h) w) (* (/ d D) (/ d D))) (sqrt (fma (* (/ (/ c0 h) w) (* (/ d D) (/ d D))) (* (/ (/ c0 h) w) (* (/ d D) (/ d D))) (* M (- M)))))) < +inf.0

    1. Initial program 55.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 flip-+61.1

      \[\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 simplify58.5

      \[\leadsto \frac{c0}{2 \cdot w} \cdot \frac{\color{blue}{0 + 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}}\]

    5. Taylor expanded around 0 58.5

      \[\leadsto \frac{c0}{2 \cdot w} \cdot \frac{0 + 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 \color{blue}{\frac{{d}^{2} \cdot c0}{{D}^{2} \cdot \left(h \cdot w\right)}} - M \cdot M}}\]

    6. Applied simplify56.4

      \[\leadsto \color{blue}{\frac{\frac{c0}{\frac{w \cdot 2}{M \cdot M}}}{\frac{\frac{c0}{h}}{w} \cdot \left(\frac{d}{D} \cdot \frac{d}{D}\right) - \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 \left(-M\right)\right))_*}}}\]
    7. Using strategy rm

    8. Applied flip--60.8

      \[\leadsto \frac{\frac{c0}{\frac{w \cdot 2}{M \cdot M}}}{\color{blue}{\frac{\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) - \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 \left(-M\right)\right))_*} \cdot \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 \left(-M\right)\right))_*}}{\frac{\frac{c0}{h}}{w} \cdot \left(\frac{d}{D} \cdot \frac{d}{D}\right) + \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 \left(-M\right)\right))_*}}}}\]

    9. Applied associate-/r/60.8

      \[\leadsto \color{blue}{\frac{\frac{c0}{\frac{w \cdot 2}{M \cdot M}}}{\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) - \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 \left(-M\right)\right))_*} \cdot \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 \left(-M\right)\right))_*}} \cdot \left(\frac{\frac{c0}{h}}{w} \cdot \left(\frac{d}{D} \cdot \frac{d}{D}\right) + \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 \left(-M\right)\right))_*}\right)}\]

    10. Applied simplify45.6

      \[\leadsto \color{blue}{\frac{\frac{c0}{2 \cdot w}}{\frac{0 + M \cdot M}{M \cdot M}}} \cdot \left(\frac{\frac{c0}{h}}{w} \cdot \left(\frac{d}{D} \cdot \frac{d}{D}\right) + \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 \left(-M\right)\right))_*}\right)\]

    if +inf.0 < (* (/ (/ c0 (* 2 w)) (/ (+ 0 (* M M)) (* M M))) (+ (* (/ (/ c0 h) w) (* (/ d D) (/ d D))) (sqrt (fma (* (/ (/ c0 h) w) (* (/ d D) (/ d D))) (* (/ (/ c0 h) w) (* (/ d D) (/ d D))) (* M (- M))))))

    1. Initial program 59.3

      \[\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 32.4

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

    3. Applied simplify27.2

      \[\leadsto \color{blue}{0}\]
  3. Recombined 3 regimes into one program.

  4. Applied simplify29.3

    \[\leadsto \color{blue}{\begin{array}{l} \mathbf{if}\;\left(\sqrt{(\left(\left(\frac{d}{D} \cdot \frac{d}{D}\right) \cdot \frac{\frac{c0}{h}}{w}\right) \cdot \left(\left(\frac{d}{D} \cdot \frac{d}{D}\right) \cdot \frac{\frac{c0}{h}}{w}\right) + \left(M \cdot \left(-M\right)\right))_*} + \left(\frac{d}{D} \cdot \frac{d}{D}\right) \cdot \frac{\frac{c0}{h}}{w}\right) \cdot \frac{\frac{c0}{w \cdot 2}}{\frac{M \cdot M}{M \cdot M}} \le 5.2704185792358805 \cdot 10^{-102}:\\ \;\;\;\;\frac{\frac{M}{2} \cdot \left(\frac{M}{w} \cdot c0\right)}{\left(\frac{d}{D} \cdot \frac{d}{D}\right) \cdot \frac{\frac{c0}{h}}{w} - \sqrt{(\left(\left(\frac{d}{D} \cdot \frac{d}{D}\right) \cdot \frac{\frac{c0}{h}}{w}\right) \cdot \left(\left(\frac{d}{D} \cdot \frac{d}{D}\right) \cdot \frac{\frac{c0}{h}}{w}\right) + \left(M \cdot \left(-M\right)\right))_*}}\\ \mathbf{if}\;\left(\sqrt{(\left(\left(\frac{d}{D} \cdot \frac{d}{D}\right) \cdot \frac{\frac{c0}{h}}{w}\right) \cdot \left(\left(\frac{d}{D} \cdot \frac{d}{D}\right) \cdot \frac{\frac{c0}{h}}{w}\right) + \left(M \cdot \left(-M\right)\right))_*} + \left(\frac{d}{D} \cdot \frac{d}{D}\right) \cdot \frac{\frac{c0}{h}}{w}\right) \cdot \frac{\frac{c0}{w \cdot 2}}{\frac{M \cdot M}{M \cdot M}} \le +\infty:\\ \;\;\;\;\left(\sqrt{(\left(\left(\frac{d}{D} \cdot \frac{d}{D}\right) \cdot \frac{\frac{c0}{h}}{w}\right) \cdot \left(\left(\frac{d}{D} \cdot \frac{d}{D}\right) \cdot \frac{\frac{c0}{h}}{w}\right) + \left(M \cdot \left(-M\right)\right))_*} + \left(\frac{d}{D} \cdot \frac{d}{D}\right) \cdot \frac{\frac{c0}{h}}{w}\right) \cdot \frac{\frac{c0}{w \cdot 2}}{\frac{M \cdot M}{M \cdot M}}\\ \mathbf{else}:\\ \;\;\;\;0\\ \end{array}}\]

Runtime

Time bar (total: 5.0m)Debug logProfile

herbie shell --seed '#(1071246582 2318319007 2683472949 3810440501 3233274817 2724848749)' +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))))))