Linear.Quaternion:$c/ from linear-1.19.1.3, D

Average Error: 12.5 → 0.0

Time: 3.0s

Precision: binary64

Cost: 448

Math

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

↓

\[y \cdot x - y \cdot z \]

FPCore

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

↓

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

C

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

↓

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

Fortran

real(8) function code(x, y, z)
    real(8), intent (in) :: x
    real(8), intent (in) :: y
    real(8), intent (in) :: z
    code = (((x * y) - (y * y)) + (y * y)) - (y * z)
end function

↓

real(8) function code(x, y, z)
    real(8), intent (in) :: x
    real(8), intent (in) :: y
    real(8), intent (in) :: z
    code = (y * x) - (y * z)
end function

Java

public static double code(double x, double y, double z) {
	return (((x * y) - (y * y)) + (y * y)) - (y * z);
}

↓

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

Python

def code(x, y, z):
	return (((x * y) - (y * y)) + (y * y)) - (y * z)

↓

def code(x, y, z):
	return (y * x) - (y * z)

Julia

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

↓

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

MATLAB

function tmp = code(x, y, z)
	tmp = (((x * y) - (y * y)) + (y * y)) - (y * z);
end

↓

function tmp = code(x, y, z)
	tmp = (y * x) - (y * z);
end

Wolfram

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

↓

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

Target

Original	12.5
Target	0.0
Herbie	0.0

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

Derivation

1. Initial program 12.5

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

2. Simplified 0.0

   \[\leadsto \color{blue}{y \cdot \left(x - z\right)} \]
   Proof

   [Start] 12.5	\[ \left(\left(x \cdot y - y \cdot y\right) + y \cdot y\right) - y \cdot z \]
   associate-+l- [=>] 7.6	\[ \color{blue}{\left(x \cdot y - \left(y \cdot y - y \cdot y\right)\right)} - y \cdot z \]
   associate--l- [=>] 7.6	\[ \color{blue}{x \cdot y - \left(\left(y \cdot y - y \cdot y\right) + y \cdot z\right)} \]
   +-inverses [=>] 0.0	\[ x \cdot y - \left(\color{blue}{0} + y \cdot z\right) \]
   +-lft-identity [=>] 0.0	\[ x \cdot y - \color{blue}{y \cdot z} \]
   *-commutative [=>] 0.0	\[ x \cdot y - \color{blue}{z \cdot y} \]
   distribute-rgt-out-- [=>] 0.0	\[ \color{blue}{y \cdot \left(x - z\right)} \]

3. Applied egg-rr 0.0

   \[\leadsto \color{blue}{y \cdot x + y \cdot \left(-z\right)} \]

4. Final simplification 0.0

   \[\leadsto y \cdot x - y \cdot z \]

Alternatives

Alternative 1
Error	14.7
Cost	521

\[\begin{array}{l} \mathbf{if}\;z \leq -800 \lor \neg \left(z \leq 1.9 \cdot 10^{-59}\right):\\ \;\;\;\;y \cdot \left(-z\right)\\ \mathbf{else}:\\ \;\;\;\;y \cdot x\\ \end{array} \]

Alternative 2
Error	0.0
Cost	320

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

Alternative 3
Error	29.6
Cost	192

\[y \cdot x \]

Reproduce

herbie shell --seed 2023018 
(FPCore (x y z)
  :name "Linear.Quaternion:$c/ from linear-1.19.1.3, D"
  :precision binary64

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

  (- (+ (- (* x y) (* y y)) (* y y)) (* y z)))