Average Error: 36.6 → 33.0
Time: 16.1s
Precision: 64
\[\sqrt[3]{\frac{1}{2 \cdot a} \cdot \left(\left(-g\right) + \sqrt{g \cdot g - h \cdot h}\right)} + \sqrt[3]{\frac{1}{2 \cdot a} \cdot \left(\left(-g\right) - \sqrt{g \cdot g - h \cdot h}\right)}\]
\[\sqrt[3]{\frac{1}{2 \cdot a}} \cdot \sqrt[3]{\sqrt{g \cdot g - h \cdot h} - g} + \sqrt[3]{\frac{1}{2 \cdot a}} \cdot \sqrt[3]{\left(-g\right) - \sqrt{g \cdot g - h \cdot h}}\]
\sqrt[3]{\frac{1}{2 \cdot a} \cdot \left(\left(-g\right) + \sqrt{g \cdot g - h \cdot h}\right)} + \sqrt[3]{\frac{1}{2 \cdot a} \cdot \left(\left(-g\right) - \sqrt{g \cdot g - h \cdot h}\right)}
\sqrt[3]{\frac{1}{2 \cdot a}} \cdot \sqrt[3]{\sqrt{g \cdot g - h \cdot h} - g} + \sqrt[3]{\frac{1}{2 \cdot a}} \cdot \sqrt[3]{\left(-g\right) - \sqrt{g \cdot g - h \cdot h}}
double f(double g, double h, double a) {
        double r192178 = 1.0;
        double r192179 = 2.0;
        double r192180 = a;
        double r192181 = r192179 * r192180;
        double r192182 = r192178 / r192181;
        double r192183 = g;
        double r192184 = -r192183;
        double r192185 = r192183 * r192183;
        double r192186 = h;
        double r192187 = r192186 * r192186;
        double r192188 = r192185 - r192187;
        double r192189 = sqrt(r192188);
        double r192190 = r192184 + r192189;
        double r192191 = r192182 * r192190;
        double r192192 = cbrt(r192191);
        double r192193 = r192184 - r192189;
        double r192194 = r192182 * r192193;
        double r192195 = cbrt(r192194);
        double r192196 = r192192 + r192195;
        return r192196;
}

double f(double g, double h, double a) {
        double r192197 = 1.0;
        double r192198 = 2.0;
        double r192199 = a;
        double r192200 = r192198 * r192199;
        double r192201 = r192197 / r192200;
        double r192202 = cbrt(r192201);
        double r192203 = g;
        double r192204 = r192203 * r192203;
        double r192205 = h;
        double r192206 = r192205 * r192205;
        double r192207 = r192204 - r192206;
        double r192208 = sqrt(r192207);
        double r192209 = r192208 - r192203;
        double r192210 = cbrt(r192209);
        double r192211 = r192202 * r192210;
        double r192212 = -r192203;
        double r192213 = r192212 - r192208;
        double r192214 = cbrt(r192213);
        double r192215 = r192202 * r192214;
        double r192216 = r192211 + r192215;
        return r192216;
}

Error

Bits error versus g

Bits error versus h

Bits error versus a

Try it out

Your Program's Arguments

Results

Enter valid numbers for all inputs

Derivation

  1. Initial program 36.6

    \[\sqrt[3]{\frac{1}{2 \cdot a} \cdot \left(\left(-g\right) + \sqrt{g \cdot g - h \cdot h}\right)} + \sqrt[3]{\frac{1}{2 \cdot a} \cdot \left(\left(-g\right) - \sqrt{g \cdot g - h \cdot h}\right)}\]
  2. Simplified36.6

    \[\leadsto \color{blue}{\sqrt[3]{\frac{1}{2 \cdot a} \cdot \left(\sqrt{g \cdot g - h \cdot h} - g\right)} + \sqrt[3]{\frac{1}{2 \cdot a} \cdot \left(\left(-g\right) - \sqrt{g \cdot g - h \cdot h}\right)}}\]
  3. Using strategy rm
  4. Applied cbrt-prod34.7

    \[\leadsto \color{blue}{\sqrt[3]{\frac{1}{2 \cdot a}} \cdot \sqrt[3]{\sqrt{g \cdot g - h \cdot h} - g}} + \sqrt[3]{\frac{1}{2 \cdot a} \cdot \left(\left(-g\right) - \sqrt{g \cdot g - h \cdot h}\right)}\]
  5. Using strategy rm
  6. Applied cbrt-prod33.0

    \[\leadsto \sqrt[3]{\frac{1}{2 \cdot a}} \cdot \sqrt[3]{\sqrt{g \cdot g - h \cdot h} - g} + \color{blue}{\sqrt[3]{\frac{1}{2 \cdot a}} \cdot \sqrt[3]{\left(-g\right) - \sqrt{g \cdot g - h \cdot h}}}\]
  7. Final simplification33.0

    \[\leadsto \sqrt[3]{\frac{1}{2 \cdot a}} \cdot \sqrt[3]{\sqrt{g \cdot g - h \cdot h} - g} + \sqrt[3]{\frac{1}{2 \cdot a}} \cdot \sqrt[3]{\left(-g\right) - \sqrt{g \cdot g - h \cdot h}}\]

Reproduce

herbie shell --seed 2020047 +o rules:numerics
(FPCore (g h a)
  :name "2-ancestry mixing, positive discriminant"
  :precision binary64
  (+ (cbrt (* (/ 1 (* 2 a)) (+ (- g) (sqrt (- (* g g) (* h h)))))) (cbrt (* (/ 1 (* 2 a)) (- (- g) (sqrt (- (* g g) (* h h))))))))