# Character: X3
# Comment: Young rep 44
# Ind: 1
# Ring: Z
# Sparsity: 78%
# Maximum absolute entry: 1
# Checker result: pass
# Conjugacy class representative result: pass

local b, B, w, W, i, result, delta, idmat;

result := rec();

w := E(3); W := E(3)^2;
b := E(7)+E(7)^2+E(7)^4; B := -1-b;  # b7, b7**
i := E(4);
result.comment := "A8 as 14 x 14 matrices\n";

result.generators := [
[[1,0,0,0,0,-1,1,0,0,-1,1,0,0,-1],
[0,1,0,0,0,0,0,-1,1,-1,0,0,1,-1],
[0,0,1,0,0,0,0,-1,0,0,-1,0,1,0],
[0,0,0,1,0,0,0,0,-1,0,0,-1,0,1],
[0,0,0,0,0,0,0,0,0,-1,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,-1,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,-1],
[0,0,0,0,1,0,0,0,0,-1,0,0,0,0],
[0,0,0,0,0,1,0,0,0,0,-1,0,0,0],
[0,0,0,0,0,0,1,0,0,0,0,-1,0,0],
[0,0,0,0,0,0,0,1,0,0,0,0,-1,0],
[0,0,0,0,0,0,0,0,1,0,0,0,0,-1]]
,
[[-1,0,0,0,0,0,0,0,0,1,-1,0,0,1],
[-1,0,0,0,0,0,0,0,0,0,0,0,0,0],
[-1,0,0,0,0,1,-1,0,0,0,-1,1,0,0],
[-1,0,0,1,0,1,-1,0,0,0,-1,0,0,1],
[0,-1,0,0,0,0,0,0,0,0,0,0,0,0],
[0,-1,0,0,0,0,0,1,-1,0,0,0,-1,1],
[0,-1,0,1,0,0,0,1,-1,0,0,0,-1,1],
[0,0,-1,0,0,0,0,1,0,0,0,0,-1,0],
[0,0,-1,1,0,0,0,1,-1,0,0,0,-1,1],
[0,0,0,0,-1,0,0,0,0,0,0,0,0,0],
[0,0,0,0,-1,0,0,1,-1,0,0,0,0,0],
[0,0,0,0,-1,0,1,1,-1,0,0,0,0,0],
[0,0,0,0,0,-1,0,1,0,0,0,0,0,0],
[0,0,0,0,0,-1,1,1,-1,0,0,0,0,0]]];

return result;