Average Error: 0.6 → 0.6
Time: 21.2s
Precision: 64
\[1 - \frac{x}{\left(y - z\right) \cdot \left(y - t\right)}\]
↓
\[1 - \frac{1}{\frac{\left(y - t\right) \cdot \left(y - z\right)}{x}}\]
1 - \frac{x}{\left(y - z\right) \cdot \left(y - t\right)}
↓
1 - \frac{1}{\frac{\left(y - t\right) \cdot \left(y - z\right)}{x}}
double f(double x, double y, double z, double t) {
        double r10751323 = 1.0;
        double r10751324 = x;
        double r10751325 = y;
        double r10751326 = z;
        double r10751327 = r10751325 - r10751326;
        double r10751328 = t;
        double r10751329 = r10751325 - r10751328;
        double r10751330 = r10751327 * r10751329;
        double r10751331 = r10751324 / r10751330;
        double r10751332 = r10751323 - r10751331;
        return r10751332;
}
↓
double f(double x, double y, double z, double t) {
        double r10751333 = 1.0;
        double r10751334 = 1.0;
        double r10751335 = y;
        double r10751336 = t;
        double r10751337 = r10751335 - r10751336;
        double r10751338 = z;
        double r10751339 = r10751335 - r10751338;
        double r10751340 = r10751337 * r10751339;
        double r10751341 = x;
        double r10751342 = r10751340 / r10751341;
        double r10751343 = r10751334 / r10751342;
        double r10751344 = r10751333 - r10751343;
        return r10751344;
}

Error

Bits error versus x

Bits error versus y

Bits error versus z

Bits error versus t

Try it out

Your Program's Arguments

Results

Enter valid numbers for all inputs

Derivation

  1. Initial program 0.6

    \[1 - \frac{x}{\left(y - z\right) \cdot \left(y - t\right)}\]
  2. Using strategy rm

  3. Applied clear-num0.6

    \[\leadsto 1 - \color{blue}{\frac{1}{\frac{\left(y - z\right) \cdot \left(y - t\right)}{x}}}\]

  4. Final simplification0.6

    \[\leadsto 1 - \frac{1}{\frac{\left(y - t\right) \cdot \left(y - z\right)}{x}}\]

Reproduce

herbie shell --seed 2019169 +o rules:numerics
(FPCore (x y z t)
  :name "Data.Random.Distribution.Triangular:triangularCDF from random-fu-0.2.6.2, A"
  (- 1.0 (/ x (* (- y z) (- y t)))))