%I A028613
%S A028613 1,0,0,0,2,0,0,0,0,0,0,0,0,4,0,0,2,0,0,0,0,4,0,0,0,0,0,0,0,0,0,0,0,0,0,
%T A028613 0,2,4,0,0,0,0,0,0,0,0,0,0,2,0,0,0,4,0,0,0,0,0,0,0,0,4,0,0,6,0,0,0,0,0,
%U A028613 0,0,0,0,0,0,0,0,0,0,0,0,0,0,4,0,0,0,0,0,0,0,0,4,0,0,0,0,0,0,2,0,0,0,0
%N A028613 Expansion of (theta_3(z)*theta_3(12z)+theta_2(z)*theta_2(12z)).
%C A028613 Expansion of theta_3(q)theta_3(q^12)+theta_2(q)*theta_2(q^12) in powers 
               of q^(1/4).
%F A028613 a(8n+7)=a(8n+6)=a(8n+3)=a(8n+2)=a(8n+1)=a(16n+8)=a(16n+12)=0.
%o A028613 (PARI) a(n)=local(X); if(n<0,0,X=x+x*O(x^n); polcoeff((eta(X^8)*eta(X^96))^5/
               (eta(X^4)*eta(X^16)*eta(X^48)*eta(X^192))^2+4*x^13*(eta(X^16)*eta(X^192))^2/
               (eta(X^8)*eta(X^96)),n))
%Y A028613 Sequence in context: A084863 A073346 A114099 this_sequence A024362 A104488 
               A010103
%Y A028613 Adjacent sequences: A028610 A028611 A028612 this_sequence A028614 A028615 
               A028616
%K A028613 nonn
%O A028613 0,5
%A A028613 N. J. A. Sloane (njas(AT)research.att.com).