(FPCore (x y z t) :precision binary64 (* (* (- (* x 0.5) y) (sqrt (* z 2.0))) (exp (/ (* t t) 2.0))))
(FPCore (x y z t) :precision binary64 (let* ((t_1 (sqrt (* (* z 2.0) (pow (exp t) t))))) (- (* t_1 (* x 0.5)) (* t_1 y))))
double code(double x, double y, double z, double t) {
return (((x * 0.5) - y) * sqrt((z * 2.0))) * exp(((t * t) / 2.0));
}
double code(double x, double y, double z, double t) {
double t_1 = sqrt(((z * 2.0) * pow(exp(t), t)));
return (t_1 * (x * 0.5)) - (t_1 * y);
}
real(8) function code(x, y, z, t)
real(8), intent (in) :: x
real(8), intent (in) :: y
real(8), intent (in) :: z
real(8), intent (in) :: t
code = (((x * 0.5d0) - y) * sqrt((z * 2.0d0))) * exp(((t * t) / 2.0d0))
end function
real(8) function code(x, y, z, t)
real(8), intent (in) :: x
real(8), intent (in) :: y
real(8), intent (in) :: z
real(8), intent (in) :: t
real(8) :: t_1
t_1 = sqrt(((z * 2.0d0) * (exp(t) ** t)))
code = (t_1 * (x * 0.5d0)) - (t_1 * y)
end function
public static double code(double x, double y, double z, double t) {
return (((x * 0.5) - y) * Math.sqrt((z * 2.0))) * Math.exp(((t * t) / 2.0));
}
public static double code(double x, double y, double z, double t) {
double t_1 = Math.sqrt(((z * 2.0) * Math.pow(Math.exp(t), t)));
return (t_1 * (x * 0.5)) - (t_1 * y);
}
def code(x, y, z, t): return (((x * 0.5) - y) * math.sqrt((z * 2.0))) * math.exp(((t * t) / 2.0))
def code(x, y, z, t): t_1 = math.sqrt(((z * 2.0) * math.pow(math.exp(t), t))) return (t_1 * (x * 0.5)) - (t_1 * y)
function code(x, y, z, t) return Float64(Float64(Float64(Float64(x * 0.5) - y) * sqrt(Float64(z * 2.0))) * exp(Float64(Float64(t * t) / 2.0))) end
function code(x, y, z, t) t_1 = sqrt(Float64(Float64(z * 2.0) * (exp(t) ^ t))) return Float64(Float64(t_1 * Float64(x * 0.5)) - Float64(t_1 * y)) end
function tmp = code(x, y, z, t) tmp = (((x * 0.5) - y) * sqrt((z * 2.0))) * exp(((t * t) / 2.0)); end
function tmp = code(x, y, z, t) t_1 = sqrt(((z * 2.0) * (exp(t) ^ t))); tmp = (t_1 * (x * 0.5)) - (t_1 * y); end
code[x_, y_, z_, t_] := N[(N[(N[(N[(x * 0.5), $MachinePrecision] - y), $MachinePrecision] * N[Sqrt[N[(z * 2.0), $MachinePrecision]], $MachinePrecision]), $MachinePrecision] * N[Exp[N[(N[(t * t), $MachinePrecision] / 2.0), $MachinePrecision]], $MachinePrecision]), $MachinePrecision]
code[x_, y_, z_, t_] := Block[{t$95$1 = N[Sqrt[N[(N[(z * 2.0), $MachinePrecision] * N[Power[N[Exp[t], $MachinePrecision], t], $MachinePrecision]), $MachinePrecision]], $MachinePrecision]}, N[(N[(t$95$1 * N[(x * 0.5), $MachinePrecision]), $MachinePrecision] - N[(t$95$1 * y), $MachinePrecision]), $MachinePrecision]]
\left(\left(x \cdot 0.5 - y\right) \cdot \sqrt{z \cdot 2}\right) \cdot e^{\frac{t \cdot t}{2}}
\begin{array}{l}
t_1 := \sqrt{\left(z \cdot 2\right) \cdot {\left(e^{t}\right)}^{t}}\\
t_1 \cdot \left(x \cdot 0.5\right) - t_1 \cdot y
\end{array}
Results
| Original | 0.3 |
|---|---|
| Target | 0.3 |
| Herbie | 0.3 |
Initial program 0.3
Simplified0.3
Applied egg-rr0.3
Final simplification0.3
herbie shell --seed 2022210
(FPCore (x y z t)
:name "Data.Number.Erf:$cinvnormcdf from erf-2.0.0.0, A"
:precision binary64
:herbie-target
(* (* (- (* x 0.5) y) (sqrt (* z 2.0))) (pow (exp 1.0) (/ (* t t) 2.0)))
(* (* (- (* x 0.5) y) (sqrt (* z 2.0))) (exp (/ (* t t) 2.0))))