OFFSET
0,1
LINKS
Vincenzo Librandi, Table of n, a(n) for n = 0..5000
FORMULA
Equals cos(log(Pi)) = (Pi^i+1/Pi^i)/2.
EXAMPLE
0.41329211610159433662662839427669756498559068708354508287197664247...
MATHEMATICA
RealDigits[Re[Pi^I], 10, 90][[1]] (* or *) RealDigits[Cos[Log[Pi]], 10, 90][[1]]
PROG
(Maxima) fpprec:90; ev(bfloat(realpart(%pi^%i)));
CROSSREFS
KEYWORD
nonn,cons
AUTHOR
Bruno Berselli, Feb 08 2013
STATUS
approved