m := 2; n := 7; g := 4; F := Rationals(); R:=PolynomialRing(F,2); X := (u^2 + u)*v^3 + (u^3 + 2*u^2 - u - 1)*v^2 + (u^3 - u^2 - 4*u - 1)*v - u^2 - u; q := (u+v)/(v-u); t := (u-v)*(u+v)*(u+v+2)/(u^3+u^2*v+2*u^2+u*v^2+2*u*v+v^3+2*v^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)];