/*
www-ATLAS of Group Representations.
S4(4) represented as 18 x 18 matrices over GF(3).
*/

F:=GF(3);

x:=CambridgeMatrix(1,F,18,[
"010000000000000000",
"100000000000000000",
"000010000000000000",
"000001000000000000",
"001000000000000000",
"000100000000000000",
"000000001000000000",
"000000000010000000",
"000000100000000000",
"000000000000010000",
"000000010000000000",
"220000000102010000",
"002222212010200000",
"000000000100000000",
"111111212010002000",
"000000212010000200",
"221212222220020020",
"110101222120010002"]);

y:=CambridgeMatrix(1,F,18,[
"001000000000000000",
"000100000000000000",
"200200000000000000",
"022200000000000000",
"000000100000000000",
"000000010000000000",
"000000000100000000",
"000000000001000000",
"000000000000100000",
"000000000000001000",
"001111120000200000",
"000000000000000100",
"000000000000000010",
"220222112010002000",
"000000000000000001",
"220021001010000002",
"210012100010222120",
"000010000000000000"]);

G<x,y>:=MatrixGroup<18,F|x,y>;
print "Group G is S4(4) < GL(18,GF(3))";