
(FPCore (a b) :precision binary64 (* (+ a b) (+ a b)))
double code(double a, double b) {
return (a + b) * (a + b);
}
real(8) function code(a, b)
real(8), intent (in) :: a
real(8), intent (in) :: b
code = (a + b) * (a + b)
end function
public static double code(double a, double b) {
return (a + b) * (a + b);
}
def code(a, b): return (a + b) * (a + b)
function code(a, b) return Float64(Float64(a + b) * Float64(a + b)) end
function tmp = code(a, b) tmp = (a + b) * (a + b); end
code[a_, b_] := N[(N[(a + b), $MachinePrecision] * N[(a + b), $MachinePrecision]), $MachinePrecision]
\begin{array}{l}
\\
\left(a + b\right) \cdot \left(a + b\right)
\end{array}
Sampling outcomes in binary64 precision:
Herbie found 5 alternatives:
| Alternative | Accuracy | Speedup |
|---|
(FPCore (a b) :precision binary64 (* (+ a b) (+ a b)))
double code(double a, double b) {
return (a + b) * (a + b);
}
real(8) function code(a, b)
real(8), intent (in) :: a
real(8), intent (in) :: b
code = (a + b) * (a + b)
end function
public static double code(double a, double b) {
return (a + b) * (a + b);
}
def code(a, b): return (a + b) * (a + b)
function code(a, b) return Float64(Float64(a + b) * Float64(a + b)) end
function tmp = code(a, b) tmp = (a + b) * (a + b); end
code[a_, b_] := N[(N[(a + b), $MachinePrecision] * N[(a + b), $MachinePrecision]), $MachinePrecision]
\begin{array}{l}
\\
\left(a + b\right) \cdot \left(a + b\right)
\end{array}
NOTE: a and b should be sorted in increasing order before calling this function. (FPCore (a b) :precision binary64 (* (+ a b) (* b (+ 1.0 (/ a b)))))
assert(a < b);
double code(double a, double b) {
return (a + b) * (b * (1.0 + (a / b)));
}
NOTE: a and b should be sorted in increasing order before calling this function.
real(8) function code(a, b)
real(8), intent (in) :: a
real(8), intent (in) :: b
code = (a + b) * (b * (1.0d0 + (a / b)))
end function
assert a < b;
public static double code(double a, double b) {
return (a + b) * (b * (1.0 + (a / b)));
}
[a, b] = sort([a, b]) def code(a, b): return (a + b) * (b * (1.0 + (a / b)))
a, b = sort([a, b]) function code(a, b) return Float64(Float64(a + b) * Float64(b * Float64(1.0 + Float64(a / b)))) end
a, b = num2cell(sort([a, b])){:}
function tmp = code(a, b)
tmp = (a + b) * (b * (1.0 + (a / b)));
end
NOTE: a and b should be sorted in increasing order before calling this function. code[a_, b_] := N[(N[(a + b), $MachinePrecision] * N[(b * N[(1.0 + N[(a / b), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]
\begin{array}{l}
[a, b] = \mathsf{sort}([a, b])\\
\\
\left(a + b\right) \cdot \left(b \cdot \left(1 + \frac{a}{b}\right)\right)
\end{array}
Initial program 100.0%
Taylor expanded in b around inf 99.8%
NOTE: a and b should be sorted in increasing order before calling this function. (FPCore (a b) :precision binary64 (* (+ a b) (+ a b)))
assert(a < b);
double code(double a, double b) {
return (a + b) * (a + b);
}
NOTE: a and b should be sorted in increasing order before calling this function.
real(8) function code(a, b)
real(8), intent (in) :: a
real(8), intent (in) :: b
code = (a + b) * (a + b)
end function
assert a < b;
public static double code(double a, double b) {
return (a + b) * (a + b);
}
[a, b] = sort([a, b]) def code(a, b): return (a + b) * (a + b)
a, b = sort([a, b]) function code(a, b) return Float64(Float64(a + b) * Float64(a + b)) end
a, b = num2cell(sort([a, b])){:}
function tmp = code(a, b)
tmp = (a + b) * (a + b);
end
NOTE: a and b should be sorted in increasing order before calling this function. code[a_, b_] := N[(N[(a + b), $MachinePrecision] * N[(a + b), $MachinePrecision]), $MachinePrecision]
\begin{array}{l}
[a, b] = \mathsf{sort}([a, b])\\
\\
\left(a + b\right) \cdot \left(a + b\right)
\end{array}
Initial program 100.0%
NOTE: a and b should be sorted in increasing order before calling this function. (FPCore (a b) :precision binary64 (* b (+ b (* a 2.0))))
assert(a < b);
double code(double a, double b) {
return b * (b + (a * 2.0));
}
NOTE: a and b should be sorted in increasing order before calling this function.
real(8) function code(a, b)
real(8), intent (in) :: a
real(8), intent (in) :: b
code = b * (b + (a * 2.0d0))
end function
assert a < b;
public static double code(double a, double b) {
return b * (b + (a * 2.0));
}
[a, b] = sort([a, b]) def code(a, b): return b * (b + (a * 2.0))
a, b = sort([a, b]) function code(a, b) return Float64(b * Float64(b + Float64(a * 2.0))) end
a, b = num2cell(sort([a, b])){:}
function tmp = code(a, b)
tmp = b * (b + (a * 2.0));
end
NOTE: a and b should be sorted in increasing order before calling this function. code[a_, b_] := N[(b * N[(b + N[(a * 2.0), $MachinePrecision]), $MachinePrecision]), $MachinePrecision]
\begin{array}{l}
[a, b] = \mathsf{sort}([a, b])\\
\\
b \cdot \left(b + a \cdot 2\right)
\end{array}
Initial program 100.0%
Taylor expanded in a around 0 5.3%
+-commutative5.3%
unpow25.3%
associate-*r*5.3%
distribute-rgt-in5.3%
Simplified5.3%
Final simplification5.3%
NOTE: a and b should be sorted in increasing order before calling this function. (FPCore (a b) :precision binary64 (* b (+ a b)))
assert(a < b);
double code(double a, double b) {
return b * (a + b);
}
NOTE: a and b should be sorted in increasing order before calling this function.
real(8) function code(a, b)
real(8), intent (in) :: a
real(8), intent (in) :: b
code = b * (a + b)
end function
assert a < b;
public static double code(double a, double b) {
return b * (a + b);
}
[a, b] = sort([a, b]) def code(a, b): return b * (a + b)
a, b = sort([a, b]) function code(a, b) return Float64(b * Float64(a + b)) end
a, b = num2cell(sort([a, b])){:}
function tmp = code(a, b)
tmp = b * (a + b);
end
NOTE: a and b should be sorted in increasing order before calling this function. code[a_, b_] := N[(b * N[(a + b), $MachinePrecision]), $MachinePrecision]
\begin{array}{l}
[a, b] = \mathsf{sort}([a, b])\\
\\
b \cdot \left(a + b\right)
\end{array}
Initial program 100.0%
Taylor expanded in a around 0 5.3%
Final simplification5.3%
NOTE: a and b should be sorted in increasing order before calling this function. (FPCore (a b) :precision binary64 (* b b))
assert(a < b);
double code(double a, double b) {
return b * b;
}
NOTE: a and b should be sorted in increasing order before calling this function.
real(8) function code(a, b)
real(8), intent (in) :: a
real(8), intent (in) :: b
code = b * b
end function
assert a < b;
public static double code(double a, double b) {
return b * b;
}
[a, b] = sort([a, b]) def code(a, b): return b * b
a, b = sort([a, b]) function code(a, b) return Float64(b * b) end
a, b = num2cell(sort([a, b])){:}
function tmp = code(a, b)
tmp = b * b;
end
NOTE: a and b should be sorted in increasing order before calling this function. code[a_, b_] := N[(b * b), $MachinePrecision]
\begin{array}{l}
[a, b] = \mathsf{sort}([a, b])\\
\\
b \cdot b
\end{array}
Initial program 100.0%
Taylor expanded in a around 0 5.3%
+-commutative5.3%
unpow25.3%
associate-*r*5.3%
distribute-rgt-in5.3%
Simplified5.3%
Taylor expanded in b around inf 4.2%
(FPCore (a b) :precision binary64 (+ (+ (+ (* b a) (* b b)) (* b a)) (* a a)))
double code(double a, double b) {
return (((b * a) + (b * b)) + (b * a)) + (a * a);
}
real(8) function code(a, b)
real(8), intent (in) :: a
real(8), intent (in) :: b
code = (((b * a) + (b * b)) + (b * a)) + (a * a)
end function
public static double code(double a, double b) {
return (((b * a) + (b * b)) + (b * a)) + (a * a);
}
def code(a, b): return (((b * a) + (b * b)) + (b * a)) + (a * a)
function code(a, b) return Float64(Float64(Float64(Float64(b * a) + Float64(b * b)) + Float64(b * a)) + Float64(a * a)) end
function tmp = code(a, b) tmp = (((b * a) + (b * b)) + (b * a)) + (a * a); end
code[a_, b_] := N[(N[(N[(N[(b * a), $MachinePrecision] + N[(b * b), $MachinePrecision]), $MachinePrecision] + N[(b * a), $MachinePrecision]), $MachinePrecision] + N[(a * a), $MachinePrecision]), $MachinePrecision]
\begin{array}{l}
\\
\left(\left(b \cdot a + b \cdot b\right) + b \cdot a\right) + a \cdot a
\end{array}
herbie shell --seed 2024130
(FPCore (a b)
:name "Expression 4, p15"
:precision binary64
:pre (and (and (<= 5.0 a) (<= a 10.0)) (and (<= 0.0 b) (<= b 0.001)))
:alt
(! :herbie-platform default (+ (+ (+ (* b a) (* b b)) (* b a)) (* a a)))
(* (+ a b) (+ a b)))