Polytope of Type {18,9}

Play with this polytope as a twisty puzzle

s0 := (  2,  3)(  4, 19)(  5, 21)(  6, 20)(  7, 10)(  8, 12)(  9, 11)( 13, 25)( 14, 27)( 15, 26)( 17, 18)( 23, 24)( 28, 55)( 29, 57)( 30, 56)( 31, 73)( 32, 75)( 33, 74)( 34, 64)( 35, 66)( 36, 65)( 37, 61)( 38, 63)( 39, 62)( 40, 79)( 41, 81)( 42, 80)( 43, 70)( 44, 72)( 45, 71)( 46, 58)( 47, 60)( 48, 59)( 49, 76)( 50, 78)( 51, 77)( 52, 67)( 53, 69)( 54, 68)( 83, 84)( 85,100)( 86,102)( 87,101)( 88, 91)( 89, 93)( 90, 92)( 94,106)( 95,108)( 96,107)( 98, 99)(104,105)(109,217)(110,219)(111,218)(112,235)(113,237)(114,236)(115,226)(116,228)(117,227)(118,223)(119,225)(120,224)(121,241)(122,243)(123,242)(124,232)(125,234)(126,233)(127,220)(128,222)(129,221)(130,238)(131,240)(132,239)(133,229)(134,231)(135,230)(136,271)(137,273)(138,272)(139,289)(140,291)(141,290)(142,280)(143,282)(144,281)(145,277)(146,279)(147,278)(148,295)(149,297)(150,296)(151,286)(152,288)(153,287)(154,274)(155,276)(156,275)(157,292)(158,294)(159,293)(160,283)(161,285)(162,284)(163,244)(164,246)(165,245)(166,262)(167,264)(168,263)(169,253)(170,255)(171,254)(172,250)(173,252)(174,251)(175,268)(176,270)(177,269)(178,259)(179,261)(180,260)(181,247)(182,249)(183,248)(184,265)(185,267)(186,266)(187,256)(188,258)(189,257)(190,298)(191,300)(192,299)(193,316)(194,318)(195,317)(196,307)(197,309)(198,308)(199,304)(200,306)(201,305)(202,322)(203,324)(204,323)(205,313)(206,315)(207,314)(208,301)(209,303)(210,302)(211,319)(212,321)(213,320)(214,310)(215,312)(216,311)(326,327)(328,343)(329,345)(330,344)(331,334)(332,336)(333,335)(337,349)(338,351)(339,350)(341,342)(347,348)(352,379)(353,381)(354,380)(355,397)(356,399)(357,398)(358,388)(359,390)(360,389)(361,385)(362,387)(363,386)(364,403)(365,405)(366,404)(367,394)(368,396)(369,395)(370,382)(371,384)(372,383)(373,400)(374,402)(375,401)(376,391)(377,393)(378,392)(407,408)(409,424)(410,426)(411,425)(412,415)(413,417)(414,416)(418,430)(419,432)(420,431)(422,423)(428,429)(433,541)(434,543)(435,542)(436,559)(437,561)(438,560)(439,550)(440,552)(441,551)(442,547)(443,549)(444,548)(445,565)(446,567)(447,566)(448,556)(449,558)(450,557)(451,544)(452,546)(453,545)(454,562)(455,564)(456,563)(457,553)(458,555)(459,554)(460,595)(461,597)(462,596)(463,613)(464,615)(465,614)(466,604)(467,606)(468,605)(469,601)(470,603)(471,602)(472,619)(473,621)(474,620)(475,610)(476,612)(477,611)(478,598)(479,600)(480,599)(481,616)(482,618)(483,617)(484,607)(485,609)(486,608)(487,568)(488,570)(489,569)(490,586)(491,588)(492,587)(493,577)(494,579)(495,578)(496,574)(497,576)(498,575)(499,592)(500,594)(501,593)(502,583)(503,585)(504,584)(505,571)(506,573)(507,572)(508,589)(509,591)(510,590)(511,580)(512,582)(513,581)(514,622)(515,624)(516,623)(517,640)(518,642)(519,641)(520,631)(521,633)(522,632)(523,628)(524,630)(525,629)(526,646)(527,648)(528,647)(529,637)(530,639)(531,638)(532,625)(533,627)(534,626)(535,643)(536,645)(537,644)(538,634)(539,636)(540,635);;
s1 := (  1,436)(  2,454)(  3,445)(  4,433)(  5,451)(  6,442)(  7,439)(  8,457)(  9,448)( 10,438)( 11,456)( 12,447)( 13,435)( 14,453)( 15,444)( 16,441)( 17,459)( 18,450)( 19,437)( 20,455)( 21,446)( 22,434)( 23,452)( 24,443)( 25,440)( 26,458)( 27,449)( 28,463)( 29,481)( 30,472)( 31,460)( 32,478)( 33,469)( 34,466)( 35,484)( 36,475)( 37,465)( 38,483)( 39,474)( 40,462)( 41,480)( 42,471)( 43,468)( 44,486)( 45,477)( 46,464)( 47,482)( 48,473)( 49,461)( 50,479)( 51,470)( 52,467)( 53,485)( 54,476)( 55,517)( 56,535)( 57,526)( 58,514)( 59,532)( 60,523)( 61,520)( 62,538)( 63,529)( 64,519)( 65,537)( 66,528)( 67,516)( 68,534)( 69,525)( 70,522)( 71,540)( 72,531)( 73,518)( 74,536)( 75,527)( 76,515)( 77,533)( 78,524)( 79,521)( 80,539)( 81,530)( 82,490)( 83,508)( 84,499)( 85,487)( 86,505)( 87,496)( 88,493)( 89,511)( 90,502)( 91,492)( 92,510)( 93,501)( 94,489)( 95,507)( 96,498)( 97,495)( 98,513)( 99,504)(100,491)(101,509)(102,500)(103,488)(104,506)(105,497)(106,494)(107,512)(108,503)(109,328)(110,346)(111,337)(112,325)(113,343)(114,334)(115,331)(116,349)(117,340)(118,330)(119,348)(120,339)(121,327)(122,345)(123,336)(124,333)(125,351)(126,342)(127,329)(128,347)(129,338)(130,326)(131,344)(132,335)(133,332)(134,350)(135,341)(136,355)(137,373)(138,364)(139,352)(140,370)(141,361)(142,358)(143,376)(144,367)(145,357)(146,375)(147,366)(148,354)(149,372)(150,363)(151,360)(152,378)(153,369)(154,356)(155,374)(156,365)(157,353)(158,371)(159,362)(160,359)(161,377)(162,368)(163,409)(164,427)(165,418)(166,406)(167,424)(168,415)(169,412)(170,430)(171,421)(172,411)(173,429)(174,420)(175,408)(176,426)(177,417)(178,414)(179,432)(180,423)(181,410)(182,428)(183,419)(184,407)(185,425)(186,416)(187,413)(188,431)(189,422)(190,382)(191,400)(192,391)(193,379)(194,397)(195,388)(196,385)(197,403)(198,394)(199,384)(200,402)(201,393)(202,381)(203,399)(204,390)(205,387)(206,405)(207,396)(208,383)(209,401)(210,392)(211,380)(212,398)(213,389)(214,386)(215,404)(216,395)(217,544)(218,562)(219,553)(220,541)(221,559)(222,550)(223,547)(224,565)(225,556)(226,546)(227,564)(228,555)(229,543)(230,561)(231,552)(232,549)(233,567)(234,558)(235,545)(236,563)(237,554)(238,542)(239,560)(240,551)(241,548)(242,566)(243,557)(244,571)(245,589)(246,580)(247,568)(248,586)(249,577)(250,574)(251,592)(252,583)(253,573)(254,591)(255,582)(256,570)(257,588)(258,579)(259,576)(260,594)(261,585)(262,572)(263,590)(264,581)(265,569)(266,587)(267,578)(268,575)(269,593)(270,584)(271,625)(272,643)(273,634)(274,622)(275,640)(276,631)(277,628)(278,646)(279,637)(280,627)(281,645)(282,636)(283,624)(284,642)(285,633)(286,630)(287,648)(288,639)(289,626)(290,644)(291,635)(292,623)(293,641)(294,632)(295,629)(296,647)(297,638)(298,598)(299,616)(300,607)(301,595)(302,613)(303,604)(304,601)(305,619)(306,610)(307,600)(308,618)(309,609)(310,597)(311,615)(312,606)(313,603)(314,621)(315,612)(316,599)(317,617)(318,608)(319,596)(320,614)(321,605)(322,602)(323,620)(324,611);;
s2 := (  1,427)(  2,429)(  3,428)(  4,409)(  5,411)(  6,410)(  7,418)(  8,420)(  9,419)( 10,430)( 11,432)( 12,431)( 13,412)( 14,414)( 15,413)( 16,421)( 17,423)( 18,422)( 19,424)( 20,426)( 21,425)( 22,406)( 23,408)( 24,407)( 25,415)( 26,417)( 27,416)( 28,373)( 29,375)( 30,374)( 31,355)( 32,357)( 33,356)( 34,364)( 35,366)( 36,365)( 37,376)( 38,378)( 39,377)( 40,358)( 41,360)( 42,359)( 43,367)( 44,369)( 45,368)( 46,370)( 47,372)( 48,371)( 49,352)( 50,354)( 51,353)( 52,361)( 53,363)( 54,362)( 55,400)( 56,402)( 57,401)( 58,382)( 59,384)( 60,383)( 61,391)( 62,393)( 63,392)( 64,403)( 65,405)( 66,404)( 67,385)( 68,387)( 69,386)( 70,394)( 71,396)( 72,395)( 73,397)( 74,399)( 75,398)( 76,379)( 77,381)( 78,380)( 79,388)( 80,390)( 81,389)( 82,346)( 83,348)( 84,347)( 85,328)( 86,330)( 87,329)( 88,337)( 89,339)( 90,338)( 91,349)( 92,351)( 93,350)( 94,331)( 95,333)( 96,332)( 97,340)( 98,342)( 99,341)(100,343)(101,345)(102,344)(103,325)(104,327)(105,326)(106,334)(107,336)(108,335)(109,643)(110,645)(111,644)(112,625)(113,627)(114,626)(115,634)(116,636)(117,635)(118,646)(119,648)(120,647)(121,628)(122,630)(123,629)(124,637)(125,639)(126,638)(127,640)(128,642)(129,641)(130,622)(131,624)(132,623)(133,631)(134,633)(135,632)(136,589)(137,591)(138,590)(139,571)(140,573)(141,572)(142,580)(143,582)(144,581)(145,592)(146,594)(147,593)(148,574)(149,576)(150,575)(151,583)(152,585)(153,584)(154,586)(155,588)(156,587)(157,568)(158,570)(159,569)(160,577)(161,579)(162,578)(163,616)(164,618)(165,617)(166,598)(167,600)(168,599)(169,607)(170,609)(171,608)(172,619)(173,621)(174,620)(175,601)(176,603)(177,602)(178,610)(179,612)(180,611)(181,613)(182,615)(183,614)(184,595)(185,597)(186,596)(187,604)(188,606)(189,605)(190,562)(191,564)(192,563)(193,544)(194,546)(195,545)(196,553)(197,555)(198,554)(199,565)(200,567)(201,566)(202,547)(203,549)(204,548)(205,556)(206,558)(207,557)(208,559)(209,561)(210,560)(211,541)(212,543)(213,542)(214,550)(215,552)(216,551)(217,535)(218,537)(219,536)(220,517)(221,519)(222,518)(223,526)(224,528)(225,527)(226,538)(227,540)(228,539)(229,520)(230,522)(231,521)(232,529)(233,531)(234,530)(235,532)(236,534)(237,533)(238,514)(239,516)(240,515)(241,523)(242,525)(243,524)(244,481)(245,483)(246,482)(247,463)(248,465)(249,464)(250,472)(251,474)(252,473)(253,484)(254,486)(255,485)(256,466)(257,468)(258,467)(259,475)(260,477)(261,476)(262,478)(263,480)(264,479)(265,460)(266,462)(267,461)(268,469)(269,471)(270,470)(271,508)(272,510)(273,509)(274,490)(275,492)(276,491)(277,499)(278,501)(279,500)(280,511)(281,513)(282,512)(283,493)(284,495)(285,494)(286,502)(287,504)(288,503)(289,505)(290,507)(291,506)(292,487)(293,489)(294,488)(295,496)(296,498)(297,497)(298,454)(299,456)(300,455)(301,436)(302,438)(303,437)(304,445)(305,447)(306,446)(307,457)(308,459)(309,458)(310,439)(311,441)(312,440)(313,448)(314,450)(315,449)(316,451)(317,453)(318,452)(319,433)(320,435)(321,434)(322,442)(323,444)(324,443);;
poly := Group([s0,s1,s2]);;
 

