(FPCore (x) :precision binary64 (sqrt (- 1.0 x)))

(FPCore (x) :precision binary64 (sqrt (- 1.0 x)))

double code(double x) {
	return sqrt((1.0 - x));
}

double code(double x) {
	return sqrt((1.0 - x));
}

real(8) function code(x)
    real(8), intent (in) :: x
    code = sqrt((1.0d0 - x))
end function

real(8) function code(x)
    real(8), intent (in) :: x
    code = sqrt((1.0d0 - x))
end function

public static double code(double x) {
	return Math.sqrt((1.0 - x));
}

public static double code(double x) {
	return Math.sqrt((1.0 - x));
}

def code(x):
	return math.sqrt((1.0 - x))

def code(x):
	return math.sqrt((1.0 - x))

function code(x)
	return sqrt(Float64(1.0 - x))
end

function code(x)
	return sqrt(Float64(1.0 - x))
end

function tmp = code(x)
	tmp = sqrt((1.0 - x));
end

function tmp = code(x)
	tmp = sqrt((1.0 - x));
end

code[x_] := N[Sqrt[N[(1.0 - x), $MachinePrecision]], $MachinePrecision]

code[x_] := N[Sqrt[N[(1.0 - x), $MachinePrecision]], $MachinePrecision]

\sqrt{1 - x}

\sqrt{1 - x}