
(FPCore (a b) :precision binary64 (- (+ (pow (+ (* a a) (* b b)) 2.0) (* 4.0 (+ (* (* a a) (- 1.0 a)) (* (* b b) (+ 3.0 a))))) 1.0))
double code(double a, double b) {
return (pow(((a * a) + (b * b)), 2.0) + (4.0 * (((a * a) * (1.0 - a)) + ((b * b) * (3.0 + a))))) - 1.0;
}
real(8) function code(a, b)
real(8), intent (in) :: a
real(8), intent (in) :: b
code = ((((a * a) + (b * b)) ** 2.0d0) + (4.0d0 * (((a * a) * (1.0d0 - a)) + ((b * b) * (3.0d0 + a))))) - 1.0d0
end function
public static double code(double a, double b) {
return (Math.pow(((a * a) + (b * b)), 2.0) + (4.0 * (((a * a) * (1.0 - a)) + ((b * b) * (3.0 + a))))) - 1.0;
}
def code(a, b): return (math.pow(((a * a) + (b * b)), 2.0) + (4.0 * (((a * a) * (1.0 - a)) + ((b * b) * (3.0 + a))))) - 1.0
function code(a, b) return Float64(Float64((Float64(Float64(a * a) + Float64(b * b)) ^ 2.0) + Float64(4.0 * Float64(Float64(Float64(a * a) * Float64(1.0 - a)) + Float64(Float64(b * b) * Float64(3.0 + a))))) - 1.0) end
function tmp = code(a, b) tmp = ((((a * a) + (b * b)) ^ 2.0) + (4.0 * (((a * a) * (1.0 - a)) + ((b * b) * (3.0 + a))))) - 1.0; end
code[a_, b_] := N[(N[(N[Power[N[(N[(a * a), $MachinePrecision] + N[(b * b), $MachinePrecision]), $MachinePrecision], 2.0], $MachinePrecision] + N[(4.0 * N[(N[(N[(a * a), $MachinePrecision] * N[(1.0 - a), $MachinePrecision]), $MachinePrecision] + N[(N[(b * b), $MachinePrecision] * N[(3.0 + a), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]), $MachinePrecision] - 1.0), $MachinePrecision]
\begin{array}{l}
\\
\left({\left(a \cdot a + b \cdot b\right)}^{2} + 4 \cdot \left(\left(a \cdot a\right) \cdot \left(1 - a\right) + \left(b \cdot b\right) \cdot \left(3 + a\right)\right)\right) - 1
\end{array}
Sampling outcomes in binary64 precision:
Herbie found 7 alternatives:
| Alternative | Accuracy | Speedup |
|---|
(FPCore (a b) :precision binary64 (- (+ (pow (+ (* a a) (* b b)) 2.0) (* 4.0 (+ (* (* a a) (- 1.0 a)) (* (* b b) (+ 3.0 a))))) 1.0))
double code(double a, double b) {
return (pow(((a * a) + (b * b)), 2.0) + (4.0 * (((a * a) * (1.0 - a)) + ((b * b) * (3.0 + a))))) - 1.0;
}
real(8) function code(a, b)
real(8), intent (in) :: a
real(8), intent (in) :: b
code = ((((a * a) + (b * b)) ** 2.0d0) + (4.0d0 * (((a * a) * (1.0d0 - a)) + ((b * b) * (3.0d0 + a))))) - 1.0d0
end function
public static double code(double a, double b) {
return (Math.pow(((a * a) + (b * b)), 2.0) + (4.0 * (((a * a) * (1.0 - a)) + ((b * b) * (3.0 + a))))) - 1.0;
}
def code(a, b): return (math.pow(((a * a) + (b * b)), 2.0) + (4.0 * (((a * a) * (1.0 - a)) + ((b * b) * (3.0 + a))))) - 1.0
function code(a, b) return Float64(Float64((Float64(Float64(a * a) + Float64(b * b)) ^ 2.0) + Float64(4.0 * Float64(Float64(Float64(a * a) * Float64(1.0 - a)) + Float64(Float64(b * b) * Float64(3.0 + a))))) - 1.0) end
function tmp = code(a, b) tmp = ((((a * a) + (b * b)) ^ 2.0) + (4.0 * (((a * a) * (1.0 - a)) + ((b * b) * (3.0 + a))))) - 1.0; end
code[a_, b_] := N[(N[(N[Power[N[(N[(a * a), $MachinePrecision] + N[(b * b), $MachinePrecision]), $MachinePrecision], 2.0], $MachinePrecision] + N[(4.0 * N[(N[(N[(a * a), $MachinePrecision] * N[(1.0 - a), $MachinePrecision]), $MachinePrecision] + N[(N[(b * b), $MachinePrecision] * N[(3.0 + a), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]), $MachinePrecision] - 1.0), $MachinePrecision]
\begin{array}{l}
\\
\left({\left(a \cdot a + b \cdot b\right)}^{2} + 4 \cdot \left(\left(a \cdot a\right) \cdot \left(1 - a\right) + \left(b \cdot b\right) \cdot \left(3 + a\right)\right)\right) - 1
\end{array}
(FPCore (a b) :precision binary64 (+ (+ (pow (+ (* a a) (* b b)) 2.0) (* 4.0 (+ (* a a) (* (* b b) 3.0)))) -1.0))
double code(double a, double b) {
return (pow(((a * a) + (b * b)), 2.0) + (4.0 * ((a * a) + ((b * b) * 3.0)))) + -1.0;
}
real(8) function code(a, b)
real(8), intent (in) :: a
real(8), intent (in) :: b
code = ((((a * a) + (b * b)) ** 2.0d0) + (4.0d0 * ((a * a) + ((b * b) * 3.0d0)))) + (-1.0d0)
end function
public static double code(double a, double b) {
return (Math.pow(((a * a) + (b * b)), 2.0) + (4.0 * ((a * a) + ((b * b) * 3.0)))) + -1.0;
}
def code(a, b): return (math.pow(((a * a) + (b * b)), 2.0) + (4.0 * ((a * a) + ((b * b) * 3.0)))) + -1.0
function code(a, b) return Float64(Float64((Float64(Float64(a * a) + Float64(b * b)) ^ 2.0) + Float64(4.0 * Float64(Float64(a * a) + Float64(Float64(b * b) * 3.0)))) + -1.0) end
function tmp = code(a, b) tmp = ((((a * a) + (b * b)) ^ 2.0) + (4.0 * ((a * a) + ((b * b) * 3.0)))) + -1.0; end
code[a_, b_] := N[(N[(N[Power[N[(N[(a * a), $MachinePrecision] + N[(b * b), $MachinePrecision]), $MachinePrecision], 2.0], $MachinePrecision] + N[(4.0 * N[(N[(a * a), $MachinePrecision] + N[(N[(b * b), $MachinePrecision] * 3.0), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]), $MachinePrecision] + -1.0), $MachinePrecision]
\begin{array}{l}
\\
\left({\left(a \cdot a + b \cdot b\right)}^{2} + 4 \cdot \left(a \cdot a + \left(b \cdot b\right) \cdot 3\right)\right) + -1
\end{array}
Initial program 75.3%
Taylor expanded in a around 0 92.6%
Taylor expanded in a around 0 99.6%
Final simplification99.6%
(FPCore (a b) :precision binary64 (if (or (<= a -265000.0) (not (<= a 14500000.0))) (* (pow a 4.0) (- 1.0 (/ 4.0 a))) (+ (+ (* (* b b) 12.0) (pow b 4.0)) -1.0)))
double code(double a, double b) {
double tmp;
if ((a <= -265000.0) || !(a <= 14500000.0)) {
tmp = pow(a, 4.0) * (1.0 - (4.0 / a));
} else {
tmp = (((b * b) * 12.0) + pow(b, 4.0)) + -1.0;
}
return tmp;
}
real(8) function code(a, b)
real(8), intent (in) :: a
real(8), intent (in) :: b
real(8) :: tmp
if ((a <= (-265000.0d0)) .or. (.not. (a <= 14500000.0d0))) then
tmp = (a ** 4.0d0) * (1.0d0 - (4.0d0 / a))
else
tmp = (((b * b) * 12.0d0) + (b ** 4.0d0)) + (-1.0d0)
end if
code = tmp
end function
public static double code(double a, double b) {
double tmp;
if ((a <= -265000.0) || !(a <= 14500000.0)) {
tmp = Math.pow(a, 4.0) * (1.0 - (4.0 / a));
} else {
tmp = (((b * b) * 12.0) + Math.pow(b, 4.0)) + -1.0;
}
return tmp;
}
def code(a, b): tmp = 0 if (a <= -265000.0) or not (a <= 14500000.0): tmp = math.pow(a, 4.0) * (1.0 - (4.0 / a)) else: tmp = (((b * b) * 12.0) + math.pow(b, 4.0)) + -1.0 return tmp
function code(a, b) tmp = 0.0 if ((a <= -265000.0) || !(a <= 14500000.0)) tmp = Float64((a ^ 4.0) * Float64(1.0 - Float64(4.0 / a))); else tmp = Float64(Float64(Float64(Float64(b * b) * 12.0) + (b ^ 4.0)) + -1.0); end return tmp end
function tmp_2 = code(a, b) tmp = 0.0; if ((a <= -265000.0) || ~((a <= 14500000.0))) tmp = (a ^ 4.0) * (1.0 - (4.0 / a)); else tmp = (((b * b) * 12.0) + (b ^ 4.0)) + -1.0; end tmp_2 = tmp; end
code[a_, b_] := If[Or[LessEqual[a, -265000.0], N[Not[LessEqual[a, 14500000.0]], $MachinePrecision]], N[(N[Power[a, 4.0], $MachinePrecision] * N[(1.0 - N[(4.0 / a), $MachinePrecision]), $MachinePrecision]), $MachinePrecision], N[(N[(N[(N[(b * b), $MachinePrecision] * 12.0), $MachinePrecision] + N[Power[b, 4.0], $MachinePrecision]), $MachinePrecision] + -1.0), $MachinePrecision]]
\begin{array}{l}
\\
\begin{array}{l}
\mathbf{if}\;a \leq -265000 \lor \neg \left(a \leq 14500000\right):\\
\;\;\;\;{a}^{4} \cdot \left(1 - \frac{4}{a}\right)\\
\mathbf{else}:\\
\;\;\;\;\left(\left(b \cdot b\right) \cdot 12 + {b}^{4}\right) + -1\\
\end{array}
\end{array}
if a < -265000 or 1.45e7 < a Initial program 53.6%
associate--l+53.6%
fma-define53.6%
distribute-rgt-in53.6%
sqr-neg53.6%
distribute-rgt-in53.6%
Simplified55.8%
Taylor expanded in a around inf 93.8%
associate-*r/93.8%
metadata-eval93.8%
Simplified93.8%
if -265000 < a < 1.45e7Initial program 99.9%
associate--l+99.9%
fma-define99.9%
distribute-rgt-in99.9%
sqr-neg99.9%
distribute-rgt-in99.9%
Simplified99.9%
Taylor expanded in a around 0 100.0%
pow2100.0%
Applied egg-rr100.0%
Final simplification96.7%
(FPCore (a b) :precision binary64 (if (or (<= a -210.0) (not (<= a 11500000.0))) (* (pow a 4.0) (- 1.0 (/ 4.0 a))) (+ (* (* b b) 12.0) -1.0)))
double code(double a, double b) {
double tmp;
if ((a <= -210.0) || !(a <= 11500000.0)) {
tmp = pow(a, 4.0) * (1.0 - (4.0 / a));
} else {
tmp = ((b * b) * 12.0) + -1.0;
}
return tmp;
}
real(8) function code(a, b)
real(8), intent (in) :: a
real(8), intent (in) :: b
real(8) :: tmp
if ((a <= (-210.0d0)) .or. (.not. (a <= 11500000.0d0))) then
tmp = (a ** 4.0d0) * (1.0d0 - (4.0d0 / a))
else
tmp = ((b * b) * 12.0d0) + (-1.0d0)
end if
code = tmp
end function
public static double code(double a, double b) {
double tmp;
if ((a <= -210.0) || !(a <= 11500000.0)) {
tmp = Math.pow(a, 4.0) * (1.0 - (4.0 / a));
} else {
tmp = ((b * b) * 12.0) + -1.0;
}
return tmp;
}
def code(a, b): tmp = 0 if (a <= -210.0) or not (a <= 11500000.0): tmp = math.pow(a, 4.0) * (1.0 - (4.0 / a)) else: tmp = ((b * b) * 12.0) + -1.0 return tmp
function code(a, b) tmp = 0.0 if ((a <= -210.0) || !(a <= 11500000.0)) tmp = Float64((a ^ 4.0) * Float64(1.0 - Float64(4.0 / a))); else tmp = Float64(Float64(Float64(b * b) * 12.0) + -1.0); end return tmp end
function tmp_2 = code(a, b) tmp = 0.0; if ((a <= -210.0) || ~((a <= 11500000.0))) tmp = (a ^ 4.0) * (1.0 - (4.0 / a)); else tmp = ((b * b) * 12.0) + -1.0; end tmp_2 = tmp; end
code[a_, b_] := If[Or[LessEqual[a, -210.0], N[Not[LessEqual[a, 11500000.0]], $MachinePrecision]], N[(N[Power[a, 4.0], $MachinePrecision] * N[(1.0 - N[(4.0 / a), $MachinePrecision]), $MachinePrecision]), $MachinePrecision], N[(N[(N[(b * b), $MachinePrecision] * 12.0), $MachinePrecision] + -1.0), $MachinePrecision]]
\begin{array}{l}
\\
\begin{array}{l}
\mathbf{if}\;a \leq -210 \lor \neg \left(a \leq 11500000\right):\\
\;\;\;\;{a}^{4} \cdot \left(1 - \frac{4}{a}\right)\\
\mathbf{else}:\\
\;\;\;\;\left(b \cdot b\right) \cdot 12 + -1\\
\end{array}
\end{array}
if a < -210 or 1.15e7 < a Initial program 53.6%
associate--l+53.6%
fma-define53.6%
distribute-rgt-in53.6%
sqr-neg53.6%
distribute-rgt-in53.6%
Simplified55.8%
Taylor expanded in a around inf 93.8%
associate-*r/93.8%
metadata-eval93.8%
Simplified93.8%
if -210 < a < 1.15e7Initial program 99.9%
associate--l+99.9%
fma-define99.9%
distribute-rgt-in99.9%
sqr-neg99.9%
distribute-rgt-in99.9%
Simplified99.9%
Taylor expanded in a around 0 100.0%
Taylor expanded in b around 0 76.1%
*-commutative76.1%
Simplified76.1%
pow2100.0%
Applied egg-rr76.1%
Final simplification85.5%
(FPCore (a b) :precision binary64 (if (or (<= a -130.0) (not (<= a 11500000.0))) (* (pow a 3.0) (- a 4.0)) (+ (* (* b b) 12.0) -1.0)))
double code(double a, double b) {
double tmp;
if ((a <= -130.0) || !(a <= 11500000.0)) {
tmp = pow(a, 3.0) * (a - 4.0);
} else {
tmp = ((b * b) * 12.0) + -1.0;
}
return tmp;
}
real(8) function code(a, b)
real(8), intent (in) :: a
real(8), intent (in) :: b
real(8) :: tmp
if ((a <= (-130.0d0)) .or. (.not. (a <= 11500000.0d0))) then
tmp = (a ** 3.0d0) * (a - 4.0d0)
else
tmp = ((b * b) * 12.0d0) + (-1.0d0)
end if
code = tmp
end function
public static double code(double a, double b) {
double tmp;
if ((a <= -130.0) || !(a <= 11500000.0)) {
tmp = Math.pow(a, 3.0) * (a - 4.0);
} else {
tmp = ((b * b) * 12.0) + -1.0;
}
return tmp;
}
def code(a, b): tmp = 0 if (a <= -130.0) or not (a <= 11500000.0): tmp = math.pow(a, 3.0) * (a - 4.0) else: tmp = ((b * b) * 12.0) + -1.0 return tmp
function code(a, b) tmp = 0.0 if ((a <= -130.0) || !(a <= 11500000.0)) tmp = Float64((a ^ 3.0) * Float64(a - 4.0)); else tmp = Float64(Float64(Float64(b * b) * 12.0) + -1.0); end return tmp end
function tmp_2 = code(a, b) tmp = 0.0; if ((a <= -130.0) || ~((a <= 11500000.0))) tmp = (a ^ 3.0) * (a - 4.0); else tmp = ((b * b) * 12.0) + -1.0; end tmp_2 = tmp; end
code[a_, b_] := If[Or[LessEqual[a, -130.0], N[Not[LessEqual[a, 11500000.0]], $MachinePrecision]], N[(N[Power[a, 3.0], $MachinePrecision] * N[(a - 4.0), $MachinePrecision]), $MachinePrecision], N[(N[(N[(b * b), $MachinePrecision] * 12.0), $MachinePrecision] + -1.0), $MachinePrecision]]
\begin{array}{l}
\\
\begin{array}{l}
\mathbf{if}\;a \leq -130 \lor \neg \left(a \leq 11500000\right):\\
\;\;\;\;{a}^{3} \cdot \left(a - 4\right)\\
\mathbf{else}:\\
\;\;\;\;\left(b \cdot b\right) \cdot 12 + -1\\
\end{array}
\end{array}
if a < -130 or 1.15e7 < a Initial program 53.6%
associate--l+53.6%
fma-define53.6%
distribute-rgt-in53.6%
sqr-neg53.6%
distribute-rgt-in53.6%
Simplified55.8%
Taylor expanded in a around inf 93.8%
associate-*r/93.8%
metadata-eval93.8%
Simplified93.8%
Taylor expanded in a around 0 93.7%
if -130 < a < 1.15e7Initial program 99.9%
associate--l+99.9%
fma-define99.9%
distribute-rgt-in99.9%
sqr-neg99.9%
distribute-rgt-in99.9%
Simplified99.9%
Taylor expanded in a around 0 100.0%
Taylor expanded in b around 0 76.1%
*-commutative76.1%
Simplified76.1%
pow2100.0%
Applied egg-rr76.1%
Final simplification85.5%
(FPCore (a b) :precision binary64 (if (or (<= a -3000.0) (not (<= a 380000000.0))) (pow a 4.0) (+ (* (* b b) 12.0) -1.0)))
double code(double a, double b) {
double tmp;
if ((a <= -3000.0) || !(a <= 380000000.0)) {
tmp = pow(a, 4.0);
} else {
tmp = ((b * b) * 12.0) + -1.0;
}
return tmp;
}
real(8) function code(a, b)
real(8), intent (in) :: a
real(8), intent (in) :: b
real(8) :: tmp
if ((a <= (-3000.0d0)) .or. (.not. (a <= 380000000.0d0))) then
tmp = a ** 4.0d0
else
tmp = ((b * b) * 12.0d0) + (-1.0d0)
end if
code = tmp
end function
public static double code(double a, double b) {
double tmp;
if ((a <= -3000.0) || !(a <= 380000000.0)) {
tmp = Math.pow(a, 4.0);
} else {
tmp = ((b * b) * 12.0) + -1.0;
}
return tmp;
}
def code(a, b): tmp = 0 if (a <= -3000.0) or not (a <= 380000000.0): tmp = math.pow(a, 4.0) else: tmp = ((b * b) * 12.0) + -1.0 return tmp
function code(a, b) tmp = 0.0 if ((a <= -3000.0) || !(a <= 380000000.0)) tmp = a ^ 4.0; else tmp = Float64(Float64(Float64(b * b) * 12.0) + -1.0); end return tmp end
function tmp_2 = code(a, b) tmp = 0.0; if ((a <= -3000.0) || ~((a <= 380000000.0))) tmp = a ^ 4.0; else tmp = ((b * b) * 12.0) + -1.0; end tmp_2 = tmp; end
code[a_, b_] := If[Or[LessEqual[a, -3000.0], N[Not[LessEqual[a, 380000000.0]], $MachinePrecision]], N[Power[a, 4.0], $MachinePrecision], N[(N[(N[(b * b), $MachinePrecision] * 12.0), $MachinePrecision] + -1.0), $MachinePrecision]]
\begin{array}{l}
\\
\begin{array}{l}
\mathbf{if}\;a \leq -3000 \lor \neg \left(a \leq 380000000\right):\\
\;\;\;\;{a}^{4}\\
\mathbf{else}:\\
\;\;\;\;\left(b \cdot b\right) \cdot 12 + -1\\
\end{array}
\end{array}
if a < -3e3 or 3.8e8 < a Initial program 53.6%
associate--l+53.6%
fma-define53.6%
distribute-rgt-in53.6%
sqr-neg53.6%
distribute-rgt-in53.6%
Simplified55.8%
Taylor expanded in a around inf 93.8%
associate-*r/93.8%
metadata-eval93.8%
Simplified93.8%
Taylor expanded in a around inf 93.2%
Taylor expanded in a around 0 93.2%
if -3e3 < a < 3.8e8Initial program 99.9%
associate--l+99.9%
fma-define99.9%
distribute-rgt-in99.9%
sqr-neg99.9%
distribute-rgt-in99.9%
Simplified99.9%
Taylor expanded in a around 0 100.0%
Taylor expanded in b around 0 76.1%
*-commutative76.1%
Simplified76.1%
pow2100.0%
Applied egg-rr76.1%
Final simplification85.2%
(FPCore (a b) :precision binary64 (+ (* (* b b) 12.0) -1.0))
double code(double a, double b) {
return ((b * b) * 12.0) + -1.0;
}
real(8) function code(a, b)
real(8), intent (in) :: a
real(8), intent (in) :: b
code = ((b * b) * 12.0d0) + (-1.0d0)
end function
public static double code(double a, double b) {
return ((b * b) * 12.0) + -1.0;
}
def code(a, b): return ((b * b) * 12.0) + -1.0
function code(a, b) return Float64(Float64(Float64(b * b) * 12.0) + -1.0) end
function tmp = code(a, b) tmp = ((b * b) * 12.0) + -1.0; end
code[a_, b_] := N[(N[(N[(b * b), $MachinePrecision] * 12.0), $MachinePrecision] + -1.0), $MachinePrecision]
\begin{array}{l}
\\
\left(b \cdot b\right) \cdot 12 + -1
\end{array}
Initial program 75.3%
associate--l+75.3%
fma-define75.3%
distribute-rgt-in75.3%
sqr-neg75.3%
distribute-rgt-in75.3%
Simplified76.5%
Taylor expanded in a around 0 63.7%
Taylor expanded in b around 0 46.7%
*-commutative46.7%
Simplified46.7%
pow263.7%
Applied egg-rr46.7%
Final simplification46.7%
(FPCore (a b) :precision binary64 -1.0)
double code(double a, double b) {
return -1.0;
}
real(8) function code(a, b)
real(8), intent (in) :: a
real(8), intent (in) :: b
code = -1.0d0
end function
public static double code(double a, double b) {
return -1.0;
}
def code(a, b): return -1.0
function code(a, b) return -1.0 end
function tmp = code(a, b) tmp = -1.0; end
code[a_, b_] := -1.0
\begin{array}{l}
\\
-1
\end{array}
Initial program 75.3%
associate--l+75.3%
fma-define75.3%
distribute-rgt-in75.3%
sqr-neg75.3%
distribute-rgt-in75.3%
Simplified76.5%
Taylor expanded in a around 0 63.7%
Taylor expanded in b around 0 23.2%
herbie shell --seed 2024170
(FPCore (a b)
:name "Bouland and Aaronson, Equation (24)"
:precision binary64
(- (+ (pow (+ (* a a) (* b b)) 2.0) (* 4.0 (+ (* (* a a) (- 1.0 a)) (* (* b b) (+ 3.0 a))))) 1.0))