
(FPCore (x) :precision binary64 (+ x (* x x)))
double code(double x) {
return x + (x * x);
}
real(8) function code(x)
real(8), intent (in) :: x
code = x + (x * x)
end function
public static double code(double x) {
return x + (x * x);
}
def code(x): return x + (x * x)
function code(x) return Float64(x + Float64(x * x)) end
function tmp = code(x) tmp = x + (x * x); end
code[x_] := N[(x + N[(x * x), $MachinePrecision]), $MachinePrecision]
x + x \cdot x