w2:=sqrt(2); w5:=sqrt(5); w10:=w2*w5; s1:=sqrt(2+sqrt(2)); s2:=sqrt(sqrt(5)-1); I:=sqrt(-1); phi:=[ 8, ((-w10-3*w2+w5+3)*s1*s2+2*w2*s1)*I+((w5+3)*s1+2*w5+6)*s2-(2*w2-4)*s1-4*w2, -(2*w10+6*w2)*s2, ((-w10-3*w2+w5+3)*s1*s2-2*w2*s1)*I+((w5+3)*s1-2*w5-6)*s2+(2*w2-4)*s1-4*w2, -8, ((w10+3*w2-w5-3)*s1*s2-2*w2*s1)*I+(-(w5+3)*s1+2*w5+6)*s2+(2*w2-4)*s1-4*w2, (2*w10+6*w2)*s2, ((w10+3*w2-w5-3)*s1*s2+2*w2*s1)*I+(-(w5+3)*s1-2*w5-6)*s2-(2*w2-4)*s1-4*w2 ];