Table[cos(3*a*2*pi/8), {a, 0,7}].Table[cos(3*a*2*pi/8), {a, 0,7}]