gens:=[
    Matrix(GF(3),5,5,[0, 1, 0, 0, 1, 0, 1, 0, 0, 0, 2, 1, 2, 0, 1, 1, 2, 2, 1, 2, 0, 0, 
    2, 0, 1 ]),

    Matrix(GF(3),5,5,[1, 2, 2, 2, 0, 0, 1, 0, 0, 0, 0, 0, 1, 0, 0, 2, 0, 1, 1, 1, 0, 2, 
    2, 2, 1 ])
];




P:=PermutationGroup<24| (1, 3, 7)(4, 6, 19)(10, 16, 17)(11, 23, 14)(12, 13, 18)(20, 24, 22),(2, 15, 21)(3, 17, 19)(4, 10, 7)(5, 23, 18)(8, 14, 13)(9, 11, 12)>;




L770:=GModule(P,gens);


print("a P-source L770 of the simple M24-module D770 over GF(3), and a 
permutation representation of the Sylow 3-subgroup P of M24 on 24 points");