local z, r, result; result := rec(); result.comment := "L2(149) as 150 x 150 monomial matrices over Z(z74)\n"; # Change the value of r to any number between 1 and 36 # to get the complete set of inequivalent faithful irreducible 150-dimensional # representations of L2(149) r := 1; z := E(74)^r; result.symmetricforms := [ ]; result.antisymmetricforms := [ ]; result.hermitianforms := [ IdentityMat(150) ]; result.centralizeralgebra := [ IdentityMat(150) ]; result.generators := [ DiagonalMat([z^10,z^19,z^51,z^32,z^15,z^38,z^27,z^40,z^27,z^5,z,z^57, z^60,z^50,z^69,z^24,z^21,z^62,-1,z^5,z^64,z^68,z^22,z^23,z^23,z^67, z^44,z^51,z^59,z^7,z^41,z^38,z^61,z^56,z^72,z^9,z^71,z^54,z^58,z^34, z^36,z,z^52,z^43,z^35,z^57,z^12,z^11,z^9,z^54,z^49,z^63,z^20,z^44, z^2,z^4,z^48,z^28,-1,z^33,z^50,z^53,1,z^12,z^72,z^8,z^58,1,z^18, z^59,z^53,z^3,z^65,z^25,z^30,z^66,z^2,z^35,z^6,z^26,z^46,z^14,z^61, z^33,z^42,z^6,z^36,z^42,z^15,z^45,z^66,z^47,z^39,z^40,z^46,z^30, z^21,z^67,z^29,z^62,z^13,z^73,z^55,z^70,z^31,z^45,z^19,z^73,z^11, z^30,z^10,z^71,z^16,z^41,z^26,z^64,z^48,z^65,z^4,z^52,z^18,z^55, z^8,z^16,z^31,z^24,z^22,z^29,z^47,z^25,z^68,z^20,z^13,z^56,z^17, z^7,z^34,z^60,z^17,z^70,z^49,z^3,z^43,z^32,z^69,z^63,z^28,z^39,z^14, z^44]) * PermutationMat( ( 1,116)( 2,103)( 3, 24)( 4, 85)( 5, 29)( 6, 41)( 7,129)( 8,137) ( 9, 92)( 10, 15)( 11,102)( 12,135)( 13,149)( 14,126)( 16, 61)( 17, 62) ( 18, 47)( 20,145)( 21,111)( 22, 86)( 23, 43)( 25, 28)( 26, 30)( 27, 96) ( 31, 60)( 32, 87)( 33,133)( 34,121)( 35, 55)( 36,118)( 37, 72)( 38,132) ( 39,113)( 40, 94)( 42,108)( 44,105)( 45, 93)( 46,139)( 48, 52)( 49, 73) ( 50, 53)( 51,130)( 54, 75)( 56,140)( 57,115)( 58, 81)( 63, 68)( 64,100) ( 65, 77)( 66, 91)( 67,124)( 69,134)( 70, 89)( 71, 97)( 74,141)( 76,123) ( 78,148)( 79,131)( 80,117)( 82,138)( 83,101)( 84,114)( 88,144)( 90,128) ( 95,147)( 98,136)( 99,106)(104,119)(107,122)(109,146)(110,150)(112,142) (120,127)(125,143), 150) , DiagonalMat([z^3,z^58,z^18,z^23,z^59,z^69,z^28,z^73,z^19,z^39,z^7, z^54,z^26,z^35,z^73,z^29,z^35,z^8,z^38,z^59,z^40,z^32,z^33,z^39, z^23,z^14,z^60,z^22,z^55,z^6,z^66,z^48,z^63,z^24,z^38,z^12,z^66, z^4,z^34,z^3,z^64,z^9,z^34,z^19,z^57,z^41,z^58,z^71,z^45,z^11,z^48, z,z^9,z^24,z^17,z^15,z^22,z^40,z^18,z^61,z^13,z^6,z^49,z^10,1,z^27, z^53,z^10,z^63,z^42,z^70,z^36,z^25,z^62,z^56,z^21,z^32,z^7,z^12, z^44,z^25,z^8,z^31,z^20,z^33,z^20,z^72,z^68,z^50,z^53,z^43,z^62, z^17,z^14,z^55,z^30,z^72,z^57,z^61,z^15,z^16,z^16,z^60,-1,z^44,z^52, 1,z^34,z^31,z^54,z^49,z^65,z^2,z^64,z^47,z^51,z^27,z^29,z^68,z^45, z^36,z^28,z^50,z^5,z^4,z^2,z^47,z^42,z^56,z^13,-1,z^69,z^71,z^41, z^21,z^30,z^26,z^43,z^46,z^67,z^5,z^65,z,z^51,z^67,z^11,z^52,z^46, z^70,z^40]) * PermutationMat( ( 1, 51, 25)( 2, 6,135)( 3,108, 57)( 4, 66, 34)( 5, 72, 67)( 7,113, 80) ( 8, 92, 61)( 9, 37, 69)( 10,125, 83)( 11, 35,118)( 12, 17, 20)( 13, 91,124) ( 14,138, 71)( 15,143,107)( 16, 74, 45)( 18, 85, 23)( 19,100, 76)( 21, 53, 81) ( 22,145,111)( 24, 86, 56)( 26, 62,110)( 27, 47, 96)( 28, 64,128)( 29,146, 82) ( 30,112, 40)( 31,134, 46)( 32,132,109)( 33,130, 87)( 36, 52, 99)( 38, 54,139) ( 39,150, 65)( 41, 98,117)( 42,119, 48)( 43, 63,142)( 44,104, 59)( 49,121,140) ( 50,126, 60)( 55, 79,120)( 58,129,106)( 68,127, 93)( 70, 73, 78)( 75,131, 95) ( 77,114,147)( 84, 88,103)( 89,115,116)( 90,141,102)( 94,105,101)( 97,148,136) (122,123,149)(133,144,137), 150)]; return result;