A332504 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.

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, 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, 4, 2, 4, 9, 6, 3, 6, 3, 1, 6, 0, 8, 4, 5, 3, 9, 3, 7

Offset: 0

Author

Clark Kimberling, May 05 2020

Keywords

• nonn
• cons

Examples

			u = 0.4787224241179413703304116508523039...
		

Crossrefs

Cf. A332500, A332505.

Programs

Mathematica

u = u /. FindRoot[ u Sec[u] + Sin[u] == 1, {u, 0}, WorkingPrecision -> 150]
RealDigits[u][[1]]

Formula

u = x - Pi, where snc(x) = Pi, as in A332505.