double code(double a, double b, double c) {
double tmp;
if (b >= 0.0) {
tmp = (-b - sqrt(((b * b) - ((4.0 * a) * c)))) / (2.0 * a);
} else {
tmp = (2.0 * c) / (-b + sqrt(((b * b) - ((4.0 * a) * c))));
}
return tmp;
}
↓
double code(double a, double b, double c) {
double t_0 = sqrt(((b * b) - ((4.0 * a) * c)));
double tmp;
if (b >= 0.0) {
tmp = (-b - t_0) / (a * 2.0);
} else {
tmp = (c * 2.0) / (t_0 - b);
}
double t_1 = tmp;
double tmp_2;
if (t_1 <= -((double) INFINITY)) {
double tmp_3;
if (b >= 0.0) {
tmp_3 = -b / a;
} else {
tmp_3 = b / a;
}
tmp_2 = tmp_3;
} else if (t_1 <= -1e-158) {
tmp_2 = t_1;
} else if (t_1 <= 0.0) {
double tmp_4;
if (b >= 0.0) {
tmp_4 = (((2.0 * ((a * c) / b)) - b) - b) / (a * 2.0);
} else {
tmp_4 = (c * 2.0) / (fma(2.0, (c / (b / a)), -b) - b);
}
tmp_2 = tmp_4;
} else if (t_1 <= 5e+260) {
tmp_2 = t_1;
} else if (b >= 0.0) {
tmp_2 = (-b - b) / (a * 2.0);
} else {
tmp_2 = -c / b;
}
return tmp_2;
}
function code(a, b, c)
tmp = 0.0
if (b >= 0.0)
tmp = Float64(Float64(Float64(-b) - sqrt(Float64(Float64(b * b) - Float64(Float64(4.0 * a) * c)))) / Float64(2.0 * a));
else
tmp = Float64(Float64(2.0 * c) / Float64(Float64(-b) + sqrt(Float64(Float64(b * b) - Float64(Float64(4.0 * a) * c)))));
end
return tmp
end
↓
function code(a, b, c)
t_0 = sqrt(Float64(Float64(b * b) - Float64(Float64(4.0 * a) * c)))
tmp = 0.0
if (b >= 0.0)
tmp = Float64(Float64(Float64(-b) - t_0) / Float64(a * 2.0));
else
tmp = Float64(Float64(c * 2.0) / Float64(t_0 - b));
end
t_1 = tmp
tmp_2 = 0.0
if (t_1 <= Float64(-Inf))
tmp_3 = 0.0
if (b >= 0.0)
tmp_3 = Float64(Float64(-b) / a);
else
tmp_3 = Float64(b / a);
end
tmp_2 = tmp_3;
elseif (t_1 <= -1e-158)
tmp_2 = t_1;
elseif (t_1 <= 0.0)
tmp_4 = 0.0
if (b >= 0.0)
tmp_4 = Float64(Float64(Float64(Float64(2.0 * Float64(Float64(a * c) / b)) - b) - b) / Float64(a * 2.0));
else
tmp_4 = Float64(Float64(c * 2.0) / Float64(fma(2.0, Float64(c / Float64(b / a)), Float64(-b)) - b));
end
tmp_2 = tmp_4;
elseif (t_1 <= 5e+260)
tmp_2 = t_1;
elseif (b >= 0.0)
tmp_2 = Float64(Float64(Float64(-b) - b) / Float64(a * 2.0));
else
tmp_2 = Float64(Float64(-c) / b);
end
return tmp_2
end
code[a_, b_, c_] := If[GreaterEqual[b, 0.0], N[(N[((-b) - N[Sqrt[N[(N[(b * b), $MachinePrecision] - N[(N[(4.0 * a), $MachinePrecision] * c), $MachinePrecision]), $MachinePrecision]], $MachinePrecision]), $MachinePrecision] / N[(2.0 * a), $MachinePrecision]), $MachinePrecision], N[(N[(2.0 * c), $MachinePrecision] / N[((-b) + N[Sqrt[N[(N[(b * b), $MachinePrecision] - N[(N[(4.0 * a), $MachinePrecision] * c), $MachinePrecision]), $MachinePrecision]], $MachinePrecision]), $MachinePrecision]), $MachinePrecision]]
↓
code[a_, b_, c_] := Block[{t$95$0 = N[Sqrt[N[(N[(b * b), $MachinePrecision] - N[(N[(4.0 * a), $MachinePrecision] * c), $MachinePrecision]), $MachinePrecision]], $MachinePrecision]}, Block[{t$95$1 = If[GreaterEqual[b, 0.0], N[(N[((-b) - t$95$0), $MachinePrecision] / N[(a * 2.0), $MachinePrecision]), $MachinePrecision], N[(N[(c * 2.0), $MachinePrecision] / N[(t$95$0 - b), $MachinePrecision]), $MachinePrecision]]}, If[LessEqual[t$95$1, (-Infinity)], If[GreaterEqual[b, 0.0], N[((-b) / a), $MachinePrecision], N[(b / a), $MachinePrecision]], If[LessEqual[t$95$1, -1e-158], t$95$1, If[LessEqual[t$95$1, 0.0], If[GreaterEqual[b, 0.0], N[(N[(N[(N[(2.0 * N[(N[(a * c), $MachinePrecision] / b), $MachinePrecision]), $MachinePrecision] - b), $MachinePrecision] - b), $MachinePrecision] / N[(a * 2.0), $MachinePrecision]), $MachinePrecision], N[(N[(c * 2.0), $MachinePrecision] / N[(N[(2.0 * N[(c / N[(b / a), $MachinePrecision]), $MachinePrecision] + (-b)), $MachinePrecision] - b), $MachinePrecision]), $MachinePrecision]], If[LessEqual[t$95$1, 5e+260], t$95$1, If[GreaterEqual[b, 0.0], N[(N[((-b) - b), $MachinePrecision] / N[(a * 2.0), $MachinePrecision]), $MachinePrecision], N[((-c) / b), $MachinePrecision]]]]]]]]