Average Error: 4.7 → 4.1
Time: 5.9s
Precision: 64
\[x \cdot \left(\frac{y}{z} - \frac{t}{1 - z}\right)\]
\[\begin{array}{l} \mathbf{if}\;z \le -1.07919684621796776 \cdot 10^{42} \lor \neg \left(z \le 8.29522319553782105 \cdot 10^{-200}\right):\\ \;\;\;\;\frac{x}{\sqrt[3]{z} \cdot \sqrt[3]{z}} \cdot \frac{y}{\sqrt[3]{z}} + x \cdot \left(-\frac{t}{1 - z}\right)\\ \mathbf{else}:\\ \;\;\;\;1 \cdot \frac{x \cdot y}{z} + x \cdot \left(-\frac{t}{1 - z}\right)\\ \end{array}\]
x \cdot \left(\frac{y}{z} - \frac{t}{1 - z}\right)
\begin{array}{l}
\mathbf{if}\;z \le -1.07919684621796776 \cdot 10^{42} \lor \neg \left(z \le 8.29522319553782105 \cdot 10^{-200}\right):\\
\;\;\;\;\frac{x}{\sqrt[3]{z} \cdot \sqrt[3]{z}} \cdot \frac{y}{\sqrt[3]{z}} + x \cdot \left(-\frac{t}{1 - z}\right)\\

\mathbf{else}:\\
\;\;\;\;1 \cdot \frac{x \cdot y}{z} + x \cdot \left(-\frac{t}{1 - z}\right)\\

\end{array}
double f(double x, double y, double z, double t) {
        double r553722 = x;
        double r553723 = y;
        double r553724 = z;
        double r553725 = r553723 / r553724;
        double r553726 = t;
        double r553727 = 1.0;
        double r553728 = r553727 - r553724;
        double r553729 = r553726 / r553728;
        double r553730 = r553725 - r553729;
        double r553731 = r553722 * r553730;
        return r553731;
}

double f(double x, double y, double z, double t) {
        double r553732 = z;
        double r553733 = -1.0791968462179678e+42;
        bool r553734 = r553732 <= r553733;
        double r553735 = 8.295223195537821e-200;
        bool r553736 = r553732 <= r553735;
        double r553737 = !r553736;
        bool r553738 = r553734 || r553737;
        double r553739 = x;
        double r553740 = cbrt(r553732);
        double r553741 = r553740 * r553740;
        double r553742 = r553739 / r553741;
        double r553743 = y;
        double r553744 = r553743 / r553740;
        double r553745 = r553742 * r553744;
        double r553746 = t;
        double r553747 = 1.0;
        double r553748 = r553747 - r553732;
        double r553749 = r553746 / r553748;
        double r553750 = -r553749;
        double r553751 = r553739 * r553750;
        double r553752 = r553745 + r553751;
        double r553753 = 1.0;
        double r553754 = r553739 * r553743;
        double r553755 = r553754 / r553732;
        double r553756 = r553753 * r553755;
        double r553757 = r553756 + r553751;
        double r553758 = r553738 ? r553752 : r553757;
        return r553758;
}

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

Target

Original4.7
Target4.3
Herbie4.1
\[\begin{array}{l} \mathbf{if}\;x \cdot \left(\frac{y}{z} - \frac{t}{1 - z}\right) \lt -7.62322630331204244 \cdot 10^{-196}:\\ \;\;\;\;x \cdot \left(\frac{y}{z} - t \cdot \frac{1}{1 - z}\right)\\ \mathbf{elif}\;x \cdot \left(\frac{y}{z} - \frac{t}{1 - z}\right) \lt 1.41339449277023022 \cdot 10^{-211}:\\ \;\;\;\;\frac{y \cdot x}{z} + \left(-\frac{t \cdot x}{1 - z}\right)\\ \mathbf{else}:\\ \;\;\;\;x \cdot \left(\frac{y}{z} - t \cdot \frac{1}{1 - z}\right)\\ \end{array}\]

