
(FPCore (x y) :precision binary64 (* (* x 27.0) y))
double code(double x, double y) {
return (x * 27.0) * y;
}
real(8) function code(x, y)
real(8), intent (in) :: x
real(8), intent (in) :: y
code = (x * 27.0d0) * y
end function
public static double code(double x, double y) {
return (x * 27.0) * y;
}
def code(x, y): return (x * 27.0) * y
function code(x, y) return Float64(Float64(x * 27.0) * y) end
function tmp = code(x, y) tmp = (x * 27.0) * y; end
code[x_, y_] := N[(N[(x * 27.0), $MachinePrecision] * y), $MachinePrecision]
\begin{array}{l}
\\
\left(x \cdot 27\right) \cdot y
\end{array}
Sampling outcomes in binary64 precision:
Herbie found 1 alternatives:
| Alternative | Accuracy | Speedup |
|---|
(FPCore (x y) :precision binary64 (* (* x 27.0) y))
double code(double x, double y) {
return (x * 27.0) * y;
}
real(8) function code(x, y)
real(8), intent (in) :: x
real(8), intent (in) :: y
code = (x * 27.0d0) * y
end function
public static double code(double x, double y) {
return (x * 27.0) * y;
}
def code(x, y): return (x * 27.0) * y
function code(x, y) return Float64(Float64(x * 27.0) * y) end
function tmp = code(x, y) tmp = (x * 27.0) * y; end
code[x_, y_] := N[(N[(x * 27.0), $MachinePrecision] * y), $MachinePrecision]
\begin{array}{l}
\\
\left(x \cdot 27\right) \cdot y
\end{array}
(FPCore (x y) :precision binary64 (* 27.0 (* y x)))
double code(double x, double y) {
return 27.0 * (y * x);
}
real(8) function code(x, y)
real(8), intent (in) :: x
real(8), intent (in) :: y
code = 27.0d0 * (y * x)
end function
public static double code(double x, double y) {
return 27.0 * (y * x);
}
def code(x, y): return 27.0 * (y * x)
function code(x, y) return Float64(27.0 * Float64(y * x)) end
function tmp = code(x, y) tmp = 27.0 * (y * x); end
code[x_, y_] := N[(27.0 * N[(y * x), $MachinePrecision]), $MachinePrecision]
\begin{array}{l}
\\
27 \cdot \left(y \cdot x\right)
\end{array}
Initial program 99.3%
associate-*l*99.3%
Simplified99.3%
Taylor expanded in x around 0 99.7%
Final simplification99.7%
herbie shell --seed 2023196
(FPCore (x y)
:name "Diagrams.Solve.Polynomial:cubForm from diagrams-solve-0.1, F"
:precision binary64
(* (* x 27.0) y))