pet循环名称:=进程(n)选项记忆;局部l;如果n=0,则返回1;fi;展开(1/n*加法(a[l]*pet_cycleind_symm(n-l),l=1..n));结束;宠物周期代码:=进程(n)选项记忆;本地all、term、termvars、res、l1、l2、inst1、u、v、,uidx、vidx;如果n=0或n=1,则返回1;fi;全部:=0:对于pet_cycleind_symm(n)do中的术语termvars:=指数(术语);分辨率:=1;#不同尺寸的不同循环上的边对于uidx到nops(termvars)dou:=op(uidx,termvars);l1:=op(1,u);对于vidx,从uidx+1到nops(termvars)dov:=op(vidx,termvars);l2:=op(1,v);res:=资源*a[lcm(l1,l2)]^((l1*l2/lcm(l1,l2))*度(项,u)*度(项、v));od;od;#相同尺寸的不同循环上的边在termvars do中表示ul1:=op(1,u);inst1:=度(术语,u);#a[l1]^(1/2*inst1*(inst1-1)*l1*l1/l1)res:=资源*a[l1]^(1/2*inst1*(inst1-1)*l1);od;#某些大小的相同循环上的边在termvars do中表示ul1:=op(1,u);inst1:=度(术语,u);如果类型为(l1,奇数),则#a[l1]^(1/2*l1*(l1-1)/l1);res:=资源*(a[l1]^(1/2*(l1-1))^指令1;其他的#a[l1/2]^(l1/2/(l1/2))*a[l1]^(1/2*l1*(l1-2)/l1)res:=资源*(a[1/2]*a[1]^(1/2*(l1-2))^指令1;fi;od;all:=all+lcoeff(term)*res;od;全部;结束;宠物品种标识:=proc(多边形,ind)局部subs1、subs2、polyvars、indvars、v、pot、res、k;res:=ind;polyvars:=指数(poly);indvars:=指数(ind);对于indvars中的v dopot:=op(1,v);子系统1:=[seq(polyvars[k]=polyvars[k]^pot,k=1..nops(聚合物)];subs2:=[v=subs(subs1,poly)];res:=subs(subs2,res);od;物件;结束;VGF:=进程(n)选项记忆;展开(pet变量ind(1+z,pet循环ind(n)));结束;A000088:=进程(n)选项记忆;局部q;sub([seq(a[q]=2,q=1..n*(n-1)/2)],(n));结束;