m := 5; n := 1; g := 0; F:=CyclotomicField(5); a := z+1/z; R:=PolynomialRing(F,2); X := u; U := (1/5*(2-a)*v^2 + 1/5*(2-a)*v + 1/5*(a+3))/(v + 1); V := -((a+2)*v^2 + (5*a+9)*v + (25*a+41))/(v^3 + (-3*a-2)*v^2 + (2*a+6)*v +(5*a+9)); t := U/(V*(U+1)); x := U/V; E := [1-t,-t,-t,0,0]; P := [R!0,0]; Q := [x,1/5*(8*z^3+5*z^2+2*z+10)*(v-z^2-z)^2*(v+z^2+z+1)^2*(v+z^3-2*z-1)^2*(v+2*z^3+3*z^2+2*z+1)/((v+2*z^2+3*z+3)*(v-z^3-3*z^2-3*z)^2*(v-z^3-z^2-z+1))];