OFFSET
1,2
EXAMPLE
x = 1.40757981445881000487...
MATHEMATICA
x=GoldenRatio; RealDigits[Log[x]/ProductLog[Log[x]], 10, 6! ][[1]] (* Vladimir Joseph Stephan Orlovsky, Feb 11 2010 *)
PROG
(PARI) solve(x=1, 2, x^x-(1+sqrt(5))/2)
CROSSREFS
KEYWORD
cons,nonn
AUTHOR
Rick L. Shepherd, Sep 29 2007
STATUS
approved