#案例n=4的Maple代码,用于澄清定义。
with(组合);A: =矩阵(4,4):对于i从1到4,做A[i,i]:=0;日期:
n: =0;
对于从-1到1的a,执行a[1,2]:=a;A[2,1]:=-A;
对于从-1到1的b,执行A[1,3]:=b;A[3,1]:=-b;
对于c,从-1到1 do A[1,4]:=c;A[4,1]:=-c;
对于从-1到1的d,执行A[2,3]:=d;A[3,2]:=-d;
对于从-1到1的e,做A[2,4]:=e;A[4,2]:=-e;
对于从-1到1的f,做A[3,4]:=f;A[4,3]:=-f;
排列:=排列(4);新南威尔士州:=+1;
我从1岁到24岁
p: =烫发[i];
w: =p[1];x: =p[2];y: =p[3];z: =p[4];
星号:=A[w,x]*A[y,z]+A[w;
如果星<>0,则nsw:=-1;断裂;fi;
日期:
如果nsw=1,则n:=n+1;fi;
od:od:od:0d:od:od:
n;