OFFSET
0,1
EXAMPLE
u = 0.4158555967898679887880048019...
MATHEMATICA
u = u /. FindRoot[0 == (-Pi/4) Sec[u] + u Sec[u] + Sin[u], {u, 0}, WorkingPrecision -> 150]
RealDigits[u][[1]]
CROSSREFS
KEYWORD
nonn,cons
AUTHOR
Clark Kimberling, May 05 2020
STATUS
approved