local w, result; result := rec(); w := E(3); result.comment := "3A7 as 6 x 6 matrices\n"; result.symmetricforms := [ ]; result.antisymmetricforms := [ ]; result.hermitianforms := [ [[4,0,2,2,0,2], [0,4,0,2,2,2*w], [2,0,4,0,2,0], [2,2,0,4,0,0], [0,2,2,0,4,2*w], [2,2*w^2,0,0,2*w^2,4]]]; result.centralizeralgebra:=[ IdentityMat(6) ]; result.generators := [ [[1,0,0,0,0,0], [0,w^2,0,0,0,0], [0,0,1,0,0,0], [0,0,0,0,0,1], [-1+w,0,1-w,-w,w,1], [2,0,-1,-1,0,-1]] , [[0,1,0,0,0,0], [0,0,1,0,0,0], [0,0,0,1,0,0], [0,0,0,0,1,0], [1,0,0,0,0,0], [-1,1,-w,0,w,1]]]; return result;