local z, r, result;

result := rec();

result.comment := "2.L2(229) as 230 x 230 monomial matrices over Z(z228)\n";

# Change the value of r to any number between 1 and 57
# to get the complete set of inequivalent faithful irreducible 230-dimensional
# representations of 2.L2(229)
r := 1;
z := E(228)^(2*r-1);

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

result.generators := [
DiagonalMat([z^163,z^216,z^165,z^133,z^196,z^23,z^184,z^28,z^217,z^106,
  z^2,z^162,z^134,z^213,z^151,z^74,z^63,z^51,z^21,z^47,z^100,z^19,
  z^120,z^198,z^152,z^188,z^66,z^39,z^179,z^72,z^35,z^80,z,z^127,z^207,
  z^153,z^126,z^155,z^166,z^176,z^24,z^85,z^5,z^32,z^99,z^202,z^84,
  z^122,z^49,z^115,z^59,z^223,z^26,z^76,z^67,z^82,z^178,z^187,z^64,
  z^88,z^39,z^83,z^18,z^157,z^154,z^201,z^220,z^60,z^143,z^69,z^168,
  z^226,z^31,z^34,z^104,z^141,z^108,z^13,z^38,z^98,z^22,z^14,-1,z^91,
  z^181,z^73,z^116,z^193,z^16,z^29,z^170,z^146,z^111,z^206,z^227,z^15,
  z^54,z^192,z^10,z^107,z^86,z^44,z^131,z^78,z^90,z^149,z^144,z^129,
  z^135,z^25,z^159,z^199,z^87,z^200,z^137,z^211,z^175,z^105,z^161,
  z^68,z^204,z^121,z^71,z^136,z^164,z^7,z^132,z^174,1,z^222,z^123,
  z^140,z^20,z^50,z^48,z^218,z^94,z^12,z^30,z^173,z^57,z^142,z^56,
  z^171,z^27,z^8,z^89,z^212,z^41,z^42,z^11,z^130,z^112,z^210,z^215,
  z^160,z^117,z^219,z^147,z^118,z^52,z^101,z^183,z^46,z^138,z^81,z^150,
  z^185,z^110,z^172,z^58,z^169,z^128,z^221,z^102,z^95,z^109,z^113,
  z^53,z^40,z^92,z^4,z^45,z^65,z^195,z^148,z^9,z^197,z^180,z^158,z^62,
  z^96,z^119,z^205,z^191,z^139,z^61,z^17,z^124,z^33,z^55,z^182,z^189,
  z^36,z^203,z^177,z^43,z^75,z^37,z^194,z^190,z^156,z^97,z^225,z^70,
  z^214,z^145,z^125,z^77,z^79,z^167,z^3,z^186,z^6,z^209,z^103,z^93,
  z^224,z^208,z^75]) *
PermutationMat(
(  1, 29)(  2, 37)(  3,206)(  4,225)(  5, 92)(  6, 84)(  7,190)(  8,101)
(  9,218)( 10,146)( 11,153)( 12,189)( 13,229)( 14,108)( 15,195)( 16,180)
( 17, 18)( 19,227)( 20, 55)( 21, 82)( 22,176)( 23,130)( 24,107)( 25,211)
( 26, 65)( 27,135)( 28,230)( 30,150)( 31,220)( 32, 74)( 33,178)( 34,155)
( 35,109)( 36,203)( 38, 58)( 39, 40)( 41,105)( 42, 90)( 43,177)( 44, 56)
( 45, 96)( 46,132)( 47,139)( 48, 67)( 49,184)( 50, 95)( 51,201)( 52,193)
( 53, 60)( 54, 79)( 57,125)( 59,134)( 61,208)( 62, 73)( 63,192)( 64,168)
( 66, 76)( 68, 97)( 69,112)( 70,183)( 71,128)( 72, 87)( 75, 99)( 77,224)
( 78,162)( 80, 89)( 81,181)( 83,129)( 85,119)( 86,149)( 88,106)( 91,170)
( 93,222)( 94,124)( 98,167)(100,126)(102,215)(103,116)(104,204)(110,147)
(111,163)(113,145)(114,142)(115,194)(117,221)(118,187)(120,164)(121,165)
(122,174)(123,207)(127,154)(131,158)(133,137)(136,199)(138,175)(140,172)
(143,171)(148,152)(151,226)(156,202)(157,214)(159,185)(160,228)(161,191)
(166,200)(169,182)(173,216)(179,197)(186,210)(188,217)(196,205)(198,213)
(209,219)(212,223), 230)
,
DiagonalMat([z^105,z^205,z^22,z^171,z^69,z^149,z^95,z^68,z^97,z^108,
  z^118,z^194,z^27,z^175,z^202,z^41,z^144,z^26,z^64,z^219,z^57,z,z^165,
  z^196,z^18,z^9,z^24,z^120,z^129,z^6,z^30,z^209,z^25,z^188,z^99,z^96,
  z^143,z^162,z^2,z^85,z^11,z^110,z^168,z^201,z^204,z^46,z^83,z^50,
  z^183,z^208,z^40,z^192,z^184,z^56,z^33,z^123,z^15,z^58,z^135,z^186,
  z^199,z^112,z^88,z^53,z^148,z^169,z^185,z^224,z^134,z^180,z^49,z^28,
  z^214,z^73,z^20,z^32,z^91,z^86,z^71,z^77,z^195,z^101,z^141,z^29,
  z^142,z^79,z^153,z^117,z^47,z^103,z^10,z^146,z^63,z^13,z^78,z^106,
  z^177,z^74,z^116,z^170,z^164,z^65,z^82,z^190,z^220,z^218,z^160,z^36,
  z^182,z^200,z^115,z^227,z^84,z^226,z^113,z^197,z^178,z^31,z^154,
  z^211,z^212,z^181,z^72,z^54,z^152,z^157,z^102,z^59,z^161,z^89,z^60,
  z^222,z^43,z^125,z^216,z^80,z^23,z^92,z^127,z^52,-1,1,z^111,z^70,
  z^163,z^44,z^37,z^51,z^55,z^223,z^210,z^34,z^174,z^215,z^7,z^137,
  z^90,z^179,z^139,z^122,z^100,z^4,z^38,z^61,z^147,z^133,z^81,z^3,
  z^187,z^66,z^203,z^225,z^124,z^131,z^206,z^145,z^119,z^213,z^17,
  z^207,z^136,z^132,z^98,z^39,z^167,z^12,z^156,z^87,z^67,z^19,z^21,
  z^109,z^173,z^128,z^176,z^151,z^45,z^35,z^166,z^150,z^158,z^107,
  z^75,z^138,z^193,z^126,z^198,z^159,z^48,z^172,z^104,z^76,z^155,z^93,
  z^16,z^5,z^221,z^191,z^217,z^42,z^189,z^62,z^140,z^94,z^130,z^8,
  z^126,z^121,z^14,z^216]) *
PermutationMat(
(  1,110,196)(  2, 62,159)(  3,172, 32)(  4,182, 87)(  5, 83, 25)(  6,116, 42)
(  7, 43,205)(  8,176, 57)(  9,122,117)( 10,207,200)( 11,118, 86)( 12,136,109)
( 13,164,223)( 14, 81, 78)( 15, 38,138)( 16, 68,218)( 17,204,153)( 18,181,170)
( 19,194,108)( 20, 61,163)( 21,203, 36)( 22,155,105)( 23,219, 98)( 24, 45, 54)
( 26,104, 84)( 27, 76,210)( 28, 95, 31)( 29, 53, 37)( 30,145,128)( 33, 82,127)
( 34,150,197)( 35, 40,146)( 39,160,211)( 41, 93,119)( 44, 63,185)( 46, 65,152)
( 47,107,178)( 48, 89,174)( 49,216, 51)( 50,123,195)( 52,161,101)( 55, 64, 85)
( 56, 80, 72)( 58,121, 60)( 59,142,214)( 66,102,132)( 67,221,103)( 69, 74,191)
( 70,126,177)( 71, 94,199)( 73,134, 88)( 75,140,187)( 77,165,106)( 79,209,192)
( 90,229,143)( 91,167,156)( 92,184,133)( 96,114,173)( 97,228,201)( 99,137,130)
(100,220,215)(111,225,120)(112,226,217)(113,124,157)(115,179,183)(129,149,186)
(131,166,198)(135,193,189)(139,171,206)(141,227,230)(144,202,148)(147,162,169)
(151,188,208)(154,158,222)(168,175,190)(180,213,224), 230)];

return result;