local z, r, result;

result := rec();

result.comment := "L2(109) as 110 x 110 monomial matrices over Z(z54)\n";

# Change the value of r to any number between 1 and 26
# to get the complete set of inequivalent faithful irreducible 110-dimensional
# representations of L2(109)
r := 1;
z := E(54)^r;

result.symmetricforms := [ ]; 
result.antisymmetricforms := [ ]; 
result.hermitianforms := [ IdentityMat(110) ];
result.centralizeralgebra := [ IdentityMat(110) ];

result.generators := [
DiagonalMat([z^48,z^9,z^44,z^33,z^34,1,z^38,z^13,z^11,z^36,z^49,z^42,
  z^14,z^37,z^19,z^38,z^6,-1,z^23,z^13,z^3,z^15,z^41,z^25,z^18,z^30,
  z^29,z^20,z^36,z^39,z^18,z^40,z^35,z^32,z^7,z^14,z^22,z^2,z^51,z^39,
  z^53,z^42,-1,z^18,z^26,z^40,z^50,z^35,z^46,z^50,z^15,z^6,z^52,z^22,
  z^24,z^28,z^5,z^25,z^21,z^4,z^12,z^12,z^53,z^5,z^20,z^47,z^34,z^43,
  z^52,z,z^33,z^10,z^44,z^7,z^37,z^10,z^16,z^2,z^30,z^31,z,z^16,z^49,
  z^47,z^3,z^21,z^28,z^41,z^17,1,z^11,z^32,z^29,z^23,z^51,z^45,z^9,
  z^45,z^8,z^43,z^48,z^19,z^24,z^26,z^4,z^46,z^8,z^31,z^17,z^36]) *
PermutationMat(
(  1, 17)(  2, 98)(  3, 76)(  4, 86)(  5, 65)(  6, 90)(  7, 77)(  8, 23)
(  9, 68)( 10, 31)( 11, 64)( 12, 62)( 13, 46)( 14,109)( 15, 48)( 16, 82)
( 19,108)( 20, 88)( 21, 39)( 22, 40)( 24, 27)( 25, 29)( 26,103)( 28, 67)
( 30, 51)( 32, 36)( 33,102)( 34, 37)( 35, 66)( 38, 53)( 41, 81)( 42, 61)
( 44,110)( 45, 87)( 47, 60)( 49,107)( 50,105)( 52,101)( 54, 92)( 55, 79)
( 56,104)( 57, 83)( 58, 93)( 59, 71)( 63, 70)( 69, 78)( 72, 73)( 74, 84)
( 75, 89)( 80, 94)( 85, 95)( 91,100)( 96, 97)( 99,106), 110)
,
DiagonalMat([z^46,z^53,z^14,z^47,z^45,z,z^19,z^26,z^39,z^15,z^52,z^9,
  z^30,-1,z^21,z^49,z^43,z^7,z^43,z^6,z^41,z^46,z^17,z^22,z^24,z^2,
  z^44,z^6,z^29,z^15,z^7,z^42,z^31,z^32,z^52,z^36,z^11,z^9,z^34,z^47,
  z^40,z^12,z^35,z^17,z^36,z^4,z^25,z^21,z^11,z,z^13,z^39,z^23,z^16,
  z^28,-1,z^18,z^34,z^37,z^16,z^38,z^33,z^30,z^5,z^12,z^20,1,z^49,
  z^37,z^51,z^40,z^25,z^45,z^24,z^38,z^48,z^33,z^44,z^48,z^13,z^4,
  z^50,z^20,z^22,z^26,z^3,z^23,z^19,z^2,z^10,z^10,z^51,z^3,z^18,z^45,
  z^32,z^41,z^50,z^53,z^31,z^8,z^42,z^5,z^35,z^8,z^14,1,z^28,z^29,
  z^9]) *
PermutationMat(
(  1, 20, 26)(  2, 62, 24)(  3, 33, 38)(  4,108, 77)(  5, 80, 98)(  6,106, 52)
(  7, 23, 94)(  8, 18, 15)(  9, 32, 14)( 10, 71, 99)( 11, 92, 64)( 12, 46, 21)
( 13, 88,103)( 16, 93, 89)( 17, 58,100)( 19, 97, 25)( 22, 83,102)( 27, 40, 44)
( 28, 96, 54)( 29,109, 82)( 30, 56, 42)( 31, 91, 69)( 34, 48, 50)( 35, 76,101)
( 37, 63, 51)( 39,105, 65)( 41, 95, 87)( 43, 45, 59)( 47, 81, 72)( 49, 53, 66)
( 55, 60, 90)( 61, 84, 79)( 67, 73,110)( 68,104, 74)( 70, 86,107)( 75, 85, 78), 110)];

return result;