OFFSET
0,1
COMMENTS
REFERENCES
R. Witula, D. Jama, E. Hetmaniok, D. Slota, On some inequality of the trigonometric type, Zeszyty Naukowe Politechniki Slaskiej - Matematyka-Fizyka (Science Fascicle of Silesian Technical University - Math.-Phys.), 92 (2010), 83-92.
EXAMPLE
= 0.8470252640812533228197751102168942432471525...
MATHEMATICA
f[x_] := Log[Cos[Sin[x]]] / Log[Sin[Cos[x]]]; x /. FindRoot[f'[x] == 0, {x, 1}, WorkingPrecision -> 130] // RealDigits[#, 10, 126]& // First (* Jean-François Alcover, Feb 11 2013 *)
CROSSREFS
KEYWORD
nonn,cons
AUTHOR
Roman Witula, Aug 24 2012
EXTENSIONS
Terms corrected by Jean-François Alcover, Feb 11 2013
STATUS
approved