
(FPCore (x y) :precision binary64 :pre TRUE (- x (/ y 4.0)))
double code(double x, double y) {
return x - (y / 4.0);
}
real(8) function code(x, y)
use fmin_fmax_functions
real(8), intent (in) :: x
real(8), intent (in) :: y
code = x - (y / 4.0d0)
end function
public static double code(double x, double y) {
return x - (y / 4.0);
}
def code(x, y): return x - (y / 4.0)
function code(x, y) return Float64(x - Float64(y / 4.0)) end
function tmp = code(x, y) tmp = x - (y / 4.0); end
code[x_, y_] := N[(x - N[(y / 4.0), $MachinePrecision]), $MachinePrecision]
f(x, y): x in [-inf, +inf], y in [-inf, +inf] code: THEORY BEGIN f(x, y: real): real = x - (y / (4)) END code
x - \frac{y}{4}
Herbie found 2 alternatives:
| Alternative | Accuracy | Speedup |
|---|
(FPCore (x y) :precision binary64 :pre TRUE (- x (/ y 4.0)))
double code(double x, double y) {
return x - (y / 4.0);
}
real(8) function code(x, y)
use fmin_fmax_functions
real(8), intent (in) :: x
real(8), intent (in) :: y
code = x - (y / 4.0d0)
end function
public static double code(double x, double y) {
return x - (y / 4.0);
}
def code(x, y): return x - (y / 4.0)
function code(x, y) return Float64(x - Float64(y / 4.0)) end
function tmp = code(x, y) tmp = x - (y / 4.0); end
code[x_, y_] := N[(x - N[(y / 4.0), $MachinePrecision]), $MachinePrecision]
f(x, y): x in [-inf, +inf], y in [-inf, +inf] code: THEORY BEGIN f(x, y: real): real = x - (y / (4)) END code
x - \frac{y}{4}
(FPCore (x y) :precision binary64 :pre TRUE (fma -0.25 y x))
double code(double x, double y) {
return fma(-0.25, y, x);
}
function code(x, y) return fma(-0.25, y, x) end
code[x_, y_] := N[(-0.25 * y + x), $MachinePrecision]
f(x, y): x in [-inf, +inf], y in [-inf, +inf] code: THEORY BEGIN f(x, y: real): real = ((-25e-2) * y) + x END code
\mathsf{fma}\left(-0.25, y, x\right)
Initial program 100.0%
Applied rewrites100.0%
(FPCore (x y) :precision binary64 :pre TRUE (* -0.25 y))
double code(double x, double y) {
return -0.25 * y;
}
real(8) function code(x, y)
use fmin_fmax_functions
real(8), intent (in) :: x
real(8), intent (in) :: y
code = (-0.25d0) * y
end function
public static double code(double x, double y) {
return -0.25 * y;
}
def code(x, y): return -0.25 * y
function code(x, y) return Float64(-0.25 * y) end
function tmp = code(x, y) tmp = -0.25 * y; end
code[x_, y_] := N[(-0.25 * y), $MachinePrecision]
f(x, y): x in [-inf, +inf], y in [-inf, +inf] code: THEORY BEGIN f(x, y: real): real = (-25e-2) * y END code
-0.25 \cdot y
Initial program 100.0%
Taylor expanded in x around 0
Applied rewrites50.1%
herbie shell --seed 2026092
(FPCore (x y)
:name "Diagrams.Solve.Polynomial:quartForm from diagrams-solve-0.1, E"
:precision binary64
(- x (/ y 4.0)))