OFFSET
1,1
LINKS
EXAMPLE
arccos(-(1/2)^(1/3)) = 2.4876647110895...
MATHEMATICA
r = (1/2)^(1/3);
N[ArcCos[-r], 100]
RealDigits[%] (* A195715 *)
RealDigits[ArcCos[Surd[(-1/2), 3]], 10, 120][[1]] (* Harvey P. Dale, Feb 22 2018 *)
PROG
(PARI) acos(-(1/2)^(1/3)) \\ G. C. Greubel, Aug 20 2018
(Magma) SetDefaultRealField(RealField(100)); Arccos(-(1/2)^(1/3)); // G. C. Greubel, Aug 20 2018
CROSSREFS
KEYWORD
nonn,cons
AUTHOR
Clark Kimberling, Sep 23 2011
STATUS
approved