OFFSET
1,1
FORMULA
u = Pi + x, where snc(x) = 0 as in A332504.
EXAMPLE
u = 3.620315077707734608793055034131...
MATHEMATICA
u = u /. FindRoot[ -1 == -Pi Sec[u] + u Sec[u] + Sin[u], {u, 0}, WorkingPrecision -> 150]
d = RealDigits[u][[1]]
CROSSREFS
KEYWORD
nonn,cons
AUTHOR
Clark Kimberling, May 05 2020
STATUS
approved