Average Error: 18.5 → 1.5
Time: 7.3s
Precision: 64
\[\frac{\left(-t1\right) \cdot v}{\left(t1 + u\right) \cdot \left(t1 + u\right)}\]
\[\left(\left(-t1\right) \cdot \frac{v}{t1 + u}\right) \cdot \frac{1}{t1 + u}\]
\frac{\left(-t1\right) \cdot v}{\left(t1 + u\right) \cdot \left(t1 + u\right)}
\left(\left(-t1\right) \cdot \frac{v}{t1 + u}\right) \cdot \frac{1}{t1 + u}
double f(double u, double v, double t1) {
        double r22493 = t1;
        double r22494 = -r22493;
        double r22495 = v;
        double r22496 = r22494 * r22495;
        double r22497 = u;
        double r22498 = r22493 + r22497;
        double r22499 = r22498 * r22498;
        double r22500 = r22496 / r22499;
        return r22500;
}

double f(double u, double v, double t1) {
        double r22501 = t1;
        double r22502 = -r22501;
        double r22503 = v;
        double r22504 = u;
        double r22505 = r22501 + r22504;
        double r22506 = r22503 / r22505;
        double r22507 = r22502 * r22506;
        double r22508 = 1.0;
        double r22509 = r22508 / r22505;
        double r22510 = r22507 * r22509;
        return r22510;
}

Error

Bits error versus u

Bits error versus v

Bits error versus t1

Try it out

Your Program's Arguments

Results

Enter valid numbers for all inputs

Derivation

  1. Initial program 18.5

    \[\frac{\left(-t1\right) \cdot v}{\left(t1 + u\right) \cdot \left(t1 + u\right)}\]
  2. Using strategy rm
  3. Applied associate-/r*11.7

    \[\leadsto \color{blue}{\frac{\frac{\left(-t1\right) \cdot v}{t1 + u}}{t1 + u}}\]
  4. Simplified1.4

    \[\leadsto \frac{\color{blue}{\left(-t1\right) \cdot \frac{v}{t1 + u}}}{t1 + u}\]
  5. Using strategy rm
  6. Applied div-inv1.5

    \[\leadsto \color{blue}{\left(\left(-t1\right) \cdot \frac{v}{t1 + u}\right) \cdot \frac{1}{t1 + u}}\]
  7. Final simplification1.5

    \[\leadsto \left(\left(-t1\right) \cdot \frac{v}{t1 + u}\right) \cdot \frac{1}{t1 + u}\]

Reproduce

herbie shell --seed 2020047 +o rules:numerics
(FPCore (u v t1)
  :name "Rosa's DopplerBench"
  :precision binary64
  (/ (* (- t1) v) (* (+ t1 u) (+ t1 u))))