# Character: X7
# Comment: young rep 511
# Ind: 1
# Ring: Z
# Sparsity: 88%
# 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 := "A7 as 15 x 15 matrices\n";

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

return result;