local z, r, result;

result := rec();

result.comment := "L2(113) as 114 x 114 monomial matrices over Z(z56)\n";

# Change the value of r to any number between 1 and 27
# to get the complete set of inequivalent faithful irreducible 114-dimensional
# representations of L2(113)
r := 1;
z := E(56)^r;

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

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

return result;