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