# Character: X2
# Comment: Young rep 12,1
# Ind: 1
# Ring: Z
# Sparsity: 87%
# 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 := "A13 as 12 x 12 matrices\n";

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

return result;