
(FPCore (a b c) :precision binary64 (/ (+ (- b) (sqrt (- (* b b) (* (* 3.0 a) c)))) (* 3.0 a)))
double code(double a, double b, double c) {
return (-b + sqrt(((b * b) - ((3.0 * a) * c)))) / (3.0 * a);
}
real(8) function code(a, b, c)
real(8), intent (in) :: a
real(8), intent (in) :: b
real(8), intent (in) :: c
code = (-b + sqrt(((b * b) - ((3.0d0 * a) * c)))) / (3.0d0 * a)
end function
public static double code(double a, double b, double c) {
return (-b + Math.sqrt(((b * b) - ((3.0 * a) * c)))) / (3.0 * a);
}
def code(a, b, c): return (-b + math.sqrt(((b * b) - ((3.0 * a) * c)))) / (3.0 * a)
function code(a, b, c) return Float64(Float64(Float64(-b) + sqrt(Float64(Float64(b * b) - Float64(Float64(3.0 * a) * c)))) / Float64(3.0 * a)) end
function tmp = code(a, b, c) tmp = (-b + sqrt(((b * b) - ((3.0 * a) * c)))) / (3.0 * a); end
code[a_, b_, c_] := N[(N[((-b) + N[Sqrt[N[(N[(b * b), $MachinePrecision] - N[(N[(3.0 * a), $MachinePrecision] * c), $MachinePrecision]), $MachinePrecision]], $MachinePrecision]), $MachinePrecision] / N[(3.0 * a), $MachinePrecision]), $MachinePrecision]
\begin{array}{l}
\\
\frac{\left(-b\right) + \sqrt{b \cdot b - \left(3 \cdot a\right) \cdot c}}{3 \cdot a}
\end{array}
Sampling outcomes in binary64 precision:
Herbie found 9 alternatives:
| Alternative | Accuracy | Speedup |
|---|
(FPCore (a b c) :precision binary64 (/ (+ (- b) (sqrt (- (* b b) (* (* 3.0 a) c)))) (* 3.0 a)))
double code(double a, double b, double c) {
return (-b + sqrt(((b * b) - ((3.0 * a) * c)))) / (3.0 * a);
}
real(8) function code(a, b, c)
real(8), intent (in) :: a
real(8), intent (in) :: b
real(8), intent (in) :: c
code = (-b + sqrt(((b * b) - ((3.0d0 * a) * c)))) / (3.0d0 * a)
end function
public static double code(double a, double b, double c) {
return (-b + Math.sqrt(((b * b) - ((3.0 * a) * c)))) / (3.0 * a);
}
def code(a, b, c): return (-b + math.sqrt(((b * b) - ((3.0 * a) * c)))) / (3.0 * a)
function code(a, b, c) return Float64(Float64(Float64(-b) + sqrt(Float64(Float64(b * b) - Float64(Float64(3.0 * a) * c)))) / Float64(3.0 * a)) end
function tmp = code(a, b, c) tmp = (-b + sqrt(((b * b) - ((3.0 * a) * c)))) / (3.0 * a); end
code[a_, b_, c_] := N[(N[((-b) + N[Sqrt[N[(N[(b * b), $MachinePrecision] - N[(N[(3.0 * a), $MachinePrecision] * c), $MachinePrecision]), $MachinePrecision]], $MachinePrecision]), $MachinePrecision] / N[(3.0 * a), $MachinePrecision]), $MachinePrecision]
\begin{array}{l}
\\
\frac{\left(-b\right) + \sqrt{b \cdot b - \left(3 \cdot a\right) \cdot c}}{3 \cdot a}
\end{array}
(FPCore (a b c) :precision binary64 (/ (/ (+ (- (pow (- b) 2.0) (pow b 2.0)) (* c (* a 3.0))) (- (- b) (sqrt (+ (pow b 2.0) (* -3.0 (* c a)))))) (* a 3.0)))
double code(double a, double b, double c) {
return (((pow(-b, 2.0) - pow(b, 2.0)) + (c * (a * 3.0))) / (-b - sqrt((pow(b, 2.0) + (-3.0 * (c * a)))))) / (a * 3.0);
}
real(8) function code(a, b, c)
real(8), intent (in) :: a
real(8), intent (in) :: b
real(8), intent (in) :: c
code = ((((-b ** 2.0d0) - (b ** 2.0d0)) + (c * (a * 3.0d0))) / (-b - sqrt(((b ** 2.0d0) + ((-3.0d0) * (c * a)))))) / (a * 3.0d0)
end function
public static double code(double a, double b, double c) {
return (((Math.pow(-b, 2.0) - Math.pow(b, 2.0)) + (c * (a * 3.0))) / (-b - Math.sqrt((Math.pow(b, 2.0) + (-3.0 * (c * a)))))) / (a * 3.0);
}
def code(a, b, c): return (((math.pow(-b, 2.0) - math.pow(b, 2.0)) + (c * (a * 3.0))) / (-b - math.sqrt((math.pow(b, 2.0) + (-3.0 * (c * a)))))) / (a * 3.0)
function code(a, b, c) return Float64(Float64(Float64(Float64((Float64(-b) ^ 2.0) - (b ^ 2.0)) + Float64(c * Float64(a * 3.0))) / Float64(Float64(-b) - sqrt(Float64((b ^ 2.0) + Float64(-3.0 * Float64(c * a)))))) / Float64(a * 3.0)) end
function tmp = code(a, b, c) tmp = ((((-b ^ 2.0) - (b ^ 2.0)) + (c * (a * 3.0))) / (-b - sqrt(((b ^ 2.0) + (-3.0 * (c * a)))))) / (a * 3.0); end
code[a_, b_, c_] := N[(N[(N[(N[(N[Power[(-b), 2.0], $MachinePrecision] - N[Power[b, 2.0], $MachinePrecision]), $MachinePrecision] + N[(c * N[(a * 3.0), $MachinePrecision]), $MachinePrecision]), $MachinePrecision] / N[((-b) - N[Sqrt[N[(N[Power[b, 2.0], $MachinePrecision] + N[(-3.0 * N[(c * a), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]], $MachinePrecision]), $MachinePrecision]), $MachinePrecision] / N[(a * 3.0), $MachinePrecision]), $MachinePrecision]
\begin{array}{l}
\\
\frac{\frac{\left({\left(-b\right)}^{2} - {b}^{2}\right) + c \cdot \left(a \cdot 3\right)}{\left(-b\right) - \sqrt{{b}^{2} + -3 \cdot \left(c \cdot a\right)}}}{a \cdot 3}
\end{array}
Initial program 35.2%
log1p-expm1-u21.4%
log1p-udef15.1%
associate-*l*15.1%
Applied egg-rr15.1%
flip-+14.9%
pow214.9%
add-sqr-sqrt15.2%
pow215.2%
log1p-def19.1%
log1p-expm1-u19.1%
pow219.1%
log1p-def21.9%
log1p-expm1-u35.9%
Applied egg-rr35.9%
associate--r-99.1%
associate-*r*99.3%
*-commutative99.3%
associate-*l*99.1%
cancel-sign-sub-inv99.1%
metadata-eval99.1%
Simplified99.1%
associate-*r*99.3%
*-commutative99.3%
associate-*r*99.1%
add-log-exp39.1%
associate-*r*39.1%
exp-prod24.2%
exp-prod24.2%
Applied egg-rr24.2%
log-pow46.7%
log-pow99.3%
rem-log-exp99.3%
Simplified99.3%
Final simplification99.3%
(FPCore (a b c) :precision binary64 (/ (/ (+ (- (pow (- b) 2.0) (pow b 2.0)) (* 3.0 (* c a))) (- (- b) (sqrt (+ (pow b 2.0) (* -3.0 (* c a)))))) (* a 3.0)))
double code(double a, double b, double c) {
return (((pow(-b, 2.0) - pow(b, 2.0)) + (3.0 * (c * a))) / (-b - sqrt((pow(b, 2.0) + (-3.0 * (c * a)))))) / (a * 3.0);
}
real(8) function code(a, b, c)
real(8), intent (in) :: a
real(8), intent (in) :: b
real(8), intent (in) :: c
code = ((((-b ** 2.0d0) - (b ** 2.0d0)) + (3.0d0 * (c * a))) / (-b - sqrt(((b ** 2.0d0) + ((-3.0d0) * (c * a)))))) / (a * 3.0d0)
end function
public static double code(double a, double b, double c) {
return (((Math.pow(-b, 2.0) - Math.pow(b, 2.0)) + (3.0 * (c * a))) / (-b - Math.sqrt((Math.pow(b, 2.0) + (-3.0 * (c * a)))))) / (a * 3.0);
}
def code(a, b, c): return (((math.pow(-b, 2.0) - math.pow(b, 2.0)) + (3.0 * (c * a))) / (-b - math.sqrt((math.pow(b, 2.0) + (-3.0 * (c * a)))))) / (a * 3.0)
function code(a, b, c) return Float64(Float64(Float64(Float64((Float64(-b) ^ 2.0) - (b ^ 2.0)) + Float64(3.0 * Float64(c * a))) / Float64(Float64(-b) - sqrt(Float64((b ^ 2.0) + Float64(-3.0 * Float64(c * a)))))) / Float64(a * 3.0)) end
function tmp = code(a, b, c) tmp = ((((-b ^ 2.0) - (b ^ 2.0)) + (3.0 * (c * a))) / (-b - sqrt(((b ^ 2.0) + (-3.0 * (c * a)))))) / (a * 3.0); end
code[a_, b_, c_] := N[(N[(N[(N[(N[Power[(-b), 2.0], $MachinePrecision] - N[Power[b, 2.0], $MachinePrecision]), $MachinePrecision] + N[(3.0 * N[(c * a), $MachinePrecision]), $MachinePrecision]), $MachinePrecision] / N[((-b) - N[Sqrt[N[(N[Power[b, 2.0], $MachinePrecision] + N[(-3.0 * N[(c * a), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]], $MachinePrecision]), $MachinePrecision]), $MachinePrecision] / N[(a * 3.0), $MachinePrecision]), $MachinePrecision]
\begin{array}{l}
\\
\frac{\frac{\left({\left(-b\right)}^{2} - {b}^{2}\right) + 3 \cdot \left(c \cdot a\right)}{\left(-b\right) - \sqrt{{b}^{2} + -3 \cdot \left(c \cdot a\right)}}}{a \cdot 3}
\end{array}
Initial program 35.2%
log1p-expm1-u21.4%
log1p-udef15.1%
associate-*l*15.1%
Applied egg-rr15.1%
flip-+14.9%
pow214.9%
add-sqr-sqrt15.2%
pow215.2%
log1p-def19.1%
log1p-expm1-u19.1%
pow219.1%
log1p-def21.9%
log1p-expm1-u35.9%
Applied egg-rr35.9%
associate--r-99.1%
associate-*r*99.3%
*-commutative99.3%
associate-*l*99.1%
cancel-sign-sub-inv99.1%
metadata-eval99.1%
Simplified99.1%
Taylor expanded in a around 0 99.1%
*-commutative99.1%
Simplified99.1%
Final simplification99.1%
(FPCore (a b c) :precision binary64 (/ (/ (+ (- (pow (- b) 2.0) (pow b 2.0)) (* a (* c 3.0))) (- (- b) (sqrt (+ (pow b 2.0) (* -3.0 (* c a)))))) (* a 3.0)))
double code(double a, double b, double c) {
return (((pow(-b, 2.0) - pow(b, 2.0)) + (a * (c * 3.0))) / (-b - sqrt((pow(b, 2.0) + (-3.0 * (c * a)))))) / (a * 3.0);
}
real(8) function code(a, b, c)
real(8), intent (in) :: a
real(8), intent (in) :: b
real(8), intent (in) :: c
code = ((((-b ** 2.0d0) - (b ** 2.0d0)) + (a * (c * 3.0d0))) / (-b - sqrt(((b ** 2.0d0) + ((-3.0d0) * (c * a)))))) / (a * 3.0d0)
end function
public static double code(double a, double b, double c) {
return (((Math.pow(-b, 2.0) - Math.pow(b, 2.0)) + (a * (c * 3.0))) / (-b - Math.sqrt((Math.pow(b, 2.0) + (-3.0 * (c * a)))))) / (a * 3.0);
}
def code(a, b, c): return (((math.pow(-b, 2.0) - math.pow(b, 2.0)) + (a * (c * 3.0))) / (-b - math.sqrt((math.pow(b, 2.0) + (-3.0 * (c * a)))))) / (a * 3.0)
function code(a, b, c) return Float64(Float64(Float64(Float64((Float64(-b) ^ 2.0) - (b ^ 2.0)) + Float64(a * Float64(c * 3.0))) / Float64(Float64(-b) - sqrt(Float64((b ^ 2.0) + Float64(-3.0 * Float64(c * a)))))) / Float64(a * 3.0)) end
function tmp = code(a, b, c) tmp = ((((-b ^ 2.0) - (b ^ 2.0)) + (a * (c * 3.0))) / (-b - sqrt(((b ^ 2.0) + (-3.0 * (c * a)))))) / (a * 3.0); end
code[a_, b_, c_] := N[(N[(N[(N[(N[Power[(-b), 2.0], $MachinePrecision] - N[Power[b, 2.0], $MachinePrecision]), $MachinePrecision] + N[(a * N[(c * 3.0), $MachinePrecision]), $MachinePrecision]), $MachinePrecision] / N[((-b) - N[Sqrt[N[(N[Power[b, 2.0], $MachinePrecision] + N[(-3.0 * N[(c * a), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]], $MachinePrecision]), $MachinePrecision]), $MachinePrecision] / N[(a * 3.0), $MachinePrecision]), $MachinePrecision]
\begin{array}{l}
\\
\frac{\frac{\left({\left(-b\right)}^{2} - {b}^{2}\right) + a \cdot \left(c \cdot 3\right)}{\left(-b\right) - \sqrt{{b}^{2} + -3 \cdot \left(c \cdot a\right)}}}{a \cdot 3}
\end{array}
Initial program 35.2%
log1p-expm1-u21.4%
log1p-udef15.1%
associate-*l*15.1%
Applied egg-rr15.1%
flip-+14.9%
pow214.9%
add-sqr-sqrt15.2%
pow215.2%
log1p-def19.1%
log1p-expm1-u19.1%
pow219.1%
log1p-def21.9%
log1p-expm1-u35.9%
Applied egg-rr35.9%
associate--r-99.1%
associate-*r*99.3%
*-commutative99.3%
associate-*l*99.1%
cancel-sign-sub-inv99.1%
metadata-eval99.1%
Simplified99.1%
Final simplification99.1%
(FPCore (a b c) :precision binary64 (pow (+ (* -2.0 (/ b c)) (* 1.5 (/ a b))) -1.0))
double code(double a, double b, double c) {
return pow(((-2.0 * (b / c)) + (1.5 * (a / b))), -1.0);
}
real(8) function code(a, b, c)
real(8), intent (in) :: a
real(8), intent (in) :: b
real(8), intent (in) :: c
code = (((-2.0d0) * (b / c)) + (1.5d0 * (a / b))) ** (-1.0d0)
end function
public static double code(double a, double b, double c) {
return Math.pow(((-2.0 * (b / c)) + (1.5 * (a / b))), -1.0);
}
def code(a, b, c): return math.pow(((-2.0 * (b / c)) + (1.5 * (a / b))), -1.0)
function code(a, b, c) return Float64(Float64(-2.0 * Float64(b / c)) + Float64(1.5 * Float64(a / b))) ^ -1.0 end
function tmp = code(a, b, c) tmp = ((-2.0 * (b / c)) + (1.5 * (a / b))) ^ -1.0; end
code[a_, b_, c_] := N[Power[N[(N[(-2.0 * N[(b / c), $MachinePrecision]), $MachinePrecision] + N[(1.5 * N[(a / b), $MachinePrecision]), $MachinePrecision]), $MachinePrecision], -1.0], $MachinePrecision]
\begin{array}{l}
\\
{\left(-2 \cdot \frac{b}{c} + 1.5 \cdot \frac{a}{b}\right)}^{-1}
\end{array}
Initial program 35.2%
log1p-expm1-u21.4%
log1p-udef15.1%
associate-*l*15.1%
Applied egg-rr15.1%
clear-num15.1%
inv-pow15.1%
*-commutative15.1%
neg-mul-115.1%
fma-def15.1%
pow215.1%
log1p-def21.4%
log1p-expm1-u35.2%
Applied egg-rr35.2%
Taylor expanded in b around inf 88.5%
Final simplification88.5%
(FPCore (a b c) :precision binary64 (/ 1.0 (fma -2.0 (/ b c) (/ (* a 1.5) b))))
double code(double a, double b, double c) {
return 1.0 / fma(-2.0, (b / c), ((a * 1.5) / b));
}
function code(a, b, c) return Float64(1.0 / fma(-2.0, Float64(b / c), Float64(Float64(a * 1.5) / b))) end
code[a_, b_, c_] := N[(1.0 / N[(-2.0 * N[(b / c), $MachinePrecision] + N[(N[(a * 1.5), $MachinePrecision] / b), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]
\begin{array}{l}
\\
\frac{1}{\mathsf{fma}\left(-2, \frac{b}{c}, \frac{a \cdot 1.5}{b}\right)}
\end{array}
Initial program 35.2%
log1p-expm1-u21.4%
log1p-udef15.1%
associate-*l*15.1%
Applied egg-rr15.1%
clear-num15.1%
inv-pow15.1%
*-commutative15.1%
neg-mul-115.1%
fma-def15.1%
pow215.1%
log1p-def21.4%
log1p-expm1-u35.2%
Applied egg-rr35.2%
Taylor expanded in b around inf 88.5%
expm1-log1p-u78.6%
expm1-udef37.7%
unpow-137.7%
fma-def37.7%
associate-*r/37.7%
Applied egg-rr37.7%
expm1-def78.6%
expm1-log1p88.5%
*-commutative88.5%
Simplified88.5%
Final simplification88.5%
(FPCore (a b c) :precision binary64 (* c (/ -0.5 b)))
double code(double a, double b, double c) {
return c * (-0.5 / b);
}
real(8) function code(a, b, c)
real(8), intent (in) :: a
real(8), intent (in) :: b
real(8), intent (in) :: c
code = c * ((-0.5d0) / b)
end function
public static double code(double a, double b, double c) {
return c * (-0.5 / b);
}
def code(a, b, c): return c * (-0.5 / b)
function code(a, b, c) return Float64(c * Float64(-0.5 / b)) end
function tmp = code(a, b, c) tmp = c * (-0.5 / b); end
code[a_, b_, c_] := N[(c * N[(-0.5 / b), $MachinePrecision]), $MachinePrecision]
\begin{array}{l}
\\
c \cdot \frac{-0.5}{b}
\end{array}
Initial program 35.2%
Taylor expanded in b around inf 78.1%
associate-*r/78.1%
associate-/l*77.9%
Simplified77.9%
associate-/r/77.9%
Applied egg-rr77.9%
Final simplification77.9%
(FPCore (a b c) :precision binary64 (/ -0.5 (/ b c)))
double code(double a, double b, double c) {
return -0.5 / (b / c);
}
real(8) function code(a, b, c)
real(8), intent (in) :: a
real(8), intent (in) :: b
real(8), intent (in) :: c
code = (-0.5d0) / (b / c)
end function
public static double code(double a, double b, double c) {
return -0.5 / (b / c);
}
def code(a, b, c): return -0.5 / (b / c)
function code(a, b, c) return Float64(-0.5 / Float64(b / c)) end
function tmp = code(a, b, c) tmp = -0.5 / (b / c); end
code[a_, b_, c_] := N[(-0.5 / N[(b / c), $MachinePrecision]), $MachinePrecision]
\begin{array}{l}
\\
\frac{-0.5}{\frac{b}{c}}
\end{array}
Initial program 35.2%
Taylor expanded in b around inf 78.1%
associate-*r/78.1%
associate-/l*77.9%
Simplified77.9%
Final simplification77.9%
(FPCore (a b c) :precision binary64 (/ (* c -0.5) b))
double code(double a, double b, double c) {
return (c * -0.5) / b;
}
real(8) function code(a, b, c)
real(8), intent (in) :: a
real(8), intent (in) :: b
real(8), intent (in) :: c
code = (c * (-0.5d0)) / b
end function
public static double code(double a, double b, double c) {
return (c * -0.5) / b;
}
def code(a, b, c): return (c * -0.5) / b
function code(a, b, c) return Float64(Float64(c * -0.5) / b) end
function tmp = code(a, b, c) tmp = (c * -0.5) / b; end
code[a_, b_, c_] := N[(N[(c * -0.5), $MachinePrecision] / b), $MachinePrecision]
\begin{array}{l}
\\
\frac{c \cdot -0.5}{b}
\end{array}
Initial program 35.2%
Taylor expanded in b around inf 78.1%
associate-*r/78.1%
Simplified78.1%
Final simplification78.1%
(FPCore (a b c) :precision binary64 (/ 0.0 a))
double code(double a, double b, double c) {
return 0.0 / a;
}
real(8) function code(a, b, c)
real(8), intent (in) :: a
real(8), intent (in) :: b
real(8), intent (in) :: c
code = 0.0d0 / a
end function
public static double code(double a, double b, double c) {
return 0.0 / a;
}
def code(a, b, c): return 0.0 / a
function code(a, b, c) return Float64(0.0 / a) end
function tmp = code(a, b, c) tmp = 0.0 / a; end
code[a_, b_, c_] := N[(0.0 / a), $MachinePrecision]
\begin{array}{l}
\\
\frac{0}{a}
\end{array}
Initial program 35.2%
log1p-expm1-u21.4%
log1p-udef15.1%
associate-*l*15.1%
Applied egg-rr15.1%
clear-num15.1%
inv-pow15.1%
*-commutative15.1%
neg-mul-115.1%
fma-def15.1%
pow215.1%
log1p-def21.4%
log1p-expm1-u35.2%
Applied egg-rr35.2%
Taylor expanded in a around 0 3.2%
associate-*r/3.2%
distribute-rgt1-in3.2%
metadata-eval3.2%
mul0-lft3.2%
metadata-eval3.2%
Simplified3.2%
Final simplification3.2%
herbie shell --seed 2024024
(FPCore (a b c)
:name "Cubic critical, medium range"
:precision binary64
:pre (and (and (and (< 1.1102230246251565e-16 a) (< a 9007199254740992.0)) (and (< 1.1102230246251565e-16 b) (< b 9007199254740992.0))) (and (< 1.1102230246251565e-16 c) (< c 9007199254740992.0)))
(/ (+ (- b) (sqrt (- (* b b) (* (* 3.0 a) c)))) (* 3.0 a)))