\[1 \leq x \land x \leq 10^{+100}\]
\[\tanh^{-1} \left(\frac{1}{1 + {10}^{\left(-x\right)}}\right)
\]
(FPCore (x) :precision binary64 (atanh (/ 1.0 (+ 1.0 (pow 10.0 (- x))))))
double code(double x) {
return atanh((1.0 / (1.0 + pow(10.0, -x))));
}
def code(x):
return math.atanh((1.0 / (1.0 + math.pow(10.0, -x))))
function code(x)
return atanh(Float64(1.0 / Float64(1.0 + (10.0 ^ Float64(-x)))))
end
function tmp = code(x)
tmp = atanh((1.0 / (1.0 + (10.0 ^ -x))));
end
code[x_] := N[ArcTanh[N[(1.0 / N[(1.0 + N[Power[10.0, (-x)], $MachinePrecision]), $MachinePrecision]), $MachinePrecision]], $MachinePrecision]
\tanh^{-1} \left(\frac{1}{1 + {10}^{\left(-x\right)}}\right)