%I A096008
%S A096008 0,0,1,0,1,0,1,0,1,4,0,1,3,4,0,1,2,4,0,1,4,0,1,4,7,0,1,4,5,6,9,0,1,3,4,
%T A096008 5,9,0,1,4,9,0,1,3,4,9,10,12,0,1,2,4,7,8,9,11,0,1,4,6,9,10,0,1,4,9,0,1,
%U A096008 2,4,8,9,13,15,16,0,1,4,7,9,10,13,16,0,1,4,5,6,7,9,11,16,17,0,1,4,5,9
%N A096008 Table where n-th row contains all quadratic residues (including zero) 
               mod n.
%H A096008 Eric Weisstein's World of Mathematics, <a href="http://mathworld.wolfram.com/
               QuadraticResidue.html">Quadratic Residue.</a>
%e A096008 The table starts:
%e A096008 0
%e A096008 0,1
%e A096008 0,1
%e A096008 0,1
%e A096008 0,1,4
%e A096008 0,1,3,4
%o A096008 (PARI) T(n) = {local(v,r,i,j,k); v=vector(n,i,0); for(i=0,floor(n/2),
               v[i^2%n+1]=1); k=sum(i=1,n,v[i]); j=0; r=vector(k); for(i=1,n, if(v[i], 
               j++; r[j]=i-1)); r}
%Y A096008 Cf A046071 (without zeros), A000224 (row lengths), A063987.
%Y A096008 Sequence in context: A096793 A155998 A127538 this_sequence A122873 A115715 
               A115636
%Y A096008 Adjacent sequences: A096005 A096006 A096007 this_sequence A096009 A096010 
               A096011
%K A096008 easy,tabf,nonn
%O A096008 1,10
%A A096008 Cino Hilliard (hillcino368(AT)gmail.com), Jul 20 2004
%E A096008 Edited by Franklin T. Adams-Watters (FrankTAW(AT)Netscape.net), Nov 07 
               2006