%I #5 Jun 12 2020 00:07:52
%S 4,7,8,7,2,2,4,2,4,1,1,7,9,4,1,3,7,0,3,3,0,4,1,1,6,5,0,8,5,2,3,0,3,9,
%T 4,9,0,1,4,1,5,0,9,9,3,5,5,2,6,9,5,1,2,0,1,6,5,0,8,8,3,2,5,5,6,3,4,5,
%U 4,2,4,9,6,3,6,3,1,6,0,8,4,5,3,9,3,7
%N Decimal expansion of the number u in [0,2 Pi] such that snc(u) = 0, where snc is the sine-normal-to-cosine function; see A332500.
%F u = x - Pi, where snc(x) = Pi, as in A332505.
%e u = 0.4787224241179413703304116508523039...
%t u = u /. FindRoot[ u Sec[u] + Sin[u] == 1, {u, 0}, WorkingPrecision -> 150]
%t RealDigits[u][[1]]
%Y Cf. A332500, A332505.
%K nonn,cons
%O 0,1
%A _Clark Kimberling_, May 05 2020