OFFSET
1,3
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(2*x^2+2*x*y+2*x*z+4*y^2+4*y*z+4*z^2, L)=false then L := [op(L), 2*x^2 +2*x*y+2*x*z+4*y^2+4*y*z+4*z^2] fi: od: od: od: L2 := sort(L): for i from 1 to 100 do printf(`%d, `, L2[i]/2) od:
CROSSREFS
KEYWORD
nonn
AUTHOR
EXTENSIONS
More terms from James A. Sellers, May 31 2000
STATUS
approved