Derivation

  1. Split input into 2 regimes
  2. if z < -1.0791968462179678e+42 or 8.295223195537821e-200 < z

    1. Initial program 3.1

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

      \[\leadsto x \cdot \color{blue}{\left(\frac{y}{z} + \left(-\frac{t}{1 - z}\right)\right)}\]
    4. Applied distribute-lft-in3.1

      \[\leadsto \color{blue}{x \cdot \frac{y}{z} + x \cdot \left(-\frac{t}{1 - z}\right)}\]
    5. Using strategy rm
    6. Applied add-cube-cbrt3.6

      \[\leadsto x \cdot \frac{y}{\color{blue}{\left(\sqrt[3]{z} \cdot \sqrt[3]{z}\right) \cdot \sqrt[3]{z}}} + x \cdot \left(-\frac{t}{1 - z}\right)\]
    7. Applied *-un-lft-identity3.6

      \[\leadsto x \cdot \frac{\color{blue}{1 \cdot y}}{\left(\sqrt[3]{z} \cdot \sqrt[3]{z}\right) \cdot \sqrt[3]{z}} + x \cdot \left(-\frac{t}{1 - z}\right)\]
    8. Applied times-frac3.6

      \[\leadsto x \cdot \color{blue}{\left(\frac{1}{\sqrt[3]{z} \cdot \sqrt[3]{z}} \cdot \frac{y}{\sqrt[3]{z}}\right)} + x \cdot \left(-\frac{t}{1 - z}\right)\]
    9. Applied associate-*r*4.1

      \[\leadsto \color{blue}{\left(x \cdot \frac{1}{\sqrt[3]{z} \cdot \sqrt[3]{z}}\right) \cdot \frac{y}{\sqrt[3]{z}}} + x \cdot \left(-\frac{t}{1 - z}\right)\]
    10. Simplified4.1

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

    if -1.0791968462179678e+42 < z < 8.295223195537821e-200

    1. Initial program 8.4

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

      \[\leadsto x \cdot \color{blue}{\left(\frac{y}{z} + \left(-\frac{t}{1 - z}\right)\right)}\]
    4. Applied distribute-lft-in8.4

      \[\leadsto \color{blue}{x \cdot \frac{y}{z} + x \cdot \left(-\frac{t}{1 - z}\right)}\]
    5. Using strategy rm
    6. Applied add-cube-cbrt9.0

      \[\leadsto x \cdot \frac{y}{\color{blue}{\left(\sqrt[3]{z} \cdot \sqrt[3]{z}\right) \cdot \sqrt[3]{z}}} + x \cdot \left(-\frac{t}{1 - z}\right)\]
    7. Applied *-un-lft-identity9.0

      \[\leadsto x \cdot \frac{\color{blue}{1 \cdot y}}{\left(\sqrt[3]{z} \cdot \sqrt[3]{z}\right) \cdot \sqrt[3]{z}} + x \cdot \left(-\frac{t}{1 - z}\right)\]
    8. Applied times-frac9.0

      \[\leadsto x \cdot \color{blue}{\left(\frac{1}{\sqrt[3]{z} \cdot \sqrt[3]{z}} \cdot \frac{y}{\sqrt[3]{z}}\right)} + x \cdot \left(-\frac{t}{1 - z}\right)\]
    9. Applied associate-*r*5.8

      \[\leadsto \color{blue}{\left(x \cdot \frac{1}{\sqrt[3]{z} \cdot \sqrt[3]{z}}\right) \cdot \frac{y}{\sqrt[3]{z}}} + x \cdot \left(-\frac{t}{1 - z}\right)\]
    10. Simplified5.8

      \[\leadsto \color{blue}{\frac{x}{\sqrt[3]{z} \cdot \sqrt[3]{z}}} \cdot \frac{y}{\sqrt[3]{z}} + x \cdot \left(-\frac{t}{1 - z}\right)\]
    11. Using strategy rm
    12. Applied *-un-lft-identity5.8

      \[\leadsto \color{blue}{\left(1 \cdot \frac{x}{\sqrt[3]{z} \cdot \sqrt[3]{z}}\right)} \cdot \frac{y}{\sqrt[3]{z}} + x \cdot \left(-\frac{t}{1 - z}\right)\]
    13. Applied associate-*l*5.8

      \[\leadsto \color{blue}{1 \cdot \left(\frac{x}{\sqrt[3]{z} \cdot \sqrt[3]{z}} \cdot \frac{y}{\sqrt[3]{z}}\right)} + x \cdot \left(-\frac{t}{1 - z}\right)\]
    14. Simplified4.0

      \[\leadsto 1 \cdot \color{blue}{\frac{x \cdot y}{z}} + x \cdot \left(-\frac{t}{1 - z}\right)\]
  3. Recombined 2 regimes into one program.
  4. Final simplification4.1

    \[\leadsto \begin{array}{l} \mathbf{if}\;z \le -1.07919684621796776 \cdot 10^{42} \lor \neg \left(z \le 8.29522319553782105 \cdot 10^{-200}\right):\\ \;\;\;\;\frac{x}{\sqrt[3]{z} \cdot \sqrt[3]{z}} \cdot \frac{y}{\sqrt[3]{z}} + x \cdot \left(-\frac{t}{1 - z}\right)\\ \mathbf{else}:\\ \;\;\;\;1 \cdot \frac{x \cdot y}{z} + x \cdot \left(-\frac{t}{1 - z}\right)\\ \end{array}\]

Reproduce

herbie shell --seed 2020089 
(FPCore (x y z t)
  :name "Numeric.SpecFunctions:invIncompleteBetaWorker from math-functions-0.1.5.2, C"
  :precision binary64

  :herbie-target
  (if (< (* x (- (/ y z) (/ t (- 1 z)))) -7.623226303312042e-196) (* x (- (/ y z) (* t (/ 1 (- 1 z))))) (if (< (* x (- (/ y z) (/ t (- 1 z)))) 1.4133944927702302e-211) (+ (/ (* y x) z) (- (/ (* t x) (- 1 z)))) (* x (- (/ y z) (* t (/ 1 (- 1 z)))))))

  (* x (- (/ y z) (/ t (- 1 z)))))