
(FPCore (d1 d2 d3) :precision binary64 (+ (* d1 d2) (* d1 d3)))
(FPCore (d1 d2 d3) :precision binary64 (* d1 (+ d2 d3)))
double code(double d1, double d2, double d3) {
return (d1 * d2) + (d1 * d3);
}
double code(double d1, double d2, double d3) {
return d1 * (d2 + d3);
}
real(8) function code(d1, d2, d3)
real(8), intent (in) :: d1
real(8), intent (in) :: d2
real(8), intent (in) :: d3
code = (d1 * d2) + (d1 * d3)
end function
real(8) function code(d1, d2, d3)
real(8), intent (in) :: d1
real(8), intent (in) :: d2
real(8), intent (in) :: d3
code = d1 * (d2 + d3)
end function
public static double code(double d1, double d2, double d3) {
return (d1 * d2) + (d1 * d3);
}
public static double code(double d1, double d2, double d3) {
return d1 * (d2 + d3);
}
def code(d1, d2, d3): return (d1 * d2) + (d1 * d3)
def code(d1, d2, d3): return d1 * (d2 + d3)
function code(d1, d2, d3) return Float64(Float64(d1 * d2) + Float64(d1 * d3)) end
function code(d1, d2, d3) return Float64(d1 * Float64(d2 + d3)) end
function tmp = code(d1, d2, d3) tmp = (d1 * d2) + (d1 * d3); end
function tmp = code(d1, d2, d3) tmp = d1 * (d2 + d3); end
code[d1_, d2_, d3_] := N[(N[(d1 * d2), $MachinePrecision] + N[(d1 * d3), $MachinePrecision]), $MachinePrecision]
code[d1_, d2_, d3_] := N[(d1 * N[(d2 + d3), $MachinePrecision]), $MachinePrecision]
d1 \cdot d2 + d1 \cdot d3
d1 \cdot \left(d2 + d3\right)
Herbie found 1 alternatives:
| Alternative | Accuracy | Speedup |
|---|
Results
| Original | 98.0% |
|---|---|
| Target | 100.0% |
| Herbie | 100.0% |
Initial program 97.6%
Simplified100.0%
[Start]97.6% | \[ d1 \cdot d2 + d1 \cdot d3
\] |
|---|---|
distribute-lft-out [=>]100.0% | \[ \color{blue}{d1 \cdot \left(d2 + d3\right)}
\] |
Final simplification100.0%
herbie shell --seed 2023178
(FPCore (d1 d2 d3)
:name "FastMath dist"
:precision binary64
:herbie-target
(* d1 (+ d2 d3))
(+ (* d1 d2) (* d1 d3)))