OFFSET
1,2
MAPLE
L := [seq(0, i=1..1)]: for x from -20 to 20 do for y from -20 to 20 do for z from -20 to 20 do if member(3*x^2+2*x*y+2*x*z+3*y^2+2*y*z+3*z^2, L)=false then L := [op(L), 3*x^2 +2*x*y+2*x*z+3*y^2+2*y*z+3*z^2] fi: od: od: od: L2 := sort(L): for i from 1 to 100 do printf(`%d, `, L2[i]) od:
CROSSREFS
KEYWORD
nonn
AUTHOR
EXTENSIONS
More terms from James A. Sellers, May 31 2000
STATUS
approved