m := 3; n := 8; g := 25; F:=CyclotomicField(3); R:=PolynomialRing(F,2); X := ((-z - 1)*u^14 + (-14*z - 14)*u^13 + (-91*z - 91)*u^12 + (-364*z - 364)*u^11 + (-1001*z - 1000)*u^10 + (-2002*z - 1992)*u^9 + (-3003*z - 2958)*u^8 + (-3432*z - 3312)*u^7 + (-3003*z - 2793)*u^6 + (-2002*z - 1750)*u^5 + (-1001*z - 791)*u^4 + (-364*z - 244)*u^3 + (-91*z - 46)*u^2 + (-14*z - 4)*u - z)*v^12 + (-u^20 - 18*u^19 - 156*u^18 - 864*u^17 - 3426*u^16 - 10332*u^15 + (-10*z - 24590)*u^14 + (-110*z - 47342)*u^13 + (-545*z - 75008)*u^12 + (-1580*z - 98882)*u^11 + (-2876*z - 108894)*u^10 + (-3118*z - 99644)*u^9 + (-1116*z - 74427)*u^8 + (2406*z - 43818)*u^7 + (5024*z - 19072)*u^6 + (5110*z - 5334)*u^5 + (3346*z - 518)*u^4 + (1470*z + 210)*u^3 + (420*z + 70)*u^2 + 70*z*u + 5*z - 2)*v^11 + ((z + 1)*u^22 + (18*z + 18)*u^21 + (159*z + 155)*u^20 + (912*z + 852)*u^19 + (3801*z + 3386)*u^18 + (12222*z + 10498)*u^17 + (31451*z + 26839)*u^16 + (66348*z + 58940)*u^15 + (116594*z + 113876)*u^14 + (172442*z + 194698)*u^13 + (216137*z + 292593)*u^12 + (231116*z + 382384)*u^11 + (212714*z + 430482)*u^10 + (169994*z + 413826)*u^9 + (117627*z + 335543)*u^8 + (68116*z + 224792)*u^7 + (30108*z + 120476)*u^6 + (7820*z + 49352)*u^5 + (-658*z + 14560)*u^4 + (-1624*z + 2912)*u^3 + (-700*z + 420)*u^2 + (-140*z + 70)*u - 10*z + 11)*v^10 + ((2*z + 2)*u^22 + (30*z + 30)*u^21 + (205*z + 195)*u^20 + (812*z + 692)*u^19 + (1834*z + 1204)*u^18 + (898*z - 890)*u^17 + (-10410*z - 12770)*u^16 + (-48230*z - 46450)*u^15 + (-129766*z - 115514)*u^14 + (-256842*z - 228738)*u^13 + (-400768*z - 380317)*u^12 + (-507710*z - 539480)*u^11 + (-530810*z - 653220)*u^10 + (-464066*z - 672654)*u^9 + (-343147*z - 585613)*u^8 + (-214980*z - 425644)*u^7 + (-111490*z - 251900)*u^6 + (-44840*z - 116640)*u^5 + (-12128*z - 40076)*u^4 + (-1316*z - 9632)*u^3 + (364*z - 1582)*u^2 + (140*z - 210)*u + (10*z - 25))*v^9 + ((3*z + 3)*u^22 + (36*z + 36)*u^21 + (178*z + 158)*u^20 + (392*z + 212)*u^19 + (-201*z - 876)*u^18 + (-4032*z - 5174)*u^17 + (-12898*z - 12887)*u^16 + (-20624*z - 17256)*u^15 + (-6211*z - 3044)*u^14 + (59458*z + 47872)*u^13 + (187905*z + 146790)*u^12 + (346172*z + 285648)*u^11 + (463556*z + 426219)*u^10 + (481964*z + 511056)*u^9 + (402498*z + 501152)*u^8 + (275992*z + 404072)*u^7 + (156086*z + 264807)*u^6 + (70708*z + 136286)*u^5 + (23732*z + 52109)*u^4 + (5004*z + 13788)*u^3 + (357*z + 2359)*u^2 + (-70*z + 280)*u - 5*z + 30)*v^8 + (u^24 + 14*u^23 + (4*z + 110)*u^22 + (36*z + 580)*u^21 + (118*z + 2194)*u^20 + (72*z + 6364)*u^19 + (-668*z + 15280)*u^18 + (-2024*z + 32582)*u^17 + (-577*z + 63287)*u^16 + (10474*z + 109180)*u^15 + (33074*z + 161044)*u^14 + (52714*z + 197608)*u^13 + (39494*z + 194674)*u^12 + (-27446*z + 136788)*u^11 + (-128642*z + 30540)*u^10 + (-208304*z - 86720)*u^9 + (-223063*z - 165323)*u^8 + (-178958*z - 180434)*u^7 + (-113314*z - 143954)*u^6 + (-56948*z - 86514)*u^5 + (-21596*z - 37608)*u^4 + (-5480*z - 10934)*u^3 + (-680*z - 1906)*u^2 + (14*z - 196)*u + (z - 20))*v^7 + (5*z*u^22 + (30*z - 50)*u^21 + (65*z - 525)*u^20 - 2700*u^19 + (-100*z - 9025)*u^18 + (880*z - 22660)*u^17 + (4760*z - 47260)*u^16 + (10480*z - 86480)*u^15 + (11484*z - 139450)*u^14 + (648*z - 194680)*u^13 + (-18918*z - 232960)*u^12 + (-28952*z - 236800)*u^11 + (-11298*z - 197530)*u^10 + (27562*z - 123744)*u^9 + (58775*z - 44678)*u^8 + (63160*z + 9808)*u^7 + (47285*z + 31187)*u^6 + (26892*z + 28222)*u^5 + (11440*z + 15463)*u^4 + (3300*z + 5160)*u^3 + (495*z + 910)*u^2 + 70*u + 7)*v^6 + ((-z - 1)*u^24 + (-10*z - 10)*u^23 + (-60*z - 64)*u^22 + (-270*z - 322)*u^21 + (-970*z - 1256)*u^20 + (-2762*z - 3650)*u^19 + (-6220*z - 7984)*u^18 + (-11576*z - 13660)*u^17 + (-19273*z - 18730)*u^16 + (-29938*z - 19480)*u^15 + (-42140*z - 10568)*u^14 + (-50736*z + 10240)*u^13 + (-48866*z + 37610)*u^12 + (-35188*z + 61620)*u^11 + (-19048*z + 73044)*u^10 + (-12254*z + 65720)*u^9 + (-14701*z + 43180)*u^8 + (-16676*z + 19024)*u^7 + (-13708*z + 3032)*u^6 + (-8520*z - 3582)*u^5 + (-3978*z - 3618)*u^4 + (-1276*z - 1546)*u^3 + (-220*z - 280)*u^2 - 10*u - 1)*v^5 + (-3*u^22 - 30*u^21 + (20*z - 95)*u^20 + (220*z - 8)*u^19 + (1055*z + 819)*u^18 + (3028*z + 3184)*u^17 + (6330*z + 7600)*u^16 + (11080*z + 14040)*u^15 + (17133*z + 20710)*u^14 + (23636*z + 23980)*u^13 + (28284*z + 21300)*u^12 + (27880*z + 13760)*u^11 + (21530*z + 4115)*u^10 + (13258*z - 3870)*u^9 + (7901*z - 6385)*u^8 + (5424*z - 4552)*u^7 + (3620*z - 1920)*u^6 + (2100*z - 70)*u^5 + (988*z + 533)*u^4 + (336*z + 336)*u^3 + (66*z + 66)*u^2)*v^4 + (-2*u^22 - 14*u^21 + (10*z - 27)*u^20 + (80*z + 12)*u^19 + (250*z + 164)*u^18 + (432*z + 352)*u^17 + (524*z + 445)*u^16 + (372*z + 110)*u^15 + (-152*z - 1040)*u^14 + (-1164*z - 2860)*u^13 + (-2615*z - 4275)*u^12 + (-4026*z - 4610)*u^11 + (-4398*z - 3890)*u^10 + (-3342*z - 2150)*u^9 + (-1959*z - 550)*u^8 + (-1160*z + 62)*u^7 + (-666*z + 154)*u^6 + (-348*z + 42)*u^5 + (-157*z - 52)*u^4 + (-54*z - 54)*u^3 + (-12*z - 12)*u^2)*v^3 + (-u^22 - 4*u^21 + (4*z - 8)*u^20 + (20*z - 8)*u^19 + (35*z - 23)*u^18 + (46*z - 62)*u^17 + (39*z - 149)*u^16 + (16*z - 292)*u^15 + (-22*z - 450)*u^14 + (-52*z - 450)*u^13 + (-42*z - 275)*u^12 + (68*z - 100)*u^11 + (252*z + 98)*u^10 + (308*z + 160)*u^9 + (188*z + 50)*u^8 + (108*z - 4)*u^7 + (58*z - 21)*u^6 + (28*z - 14)*u^5 + (12*z - 3)*u^4 + (4*z + 4)*u^3 + (z + 1)*u^2)*v^2 + ((z + 1)*u^20 + (2*z + 2)*u^19 + (4*z + 4)*u^18 + (6*z + 6)*u^17 + (9*z + 9)*u^16 + (12*z + 12)*u^15 + (16*z + 26)*u^14 + (20*z + 50)*u^13 + (25*z + 50)*u^12 + (30*z + 50)*u^11 + (22*z + 38)*u^10 + 12*u^9 + 9*u^8 + 6*u^7 + 4*u^6 + 2*u^5 + u^4)*v + u^14 + (-z - 1)*u^10; q := u+1; t := (v*u)/(u+1); E := [(1+q)*t+(2-q),0,q*t^2+(1-q)*t,0,0]; P := [R!0,0]; Q := [-t,t^2];