m := 2;
n := 19;
g := 64;
F := Rationals();
R<u,v>:=PolynomialRing(F,2);
X := (u^15 - 5*u^14 + 10*u^13 - 10*u^12 + 5*u^11 - u^10)*v^27 - (12*u^16 - 79*u^15 + 195*u^14 - 230*u^13 + 115*u^12 + 12*u^11 - 35*u^10 + 10*u^9)*v^26 + (66*u^17 - 544*u^16 + 1654*u^15 - 2360*u^14 + 1380*u^13 + 338*u^12 - 837*u^11 + 263*u^10 + 85*u^9 - 45*u^8)*v^25 - (220*u^18 - 2200*u^17 + 8110*u^16 - 14040*u^15 + 10125*u^14 + 2628*u^13 - 9350*u^12 + 4589*u^11 + 938*u^10 - 1070*u^9 - 81*u^8 + 132*u^7 - u^6)*v^24 + (495*u^19 - 5885*u^18 + 25890*u^17 - 53900*u^16 + 48140*u^15 + 10509*u^14 - 61151*u^13 + 45663*u^12 - 1197*u^11 - 11724*u^10 + 1258*u^9 + 2322*u^8 - 157*u^7 - 269*u^6 + 6*u^5)*v^23 - (792*u^20 - 11055*u^19 + 57325*u^18 - 141860*u^17 + 154855*u^16 + 24483*u^15 - 259728*u^14 + 270151*u^13 - 69262*u^12 - 63604*u^11 + 34044*u^10 + 11341*u^9 - 5072*u^8 - 3638*u^7 + 883*u^6 + 360*u^5 - 15*u^4)*v^22 + (924*u^21 - 15048*u^20 + 91230*u^19 - 265630*u^18 + 348540*u^17 + 33728*u^16 - 761733*u^15 + 1032829*u^14 - 489390*u^13 - 163439*u^12 + 253074*u^11 - 28085*u^10 - 39999*u^9 - 9759*u^8 + 11690*u^7 + 3149*u^6 - 1815*u^5 - 285*u^4 + 20*u^3)*v^21 - (792*u^22 - 15048*u^21 + 106308*u^20 - 361650*u^19 + 561945*u^18 + 25482*u^17 - 1603930*u^16 + 2708725*u^15 - 1845522*u^14 - 72581*u^13 + 949892*u^12 - 458706*u^11 - 79881*u^10 + 55565*u^9 + 41757*u^8 + 2023*u^7 - 17670*u^6 + 432*u^5 + 1970*u^4 + 100*u^3 - 15*u^2)*v^20 + (495*u^23 - 11055*u^22 + 91230*u^21 - 361650*u^20 + 657950*u^19 + 9317*u^18 - 2484823*u^17 + 5059903*u^16 - 4467459*u^15 + 769356*u^14 + 2134606*u^13 - 1897686*u^12 + 267806*u^11 + 345567*u^10 - 57852*u^9 - 30481*u^8 - 53874*u^7 + 20685*u^6 + 12781*u^5 - 3650*u^4 - 1124*u^3 + 18*u^2 + 6*u)*v^19 - (220*u^24 - 5885*u^23 + 57325*u^22 - 265630*u^21 + 561945*u^20 + 9317*u^19 - 2871002*u^18 + 6880939*u^17 - 7442442*u^16 + 2531700*u^15 + 3162660*u^14 - 4343799*u^13 + 1656837*u^12 + 642217*u^11 - 661130*u^10 + 37429*u^9 - 19429*u^8 + 74807*u^7 + 20845*u^6 - 29359*u^5 - 1178*u^4 + 3158*u^3 + 262*u^2 - 26*u - 1)*v^18 + (66*u^25 - 2200*u^24 + 25890*u^23 - 141860*u^22 + 348540*u^21 + 25482*u^20 - 2484823*u^19 + 6880939*u^18 - 8796654*u^17 + 4148687*u^16 + 3469366*u^15 - 6634017*u^14 + 3848847*u^13 + 256275*u^12 - 1597956*u^11 + 574851*u^10 + 126448*u^9 + 13779*u^8 - 20193*u^7 - 70255*u^6 + 21012*u^5 + 12907*u^4 - 3602*u^3 - 1062*u^2 + 22*u + 6)*v^17 - (12*u^26 - 544*u^25 + 8110*u^24 - 53900*u^23 + 154855*u^22 + 33728*u^21 - 1603930*u^20 + 5059903*u^19 - 7442442*u^18 + 4148687*u^17 + 3423578*u^16 - 7762286*u^15 + 5564373*u^14 - 832353*u^13 - 1845645*u^12 + 1361481*u^11 + 79273*u^10 - 304087*u^9 - 31982*u^8 - 14920*u^7 + 64531*u^6 + 8499*u^5 - 18112*u^4 + 528*u^3 + 1792*u^2 + 74*u - 15)*v^16 + (u^27 - 79*u^26 + 1654*u^25 - 14040*u^24 + 48140*u^23 + 24483*u^22 - 761733*u^21 + 2708725*u^20 - 4467459*u^19 + 2531700*u^18 + 3469366*u^17 - 7762286*u^16 + 6119518*u^15 - 1704933*u^14 - 1146288*u^13 + 1518849*u^12 - 314830*u^11 - 489363*u^10 + 118861*u^9 + 159604*u^8 + 6440*u^7 - 35798*u^6 - 20880*u^5 + 10300*u^4 + 2736*u^3 - 1574*u^2 - 210*u + 20)*v^15 + (5*u^27 - 195*u^26 + 2360*u^25 - 10125*u^24 - 10509*u^23 + 259728*u^22 - 1032829*u^21 + 1845522*u^20 - 769356*u^19 - 3162660*u^18 + 6634017*u^17 - 5564373*u^16 + 1704933*u^15 + 652530*u^14 - 1115763*u^13 + 726191*u^12 + 88497*u^11 - 229059*u^10 - 200815*u^9 + 177543*u^8 + 45374*u^7 - 31368*u^6 - 11928*u^5 + 1473*u^4 + 2514*u^3 - 696*u^2 - 234*u + 15)*v^14 + (10*u^27 - 230*u^26 + 1380*u^25 + 2628*u^24 - 61151*u^23 + 270151*u^22 - 489390*u^21 - 72581*u^20 + 2134606*u^19 - 4343799*u^18 + 3848847*u^17 - 832353*u^16 - 1146288*u^15 + 1115763*u^14 - 879922*u^13 + 518577*u^12 + 76947*u^11 - 46897*u^10 - 181268*u^9 + 29421*u^8 + 82976*u^7 - 20288*u^6 - 6568*u^5 - 332*u^4 + 482*u^3 - 98*u^2 - 134*u + 6)*v^13 + (10*u^27 - 115*u^26 - 338*u^25 + 9350*u^24 - 45663*u^23 + 69262*u^22 + 163439*u^21 - 949892*u^20 + 1897686*u^19 - 1656837*u^18 - 256275*u^17 + 1845645*u^16 - 1518849*u^15 + 726191*u^14 - 518577*u^13 + 67048*u^12 + 338798*u^11 - 127517*u^10 - 49237*u^9 - 35776*u^8 + 42804*u^7 + 5235*u^6 - 5596*u^5 - 140*u^4 - 428*u^3 + 29*u^2 - 38*u + 1)*v^12 + (5*u^27 + 12*u^26 - 837*u^25 + 4589*u^24 - 1197*u^23 - 63604*u^22 + 253074*u^21 - 458706*u^20 + 267806*u^19 + 642217*u^18 - 1597956*u^17 + 1361481*u^16 - 314830*u^15 - 88497*u^14 + 76947*u^13 - 338798*u^12 + 336504*u^11 - 24116*u^10 - 58500*u^9 - 4056*u^8 - 880*u^7 + 11754*u^6 - 1146*u^5 - 972*u^4 - 236*u^3 + 12*u^2 - 4*u)*v^11 + (u^27 + 35*u^26 - 263*u^25 - 938*u^24 + 11724*u^23 - 34044*u^22 + 28085*u^21 + 79881*u^20 - 345567*u^19 + 661130*u^18 - 574851*u^17 - 79273*u^16 + 489363*u^15 - 229059*u^14 + 46897*u^13 - 127517*u^12 + 24116*u^11 + 98588*u^10 - 45480*u^9 - 4917*u^8 - 2958*u^7 + 4664*u^6 + 1414*u^5 - 1009*u^4 - 12*u^3 + 2*u^2)*v^10 + (10*u^26 + 85*u^25 - 1070*u^24 + 1258*u^23 + 11341*u^22 - 39999*u^21 + 55565*u^20 - 57852*u^19 + 37429*u^18 + 126448*u^17 - 304087*u^16 + 118861*u^15 + 200815*u^14 - 181268*u^13 + 49237*u^12 - 58500*u^11 + 45480*u^10 + 9380*u^9 - 15968*u^8 + 874*u^7 + 1790*u^6 + 486*u^5 - 326*u^4 + 12*u^3)*v^9 + (45*u^25 + 81*u^24 - 2322*u^23 + 5072*u^22 + 9759*u^21 - 41757*u^20 + 30481*u^19 + 19429*u^18 - 13779*u^17 + 31982*u^16 - 159604*u^15 + 177543*u^14 - 29421*u^13 - 35776*u^12 + 4056*u^11 - 4917*u^10 + 15968*u^9 - 7686*u^8 - 12*u^7 + 965*u^6 - 90*u^5 - 17*u^4)*v^8 + (132*u^24 - 157*u^23 - 3638*u^22 + 11690*u^21 + 2023*u^20 - 53874*u^19 + 74807*u^18 - 20193*u^17 - 14920*u^16 + 6440*u^15 - 45374*u^14 + 82976*u^13 - 42804*u^12 - 880*u^11 + 2958*u^10 + 874*u^9 + 12*u^8 - 232*u^7 + 168*u^6 - 8*u^5)*v^7 + (u^24 + 269*u^23 - 883*u^22 - 3149*u^21 + 17670*u^20 - 20685*u^19 - 20845*u^18 + 70255*u^17 - 64531*u^16 + 35798*u^15 - 31368*u^14 + 20288*u^13 + 5235*u^12 - 11754*u^11 + 4664*u^10 - 1790*u^9 + 965*u^8 - 168*u^7 + 28*u^6)*v^6 + (6*u^23 + 360*u^22 - 1815*u^21 + 432*u^20 + 12781*u^19 - 29359*u^18 + 21012*u^17 + 8499*u^16 - 20880*u^15 + 11928*u^14 - 6568*u^13 + 5596*u^12 - 1146*u^11 - 1414*u^10 + 486*u^9 + 90*u^8 - 8*u^7)*v^5 + (15*u^22 + 285*u^21 - 1970*u^20 + 3650*u^19 + 1178*u^18 - 12907*u^17 + 18112*u^16 - 10300*u^15 + 1473*u^14 + 332*u^13 - 140*u^12 + 972*u^11 - 1009*u^10 + 326*u^9 - 17*u^8)*v^4 + (20*u^21 + 100*u^20 - 1124*u^19 + 3158*u^18 - 3602*u^17 + 528*u^16 + 2736*u^15 - 2514*u^14 + 482*u^13 + 428*u^12 - 236*u^11 + 12*u^10 + 12*u^9)*v^3 + (15*u^20 - 18*u^19 - 262*u^18 + 1062*u^17 - 1792*u^16 + 1574*u^15 - 696*u^14 + 98*u^13 + 29*u^12 - 12*u^11 + 2*u^10)*v^2 + (6*u^19 - 26*u^18 + 22*u^17 + 74*u^16 - 210*u^15 + 234*u^14 - 134*u^13 + 38*u^12 - 4*u^11)*v + u^18 - 6*u^17 + 15*u^16 - 20*u^15 + 15*u^14 - 6*u^13 + u^12;
q := (v-u+2)/(u+v);
t := (u-v)*(u-v-2)*(u+v)/(u^3-u^2*v-2*u^2+u*v^2+2*u*v-v^3-2*v^2+2);
E := [0,t^2-2*q*t-2,0,-(t^2-1)*(q*t+1)^2,0];
P := [R!0,0];
Q := [(t+1)*(q*t+1),t*(q*t+1)*(t+1)];