%I #6 Jun 08 2020 11:08:11

%S 0,8,8,5,1,2,5,9,2,6,5,9,1,6,3,1,0,9,1,8,4,2,4,5,5,8,4,9,0,8,7,4,7,7,

%T 6,4,9,9,7,5,5,5,7,4,9,6,9,1,1,9,5,0,0,4,8,8,4,4,0,8,7,1,3,6,5,2,3,0,

%U 2,9,6,1,6,9,8,0,9,3,7,3,7,6,5,0,8,7,0,4,0,3,6,9,6,0,7,1,7,5,0,4,4,6,3,4,5,3

%N Decimal expansion of Sum_{k>=1} 1/(k*sinh(Pi*k)).

%F Equals Pi/12 - log(2)/4.

%e 0.0885125926591631091842455849087477649975557496911950048844...

%p evalf(Sum(1/(k*sinh(Pi*k)), k=1..infinity), 120);

%p evalf(Pi/12 - log(2)/4, 120);

%t Join[{0}, RealDigits[Pi/12 - Log[2]/4, 10, 120][[1]]]

%o (PARI) suminf(k=1, 1/(k*sinh(Pi*k)))

%Y Cf. A240964, A335415.

%K nonn,cons

%O 0,2

%A _Vaclav Kotesovec_, Jun 08 2020