%I A072224
%S A072224 0,1,1,9,1,1,5,11,1,2,1,1,6,1,1,1,5,2,5,1,1,2,2,1,1,23,1,21,1,1,4,1,6,
%T A072224 1,1,2,2,30,3,1,6,3,3,2,4,1,3,2,3,1,13,43,24,1,6,2,6,1,2,3,81,4,8,6,1,
%U A072224 4,5,2,1,1,1,2,26,1,2,8,2,13,1,10,3,1,2,1,6,1,7,1,1,1,11,1,2,16,1,3,1
%N A072224 Continued fraction expansion of constant A072223.
%t A072224 ContinuedFraction[ x /. FindRoot[ (1-x^2)^2==x, {x, 0.5}, WorkingPrecision->
               200 ], 100 ]
%Y A072224 Cf. A072223, A072176.
%Y A072224 Sequence in context: A109012 A037478 A010162 this_sequence A085660 A092578 
               A128060
%Y A072224 Adjacent sequences: A072221 A072222 A072223 this_sequence A072225 A072226 
               A072227
%K A072224 nonn,easy,cofr
%O A072224 0,4
%A A072224 Michele Dondi (bik.mido(AT)tiscalinet.it), Jul 04, 2002