OFFSET
1,1
EXAMPLE
2.03520570998090653714...
MAPLE
Digits:=105:fsolve(cosh(x)^x-(x^cosh(x)) =0, x, 0..5);
MATHEMATICA
RealDigits[ FindRoot[Cosh[x]^x == x^Cosh[x], {x, {0, 3} }, WorkingPrecision -> 120] [[0, 3] ]] [[2]]
CROSSREFS
KEYWORD
nonn,cons
AUTHOR
Michel Lagneau, Aug 12 2012
STATUS
approved