OFFSET
1,1
MATHEMATICA
RealDigits[x/.FindRoot[x^4==Tan[x], {x, 4.7, 4.72}, WorkingPrecision-> 120]][[1]] (* Harvey P. Dale, Dec 15 2011 *)
CROSSREFS
KEYWORD
nonn,cons
AUTHOR
Grover Hughes (ghughes(AT)magtel.com), Nov 16 2008
STATUS
approved