# Character: X3+X4
# Comment: young rep 4111
# Ind: 0
# Irred-dim: 10
# Ring: Z
# Sparsity: 91%
# 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 20 x 20 matrices\n";

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

return result;