OFFSET
11,1
EXAMPLE
44176347790.3623043741904600906354776699927543304587133176...
MATHEMATICA
digits = 120; difs = 1; sold = 0; n = 10; While[Abs[difs] > 10^(-digits - 5), s = N[(n + 1)^2/n^2, 1000]; Do[s = ((m + 1)^2/m^2)^s, {m, n - 1, 1, -1}]; difs = s - sold; sold = s; n++]; RealDigits[s, 10, 120][[1]] (* Vaclav Kotesovec, Mar 03 2021 *)
CROSSREFS
KEYWORD
nonn,cons
AUTHOR
Koksal Karakus, Feb 21 2021
EXTENSIONS
More digits from Alois P. Heinz, Mar 02 2021
STATUS
approved