m := 3;
n := 6;
g := 10;
F<z>:=CyclotomicField(3);
R<u,v>:=PolynomialRing(F,2);
X := (u^8 + 8*u^7 + 28*u^6 + (-z + 56)*u^5 + (-5*z + 70)*u^4 + (-10*z + 56)*u^3 + (-10*z + 28)*u^2 + (-5*z + 8)*u - z + 1)*v^7 + (-z*u^12 - 10*z*u^11 - 48*z*u^10 - 144*z*u^9 + (-300*z + 5)*u^8 + (-456*z + 24)*u^7 + (-520*z + 40)*u^6 + (-456*z + 7)*u^5 + (-309*z - 69)*u^4 + (-150*z - 110)*u^3 + (-40*z - 80)*u^2 - 30*u + 2*z - 5)*v^6 + (u^13 + (-z + 9)*u^12 + (-6*z + 42)*u^11 + (-6*z + 126)*u^10 + (51*z + 273)*u^9 + (246*z + 456)*u^8 + (580*z + 584)*u^7 + (872*z + 544)*u^6 + (912*z + 369)*u^5 + (703*z + 226)*u^4 + (402*z + 172)*u^3 + (150*z + 120)*u^2 + (25*z + 50)*u - z + 10)*v^5 + ((-z - 1)*u^12 + (-2*z - 14)*u^11 + (14*z - 76)*u^10 + (61*z - 230)*u^9 + (97*z - 477)*u^8 + (-4*z - 756)*u^7 + (-268*z - 892)*u^6 + (-485*z - 746)*u^5 + (-484*z - 439)*u^4 + (-336*z - 218)*u^3 + (-154*z - 114)*u^2 + (-35*z - 45)*u - 10)*v^4 + ((-z - 1)*u^12 + (2*z - 10)*u^11 + (12*z - 30)*u^10 + (20*z - 31)*u^9 + (-12*z + 13)*u^8 + (-72*z + 132)*u^7 + (-52*z + 292)*u^6 + (62*z + 367)*u^5 + (126*z + 270)*u^4 + (120*z + 128)*u^3 + (70*z + 58)*u^2 + (21*z + 21)*u + 5)*v^3 + (-z*u^13 + (-4*z - 1)*u^12 + (-12*z - 6)*u^11 + (-28*z - 6)*u^10 + (-58*z - 1)*u^9 + (-93*z + 12)*u^8 + (-92*z + 20)*u^7 + (-52*z + 4)*u^6 + (-42*z - 42)*u^5 + (-37*z - 58)*u^4 + (-30*z - 28)*u^3 + (-18*z - 12)*u^2 + (-7*z - 4)*u - 1)*v^2 + (-u^12 - 2*u^11 - 4*u^10 - 6*u^9 + (5*z - 9)*u^8 + (16*z - 12)*u^7 + (12*z - 16)*u^6 + (9*z - 12)*u^5 + 6*z*u^4 + 4*z*u^3 + 2*z*u^2 + z*u)*v + z*u^8 + u^5;
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];