
(FPCore (a b) :precision binary64 (- (* (* (* a a) b) b)))
double code(double a, double b) {
return -(((a * a) * b) * b);
}
real(8) function code(a, b)
real(8), intent (in) :: a
real(8), intent (in) :: b
code = -(((a * a) * b) * b)
end function
public static double code(double a, double b) {
return -(((a * a) * b) * b);
}
def code(a, b): return -(((a * a) * b) * b)
function code(a, b) return Float64(-Float64(Float64(Float64(a * a) * b) * b)) end
function tmp = code(a, b) tmp = -(((a * a) * b) * b); end
code[a_, b_] := (-N[(N[(N[(a * a), $MachinePrecision] * b), $MachinePrecision] * b), $MachinePrecision])
\begin{array}{l}
\\
-\left(\left(a \cdot a\right) \cdot b\right) \cdot b
\end{array}
Sampling outcomes in binary64 precision:
Herbie found 4 alternatives:
| Alternative | Accuracy | Speedup |
|---|
(FPCore (a b) :precision binary64 (- (* (* (* a a) b) b)))
double code(double a, double b) {
return -(((a * a) * b) * b);
}
real(8) function code(a, b)
real(8), intent (in) :: a
real(8), intent (in) :: b
code = -(((a * a) * b) * b)
end function
public static double code(double a, double b) {
return -(((a * a) * b) * b);
}
def code(a, b): return -(((a * a) * b) * b)
function code(a, b) return Float64(-Float64(Float64(Float64(a * a) * b) * b)) end
function tmp = code(a, b) tmp = -(((a * a) * b) * b); end
code[a_, b_] := (-N[(N[(N[(a * a), $MachinePrecision] * b), $MachinePrecision] * b), $MachinePrecision])
\begin{array}{l}
\\
-\left(\left(a \cdot a\right) \cdot b\right) \cdot b
\end{array}
(FPCore (a b) :precision binary64 (* (* b a) (* b (- a))))
double code(double a, double b) {
return (b * a) * (b * -a);
}
real(8) function code(a, b)
real(8), intent (in) :: a
real(8), intent (in) :: b
code = (b * a) * (b * -a)
end function
public static double code(double a, double b) {
return (b * a) * (b * -a);
}
def code(a, b): return (b * a) * (b * -a)
function code(a, b) return Float64(Float64(b * a) * Float64(b * Float64(-a))) end
function tmp = code(a, b) tmp = (b * a) * (b * -a); end
code[a_, b_] := N[(N[(b * a), $MachinePrecision] * N[(b * (-a)), $MachinePrecision]), $MachinePrecision]
\begin{array}{l}
\\
\left(b \cdot a\right) \cdot \left(b \cdot \left(-a\right)\right)
\end{array}
Initial program 82.2%
lift-neg.f64N/A
lift-*.f64N/A
lift-*.f64N/A
associate-*l*N/A
lift-*.f64N/A
unswap-sqrN/A
distribute-lft-neg-inN/A
lower-*.f64N/A
distribute-lft-neg-inN/A
lower-*.f64N/A
lower-neg.f64N/A
*-commutativeN/A
lower-*.f6499.6
Applied rewrites99.6%
Final simplification99.6%
(FPCore (a b) :precision binary64 (* (- b) (* (* a a) b)))
double code(double a, double b) {
return -b * ((a * a) * b);
}
real(8) function code(a, b)
real(8), intent (in) :: a
real(8), intent (in) :: b
code = -b * ((a * a) * b)
end function
public static double code(double a, double b) {
return -b * ((a * a) * b);
}
def code(a, b): return -b * ((a * a) * b)
function code(a, b) return Float64(Float64(-b) * Float64(Float64(a * a) * b)) end
function tmp = code(a, b) tmp = -b * ((a * a) * b); end
code[a_, b_] := N[((-b) * N[(N[(a * a), $MachinePrecision] * b), $MachinePrecision]), $MachinePrecision]
\begin{array}{l}
\\
\left(-b\right) \cdot \left(\left(a \cdot a\right) \cdot b\right)
\end{array}
Initial program 82.2%
Final simplification82.2%
(FPCore (a b) :precision binary64 (* (* (* a a) b) b))
double code(double a, double b) {
return ((a * a) * b) * b;
}
real(8) function code(a, b)
real(8), intent (in) :: a
real(8), intent (in) :: b
code = ((a * a) * b) * b
end function
public static double code(double a, double b) {
return ((a * a) * b) * b;
}
def code(a, b): return ((a * a) * b) * b
function code(a, b) return Float64(Float64(Float64(a * a) * b) * b) end
function tmp = code(a, b) tmp = ((a * a) * b) * b; end
code[a_, b_] := N[(N[(N[(a * a), $MachinePrecision] * b), $MachinePrecision] * b), $MachinePrecision]
\begin{array}{l}
\\
\left(\left(a \cdot a\right) \cdot b\right) \cdot b
\end{array}
Initial program 82.2%
lift-neg.f64N/A
+-lft-identityN/A
flip3-+N/A
distribute-neg-fracN/A
Applied rewrites27.6%
Final simplification27.6%
(FPCore (a b) :precision binary64 (* (* b a) (* b a)))
double code(double a, double b) {
return (b * a) * (b * a);
}
real(8) function code(a, b)
real(8), intent (in) :: a
real(8), intent (in) :: b
code = (b * a) * (b * a)
end function
public static double code(double a, double b) {
return (b * a) * (b * a);
}
def code(a, b): return (b * a) * (b * a)
function code(a, b) return Float64(Float64(b * a) * Float64(b * a)) end
function tmp = code(a, b) tmp = (b * a) * (b * a); end
code[a_, b_] := N[(N[(b * a), $MachinePrecision] * N[(b * a), $MachinePrecision]), $MachinePrecision]
\begin{array}{l}
\\
\left(b \cdot a\right) \cdot \left(b \cdot a\right)
\end{array}
Initial program 82.2%
lift-neg.f64N/A
+-lft-identityN/A
flip3-+N/A
distribute-neg-fracN/A
Applied rewrites27.6%
herbie shell --seed 2024250
(FPCore (a b)
:name "ab-angle->ABCF D"
:precision binary64
(- (* (* (* a a) b) b)))