local w, v, result; result := rec(); w := E(3); v := w^2; result.comment := "3A7 as 21 x 21 matrices (b) over Z(z3)\n\ "; result.symmetricforms := [ ]; result.antisymmetricforms := [ ]; result.hermitianforms := [ [[28,-5*w-9*v,10*v,-2*w-9*v,2*w+8*v,-15*w-8*v,5*w+8*v,-3*w-11*v,8*w+5*v, 1,5*w-v,-8*w-3*v,-8*w-15*v,4*w+18*v,4*w,-15*w-8*v,3*w-8*v,10*w,2*w+5*v, 8*w+11*v,w-3*v], [-9*w-5*v,28,-3*w+4*v,-5,-5,-5*w-9*v,-8*w-15*v,4*w-3*v,-2*w-9*v,1,-14,4*v, -15*w-8*v,5*w+8*v,1,8*w+5*v,-4*w-7*v,5*w-v,-9*w-2*v,1,w], [10*w,4*w-3*v,28,-14,-5,7*w,-5*w-9*v,-5,-2*w,-2*w-9*v,7*v,-14,-14,-15*w-8*v, -9*w-2*v,4*v,-3*w+4*v,10*v,-8*w-15*v,1,10*v], [-9*w-2*v,-5,-14,28,-9*w-2*v,-3*w+4*v,-11,-9*w-5*v,-5,5*w+8*v,-5*w-9*v, -11*w-3*v,-8*w-15*v,-11,8*w+2*v,1,4*w-3*v,4*v,-14,4,-3*w-11*v], [8*w+2*v,-5,-5,-2*w-9*v,28,7*w,-3*w+4*v,-5,-14*w,-5,-2*v,-5*w-9*v,4*w-3*v, -8*w-15*v,-2*w-9*v,3*w+v,-14,-7*w-4*v,5*w+8*v,1,-4*w-7*v], [-8*w-15*v,-9*w-5*v,7*v,4*w-3*v,7*v,28,-3*w+4*v,-14*v,-5,4,7*w,-2*w, -5*w-9*v,10*v,4*v,-2*w-9*v,5*w-4*v,-14,-w+5*v,-2*w-3*v,4*w+3*v], [8*w+5*v,-15*w-8*v,-9*w-5*v,-11,4*w-3*v,4*w-3*v,28,-14,10,-5,-14,7*w,-5, -5*w-9*v,-2*w,-8,7*v,-2*w,-15*w-8*v,-9*w-2*v,-3*w+4*v], [-11*w-3*v,-3*w+4*v,-5,-5*w-9*v,-5,-14*w,-14,28,7*w,-9*w-2*v,-14*v,-3*w+4*v, -9*w-5*v,-11,-5,4,-5*w-9*v,7*w+3*v,-11,8*w+2*v,4*w-3*v], [5*w+8*v,-9*w-2*v,-2*v,-5,-14*v,-5,10,7*v,28,w+3*v,7*w,-2*v,-3*w+4*v, 3*w-8*v,3*w-2*v,-5,-14*w,-5*w-9*v,1,4,w-3*v], [1,1,-9*w-2*v,8*w+5*v,-5,4,-5,-2*w-9*v,3*w+v,28,4*w,7*w,-5,-3*w+4*v,-14*w,-5, -2*v,4*w,-8*w-15*v,-2*w-9*v,-14], [-w+5*v,-14,7*w,-9*w-5*v,-2*w,7*v,-14,-14*w,7*v,4*v,28,10*v,-3*w+4*v, 5*w-v,2*w-v,4,-2*w,-2*w,10*w,w-3*v,-2*w-3*v], [-3*w-8*v,4*w,-14,-3*w-11*v,-9*w-5*v,-2*v,7*v,4*w-3*v,-2*w,7*v,10*w,28, -14*v,-3*w+4*v,-5,-2*v,7*w,7,10*v,4*v,5*w-4*v], [-15*w-8*v,-8*w-15*v,-14,-15*w-8*v,-3*w+4*v,-9*w-5*v,-5,-5*w-9*v, 4*w-3*v,-5,4*w-3*v,-14*w,28,-14,7*w,-5,-14*v,7*w,-11,-5,-5*w-9*v], [18*w+4*v,8*w+5*v,-8*w-15*v,-11,-15*w-8*v,10*w,-9*w-5*v,-11,-8*w+3*v, 4*w-3*v,-w+5*v,4*w-3*v,-14,28,10,4*w,-14,-7*w+2*v,-5*w-9*v,-2*w,7*v], [4*v,1,-2*w-9*v,2*w+8*v,-9*w-2*v,4*w,-2*v,-5,-2*w+3*v,-14*v,-w+2*v,-5, 7*v,10,28,7*v,7*w,4,3*w-8*v,3*w-2*v,-14*w], [-8*w-15*v,5*w+8*v,4*w,1,w+3*v,-9*w-2*v,-8,4,-5,-5,4,-2*w,-5,4*v,7*w,28, -2*v,7*w,5*w+8*v,-w+2*v,-2*w-9*v], [-8*w+3*v,-7*w-4*v,4*w-3*v,-3*w+4*v,-14,-4*w+5*v,7*w,-9*w-5*v,-14*v,-2*w, -2*v,7*v,-14*w,-14,7*v,-2*w,28,-5*v,5*w-v,2*w-v,-2*w], [10*v,-w+5*v,10*w,4*w,-4*w-7*v,-14,-2*v,3*w+7*v,-9*w-5*v,4*v,-2*v,7, 7*v,2*w-7*v,4,7*v,-5*w,28,w,w,4], [5*w+2*v,-2*w-9*v,-15*w-8*v,-14,8*w+5*v,5*w-v,-8*w-15*v,-11,1, -15*w-8*v,10*v,10*w,-11,-9*w-5*v,-8*w+3*v,8*w+5*v,-w+5*v,v,28,10,-14], [11*w+8*v,1,1,4,1,-3*w-2*v,-2*w-9*v,2*w+8*v,4,-9*w-2*v,-3*w+v,4*w,-5, -2*v,-2*w+3*v,2*w-v,-w+2*v,v,10,28,7*w], [-3*w+v,v,10*w,-11*w-3*v,-7*w-4*v,3*w+4*v,4*w-3*v,-3*w+4*v,-3*w+v, -14,-3*w-2*v,-4*w+5*v,-9*w-5*v,7*w,-14*v,-9*w-2*v,-2*v,4,-14,7*v,28]]]; result.centralizeralgebra := [ IdentityMat(21) ]; result.generators := [ [[-w,-1,0,w,0,0,w,0,0,w,0,0,0,0,0,w,0,0,0,-w,0], [0,0,0,1,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+2*v,-v,0,-v,0,0,-w,0,0,0,0,0,0,0,0,1,0,0,-v,v,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,0,0,0,0,0,1,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,w,0,0,0,0,0,0,0,0,-1,w,0,0,0,0,0,0,0,0], [0,0,0,0,-w,0,0,0,-v,0,0,0,0,0,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,1,0,0,0,0,0,0,0,0,0,0,0,0,0,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], [2*w+v,0,0,-w-2*v,0,0,0,0,0,0,0,0,-w,0,0,-w,0,0,1,-1,0], [-w-2*v,0,0,v,0,0,0,0,-w,0,0,0,-1,w,0,-1,-v,0,v,-v,0], [0,0,0,0,0,0,0,0,0,0,0,0,-v,0,1,-v,-w,0,0,0,0], [-2*w-v,0,0,w+2*v,0,0,-1,0,0,-1,0,0,2*w+v,0,0,2*w+v,0,0,-1,1,0], [0,0,0,0,-w,0,0,0,w,0,0,0,0,0,0,0,v,0,0,0,0], [0,0,0,0,0,0,w,-1,0,0,w,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,0,0,0], [v,-w-2*v,0,0,0,0,-w+v,0,0,v,0,0,w,0,0,1,0,0,w-v,0,0], [-1,v,0,0,0,0,w,0,0,0,0,0,-w-2*v,-w,-v,0,-w,0,-w,0,v]] , [[-w+v,0,w,2*w,0,w,0,0,0,0,0,0,-v,0,0,-v,0,-1,w,-w,0], [0,0,0,0,1,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,0,0,0,0,0,0,1,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,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,0,0,0,0,0,1,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,0,0,0,0,0,0,0,1,0,0,0,0,0,0], [-w+v,-v,0,0,0,0,-w,0,0,0,0,0,w,0,0,-v,0,0,w,-w,0], [0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,1,0,0,0,0], [0,1,0,0,w,0,-1,0,v,0,0,0,w,-v,0,0,-v,0,0,0,0], [0,v,0,0,-v,0,w,0,0,0,0,0,1,-w,0,0,0,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,0,0,0,0,0,0,1,0], [-2*w-v,0,w,2*w+v,v,2*w+v,0,0,0,0,0,0,w,w,0,w,0,-1,-1,1,0], [0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,1], [0,-w,-v,0,0,0,w,w,0,0,1,w,-v,0,0,0,0,0,0,0,0], [w+2*v,-v,0,-v,0,0,-w,0,0,0,0,0,0,0,0,1,0,0,-v,v,0], [0,-v,0,-w,0,0,-w,1,0,0,0,0,-1,0,0,0,0,1,0,0,0], [-v,v,0,v,0,0,w,0,0,0,0,0,0,0,0,-1,0,0,v,-v,0]]]; return result;