F := FreeGroup("s0","s1","s2");;
s0 := F.1;;  s1 := F.2;;  s2 := F.3;;  
rels := [ s0*s0, s1*s1, s2*s2, s0*s2*s0*s2, s2*s0*s1*s2*s0*s1*s2*s0*s1*s2*s0*s1, 
s1*s2*s1*s2*s1*s2*s1*s2*s1*s2*s1*s2*s1*s2*s1*s2*s1*s2, 
s2*s1*s0*s1*s2*s1*s2*s1*s0*s2*s1*s0*s1*s0*s1*s2*s1*s0*s1*s2*s0*s1, 
s0*s1*s0*s1*s0*s1*s0*s1*s0*s1*s2*s0*s1*s0*s1*s2*s1*s0*s1*s2*s0*s1*s0*s1 ];;
poly := F / rels;;
 

s0 := Sym(648)!(  2,  3)(  4, 19)(  5, 21)(  6, 20)(  7, 10)(  8, 12)(  9, 11)( 13, 25)( 14, 27)( 15, 26)( 17, 18)( 23, 24)( 28, 55)( 29, 57)( 30, 56)( 31, 73)( 32, 75)( 33, 74)( 34, 64)( 35, 66)( 36, 65)( 37, 61)( 38, 63)( 39, 62)( 40, 79)( 41, 81)( 42, 80)( 43, 70)( 44, 72)( 45, 71)( 46, 58)( 47, 60)( 48, 59)( 49, 76)( 50, 78)( 51, 77)( 52, 67)( 53, 69)( 54, 68)( 83, 84)( 85,100)( 86,102)( 87,101)( 88, 91)( 89, 93)( 90, 92)( 94,106)( 95,108)( 96,107)( 98, 99)(104,105)(109,217)(110,219)(111,218)(112,235)(113,237)(114,236)(115,226)(116,228)(117,227)(118,223)(119,225)(120,224)(121,241)(122,243)(123,242)(124,232)(125,234)(126,233)(127,220)(128,222)(129,221)(130,238)(131,240)(132,239)(133,229)(134,231)(135,230)(136,271)(137,273)(138,272)(139,289)(140,291)(141,290)(142,280)(143,282)(144,281)(145,277)(146,279)(147,278)(148,295)(149,297)(150,296)(151,286)(152,288)(153,287)(154,274)(155,276)(156,275)(157,292)(158,294)(159,293)(160,283)(161,285)(162,284)(163,244)(164,246)(165,245)(166,262)(167,264)(168,263)(169,253)(170,255)(171,254)(172,250)(173,252)(174,251)(175,268)(176,270)(177,269)(178,259)(179,261)(180,260)(181,247)(182,249)(183,248)(184,265)(185,267)(186,266)(187,256)(188,258)(189,257)(190,298)(191,300)(192,299)(193,316)(194,318)(195,317)(196,307)(197,309)(198,308)(199,304)(200,306)(201,305)(202,322)(203,324)(204,323)(205,313)(206,315)(207,314)(208,301)(209,303)(210,302)(211,319)(212,321)(213,320)(214,310)(215,312)(216,311)(326,327)(328,343)(329,345)(330,344)(331,334)(332,336)(333,335)(337,349)(338,351)(339,350)(341,342)(347,348)(352,379)(353,381)(354,380)(355,397)(356,399)(357,398)(358,388)(359,390)(360,389)(361,385)(362,387)(363,386)(364,403)(365,405)(366,404)(367,394)(368,396)(369,395)(370,382)(371,384)(372,383)(373,400)(374,402)(375,401)(376,391)(377,393)(378,392)(407,408)(409,424)(410,426)(411,425)(412,415)(413,417)(414,416)(418,430)(419,432)(420,431)(422,423)(428,429)(433,541)(434,543)(435,542)(436,559)(437,561)(438,560)(439,550)(440,552)(441,551)(442,547)(443,549)(444,548)(445,565)(446,567)(447,566)(448,556)(449,558)(450,557)(451,544)(452,546)(453,545)(454,562)(455,564)(456,563)(457,553)(458,555)(459,554)(460,595)(461,597)(462,596)(463,613)(464,615)(465,614)(466,604)(467,606)(468,605)(469,601)(470,603)(471,602)(472,619)(473,621)(474,620)(475,610)(476,612)(477,611)(478,598)(479,600)(480,599)(481,616)(482,618)(483,617)(484,607)(485,609)(486,608)(487,568)(488,570)(489,569)(490,586)(491,588)(492,587)(493,577)(494,579)(495,578)(496,574)(497,576)(498,575)(499,592)(500,594)(501,593)(502,583)(503,585)(504,584)(505,571)(506,573)(507,572)(508,589)(509,591)(510,590)(511,580)(512,582)(513,581)(514,622)(515,624)(516,623)(517,640)(518,642)(519,641)(520,631)(521,633)(522,632)(523,628)(524,630)(525,629)(526,646)(527,648)(528,647)(529,637)(530,639)(531,638)(532,625)(533,627)(534,626)(535,643)(536,645)(537,644)(538,634)(539,636)(540,635);
s1 := Sym(648)!(  1,436)(  2,454)(  3,445)(  4,433)(  5,451)(  6,442)(  7,439)(  8,457)(  9,448)( 10,438)( 11,456)( 12,447)( 13,435)( 14,453)( 15,444)( 16,441)( 17,459)( 18,450)( 19,437)( 20,455)( 21,446)( 22,434)( 23,452)( 24,443)( 25,440)( 26,458)( 27,449)( 28,463)( 29,481)( 30,472)( 31,460)( 32,478)( 33,469)( 34,466)( 35,484)( 36,475)( 37,465)( 38,483)( 39,474)( 40,462)( 41,480)( 42,471)( 43,468)( 44,486)( 45,477)( 46,464)( 47,482)( 48,473)( 49,461)( 50,479)( 51,470)( 52,467)( 53,485)( 54,476)( 55,517)( 56,535)( 57,526)( 58,514)( 59,532)( 60,523)( 61,520)( 62,538)( 63,529)( 64,519)( 65,537)( 66,528)( 67,516)( 68,534)( 69,525)( 70,522)( 71,540)( 72,531)( 73,518)( 74,536)( 75,527)( 76,515)( 77,533)( 78,524)( 79,521)( 80,539)( 81,530)( 82,490)( 83,508)( 84,499)( 85,487)( 86,505)( 87,496)( 88,493)( 89,511)( 90,502)( 91,492)( 92,510)( 93,501)( 94,489)( 95,507)( 96,498)( 97,495)( 98,513)( 99,504)(100,491)(101,509)(102,500)(103,488)(104,506)(105,497)(106,494)(107,512)(108,503)(109,328)(110,346)(111,337)(112,325)(113,343)(114,334)(115,331)(116,349)(117,340)(118,330)(119,348)(120,339)(121,327)(122,345)(123,336)(124,333)(125,351)(126,342)(127,329)(128,347)(129,338)(130,326)(131,344)(132,335)(133,332)(134,350)(135,341)(136,355)(137,373)(138,364)(139,352)(140,370)(141,361)(142,358)(143,376)(144,367)(145,357)(146,375)(147,366)(148,354)(149,372)(150,363)(151,360)(152,378)(153,369)(154,356)(155,374)(156,365)(157,353)(158,371)(159,362)(160,359)(161,377)(162,368)(163,409)(164,427)(165,418)(166,406)(167,424)(168,415)(169,412)(170,430)(171,421)(172,411)(173,429)(174,420)(175,408)(176,426)(177,417)(178,414)(179,432)(180,423)(181,410)(182,428)(183,419)(184,407)(185,425)(186,416)(187,413)(188,431)(189,422)(190,382)(191,400)(192,391)(193,379)(194,397)(195,388)(196,385)(197,403)(198,394)(199,384)(200,402)(201,393)(202,381)(203,399)(204,390)(205,387)(206,405)(207,396)(208,383)(209,401)(210,392)(211,380)(212,398)(213,389)(214,386)(215,404)(216,395)(217,544)(218,562)(219,553)(220,541)(221,559)(222,550)(223,547)(224,565)(225,556)(226,546)(227,564)(228,555)(229,543)(230,561)(231,552)(232,549)(233,567)(234,558)(235,545)(236,563)(237,554)(238,542)(239,560)(240,551)(241,548)(242,566)(243,557)(244,571)(245,589)(246,580)(247,568)(248,586)(249,577)(250,574)(251,592)(252,583)(253,573)(254,591)(255,582)(256,570)(257,588)(258,579)(259,576)(260,594)(261,585)(262,572)(263,590)(264,581)(265,569)(266,587)(267,578)(268,575)(269,593)(270,584)(271,625)(272,643)(273,634)(274,622)(275,640)(276,631)(277,628)(278,646)(279,637)(280,627)(281,645)(282,636)(283,624)(284,642)(285,633)(286,630)(287,648)(288,639)(289,626)(290,644)(291,635)(292,623)(293,641)(294,632)(295,629)(296,647)(297,638)(298,598)(299,616)(300,607)(301,595)(302,613)(303,604)(304,601)(305,619)(306,610)(307,600)(308,618)(309,609)(310,597)(311,615)(312,606)(313,603)(314,621)(315,612)(316,599)(317,617)(318,608)(319,596)(320,614)(321,605)(322,602)(323,620)(324,611);
s2 := Sym(648)!(  1,427)(  2,429)(  3,428)(  4,409)(  5,411)(  6,410)(  7,418)(  8,420)(  9,419)( 10,430)( 11,432)( 12,431)( 13,412)( 14,414)( 15,413)( 16,421)( 17,423)( 18,422)( 19,424)( 20,426)( 21,425)( 22,406)( 23,408)( 24,407)( 25,415)( 26,417)( 27,416)( 28,373)( 29,375)( 30,374)( 31,355)( 32,357)( 33,356)( 34,364)( 35,366)( 36,365)( 37,376)( 38,378)( 39,377)( 40,358)( 41,360)( 42,359)( 43,367)( 44,369)( 45,368)( 46,370)( 47,372)( 48,371)( 49,352)( 50,354)( 51,353)( 52,361)( 53,363)( 54,362)( 55,400)( 56,402)( 57,401)( 58,382)( 59,384)( 60,383)( 61,391)( 62,393)( 63,392)( 64,403)( 65,405)( 66,404)( 67,385)( 68,387)( 69,386)( 70,394)( 71,396)( 72,395)( 73,397)( 74,399)( 75,398)( 76,379)( 77,381)( 78,380)( 79,388)( 80,390)( 81,389)( 82,346)( 83,348)( 84,347)( 85,328)( 86,330)( 87,329)( 88,337)( 89,339)( 90,338)( 91,349)( 92,351)( 93,350)( 94,331)( 95,333)( 96,332)( 97,340)( 98,342)( 99,341)(100,343)(101,345)(102,344)(103,325)(104,327)(105,326)(106,334)(107,336)(108,335)(109,643)(110,645)(111,644)(112,625)(113,627)(114,626)(115,634)(116,636)(117,635)(118,646)(119,648)(120,647)(121,628)(122,630)(123,629)(124,637)(125,639)(126,638)(127,640)(128,642)(129,641)(130,622)(131,624)(132,623)(133,631)(134,633)(135,632)(136,589)(137,591)(138,590)(139,571)(140,573)(141,572)(142,580)(143,582)(144,581)(145,592)(146,594)(147,593)(148,574)(149,576)(150,575)(151,583)(152,585)(153,584)(154,586)(155,588)(156,587)(157,568)(158,570)(159,569)(160,577)(161,579)(162,578)(163,616)(164,618)(165,617)(166,598)(167,600)(168,599)(169,607)(170,609)(171,608)(172,619)(173,621)(174,620)(175,601)(176,603)(177,602)(178,610)(179,612)(180,611)(181,613)(182,615)(183,614)(184,595)(185,597)(186,596)(187,604)(188,606)(189,605)(190,562)(191,564)(192,563)(193,544)(194,546)(195,545)(196,553)(197,555)(198,554)(199,565)(200,567)(201,566)(202,547)(203,549)(204,548)(205,556)(206,558)(207,557)(208,559)(209,561)(210,560)(211,541)(212,543)(213,542)(214,550)(215,552)(216,551)(217,535)(218,537)(219,536)(220,517)(221,519)(222,518)(223,526)(224,528)(225,527)(226,538)(227,540)(228,539)(229,520)(230,522)(231,521)(232,529)(233,531)(234,530)(235,532)(236,534)(237,533)(238,514)(239,516)(240,515)(241,523)(242,525)(243,524)(244,481)(245,483)(246,482)(247,463)(248,465)(249,464)(250,472)(251,474)(252,473)(253,484)(254,486)(255,485)(256,466)(257,468)(258,467)(259,475)(260,477)(261,476)(262,478)(263,480)(264,479)(265,460)(266,462)(267,461)(268,469)(269,471)(270,470)(271,508)(272,510)(273,509)(274,490)(275,492)(276,491)(277,499)(278,501)(279,500)(280,511)(281,513)(282,512)(283,493)(284,495)(285,494)(286,502)(287,504)(288,503)(289,505)(290,507)(291,506)(292,487)(293,489)(294,488)(295,496)(296,498)(297,497)(298,454)(299,456)(300,455)(301,436)(302,438)(303,437)(304,445)(305,447)(306,446)(307,457)(308,459)(309,458)(310,439)(311,441)(312,440)(313,448)(314,450)(315,449)(316,451)(317,453)(318,452)(319,433)(320,435)(321,434)(322,442)(323,444)(324,443);
poly := sub<Sym(648)|s0,s1,s2>;
 

poly<s0,s1,s2> := Group< s0,s1,s2 | s0*s0, s1*s1, s2*s2, 
s0*s2*s0*s2, s2*s0*s1*s2*s0*s1*s2*s0*s1*s2*s0*s1, 
s1*s2*s1*s2*s1*s2*s1*s2*s1*s2*s1*s2*s1*s2*s1*s2*s1*s2, 
s2*s1*s0*s1*s2*s1*s2*s1*s0*s2*s1*s0*s1*s0*s1*s2*s1*s0*s1*s2*s0*s1, 
s0*s1*s0*s1*s0*s1*s0*s1*s0*s1*s2*s0*s1*s0*s1*s2*s1*s0*s1*s2*s0*s1*s0*s1 >; 
 

Twisty Puzzle