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

(FPCore (x) :precision binary64 (pow x 0.25))

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

double code(double x) {
	return pow(x, 0.25);
}

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

real(8) function code(x)
    real(8), intent (in) :: x
    code = x ** 0.25d0
end function

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

public static double code(double x) {
	return Math.pow(x, 0.25);
}

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

def code(x):
	return math.pow(x, 0.25)

function code(x)
	return sqrt(sqrt(x))
end

function code(x)
	return x ^ 0.25
end

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

function tmp = code(x)
	tmp = x ^ 0.25;
end

code[x_] := N[Sqrt[N[Sqrt[x], $MachinePrecision]], $MachinePrecision]

code[x_] := N[Power[x, 0.25], $MachinePrecision]

\sqrt{\sqrt{x}}

{x}^{0.25}