read "G2module.txt"; read "Homomorphisms.txt";
M1:=changeVmoduleF1(M,x,x):
L:=CycVec(M1,x)[2]: 
#L:=subs(a1=A1,a2=A2,b1=B1,b2=B2,L):
L:=subs(a1=1/2,a2=1/3,b1=1/5,b2=1/7,L);
read"finduv.txt";
A:=singularity(L);
M:=SetofMob(A); nops(M);
S:=CandiUV(M,A): nops(S);
read"GetOrb.txt":
G:=GetOrb(S): nops(G);
read "F1.txt": read "MatchExp1.txt": read "Case1.txt":
Case1(L,x,1/x);