Diagrams.Solve.Polynomial:cubForm from diagrams-solve-0.1, B

Average Error: 0.1 → 0.1

Time: 4.7s

Precision: binary64

Cost: 6784

Math

\[\left(x \cdot 3\right) \cdot y - z \]

↓

\[\mathsf{fma}\left(3 \cdot y, x, -z\right) \]

FPCore

(FPCore (x y z) :precision binary64 (- (* (* x 3.0) y) z))

↓

(FPCore (x y z) :precision binary64 (fma (* 3.0 y) x (- z)))

C

double code(double x, double y, double z) {
	return ((x * 3.0) * y) - z;
}

↓

double code(double x, double y, double z) {
	return fma((3.0 * y), x, -z);
}

Julia

function code(x, y, z)
	return Float64(Float64(Float64(x * 3.0) * y) - z)
end

↓

function code(x, y, z)
	return fma(Float64(3.0 * y), x, Float64(-z))
end

Wolfram

code[x_, y_, z_] := N[(N[(N[(x * 3.0), $MachinePrecision] * y), $MachinePrecision] - z), $MachinePrecision]

↓

code[x_, y_, z_] := N[(N[(3.0 * y), $MachinePrecision] * x + (-z)), $MachinePrecision]

Target

Original	0.1
Target	0.1
Herbie	0.1

\[x \cdot \left(3 \cdot y\right) - z \]

Derivation

1. Initial program 0.1

   \[\left(x \cdot 3\right) \cdot y - z \]

2. Simplified 0.1

   \[\leadsto \color{blue}{x \cdot \left(3 \cdot y\right) - z} \]
   Proof
   (-.f64 (*.f64 x (*.f64 3 y)) z): 0 points increase in error, 0 points decrease in error
   (-.f64 (Rewrite<= associate-*l*_binary64 (*.f64 (*.f64 x 3) y)) z): 25 points increase in error, 22 points decrease in error

3. Applied egg-rr 0.1

   \[\leadsto \color{blue}{\mathsf{fma}\left(3 \cdot y, x, -z\right)} \]

4. Final simplification 0.1

   \[\leadsto \mathsf{fma}\left(3 \cdot y, x, -z\right) \]

Alternatives

Alternative 1
Error	16.0
Cost	584

\[\begin{array}{l} \mathbf{if}\;z \leq -1.1433693400960066 \cdot 10^{-6}:\\ \;\;\;\;-z\\ \mathbf{elif}\;z \leq 5.761562108562188 \cdot 10^{-45}:\\ \;\;\;\;3 \cdot \left(y \cdot x\right)\\ \mathbf{else}:\\ \;\;\;\;-z\\ \end{array} \]

Alternative 2
Error	0.1
Cost	448

\[3 \cdot \left(y \cdot x\right) - z \]

Alternative 3
Error	26.8
Cost	128

\[-z \]

Alternative 4
Error	62.6
Cost	64

\[z \]

Reproduce

herbie shell --seed 2022308 
(FPCore (x y z)
  :name "Diagrams.Solve.Polynomial:cubForm  from diagrams-solve-0.1, B"
  :precision binary64

  :herbie-target
  (- (* x (* 3.0 y)) z)

  (- (* (* x 3.0) y) z))