(FPCore (a b) :precision binary64 (exp (+ (log a) (log b))))
double code(double a, double b) {
return exp((log(a) + log(b)));
}
real(8) function code(a, b)
real(8), intent (in) :: a
real(8), intent (in) :: b
code = exp((log(a) + log(b)))
end function
public static double code(double a, double b) {
return Math.exp((Math.log(a) + Math.log(b)));
}
def code(a, b):
return math.exp((math.log(a) + math.log(b)))
function code(a, b)
return exp(Float64(log(a) + log(b)))
end
function tmp = code(a, b)
tmp = exp((log(a) + log(b)));
end
code[a_, b_] := N[Exp[N[(N[Log[a], $MachinePrecision] + N[Log[b], $MachinePrecision]), $MachinePrecision]], $MachinePrecision]