%I A096534
%S A096534 0,1,1,2,3,5,1,6,7,3,10,1,11,12,8,4,12,16,9,5,14,19,10,5,15,20,8,0,8,8,
%T A096534 16,24,7,31,3,34,0,34,34,28,21,7,28,35,18,7,25,32,8,40,48,36,31,13,44,
               1,
%U A096534 45,46,32,18,50,6,56,62,53,49,35,16,51,67,47,42,16,58,74,56,53,31,5,36
%N A096534 a(1) = 0; a(2) = 1; a(n) = (a(n-1) + a(n-2)) mod n.
%t A096534 l = {0, 1}; For[i = 3, i <= 100, i++, len = Length[l]; l = Append[l, 
               Mod[l[[len]] + l[[len - 1]], i]]]; l
%Y A096534 Cf. A079777, A096535.
%Y A096534 Sequence in context: A002752 A128047 A105870 this_sequence A139047 A121053 
               A132597
%Y A096534 Adjacent sequences: A096531 A096532 A096533 this_sequence A096535 A096536 
               A096537
%K A096534 easy,nonn
%O A096534 1,4
%A A096534 Frank Adams-Watters (FrankTAW(AT)Netscape.net), Jun 23 2004