read "rga_variant.mpl";
t5:=time():
E5:=[-96*u[x, y]^2+11+w[x,y,z]^4+4, 1+55*u[x, y]-28*v[x, x]+3, -90*u[x, y]^3*u[y]+47*u[x]-87*v[x]]:

MainProc(E5,R):
t5:=time()-t5;