Tue Apr 15 00:35:36 2008 run on win32
on list;
on errcont;
% 1.) Example of ordering of objects such as fer,bos,axp;
axp(bos(f,0,0))*bos(g,3,1)*fer(k,1,0);
fer(k,1,0)*bos(g,3,1)*axp(bos(f,0,0))
%fer(k,1,0)*bos(g,3,1)*axp(bos(f,0,0));
% 2.) Example of ordering of fer and fer objects
fer(f,1,2)*fer(f,1,2);
0
% 0
fer(f,1,2)*fer(g,2,3);
-fer(g,2,3)*fer(f,1,2)
% -fer(g,2,3)*fer(f,1,2);
fer(f,1,2)*fer(f,1,3);
-fer(f,1,3)*fer(f,1,2)
% - fer(f,1,3)*fer(f,1,2);
fer(f,1,2)*fer(f,2,2);
-fer(f,2,2)*fer(f,1,2)
% - fer(f,2,2)*fer(f,1,2);
% 3.) Example of ordering of bos and bos objects;
bos(f,3,0)*bos(g,0,4);
bos(g,0,4)*bos(f,3,0)
%bos(g,0,4)*bos(f,3,0);
bos(f,3,0)*bos(f,0,0);
bos(f,3,0)*bos(f,0,0)
%bos(f,3,0)*bos(f,0,0);
bos(f,3,2)*bos(f,3,5);
bos(f,3,5)*bos(f,3,2)
%bos(f,3,5)*bos(f,3,2);
% 4.) ordering of inverse superfunctions;
% last index in bos objects denotes powers;
bos(f,0,3)*bos(k,0,2)*bos(zz,0,3,-1)*bos(k,0,2,-1);
bos(zz,0,3,-1)*bos(f,0,3)
%bos(zz,0,3,-1)*bos(f,0,3);
bos(c,0,3)*bos(b,0,2)*bos(a,0,3,-1)*bos(b,0,2,-1);
bos(c,0,3)*bos(a,0,3,-1)
%bos(c,0,3)*bos(a,0,3,-1);
% 5.) Demostration of inverse rule;
let inverse;
bos(f,0,3)**3*bos(k,3,1)**40*bos(f,0,3,-2);
bos(k,3,1,40)*bos(f,0,3,1)
%bos(k,3,1,40)*bos(f,0,3,1);
clearrules inverse;
% 6.) Demonstration of (susy) derivative operators;
% Up to now we did not decided on the chirality assumption
% so let us check first the tradicional algebra os susy derivative;
let trad;
%first susy derivative
der(1)*fer(f,1,2)*bos(g,3,1)*axp(bos(h,0,0));
bos(g,3,1)*bos(f,0,3)*axp(bos(h,0,0))
-fer(f,1,2)*bos(g,3,1)*axp(bos(h,0,0))*der(1)
+fer(g,2,2)*fer(f,1,2)*axp(bos(h,0,0))
+fer(h,1,0)*fer(f,1,2)*bos(g,3,1)*axp(bos(h,0,0))
fer(g,2,1)*bos(f,0,2,-2)*axp(fer(k,1,2)*fer(h,2,1))*del(1);
bos(g,3,1)*bos(f,0,2,-2)*axp(fer(k,1,2)*fer(h,2,1))
+2*fer(g,2,1)*fer(f,1,2)*bos(f,0,2,-3)*axp(fer(k,1,2)*fer(h,2,1))
+fer(h,2,1)*fer(g,2,1)*bos(k,0,3)*bos(f,0,2,-2)*axp(fer(k,1,2)*fer(h,2,1))
-fer(k,1,2)*fer(g,2,1)*bos(h,3,1)*bos(f,0,2,-2)*axp(fer(k,1,2)*fer(h,2,1))
-del(1)*fer(g,2,1)*bos(f,0,2,-2)*axp(fer(k,1,2)*fer(h,2,1))
sub(del=der,ws);
fer(g,2,1)*bos(f,0,2,-2)*axp(fer(k,1,2)*fer(h,2,1))*der(1)
%second susy derivative
der(2)*fer(g,2,3)*bos(kk,0,3)*axp(bos(f,3,0));
bos(kk,0,3)*bos(g,0,4)*axp(bos(f,3,0))
-fer(g,2,3)*bos(kk,0,3)*axp(bos(f,3,0))*der(2)
+fer(g,2,3)*fer(f,1,1)*bos(kk,0,3)*axp(bos(f,3,0))
+fer(kk,2,3)*fer(g,2,3)*axp(bos(f,3,0))
fer(r,2,1)*bos(kk,3,4,-4)*axp(fer(f,1,2)*fer(g,2,1))*del(2);
bos(r,0,2)*bos(kk,3,4,-4)*axp( - fer(g,2,1)*fer(f,1,2))
+fer(r,2,1)*fer(f,1,2)*bos(kk,3,4,-4)*bos(g,0,2)*axp( - fer(g,2,1)*fer(f,1,2))
+fer(r,2,1)*fer(g,2,1)*bos(kk,3,4,-4)*bos(f,3,2)*axp( - fer(g,2,1)*fer(f,1,2))
-4*fer(r,2,1)*fer(kk,1,5)*bos(kk,3,4,-5)*axp( - fer(g,2,1)*fer(f,1,2))
-del(2)*fer(r,2,1)*bos(kk,3,4,-4)*axp( - fer(g,2,1)*fer(f,1,2))
sub(del=der,ws);
fer(r,2,1)*bos(kk,3,4,-4)*axp( - fer(g,2,1)*fer(f,1,2))*der(2)
%usual derivative;
d(1)*fer(f,1,2)*bos(g,3,1)*axp(bos(h,0,0));
fer(f,1,3)*bos(g,3,1)*axp(bos(h,0,0))
+fer(f,1,2)*bos(g,3,2)*axp(bos(h,0,0))
+fer(f,1,2)*bos(g,3,1)*axp(bos(h,0,0))*d(1)
+fer(f,1,2)*bos(h,0,1)*bos(g,3,1)*axp(bos(h,0,0))
fer(g,2,1)*bos(f,0,2,-2)*axp(fer(h,1,2)*fer(k,2,1))*d(2);
-fer(g,2,2)*bos(f,0,2,-2)*axp( - fer(k,2,1)*fer(h,1,2))
+2*fer(g,2,1)*bos(f,0,3,1)*bos(f,0,2,-3)*axp( - fer(k,2,1)*fer(h,1,2))
+fer(k,2,2)*fer(h,1,2)*fer(g,2,1)*bos(f,0,2,-2)*axp( - fer(k,2,1)*fer(h,1,2))
+fer(k,2,1)*fer(h,1,3)*fer(g,2,1)*bos(f,0,2,-2)*axp( - fer(k,2,1)*fer(h,1,2))
+d(2)*fer(g,2,1)*bos(f,0,2,-2)*axp( - fer(k,2,1)*fer(h,1,2))
sub(d(2)=d(1),ws);
fer(g,2,1)*bos(f,0,2,-2)*axp( - fer(k,2,1)*fer(h,1,2))*d(1)
% 7.) the value of action of (susy) derivative;
xxx:=fer(f,1,2)*bos(k,0,2,-2)*axp(fer(h,2,0)*fer(aa,1,3));
xxx := fer(f,1,2)*bos(k,0,2,-2)*axp(fer(h,2,0)*fer(aa,1,3))
yyy:=fer(g,2,3)*bos(kk,3,1,-3)*axp(bos(f,0,2,-3));
yyy := fer(g,2,3)*bos(kk,3,1,-3)*axp(bos(f,0,2,-3))
%first susy derivative
pr(1,xxx);
bos(k,0,2,-2)*bos(f,0,3)*axp(fer(h,2,0)*fer(aa,1,3))
-fer(f,1,2)*fer(aa,1,3)*bos(k,0,2,-2)*bos(h,3,0)*axp(fer(h,2,0)*fer(aa,1,3))
-fer(h,2,0)*fer(f,1,2)*bos(k,0,2,-2)*bos(aa,0,4)*axp(fer(h,2,0)*fer(aa,1,3))
-2*fer(k,1,2)*fer(f,1,2)*bos(k,0,2,-3)*axp(fer(h,2,0)*fer(aa,1,3))
pr(1,yyy);
bos(kk,3,1,-3)*bos(g,3,3)*axp(bos(f,0,2,-3))
+3*fer(g,2,3)*fer(f,1,2)*bos(kk,3,1,-3)*bos(f,0,2,-4)*axp(bos(f,0,2,-3))
-3*fer(kk,2,2)*fer(g,2,3)*bos(kk,3,1,-4)*axp(bos(f,0,2,-3))
%second susy2 derivative;
pr(2,xxx);
-bos(k,0,2,-2)*bos(f,3,2)*axp(fer(h,2,0)*fer(aa,1,3))
-fer(f,1,2)*fer(aa,1,3)*bos(k,0,2,-2)*bos(h,0,1)*axp(fer(h,2,0)*fer(aa,1,3))
+fer(h,2,0)*fer(f,1,2)*bos(k,0,2,-2)*bos(aa,3,3)*axp(fer(h,2,0)*fer(aa,1,3))
-2*fer(k,2,2)*fer(f,1,2)*bos(k,0,2,-3)*axp(fer(h,2,0)*fer(aa,1,3))
pr(2,yyy);
bos(kk,3,1,-3)*bos(g,0,4)*axp(bos(f,0,2,-3))
+3*fer(g,2,3)*fer(f,2,2)*bos(kk,3,1,-3)*bos(f,0,2,-4)*axp(bos(f,0,2,-3))
+3*fer(kk,1,2)*fer(g,2,3)*bos(kk,3,1,-4)*axp(bos(f,0,2,-3))
% third susy2 derivative;
pr(3,xxx);
-fer(aa,1,3)*bos(k,0,2,-2)*bos(h,3,0)*bos(f,3,2)*axp(fer(h,2,0)*fer(aa,1,3))
-fer(aa,1,3)*bos(k,0,2,-2)*bos(h,0,1)*bos(f,0,3)*axp(fer(h,2,0)*fer(aa,1,3))
-fer(f,2,3)*bos(k,0,2,-2)*axp(fer(h,2,0)*fer(aa,1,3))
-2*fer(f,1,2)*bos(k,3,2)*bos(k,0,2,-3)*axp(fer(h,2,0)*fer(aa,1,3))
+fer(f,1,2)*bos(k,0,2,-2)*bos(h,3,0)*bos(aa,3,3)*axp(fer(h,2,0)*fer(aa,1,3))
+fer(f,1,2)*bos(k,0,2,-2)*bos(h,0,1)*bos(aa,0,4)*axp(fer(h,2,0)*fer(aa,1,3))
+fer(h,2,0)*bos(k,0,2,-2)*bos(f,3,2)*bos(aa,0,4)*axp(fer(h,2,0)*fer(aa,1,3))
-fer(h,2,0)*bos(k,0,2,-2)*bos(f,0,3)*bos(aa,3,3)*axp(fer(h,2,0)*fer(aa,1,3))
+fer(h,2,0)*fer(f,1,2)*fer(aa,2,4)*bos(k,0,2,-2)*axp(fer(h,2,0)*fer(aa,1,3))
+fer(h,2,0)*fer(f,1,2)*fer(aa,1,3)*bos(k,0,2,-2)*bos(h,3,0)*bos(aa,3,3)
*axp(fer(h,2,0)*fer(aa,1,3))
+fer(h,2,0)*fer(f,1,2)*fer(aa,1,3)*bos(k,0,2,-2)*bos(h,0,1)*bos(aa,0,4)
*axp(fer(h,2,0)*fer(aa,1,3))
-fer(h,1,1)*fer(f,1,2)*fer(aa,1,3)*bos(k,0,2,-2)*axp(fer(h,2,0)*fer(aa,1,3))
+2*fer(k,2,2)*bos(k,0,2,-3)*bos(f,0,3)*axp(fer(h,2,0)*fer(aa,1,3))
-2*fer(k,2,2)*fer(f,1,2)*fer(aa,1,3)*bos(k,0,2,-3)*bos(h,3,0)
*axp(fer(h,2,0)*fer(aa,1,3))
-2*fer(k,2,2)*fer(h,2,0)*fer(f,1,2)*bos(k,0,2,-3)*bos(aa,0,4)
*axp(fer(h,2,0)*fer(aa,1,3))
-6*fer(k,2,2)*fer(k,1,2)*fer(f,1,2)*bos(k,0,2,-4)*axp(fer(h,2,0)*fer(aa,1,3))
+2*fer(k,1,2)*bos(k,0,2,-3)*bos(f,3,2)*axp(fer(h,2,0)*fer(aa,1,3))
+2*fer(k,1,2)*fer(f,1,2)*fer(aa,1,3)*bos(k,0,2,-3)*bos(h,0,1)
*axp(fer(h,2,0)*fer(aa,1,3))
-2*fer(k,1,2)*fer(h,2,0)*fer(f,1,2)*bos(k,0,2,-3)*bos(aa,3,3)
*axp(fer(h,2,0)*fer(aa,1,3))
pr(3,yyy);
3*fer(f,2,2)*bos(kk,3,1,-3)*bos(g,3,3)*bos(f,0,2,-4)*axp(bos(f,0,2,-3))
-3*fer(f,1,2)*bos(kk,3,1,-3)*bos(g,0,4)*bos(f,0,2,-4)*axp(bos(f,0,2,-3))
-3*fer(g,2,3)*bos(kk,3,1,-3)*bos(f,3,2)*bos(f,0,2,-4)*axp(bos(f,0,2,-3))
+3*fer(g,2,3)*bos(kk,3,1,-4)*bos(kk,0,3)*axp(bos(f,0,2,-3))
-12*fer(g,2,3)*fer(f,2,2)*fer(f,1,2)*bos(kk,3,1,-3)*bos(f,0,2,-5)
*axp(bos(f,0,2,-3))
-9*fer(g,2,3)*fer(f,2,2)*fer(f,1,2)*bos(kk,3,1,-3)*bos(f,0,2,-8)
*axp(bos(f,0,2,-3))
+fer(g,1,4)*bos(kk,3,1,-3)*axp(bos(f,0,2,-3))
-3*fer(kk,2,2)*bos(kk,3,1,-4)*bos(g,0,4)*axp(bos(f,0,2,-3))
-9*fer(kk,2,2)*fer(g,2,3)*fer(f,2,2)*bos(kk,3,1,-4)*bos(f,0,2,-4)
*axp(bos(f,0,2,-3))
-12*fer(kk,2,2)*fer(kk,1,2)*fer(g,2,3)*bos(kk,3,1,-5)*axp(bos(f,0,2,-3))
-3*fer(kk,1,2)*bos(kk,3,1,-4)*bos(g,3,3)*axp(bos(f,0,2,-3))
-9*fer(kk,1,2)*fer(g,2,3)*fer(f,1,2)*bos(kk,3,1,-4)*bos(f,0,2,-4)
*axp(bos(f,0,2,-3))
clearrules trad;
let chiral;
pr(3,xxx);
-fer(aa,1,3)*bos(k,0,2,-2)*bos(h,3,0)*bos(f,3,2)*axp(fer(h,2,0)*fer(aa,1,3))
-fer(aa,1,3)*bos(k,0,2,-2)*bos(h,3,0)*bos(f,0,3)*axp(fer(h,2,0)*fer(aa,1,3))
-fer(f,1,3)*bos(k,0,2,-2)*axp(fer(h,2,0)*fer(aa,1,3))
-2*fer(f,1,2)*bos(k,3,2)*bos(k,0,2,-3)*axp(fer(h,2,0)*fer(aa,1,3))
+fer(f,1,2)*bos(k,0,2,-2)*bos(h,3,0)*bos(aa,3,3)*axp(fer(h,2,0)*fer(aa,1,3))
+fer(f,1,2)*bos(k,0,2,-2)*bos(h,3,0)*bos(aa,0,4)*axp(fer(h,2,0)*fer(aa,1,3))
+fer(h,2,0)*fer(f,1,2)*fer(aa,1,4)*bos(k,0,2,-2)*axp(fer(h,2,0)*fer(aa,1,3))
+fer(h,2,0)*fer(f,1,2)*fer(aa,1,3)*bos(k,0,2,-2)*bos(h,3,0)*bos(aa,3,3)
*axp(fer(h,2,0)*fer(aa,1,3))
+fer(h,2,0)*fer(f,1,2)*fer(aa,1,3)*bos(k,0,2,-2)*bos(h,3,0)*bos(aa,0,4)
*axp(fer(h,2,0)*fer(aa,1,3))
-2*fer(k,2,2)*fer(f,1,2)*fer(aa,1,3)*bos(k,0,2,-3)*bos(h,3,0)
*axp(fer(h,2,0)*fer(aa,1,3))
-6*fer(k,2,2)*fer(k,1,2)*fer(f,1,2)*bos(k,0,2,-4)*axp(fer(h,2,0)*fer(aa,1,3))
+2*fer(k,1,2)*bos(k,0,2,-3)*bos(f,3,2)*axp(fer(h,2,0)*fer(aa,1,3))
+2*fer(k,1,2)*bos(k,0,2,-3)*bos(f,0,3)*axp(fer(h,2,0)*fer(aa,1,3))
-2*fer(k,1,2)*fer(h,2,0)*fer(f,1,2)*bos(k,0,2,-3)*bos(aa,3,3)
*axp(fer(h,2,0)*fer(aa,1,3))
-2*fer(k,1,2)*fer(h,2,0)*fer(f,1,2)*bos(k,0,2,-3)*bos(aa,0,4)
*axp(fer(h,2,0)*fer(aa,1,3))
clearrules chiral;
let chiral1;
pr(3,xxx);
(
-fer(aa,1,3)*bos(k,0,2,-2)*bos(h,3,0)*bos(f,3,2)*axp(fer(h,2,0)*fer(aa,1,3))
-fer(aa,1,3)*bos(k,0,2,-2)*bos(h,3,0)*bos(f,0,3)*axp(fer(h,2,0)*fer(aa,1,3))
+fer(aa,1,3)*bos(k,0,2,-2)*bos(h,0,1)*bos(f,3,2)*axp(fer(h,2,0)*fer(aa,1,3))
+fer(aa,1,3)*bos(k,0,2,-2)*bos(h,0,1)*bos(f,0,3)*axp(fer(h,2,0)*fer(aa,1,3))
-2*fer(f,1,3)*bos(k,0,2,-2)*axp(fer(h,2,0)*fer(aa,1,3))
-4*fer(f,1,2)*bos(k,3,2)*bos(k,0,2,-3)*axp(fer(h,2,0)*fer(aa,1,3))
+fer(f,1,2)*bos(k,0,2,-2)*bos(h,3,0)*bos(aa,3,3)*axp(fer(h,2,0)*fer(aa,1,3))
+fer(f,1,2)*bos(k,0,2,-2)*bos(h,3,0)*bos(aa,0,4)*axp(fer(h,2,0)*fer(aa,1,3))
-fer(f,1,2)*bos(k,0,2,-2)*bos(h,0,1)*bos(aa,3,3)*axp(fer(h,2,0)*fer(aa,1,3))
-fer(f,1,2)*bos(k,0,2,-2)*bos(h,0,1)*bos(aa,0,4)*axp(fer(h,2,0)*fer(aa,1,3))
-2*fer(h,2,1)*fer(f,1,2)*fer(aa,1,3)*bos(k,0,2,-2)*axp(fer(h,2,0)*fer(aa,1,3))
+2*fer(h,2,0)*fer(f,1,2)*fer(aa,1,4)*bos(k,0,2,-2)*axp(fer(h,2,0)*fer(aa,1,3))
+fer(h,2,0)*fer(f,1,2)*fer(aa,1,3)*bos(k,0,2,-2)*bos(h,3,0)*bos(aa,3,3)
*axp(fer(h,2,0)*fer(aa,1,3))
+fer(h,2,0)*fer(f,1,2)*fer(aa,1,3)*bos(k,0,2,-2)*bos(h,3,0)*bos(aa,0,4)
*axp(fer(h,2,0)*fer(aa,1,3))
-fer(h,2,0)*fer(f,1,2)*fer(aa,1,3)*bos(k,0,2,-2)*bos(h,0,1)*bos(aa,3,3)
*axp(fer(h,2,0)*fer(aa,1,3))
-fer(h,2,0)*fer(f,1,2)*fer(aa,1,3)*bos(k,0,2,-2)*bos(h,0,1)*bos(aa,0,4)
*axp(fer(h,2,0)*fer(aa,1,3))
-4*fer(k,2,2)*fer(f,1,2)*fer(aa,1,3)*bos(k,0,2,-3)*bos(h,3,0)
*axp(fer(h,2,0)*fer(aa,1,3))
+4*fer(k,2,2)*fer(f,1,2)*fer(aa,1,3)*bos(k,0,2,-3)*bos(h,0,1)
*axp(fer(h,2,0)*fer(aa,1,3))
-24*fer(k,2,2)*fer(k,1,2)*fer(f,1,2)*bos(k,0,2,-4)*axp(fer(h,2,0)*fer(aa,1,3))
+4*fer(k,1,2)*bos(k,0,2,-3)*bos(f,3,2)*axp(fer(h,2,0)*fer(aa,1,3))
+4*fer(k,1,2)*bos(k,0,2,-3)*bos(f,0,3)*axp(fer(h,2,0)*fer(aa,1,3))
-4*fer(k,1,2)*fer(h,2,0)*fer(f,1,2)*bos(k,0,2,-3)*bos(aa,3,3)
*axp(fer(h,2,0)*fer(aa,1,3))
-4*fer(k,1,2)*fer(h,2,0)*fer(f,1,2)*bos(k,0,2,-3)*bos(aa,0,4)
*axp(fer(h,2,0)*fer(aa,1,3)))/2
clearrules chiral1;
let trad;
% usual derivative
pg(1,xxx);
fer(f,1,3)*bos(k,0,2,-2)*axp(fer(h,2,0)*fer(aa,1,3))
-2*fer(f,1,2)*bos(k,0,3,1)*bos(k,0,2,-3)*axp(fer(h,2,0)*fer(aa,1,3))
-fer(h,2,1)*fer(f,1,2)*fer(aa,1,3)*bos(k,0,2,-2)*axp(fer(h,2,0)*fer(aa,1,3))
-fer(h,2,0)*fer(f,1,2)*fer(aa,1,4)*bos(k,0,2,-2)*axp(fer(h,2,0)*fer(aa,1,3))
pg(3,yyy);
fer(g,2,6)*bos(kk,3,1,-3)*axp(bos(f,0,2,-3))
-9*fer(g,2,5)*bos(kk,3,2,1)*bos(kk,3,1,-4)*axp(bos(f,0,2,-3))
-9*fer(g,2,5)*bos(kk,3,1,-3)*bos(f,0,3,1)*bos(f,0,2,-4)*axp(bos(f,0,2,-3))
-9*fer(g,2,4)*bos(kk,3,3,1)*bos(kk,3,1,-4)*axp(bos(f,0,2,-3))
+36*fer(g,2,4)*bos(kk,3,2,2)*bos(kk,3,1,-5)*axp(bos(f,0,2,-3))
+54*fer(g,2,4)*bos(kk,3,2,1)*bos(kk,3,1,-4)*bos(f,0,3,1)*bos(f,0,2,-4)
*axp(bos(f,0,2,-3))
-9*fer(g,2,4)*bos(kk,3,1,-3)*bos(f,0,4,1)*bos(f,0,2,-4)*axp(bos(f,0,2,-3))
+36*fer(g,2,4)*bos(kk,3,1,-3)*bos(f,0,3,2)*bos(f,0,2,-5)*axp(bos(f,0,2,-3))
+27*fer(g,2,4)*bos(kk,3,1,-3)*bos(f,0,3,2)*bos(f,0,2,-8)*axp(bos(f,0,2,-3))
-3*fer(g,2,3)*bos(kk,3,4,1)*bos(kk,3,1,-4)*axp(bos(f,0,2,-3))
+36*fer(g,2,3)*bos(kk,3,3,1)*bos(kk,3,2,1)*bos(kk,3,1,-5)*axp(bos(f,0,2,-3))
+27*fer(g,2,3)*bos(kk,3,3,1)*bos(kk,3,1,-4)*bos(f,0,3,1)*bos(f,0,2,-4)
*axp(bos(f,0,2,-3))
-60*fer(g,2,3)*bos(kk,3,2,3)*bos(kk,3,1,-6)*axp(bos(f,0,2,-3))
-108*fer(g,2,3)*bos(kk,3,2,2)*bos(kk,3,1,-5)*bos(f,0,3,1)*bos(f,0,2,-4)
*axp(bos(f,0,2,-3))
+27*fer(g,2,3)*bos(kk,3,2,1)*bos(kk,3,1,-4)*bos(f,0,4,1)*bos(f,0,2,-4)
*axp(bos(f,0,2,-3))
-108*fer(g,2,3)*bos(kk,3,2,1)*bos(kk,3,1,-4)*bos(f,0,3,2)*bos(f,0,2,-5)
*axp(bos(f,0,2,-3))
-81*fer(g,2,3)*bos(kk,3,2,1)*bos(kk,3,1,-4)*bos(f,0,3,2)*bos(f,0,2,-8)
*axp(bos(f,0,2,-3))
-3*fer(g,2,3)*bos(kk,3,1,-3)*bos(f,0,5,1)*bos(f,0,2,-4)*axp(bos(f,0,2,-3))
+36*fer(g,2,3)*bos(kk,3,1,-3)*bos(f,0,4,1)*bos(f,0,3,1)*bos(f,0,2,-5)
*axp(bos(f,0,2,-3))
+27*fer(g,2,3)*bos(kk,3,1,-3)*bos(f,0,4,1)*bos(f,0,3,1)*bos(f,0,2,-8)
*axp(bos(f,0,2,-3))
-60*fer(g,2,3)*bos(kk,3,1,-3)*bos(f,0,3,3)*bos(f,0,2,-6)*axp(bos(f,0,2,-3))
-108*fer(g,2,3)*bos(kk,3,1,-3)*bos(f,0,3,3)*bos(f,0,2,-9)*axp(bos(f,0,2,-3))
-27*fer(g,2,3)*bos(kk,3,1,-3)*bos(f,0,3,3)*bos(f,0,2,-12)*axp(bos(f,0,2,-3))
clear xxx,yyy;
% 8.)
% And now let us change traditional algebra on the chiral algebra;
clearrules trad;
let chiral;
% And now we compute the same derivative but in the chiral
% representation;
%first susy derivative
der(1)*fer(f,1,2)*bos(g,3,1)*axp(bos(h,0,0));
-fer(f,1,2)*bos(g,3,1)*axp(bos(h,0,0))*der(1)
+fer(h,1,0)*fer(f,1,2)*bos(g,3,1)*axp(bos(h,0,0))
fer(g,2,1)*bos(f,0,2,-2)*axp(fer(k,1,2)*fer(h,2,1))*del(1);
bos(g,3,1)*bos(f,0,2,-2)*axp(fer(k,1,2)*fer(h,2,1))
+2*fer(g,2,1)*fer(f,1,2)*bos(f,0,2,-3)*axp(fer(k,1,2)*fer(h,2,1))
-fer(k,1,2)*fer(g,2,1)*bos(h,3,1)*bos(f,0,2,-2)*axp(fer(k,1,2)*fer(h,2,1))
-del(1)*fer(g,2,1)*bos(f,0,2,-2)*axp(fer(k,1,2)*fer(h,2,1))
sub(del=der,ws);
fer(g,2,1)*bos(f,0,2,-2)*axp(fer(k,1,2)*fer(h,2,1))*der(1)
%second susy derivative
der(2)*fer(g,2,3)*bos(kk,0,3)*axp(bos(f,3,0));
-fer(g,2,3)*bos(kk,0,3)*axp(bos(f,3,0))*der(2)
+fer(g,2,3)*fer(f,2,1)*bos(kk,0,3)*axp(bos(f,3,0))
+fer(kk,2,3)*fer(g,2,3)*axp(bos(f,3,0))
fer(r,2,1)*bos(kk,3,4,-4)*axp(fer(f,1,2)*fer(g,2,1))*del(2);
fer(r,2,1)*fer(g,2,1)*bos(kk,3,4,-4)*bos(f,3,2)*axp( - fer(g,2,1)*fer(f,1,2))
+fer(r,2,1)*fer(g,2,1)*bos(kk,3,4,-4)*bos(f,0,3)*axp( - fer(g,2,1)*fer(f,1,2))
-4*fer(r,2,1)*fer(kk,2,5)*bos(kk,3,4,-5)*axp( - fer(g,2,1)*fer(f,1,2))
-del(2)*fer(r,2,1)*bos(kk,3,4,-4)*axp( - fer(g,2,1)*fer(f,1,2))
sub(del=der,ws);
fer(r,2,1)*bos(kk,3,4,-4)*axp( - fer(g,2,1)*fer(f,1,2))*der(2)
;
% 9.) the value of action of (susy) derivative;
xxx:=fer(f,1,2)*bos(k,0,2,-2)*axp(fer(h,2,0)*fer(aa,1,3));
xxx := fer(f,1,2)*bos(k,0,2,-2)*axp(fer(h,2,0)*fer(aa,1,3))
yyy:=fer(g,2,3)*bos(kk,3,1,-3)*axp(bos(f,0,2,-3));
yyy := fer(g,2,3)*bos(kk,3,1,-3)*axp(bos(f,0,2,-3))
%first susy derivative
pr(1,xxx);
-fer(f,1,2)*fer(aa,1,3)*bos(k,0,2,-2)*bos(h,3,0)*axp(fer(h,2,0)*fer(aa,1,3))
-2*fer(k,1,2)*fer(f,1,2)*bos(k,0,2,-3)*axp(fer(h,2,0)*fer(aa,1,3))
pr(1,yyy);
bos(kk,3,1,-3)*bos(g,3,3)*axp(bos(f,0,2,-3))
+3*fer(g,2,3)*fer(f,1,2)*bos(kk,3,1,-3)*bos(f,0,2,-4)*axp(bos(f,0,2,-3))
%second susy2 derivative;
pr(2,xxx);
-bos(k,0,2,-2)*bos(f,3,2)*axp(fer(h,2,0)*fer(aa,1,3))
-bos(k,0,2,-2)*bos(f,0,3)*axp(fer(h,2,0)*fer(aa,1,3))
+fer(h,2,0)*fer(f,1,2)*bos(k,0,2,-2)*bos(aa,3,3)*axp(fer(h,2,0)*fer(aa,1,3))
+fer(h,2,0)*fer(f,1,2)*bos(k,0,2,-2)*bos(aa,0,4)*axp(fer(h,2,0)*fer(aa,1,3))
-2*fer(k,2,2)*fer(f,1,2)*bos(k,0,2,-3)*axp(fer(h,2,0)*fer(aa,1,3))
pr(2,yyy);
3*fer(g,2,3)*fer(f,2,2)*bos(kk,3,1,-3)*bos(f,0,2,-4)*axp(bos(f,0,2,-3))
+3*fer(kk,2,2)*fer(g,2,3)*bos(kk,3,1,-4)*axp(bos(f,0,2,-3))
clear xxx,yyy;
% We return back to the traditional algebra;
clearrules chiral;
let trad;
% 10.) The components of super-objects;
xxx:=fer(f,2,3)*bos(g,3,2,2);
xxx := fer(f,2,3)*bos(g,3,2,2)
% all components;
fpart(xxx);
{gras(ff2,3)*fun(g1,2,2),
fun(g1,2,2)*fun(f1,3)
+2*gras(g2,3)*gras(ff2,3)*fun(g1,2,1),
fun(g1,2,2)*fun(f0,4)
-2*gras(g1,3)*gras(ff2,3)*fun(g1,2,1),
gras(ff1,4)*fun(g1,2,2)
-2*gras(ff2,3)*fun(g1,2,1)*fun(g0,3,1)
+2*gras(g1,3)*fun(g1,2,1)*fun(f1,3)
+2*gras(g2,3)*fun(g1,2,1)*fun(f0,4)
-2*gras(g2,3)*gras(g1,3)*gras(ff2,3)}
%bosonic sector;
bpart(xxx);
{0,fun(g1,2,2)*fun(f1,3),fun(g1,2,2)*fun(f0,4),0}
%the given component
bf_part(xxx,0);
gras(ff2,3)*fun(g1,2,2)
%the given component in the bosonic sector;
b_part(xxx,0);
0
b_part(xxx,1);
fun(g1,2,2)*fun(f1,3)
clear zzz;
clearrules trad;
let chiral;
zzz:=bos(f,3,1,-1)*bos(g,0,1,2);
zzz := bos(g,0,1,2)*bos(f,3,1,-1)
b_part(zzz,0);
fun(g0,1,2)*fun(f1,1,f0,2,-1)
b_part(zzz,3);
(
-fun(g0,1,2)*fun(f0,3,1)*fun(f1,1,f0,2,-2)
+2*fun(g0,1,2)*fun(f1,2,1)*fun(f1,1,f0,2,-2)
+8*fun(g1,1,1)*fun(g0,1,1)*fun(f1,1,f0,2,-1))/4
clearrules chiral;
let chiral1;
b_part(zzz,0);
(fun(g0,1,2)*fun(f1,1,-1))/2
b_part(zzz,3);
(
-fun(g0,1,2)*fun(f1,1,-2)*fun(f0,3,1)
+8*fun(g1,1,1)*fun(g0,1,1)*fun(f1,1,-1))/8
clearrules chiral1;
let trad;
%11 matrix represenattion of operators;
lax:=der(1)*der(2)+bos(u,0,0);
lax := bos(u,0,0)
+der(1)*der(2)
macierz(lax,b,b);
mat((fun(u0,0),0,0,1),
(0,0,0,0),
(0,0,0,0),
(fun(u1,0)
2
-d(1) ,0,0,fun(u0,0)))
macierz(lax,f,b);
mat((0,0,0,0),
(fun(u0,0),0,0,d(1)),
(
-d(1),0,0,fun(u0,0)),
(0,0,0,0))
macierz(lax,b,f);
mat((fun(u0,0),0,0,1),
(gras(uu1,0),fun(u0,0),d(1),0),
(gras(uu2,0),
-d(1),fun(u0,0),0),
(fun(u1,0)
2
-d(1) ,
-gras(uu2,0),gras(uu1,0),fun(u0,0)))
macierz(lax,f,f);
mat((0,fun(u0,0),1,0),
(fun(u0,0),gras(uu1,0),0,d(1)),
(
-d(1),gras(uu2,0),0,fun(u0,0)),
(
-gras(uu2,0),fun(u1,0)
2
-d(1) ,fun(u0,0),gras(uu1,0)))
% 12.) Demonstration of chirality properties;
clearrules trad;
let chiral;
b_chiral:={f0};
b_chiral := {f0}
b_antychiral:={f1};
b_antychiral := {f1}
f_chiral:={f2};
f_chiral := {f2}
f_antychiral:={f3};
f_antychiral := {f3}
for k:=0:3 do write fer(f0,k,0);
fer(f0,0,0)
0
fer(f0,2,0)
fer(f0,3,0)
for k:=0:3 do write fer(f1,k,0);
fer(f1,0,0)
fer(f1,1,0)
0
fer(f1,3,0)
for k:=0:3 do write fer(f2,k,0);
fer(f2,0,0)
fer(f2,1,0)
fer(f2,2,0)
-fer(f2,0,1)
for k:=0:3 do write fer(f3,k,0);
fer(f3,0,0)
fer(f3,1,0)
fer(f3,2,0)
0
for k:=0:3 do write bos(f1,k,0);
bos(f1,0,0)
bos(f1,1,0)
bos(f1,2,0)
0
for k:=0:3 do write bos(f2,k,0);
bos(f2,0,0)
0
bos(f2,2,0)
bos(f2,3,0)
for k:=0:3 do write bos(f2,k,0);
bos(f2,0,0)
0
bos(f2,2,0)
bos(f2,3,0)
for k:=0:3 do write bos(f3,k,0);
bos(f3,0,0)
bos(f3,1,0)
0
bos(f3,3,0)
% 13.) Integrations;
d(-1)*xxx;
***** introduce the precision e.g. give the value of ww > 0
%we have to declare ww;
ww:=2;
ww := 2
d(-1)*xxx;
6
-2*fer(f,2,4)*bos(g,3,4,2)*d(-1)
5
+4*fer(f,2,4)*bos(g,3,4,1)*bos(g,3,3,1)*d(-1)
4
-2*fer(f,2,4)*bos(g,3,4,1)*bos(g,3,2,1)*d(-1)
4
-2*fer(f,2,4)*bos(g,3,3,2)*d(-1)
3
+4*fer(f,2,4)*bos(g,3,3,1)*bos(g,3,2,1)*d(-1)
2
-fer(f,2,4)*bos(g,3,2,2)*d(-1)
2
-2*fer(f,2,3)*bos(g,3,3,1)*bos(g,3,2,1)*d(-1)
+fer(f,2,3)*bos(g,3,2,2)*d(-1)
xxx*d(-2);
4
2*d(-2) *fer(f,2,5)*bos(g,3,3,1)*bos(g,3,2,1)
3
+4*d(-2) *fer(f,2,4)*bos(g,3,3,1)*bos(g,3,2,1)
2
+d(-2) *fer(f,2,4)*bos(g,3,2,2)
2
+2*d(-2) *fer(f,2,3)*bos(g,3,3,1)*bos(g,3,2,1)
+d(-2)*fer(f,2,3)*bos(g,3,2,2)
d(-3)*xxx;
d(-3)*fer(f,2,3)*bos(g,3,2,2)
ww:=4;
ww := 4
d(-1)**5:=0;
5
d(-1) := 0
d(-2)**5:=0;
5
d(-2) := 0
d(-1)*yyy;
yyy*d(-1)
yyy*d(-2);
yyy*d(-2)
clear d(-1)**5,d(-2)**5;
on list;
% 14.) The accelerations of integrations;
clear ww;
ww:=3;
ww := 3
let drr;
let cutoff;
cut:=4;
cut := 4
d(-1)*xxx;
-fer(f,2,6)*bos(g,3,2,2)*dr(-4)
-6*fer(f,2,5)*bos(g,3,3,1)*bos(g,3,2,1)*dr(-4)
+fer(f,2,5)*bos(g,3,2,2)*dr(-3)
-6*fer(f,2,4)*bos(g,3,4,1)*bos(g,3,2,1)*dr(-4)
-6*fer(f,2,4)*bos(g,3,3,2)*dr(-4)
+4*fer(f,2,4)*bos(g,3,3,1)*bos(g,3,2,1)*dr(-3)
-fer(f,2,4)*bos(g,3,2,2)*dr(-2)
-2*fer(f,2,3)*bos(g,3,5,1)*bos(g,3,2,1)*dr(-4)
-6*fer(f,2,3)*bos(g,3,4,1)*bos(g,3,3,1)*dr(-4)
+2*fer(f,2,3)*bos(g,3,4,1)*bos(g,3,2,1)*dr(-3)
+2*fer(f,2,3)*bos(g,3,3,2)*dr(-3)
-2*fer(f,2,3)*bos(g,3,3,1)*bos(g,3,2,1)*dr(-2)
+fer(f,2,3)*bos(g,3,2,2)*dr(-1)
d(-1)**2*yyy;
yyy*dr(-2)
clear ww,cut;
ww:=4;
ww := 4
cut:=5;
cut := 5
d(-1)**3*yyy;
yyy*dr(-3)
d(-1)*xxx;
fer(f,2,7)*bos(g,3,2,2)*dr(-5)
+8*fer(f,2,6)*bos(g,3,3,1)*bos(g,3,2,1)*dr(-5)
-fer(f,2,6)*bos(g,3,2,2)*dr(-4)
+12*fer(f,2,5)*bos(g,3,4,1)*bos(g,3,2,1)*dr(-5)
+12*fer(f,2,5)*bos(g,3,3,2)*dr(-5)
-6*fer(f,2,5)*bos(g,3,3,1)*bos(g,3,2,1)*dr(-4)
+fer(f,2,5)*bos(g,3,2,2)*dr(-3)
+8*fer(f,2,4)*bos(g,3,5,1)*bos(g,3,2,1)*dr(-5)
+24*fer(f,2,4)*bos(g,3,4,1)*bos(g,3,3,1)*dr(-5)
-6*fer(f,2,4)*bos(g,3,4,1)*bos(g,3,2,1)*dr(-4)
-6*fer(f,2,4)*bos(g,3,3,2)*dr(-4)
+4*fer(f,2,4)*bos(g,3,3,1)*bos(g,3,2,1)*dr(-3)
-fer(f,2,4)*bos(g,3,2,2)*dr(-2)
+2*fer(f,2,3)*bos(g,3,6,1)*bos(g,3,2,1)*dr(-5)
+8*fer(f,2,3)*bos(g,3,5,1)*bos(g,3,3,1)*dr(-5)
-2*fer(f,2,3)*bos(g,3,5,1)*bos(g,3,2,1)*dr(-4)
+6*fer(f,2,3)*bos(g,3,4,2)*dr(-5)
-6*fer(f,2,3)*bos(g,3,4,1)*bos(g,3,3,1)*dr(-4)
+2*fer(f,2,3)*bos(g,3,4,1)*bos(g,3,2,1)*dr(-3)
+2*fer(f,2,3)*bos(g,3,3,2)*dr(-3)
-2*fer(f,2,3)*bos(g,3,3,1)*bos(g,3,2,1)*dr(-2)
+fer(f,2,3)*bos(g,3,2,2)*dr(-1)
clearrules cutoff;
clearrules drr;
clear cut,ww;
% it is possible to use directly accelerated integrations oprators dr;
ww:=4;
ww := 4
dr(-2)*fer(f,1,2)*bos(kk,0,2);
630*fer(f,1,6)*bos(kk,0,6)*dr(-10)
-280*fer(f,1,6)*bos(kk,0,5)*dr(-9)
+105*fer(f,1,6)*bos(kk,0,4)*dr(-8)
-30*fer(f,1,6)*bos(kk,0,3)*dr(-7)
+5*fer(f,1,6)*bos(kk,0,2)*dr(-6)
-280*fer(f,1,5)*bos(kk,0,6)*dr(-9)
+140*fer(f,1,5)*bos(kk,0,5)*dr(-8)
-60*fer(f,1,5)*bos(kk,0,4)*dr(-7)
+20*fer(f,1,5)*bos(kk,0,3)*dr(-6)
-4*fer(f,1,5)*bos(kk,0,2)*dr(-5)
+105*fer(f,1,4)*bos(kk,0,6)*dr(-8)
-60*fer(f,1,4)*bos(kk,0,5)*dr(-7)
+30*fer(f,1,4)*bos(kk,0,4)*dr(-6)
-12*fer(f,1,4)*bos(kk,0,3)*dr(-5)
+3*fer(f,1,4)*bos(kk,0,2)*dr(-4)
-30*fer(f,1,3)*bos(kk,0,6)*dr(-7)
+20*fer(f,1,3)*bos(kk,0,5)*dr(-6)
-12*fer(f,1,3)*bos(kk,0,4)*dr(-5)
+6*fer(f,1,3)*bos(kk,0,3)*dr(-4)
-2*fer(f,1,3)*bos(kk,0,2)*dr(-3)
+5*fer(f,1,2)*bos(kk,0,6)*dr(-6)
-4*fer(f,1,2)*bos(kk,0,5)*dr(-5)
+3*fer(f,1,2)*bos(kk,0,4)*dr(-4)
-2*fer(f,1,2)*bos(kk,0,3)*dr(-3)
+fer(f,1,2)*bos(kk,0,2)*dr(-2)
on time;
Time: 2518 ms plus GC time: 57 ms
showtime;
Time: 0 ms
Time: 0 ms
dr(-3)*bos(g,3,1)*bos(ff,3,2);
3150*bos(g,3,5)*bos(ff,3,6)*dr(-11)
-1260*bos(g,3,5)*bos(ff,3,5)*dr(-10)
+420*bos(g,3,5)*bos(ff,3,4)*dr(-9)
-105*bos(g,3,5)*bos(ff,3,3)*dr(-8)
+15*bos(g,3,5)*bos(ff,3,2)*dr(-7)
-1260*bos(g,3,4)*bos(ff,3,6)*dr(-10)
+560*bos(g,3,4)*bos(ff,3,5)*dr(-9)
-210*bos(g,3,4)*bos(ff,3,4)*dr(-8)
+60*bos(g,3,4)*bos(ff,3,3)*dr(-7)
-10*bos(g,3,4)*bos(ff,3,2)*dr(-6)
+420*bos(g,3,3)*bos(ff,3,6)*dr(-9)
-210*bos(g,3,3)*bos(ff,3,5)*dr(-8)
+90*bos(g,3,3)*bos(ff,3,4)*dr(-7)
-30*bos(g,3,3)*bos(ff,3,3)*dr(-6)
+6*bos(g,3,3)*bos(ff,3,2)*dr(-5)
-105*bos(g,3,2)*bos(ff,3,6)*dr(-8)
+60*bos(g,3,2)*bos(ff,3,5)*dr(-7)
-30*bos(g,3,2)*bos(ff,3,4)*dr(-6)
+12*bos(g,3,2)*bos(ff,3,3)*dr(-5)
-3*bos(g,3,2)*bos(ff,3,2)*dr(-4)
+15*bos(g,3,1)*bos(ff,3,6)*dr(-7)
-10*bos(g,3,1)*bos(ff,3,5)*dr(-6)
+6*bos(g,3,1)*bos(ff,3,4)*dr(-5)
-3*bos(g,3,1)*bos(ff,3,3)*dr(-4)
+bos(g,3,1)*bos(ff,3,2)*dr(-3)
Time: 45 ms
showtime;
Time: 0 ms
Time: 0 ms
%if you try usual integration
d(-1)**3*bos(g,3,1)*bos(ff,3,2);
48
-bos(g,3,10)*bos(ff,3,38)*d(-1)
47
+12*bos(g,3,10)*bos(ff,3,37)*d(-1)
46
-78*bos(g,3,10)*bos(ff,3,36)*d(-1)
45
+364*bos(g,3,10)*bos(ff,3,35)*d(-1)
44
-1353*bos(g,3,10)*bos(ff,3,34)*d(-1)
43
+4224*bos(g,3,10)*bos(ff,3,33)*d(-1)
42
-11440*bos(g,3,10)*bos(ff,3,32)*d(-1)
41
+27456*bos(g,3,10)*bos(ff,3,31)*d(-1)
40
-59268*bos(g,3,10)*bos(ff,3,30)*d(-1)
39
+116336*bos(g,3,10)*bos(ff,3,29)*d(-1)
38
-209352*bos(g,3,10)*bos(ff,3,28)*d(-1)
37
+347568*bos(g,3,10)*bos(ff,3,27)*d(-1)
36
-534964*bos(g,3,10)*bos(ff,3,26)*d(-1)
35
+766272*bos(g,3,10)*bos(ff,3,25)*d(-1)
34
-1024464*bos(g,3,10)*bos(ff,3,24)*d(-1)
33
+1281280*bos(g,3,10)*bos(ff,3,23)*d(-1)
32
-1501566*bos(g,3,10)*bos(ff,3,22)*d(-1)
31
+1650792*bos(g,3,10)*bos(ff,3,21)*d(-1)
30
-1703636*bos(g,3,10)*bos(ff,3,20)*d(-1)
29
+1650792*bos(g,3,10)*bos(ff,3,19)*d(-1)
28
-1501566*bos(g,3,10)*bos(ff,3,18)*d(-1)
27
+1281280*bos(g,3,10)*bos(ff,3,17)*d(-1)
26
-1024464*bos(g,3,10)*bos(ff,3,16)*d(-1)
25
+766272*bos(g,3,10)*bos(ff,3,15)*d(-1)
24
-534964*bos(g,3,10)*bos(ff,3,14)*d(-1)
23
+347568*bos(g,3,10)*bos(ff,3,13)*d(-1)
22
-209352*bos(g,3,10)*bos(ff,3,12)*d(-1)
21
+116336*bos(g,3,10)*bos(ff,3,11)*d(-1)
20
-59268*bos(g,3,10)*bos(ff,3,10)*d(-1)
19
+27456*bos(g,3,10)*bos(ff,3,9)*d(-1)
18
-11440*bos(g,3,10)*bos(ff,3,8)*d(-1)
17
+4224*bos(g,3,10)*bos(ff,3,7)*d(-1)
16
-1353*bos(g,3,10)*bos(ff,3,6)*d(-1)
15
+364*bos(g,3,10)*bos(ff,3,5)*d(-1)
14
-78*bos(g,3,10)*bos(ff,3,4)*d(-1)
13
+12*bos(g,3,10)*bos(ff,3,3)*d(-1)
12
-bos(g,3,10)*bos(ff,3,2)*d(-1)
44
-3*bos(g,3,9)*bos(ff,3,35)*d(-1)
43
+33*bos(g,3,9)*bos(ff,3,34)*d(-1)
42
-198*bos(g,3,9)*bos(ff,3,33)*d(-1)
41
+858*bos(g,3,9)*bos(ff,3,32)*d(-1)
40
-2970*bos(g,3,9)*bos(ff,3,31)*d(-1)
39
+8646*bos(g,3,9)*bos(ff,3,30)*d(-1)
38
-21846*bos(g,3,9)*bos(ff,3,29)*d(-1)
37
+48906*bos(g,3,9)*bos(ff,3,28)*d(-1)
36
-98406*bos(g,3,9)*bos(ff,3,27)*d(-1)
35
+179850*bos(g,3,9)*bos(ff,3,26)*d(-1)
34
-300894*bos(g,3,9)*bos(ff,3,25)*d(-1)
33
+463554*bos(g,3,9)*bos(ff,3,24)*d(-1)
32
-660594*bos(g,3,9)*bos(ff,3,23)*d(-1)
31
+873774*bos(g,3,9)*bos(ff,3,22)*d(-1)
30
-1075470*bos(g,3,9)*bos(ff,3,21)*d(-1)
29
+1234002*bos(g,3,9)*bos(ff,3,20)*d(-1)
28
-1321452*bos(g,3,9)*bos(ff,3,19)*d(-1)
27
+1321452*bos(g,3,9)*bos(ff,3,18)*d(-1)
26
-1234002*bos(g,3,9)*bos(ff,3,17)*d(-1)
25
+1075470*bos(g,3,9)*bos(ff,3,16)*d(-1)
24
-873774*bos(g,3,9)*bos(ff,3,15)*d(-1)
23
+660594*bos(g,3,9)*bos(ff,3,14)*d(-1)
22
-463554*bos(g,3,9)*bos(ff,3,13)*d(-1)
21
+300894*bos(g,3,9)*bos(ff,3,12)*d(-1)
20
-179850*bos(g,3,9)*bos(ff,3,11)*d(-1)
19
+98406*bos(g,3,9)*bos(ff,3,10)*d(-1)
18
-48906*bos(g,3,9)*bos(ff,3,9)*d(-1)
17
+21846*bos(g,3,9)*bos(ff,3,8)*d(-1)
16
-8646*bos(g,3,9)*bos(ff,3,7)*d(-1)
15
+2970*bos(g,3,9)*bos(ff,3,6)*d(-1)
14
-858*bos(g,3,9)*bos(ff,3,5)*d(-1)
13
+198*bos(g,3,9)*bos(ff,3,4)*d(-1)
12
-33*bos(g,3,9)*bos(ff,3,3)*d(-1)
11
+3*bos(g,3,9)*bos(ff,3,2)*d(-1)
40
-6*bos(g,3,8)*bos(ff,3,32)*d(-1)
39
+60*bos(g,3,8)*bos(ff,3,31)*d(-1)
38
-330*bos(g,3,8)*bos(ff,3,30)*d(-1)
37
+1320*bos(g,3,8)*bos(ff,3,29)*d(-1)
36
-4230*bos(g,3,8)*bos(ff,3,28)*d(-1)
35
+11412*bos(g,3,8)*bos(ff,3,27)*d(-1)
34
-26730*bos(g,3,8)*bos(ff,3,26)*d(-1)
33
+55440*bos(g,3,8)*bos(ff,3,25)*d(-1)
32
-103230*bos(g,3,8)*bos(ff,3,24)*d(-1)
31
+174300*bos(g,3,8)*bos(ff,3,23)*d(-1)
30
-268818*bos(g,3,8)*bos(ff,3,22)*d(-1)
29
+380760*bos(g,3,8)*bos(ff,3,21)*d(-1)
28
-497310*bos(g,3,8)*bos(ff,3,20)*d(-1)
27
+600660*bos(g,3,8)*bos(ff,3,19)*d(-1)
26
-672210*bos(g,3,8)*bos(ff,3,18)*d(-1)
25
+697824*bos(g,3,8)*bos(ff,3,17)*d(-1)
24
-672210*bos(g,3,8)*bos(ff,3,16)*d(-1)
23
+600660*bos(g,3,8)*bos(ff,3,15)*d(-1)
22
-497310*bos(g,3,8)*bos(ff,3,14)*d(-1)
21
+380760*bos(g,3,8)*bos(ff,3,13)*d(-1)
20
-268818*bos(g,3,8)*bos(ff,3,12)*d(-1)
19
+174300*bos(g,3,8)*bos(ff,3,11)*d(-1)
18
-103230*bos(g,3,8)*bos(ff,3,10)*d(-1)
17
+55440*bos(g,3,8)*bos(ff,3,9)*d(-1)
16
-26730*bos(g,3,8)*bos(ff,3,8)*d(-1)
15
+11412*bos(g,3,8)*bos(ff,3,7)*d(-1)
14
-4230*bos(g,3,8)*bos(ff,3,6)*d(-1)
13
+1320*bos(g,3,8)*bos(ff,3,5)*d(-1)
12
-330*bos(g,3,8)*bos(ff,3,4)*d(-1)
11
+60*bos(g,3,8)*bos(ff,3,3)*d(-1)
10
-6*bos(g,3,8)*bos(ff,3,2)*d(-1)
36
-10*bos(g,3,7)*bos(ff,3,29)*d(-1)
35
+90*bos(g,3,7)*bos(ff,3,28)*d(-1)
34
-450*bos(g,3,7)*bos(ff,3,27)*d(-1)
33
+1650*bos(g,3,7)*bos(ff,3,26)*d(-1)
32
-4860*bos(g,3,7)*bos(ff,3,25)*d(-1)
31
+12060*bos(g,3,7)*bos(ff,3,24)*d(-1)
30
-25980*bos(g,3,7)*bos(ff,3,23)*d(-1)
29
+49500*bos(g,3,7)*bos(ff,3,22)*d(-1)
28
-84510*bos(g,3,7)*bos(ff,3,21)*d(-1)
27
+130510*bos(g,3,7)*bos(ff,3,20)*d(-1)
26
-183510*bos(g,3,7)*bos(ff,3,19)*d(-1)
25
+236070*bos(g,3,7)*bos(ff,3,18)*d(-1)
24
-278760*bos(g,3,7)*bos(ff,3,17)*d(-1)
23
+302760*bos(g,3,7)*bos(ff,3,16)*d(-1)
22
-302760*bos(g,3,7)*bos(ff,3,15)*d(-1)
21
+278760*bos(g,3,7)*bos(ff,3,14)*d(-1)
20
-236070*bos(g,3,7)*bos(ff,3,13)*d(-1)
19
+183510*bos(g,3,7)*bos(ff,3,12)*d(-1)
18
-130510*bos(g,3,7)*bos(ff,3,11)*d(-1)
17
+84510*bos(g,3,7)*bos(ff,3,10)*d(-1)
16
-49500*bos(g,3,7)*bos(ff,3,9)*d(-1)
15
+25980*bos(g,3,7)*bos(ff,3,8)*d(-1)
14
-12060*bos(g,3,7)*bos(ff,3,7)*d(-1)
13
+4860*bos(g,3,7)*bos(ff,3,6)*d(-1)
12
-1650*bos(g,3,7)*bos(ff,3,5)*d(-1)
11
+450*bos(g,3,7)*bos(ff,3,4)*d(-1)
10
-90*bos(g,3,7)*bos(ff,3,3)*d(-1)
9
+10*bos(g,3,7)*bos(ff,3,2)*d(-1)
32
-12*bos(g,3,6)*bos(ff,3,26)*d(-1)
31
+96*bos(g,3,6)*bos(ff,3,25)*d(-1)
30
-432*bos(g,3,6)*bos(ff,3,24)*d(-1)
29
+1440*bos(g,3,6)*bos(ff,3,23)*d(-1)
28
-3864*bos(g,3,6)*bos(ff,3,22)*d(-1)
27
+8736*bos(g,3,6)*bos(ff,3,21)*d(-1)
26
-17136*bos(g,3,6)*bos(ff,3,20)*d(-1)
25
+29664*bos(g,3,6)*bos(ff,3,19)*d(-1)
24
-45876*bos(g,3,6)*bos(ff,3,18)*d(-1)
23
+63936*bos(g,3,6)*bos(ff,3,17)*d(-1)
22
-80736*bos(g,3,6)*bos(ff,3,16)*d(-1)
21
+92736*bos(g,3,6)*bos(ff,3,15)*d(-1)
20
-97104*bos(g,3,6)*bos(ff,3,14)*d(-1)
19
+92736*bos(g,3,6)*bos(ff,3,13)*d(-1)
18
-80736*bos(g,3,6)*bos(ff,3,12)*d(-1)
17
+63936*bos(g,3,6)*bos(ff,3,11)*d(-1)
16
-45876*bos(g,3,6)*bos(ff,3,10)*d(-1)
15
+29664*bos(g,3,6)*bos(ff,3,9)*d(-1)
14
-17136*bos(g,3,6)*bos(ff,3,8)*d(-1)
13
+8736*bos(g,3,6)*bos(ff,3,7)*d(-1)
12
-3864*bos(g,3,6)*bos(ff,3,6)*d(-1)
11
+1440*bos(g,3,6)*bos(ff,3,5)*d(-1)
10
-432*bos(g,3,6)*bos(ff,3,4)*d(-1)
9
+96*bos(g,3,6)*bos(ff,3,3)*d(-1)
8
-12*bos(g,3,6)*bos(ff,3,2)*d(-1)
28
-12*bos(g,3,5)*bos(ff,3,23)*d(-1)
27
+84*bos(g,3,5)*bos(ff,3,22)*d(-1)
26
-336*bos(g,3,5)*bos(ff,3,21)*d(-1)
25
+1008*bos(g,3,5)*bos(ff,3,20)*d(-1)
24
-2436*bos(g,3,5)*bos(ff,3,19)*d(-1)
23
+4956*bos(g,3,5)*bos(ff,3,18)*d(-1)
22
-8736*bos(g,3,5)*bos(ff,3,17)*d(-1)
21
+13536*bos(g,3,5)*bos(ff,3,16)*d(-1)
20
-18648*bos(g,3,5)*bos(ff,3,15)*d(-1)
19
+23016*bos(g,3,5)*bos(ff,3,14)*d(-1)
18
-25536*bos(g,3,5)*bos(ff,3,13)*d(-1)
17
+25536*bos(g,3,5)*bos(ff,3,12)*d(-1)
16
-23016*bos(g,3,5)*bos(ff,3,11)*d(-1)
15
+18648*bos(g,3,5)*bos(ff,3,10)*d(-1)
14
-13536*bos(g,3,5)*bos(ff,3,9)*d(-1)
13
+8736*bos(g,3,5)*bos(ff,3,8)*d(-1)
12
-4956*bos(g,3,5)*bos(ff,3,7)*d(-1)
11
+2436*bos(g,3,5)*bos(ff,3,6)*d(-1)
10
-1008*bos(g,3,5)*bos(ff,3,5)*d(-1)
9
+336*bos(g,3,5)*bos(ff,3,4)*d(-1)
8
-84*bos(g,3,5)*bos(ff,3,3)*d(-1)
7
+12*bos(g,3,5)*bos(ff,3,2)*d(-1)
24
-10*bos(g,3,4)*bos(ff,3,20)*d(-1)
23
+60*bos(g,3,4)*bos(ff,3,19)*d(-1)
22
-210*bos(g,3,4)*bos(ff,3,18)*d(-1)
21
+560*bos(g,3,4)*bos(ff,3,17)*d(-1)
20
-1200*bos(g,3,4)*bos(ff,3,16)*d(-1)
19
+2160*bos(g,3,4)*bos(ff,3,15)*d(-1)
18
-3360*bos(g,3,4)*bos(ff,3,14)*d(-1)
17
+4560*bos(g,3,4)*bos(ff,3,13)*d(-1)
16
-5460*bos(g,3,4)*bos(ff,3,12)*d(-1)
15
+5800*bos(g,3,4)*bos(ff,3,11)*d(-1)
14
-5460*bos(g,3,4)*bos(ff,3,10)*d(-1)
13
+4560*bos(g,3,4)*bos(ff,3,9)*d(-1)
12
-3360*bos(g,3,4)*bos(ff,3,8)*d(-1)
11
+2160*bos(g,3,4)*bos(ff,3,7)*d(-1)
10
-1200*bos(g,3,4)*bos(ff,3,6)*d(-1)
9
+560*bos(g,3,4)*bos(ff,3,5)*d(-1)
8
-210*bos(g,3,4)*bos(ff,3,4)*d(-1)
7
+60*bos(g,3,4)*bos(ff,3,3)*d(-1)
6
-10*bos(g,3,4)*bos(ff,3,2)*d(-1)
20
-6*bos(g,3,3)*bos(ff,3,17)*d(-1)
19
+30*bos(g,3,3)*bos(ff,3,16)*d(-1)
18
-90*bos(g,3,3)*bos(ff,3,15)*d(-1)
17
+210*bos(g,3,3)*bos(ff,3,14)*d(-1)
16
-390*bos(g,3,3)*bos(ff,3,13)*d(-1)
15
+606*bos(g,3,3)*bos(ff,3,12)*d(-1)
14
-810*bos(g,3,3)*bos(ff,3,11)*d(-1)
13
+930*bos(g,3,3)*bos(ff,3,10)*d(-1)
12
-930*bos(g,3,3)*bos(ff,3,9)*d(-1)
11
+810*bos(g,3,3)*bos(ff,3,8)*d(-1)
10
-606*bos(g,3,3)*bos(ff,3,7)*d(-1)
9
+390*bos(g,3,3)*bos(ff,3,6)*d(-1)
8
-210*bos(g,3,3)*bos(ff,3,5)*d(-1)
7
+90*bos(g,3,3)*bos(ff,3,4)*d(-1)
6
-30*bos(g,3,3)*bos(ff,3,3)*d(-1)
5
+6*bos(g,3,3)*bos(ff,3,2)*d(-1)
16
-3*bos(g,3,2)*bos(ff,3,14)*d(-1)
15
+12*bos(g,3,2)*bos(ff,3,13)*d(-1)
14
-30*bos(g,3,2)*bos(ff,3,12)*d(-1)
13
+60*bos(g,3,2)*bos(ff,3,11)*d(-1)
12
-93*bos(g,3,2)*bos(ff,3,10)*d(-1)
11
+120*bos(g,3,2)*bos(ff,3,9)*d(-1)
10
-132*bos(g,3,2)*bos(ff,3,8)*d(-1)
9
+120*bos(g,3,2)*bos(ff,3,7)*d(-1)
8
-93*bos(g,3,2)*bos(ff,3,6)*d(-1)
7
+60*bos(g,3,2)*bos(ff,3,5)*d(-1)
6
-30*bos(g,3,2)*bos(ff,3,4)*d(-1)
5
+12*bos(g,3,2)*bos(ff,3,3)*d(-1)
4
-3*bos(g,3,2)*bos(ff,3,2)*d(-1)
12
-bos(g,3,1)*bos(ff,3,11)*d(-1)
11
+3*bos(g,3,1)*bos(ff,3,10)*d(-1)
10
-6*bos(g,3,1)*bos(ff,3,9)*d(-1)
9
+10*bos(g,3,1)*bos(ff,3,8)*d(-1)
8
-12*bos(g,3,1)*bos(ff,3,7)*d(-1)
7
+12*bos(g,3,1)*bos(ff,3,6)*d(-1)
6
-10*bos(g,3,1)*bos(ff,3,5)*d(-1)
5
+6*bos(g,3,1)*bos(ff,3,4)*d(-1)
4
-3*bos(g,3,1)*bos(ff,3,3)*d(-1)
3
+bos(g,3,1)*bos(ff,3,2)*d(-1)
Time: 312 ms plus GC time: 19 ms
showtime;
Time: 0 ms
Time: 0 ms
% then the time - diffrences is evident. In this example d(-1)
% integration is 10 times slower then dr integrations.
off time;
let cutoff;
cut:=5;
cut := 5
dr(-2)*fer(f,1,2)*bos(aa,0,1);
-4*fer(f,1,5)*bos(aa,0,1)*dr(-5)
-12*fer(f,1,4)*bos(aa,0,2)*dr(-5)
+3*fer(f,1,4)*bos(aa,0,1)*dr(-4)
-12*fer(f,1,3)*bos(aa,0,3)*dr(-5)
+6*fer(f,1,3)*bos(aa,0,2)*dr(-4)
-2*fer(f,1,3)*bos(aa,0,1)*dr(-3)
-4*fer(f,1,2)*bos(aa,0,4)*dr(-5)
+3*fer(f,1,2)*bos(aa,0,3)*dr(-4)
-2*fer(f,1,2)*bos(aa,0,2)*dr(-3)
+fer(f,1,2)*bos(aa,0,1)*dr(-2)
dr(-3)*bos(g,3,1)*bos(bb,0,3);
6*bos(g,3,3)*bos(bb,0,3)*dr(-5)
+12*bos(g,3,2)*bos(bb,0,4)*dr(-5)
-3*bos(g,3,2)*bos(bb,0,3)*dr(-4)
+6*bos(g,3,1)*bos(bb,0,5)*dr(-5)
-3*bos(g,3,1)*bos(bb,0,4)*dr(-4)
+bos(g,3,1)*bos(bb,0,3)*dr(-3)
clear ww,cut;
ww:=6;
ww := 6
cut:=7;
cut := 7
dr(-3)*fer(k,2,3)*bos(h,0,2);
15*fer(k,2,7)*bos(h,0,2)*dr(-7)
+60*fer(k,2,6)*bos(h,0,3)*dr(-7)
-10*fer(k,2,6)*bos(h,0,2)*dr(-6)
+90*fer(k,2,5)*bos(h,0,4)*dr(-7)
-30*fer(k,2,5)*bos(h,0,3)*dr(-6)
+6*fer(k,2,5)*bos(h,0,2)*dr(-5)
+60*fer(k,2,4)*bos(h,0,5)*dr(-7)
-30*fer(k,2,4)*bos(h,0,4)*dr(-6)
+12*fer(k,2,4)*bos(h,0,3)*dr(-5)
-3*fer(k,2,4)*bos(h,0,2)*dr(-4)
+15*fer(k,2,3)*bos(h,0,6)*dr(-7)
-10*fer(k,2,3)*bos(h,0,5)*dr(-6)
+6*fer(k,2,3)*bos(h,0,4)*dr(-5)
-3*fer(k,2,3)*bos(h,0,3)*dr(-4)
+fer(k,2,3)*bos(h,0,2)*dr(-3)
dr(-4)*bos(h,0,3)*bos(k,0,2);
-20*bos(k,0,5)*bos(h,0,3)*dr(-7)
-60*bos(k,0,4)*bos(h,0,4)*dr(-7)
+10*bos(k,0,4)*bos(h,0,3)*dr(-6)
-60*bos(k,0,3)*bos(h,0,5)*dr(-7)
+20*bos(k,0,3)*bos(h,0,4)*dr(-6)
-4*bos(k,0,3)*bos(h,0,3)*dr(-5)
-20*bos(k,0,2)*bos(h,0,6)*dr(-7)
+10*bos(k,0,2)*bos(h,0,5)*dr(-6)
-4*bos(k,0,2)*bos(h,0,4)*dr(-5)
+bos(k,0,2)*bos(h,0,3)*dr(-4)
clear ww,cut;
clearrules cutoff;
% 15.) The combinations
%the combinations of dim 7 constructed from fields of
% the 2 ,3 dimensions, free parameters are numerated by "a";
w_comb({{f,2,b},{g,3,b}},7,a,b);
a1*bos(f,3,4)
+a2*bos(f,3,2)*bos(f,0,0)
+a3*bos(f,3,1)*bos(f,3,0)
+a4*bos(f,3,1)*bos(f,0,1)
+a5*bos(f,3,0)*bos(f,0,2)
2
+a6*bos(f,3,0)*bos(f,0,0)
+a7*bos(f,0,5)
+a8*bos(f,0,3)*bos(f,0,0)
+a9*bos(f,0,2)*bos(f,0,1)
2
+a10*bos(f,0,1)*bos(f,0,0)
+a11*bos(g,3,3)
+a12*bos(g,3,1)*bos(f,0,0)
+a13*bos(g,3,0)*bos(f,3,0)
+a14*bos(g,3,0)*bos(f,0,1)
+a15*bos(g,3,0)*bos(g,0,0)
+a16*bos(g,0,4)
+a17*bos(g,0,2)*bos(f,0,0)
+a18*bos(g,0,1)*bos(f,3,0)
+a19*bos(g,0,1)*bos(f,0,1)
+a20*bos(g,0,1)*bos(g,0,0)
+a21*bos(g,0,0)*bos(f,3,1)
+a22*bos(g,0,0)*bos(f,0,2)
2
+a23*bos(g,0,0)*bos(f,0,0)
+a24*fer(f,2,2)*fer(f,2,0)
+a25*fer(f,2,2)*fer(f,1,0)
+a26*fer(f,2,1)*fer(f,1,1)
+a27*fer(f,2,0)*fer(f,1,2)
+a28*fer(f,2,0)*fer(f,1,0)*bos(f,0,0)
+a29*fer(f,1,2)*fer(f,1,0)
+a30*fer(g,2,1)*fer(f,2,0)
+a31*fer(g,2,1)*fer(f,1,0)
+a32*fer(g,2,0)*fer(f,2,1)
+a33*fer(g,2,0)*fer(f,1,1)
+a34*fer(g,2,0)*fer(g,1,0)
+a35*fer(g,1,1)*fer(f,2,0)
+a36*fer(g,1,1)*fer(f,1,0)
+a37*fer(g,1,0)*fer(f,2,1)
+a38*fer(g,1,0)*fer(f,1,1)
w_comb({{f,2,f},{g,3,f}},4,s,f);
s1*fer(f,3,1)
+s2*fer(f,0,2)
+s3*fer(g,3,0)
+s4*fer(g,0,1)
% and now compute the last example but withouth the (susy)divergence
%terms;
fcomb({{f,2,b},{g,3,b}},5,c,b);
c(1)*bos(f,3,0)*bos(f,0,0)
+c(2)*bos(f,0,1)*bos(f,0,0)
+c(3)*bos(g,0,0)*bos(f,0,0)
fcomb({{f,1,f}},4,r,f);
2
r(1)*fer(f,0,0)*bos(f,2,0)
+r(2)*fer(f,0,0)*bos(f,2,0)*bos(f,1,0)
2
+r(3)*fer(f,0,0)*bos(f,1,0)
% 16.) The element of pseudo - susy -differential algebra;
pse_ele(2,{{f,2,b}},c);
*** c already defined as operator
c(2)*bos(f,0,0)
2
+c(0)*d(1)
+c(1)*d(1)*der(1)*der(2)
pse_ele(3,{{f,2,b}},c);
*** c already defined as operator
c(2)*bos(f,3,0)
+c(3)*bos(f,0,1)
+c(4)*bos(f,0,0)*d(1)
+c(5)*bos(f,0,0)*der(1)*der(2)
3
+c(0)*d(1)
2
+c(1)*d(1) *der(1)*der(2)
+c(6)*fer(f,2,0)*der(2)
+c(7)*fer(f,2,0)*der(1)
+c(8)*fer(f,1,0)*der(2)
+c(9)*fer(f,1,0)*der(1)
pse_ele(4,{{f,2,b}},c);
*** c already defined as operator
c(2)*bos(f,3,1)
+bos(f,3,0)*(d(1)*c(3)
+der(1)*der(2)*c(4))
+c(5)*bos(f,0,2)
+bos(f,0,1)*(d(1)*c(6)
+der(1)*der(2)*c(7))
2
+c(8)*bos(f,0,0)
2
+bos(f,0,0)*(d(1) *c(9)
+d(1)*der(1)*der(2)*c(10))
+fer(f,2,1)*(der(2)*c(11)
+der(1)*c(12))
+fer(f,2,0)*(d(1)*der(2)*c(13)
+d(1)*der(1)*c(14))
+fer(f,1,1)*(der(2)*c(15)
+der(1)*c(16))
+fer(f,1,0)*(d(1)*der(2)*c(17)
+d(1)*der(1)*c(18))
4
+d(1) *c(0)
3
+d(1) *der(1)*der(2)*c(1)
pse_ele(3,{{f,1,b},{g,2,b}},r);
*** r already defined as operator
r(2)*bos(f,3,1)
+r(3)*bos(f,3,0)*bos(f,0,0)
+bos(f,3,0)*(d(1)*r(4)
+der(1)*der(2)*r(5))
+r(6)*bos(f,0,2)
+r(7)*bos(f,0,1)*bos(f,0,0)
+bos(f,0,1)*(d(1)*r(8)
+der(1)*der(2)*r(9))
3
+r(10)*bos(f,0,0)
2
+bos(f,0,0) *(d(1)*r(11)
+der(1)*der(2)*r(12))
2
+bos(f,0,0)*(d(1) *r(13)
+d(1)*der(1)*der(2)*r(14))
+r(15)*bos(g,3,0)
+r(16)*bos(g,0,1)
+r(17)*bos(g,0,0)*bos(f,0,0)
+bos(g,0,0)*(d(1)*r(18)
+der(1)*der(2)*r(19))
+fer(f,2,1)*(der(2)*r(20)
+der(1)*r(21))
+fer(f,2,0)*bos(f,0,0)*(der(2)*r(22)
+der(1)*r(23))
+r(26)*fer(f,2,0)*fer(f,1,0)
+fer(f,2,0)*(d(1)*der(2)*r(24)
+d(1)*der(1)*r(25))
+fer(f,1,1)*(der(2)*r(27)
+der(1)*r(28))
+fer(f,1,0)*bos(f,0,0)*(der(2)*r(29)
+der(1)*r(30))
+fer(f,1,0)*(d(1)*der(2)*r(31)
+d(1)*der(1)*r(32))
+fer(g,2,0)*(der(2)*r(33)
+der(1)*r(34))
+fer(g,1,0)*(der(2)*r(35)
+der(1)*r(36))
3
+d(1) *r(0)
2
+d(1) *der(1)*der(2)*r(1)
% The components of the elements of pseudo - susy - differential algebra;
xxx:=pse_ele(2,{{f,1,b},{g,2,b}},r);
*** r already defined as operator
xxx := r(2)*bos(f,3,0)
+r(3)*bos(f,0,1)
2
+r(4)*bos(f,0,0)
+r(5)*bos(f,0,0)*d(1)
+r(6)*bos(f,0,0)*der(1)*der(2)
+r(7)*bos(g,0,0)
2
+r(0)*d(1)
+r(1)*d(1)*der(1)*der(2)
+r(8)*fer(f,2,0)*der(2)
+r(9)*fer(f,2,0)*der(1)
+r(10)*fer(f,1,0)*der(2)
+r(11)*fer(f,1,0)*der(1)
for k:=0:3 do write s_part(xxx,k);
r(2)*bos(f,3,0)
+r(3)*bos(f,0,1)
2
+r(4)*bos(f,0,0)
+r(5)*bos(f,0,0)*d(1)
+r(7)*bos(g,0,0)
2
+r(0)*d(1)
r(9)*fer(f,2,0)
+r(11)*fer(f,1,0)
r(8)*fer(f,2,0)
+r(10)*fer(f,1,0)
r(6)*bos(f,0,0)
+r(1)*d(1)
for k:=0:2 do write d_part(xxx,k);
r(2)*bos(f,3,0)
+r(3)*bos(f,0,1)
2
+r(4)*bos(f,0,0)
+r(6)*bos(f,0,0)*der(1)*der(2)
+r(7)*bos(g,0,0)
+r(8)*fer(f,2,0)*der(2)
+r(9)*fer(f,2,0)*der(1)
+r(10)*fer(f,1,0)*der(2)
+r(11)*fer(f,1,0)*der(1)
r(5)*bos(f,0,0)
+r(1)*der(1)*der(2)
r(0)
for k:=0:2 do for l:=0:3 do write sd_part(xxx,l,k);
r(2)*bos(f,3,0)
+r(3)*bos(f,0,1)
2
+r(4)*bos(f,0,0)
+r(7)*bos(g,0,0)
r(9)*fer(f,2,0)
+r(11)*fer(f,1,0)
r(8)*fer(f,2,0)
+r(10)*fer(f,1,0)
r(6)*bos(f,0,0)
r(5)*bos(f,0,0)
0
0
r(1)
r(0)
0
0
0
clear xxx;
% 17.) Projection onto invariant subspace;
xxx:=
w_comb({{f,1,b}},2,a,b)*d(1)+
w_comb({{f,1,b}},3,b,b)*der(1)*der(2)+
w_comb({{f,1,b}},5/2,c,b)*der(1)+
w_comb({{f,1,b}},3,ee,b)*d(1)^2+
w_comb({{f,1,b}},7/2,fe,b)*d(1)*der(2)+
w_comb({{f,1,b}},3,g,b)*der(1)*der(2)*d(1);
2
xxx := bos(f,3,1)*(d(1) *ee1
+d(1)*der(1)*der(2)*g1
+der(1)*der(2)*b1)
2
+bos(f,3,0)*bos(f,0,0)*(d(1) *ee2
+d(1)*der(1)*der(2)*g2
+der(1)*der(2)*b2)
+a1*bos(f,3,0)*d(1)
2
+bos(f,0,2)*(d(1) *ee3
+d(1)*der(1)*der(2)*g3
+der(1)*der(2)*b3)
2
+bos(f,0,1)*bos(f,0,0)*(d(1) *ee4
+d(1)*der(1)*der(2)*g4
+der(1)*der(2)*b4)
+a2*bos(f,0,1)*d(1)
3 2
+bos(f,0,0) *(d(1) *ee5
+d(1)*der(1)*der(2)*g5
+der(1)*der(2)*b5)
2
+a3*bos(f,0,0) *d(1)
2
+fer(f,2,0)*fer(f,1,0)*(d(1) *ee6
+d(1)*der(1)*der(2)*g6
+der(1)*der(2)*b6)
for k:=0:2 do write rzut(xxx,k);
2
bos(f,3,1)*(d(1) *ee1
+d(1)*der(1)*der(2)*g1
+der(1)*der(2)*b1)
2
+bos(f,3,0)*bos(f,0,0)*(d(1) *ee2
+d(1)*der(1)*der(2)*g2
+der(1)*der(2)*b2)
+a1*bos(f,3,0)*d(1)
2
+bos(f,0,2)*(d(1) *ee3
+d(1)*der(1)*der(2)*g3
+der(1)*der(2)*b3)
2
+bos(f,0,1)*bos(f,0,0)*(d(1) *ee4
+d(1)*der(1)*der(2)*g4
+der(1)*der(2)*b4)
+a2*bos(f,0,1)*d(1)
3 2
+bos(f,0,0) *(d(1) *ee5
+d(1)*der(1)*der(2)*g5
+der(1)*der(2)*b5)
2
+a3*bos(f,0,0) *d(1)
2
+fer(f,2,0)*fer(f,1,0)*(d(1) *ee6
+d(1)*der(1)*der(2)*g6
+der(1)*der(2)*b6)
2
bos(f,3,1)*(d(1) *ee1
+d(1)*der(1)*der(2)*g1
+der(1)*der(2)*b1)
2
+bos(f,3,0)*bos(f,0,0)*(d(1) *ee2
+d(1)*der(1)*der(2)*g2
+der(1)*der(2)*b2)
+a1*bos(f,3,0)*d(1)
2
+bos(f,0,2)*(d(1) *ee3
+d(1)*der(1)*der(2)*g3
+der(1)*der(2)*b3)
2
+bos(f,0,1)*bos(f,0,0)*(d(1) *ee4
+d(1)*der(1)*der(2)*g4
+der(1)*der(2)*b4)
+a2*bos(f,0,1)*d(1)
3 2
+bos(f,0,0) *(d(1) *ee5
+d(1)*der(1)*der(2)*g5
+der(1)*der(2)*b5)
2
+a3*bos(f,0,0) *d(1)
2
+fer(f,2,0)*fer(f,1,0)*(d(1) *ee6
+d(1)*der(1)*der(2)*g6
+der(1)*der(2)*b6)
2
bos(f,3,1)*(d(1) *ee1
+d(1)*der(1)*der(2)*g1
+der(1)*der(2)*b1)
2
+bos(f,3,0)*bos(f,0,0)*(d(1) *ee2
+d(1)*der(1)*der(2)*g2
+der(1)*der(2)*b2)
2
+bos(f,0,2)*(d(1) *ee3
+d(1)*der(1)*der(2)*g3
+der(1)*der(2)*b3)
2
+bos(f,0,1)*bos(f,0,0)*(d(1) *ee4
+d(1)*der(1)*der(2)*g4
+der(1)*der(2)*b4)
3 2
+bos(f,0,0) *(d(1) *ee5
+d(1)*der(1)*der(2)*g5
+der(1)*der(2)*b5)
2
+fer(f,2,0)*fer(f,1,0)*(d(1) *ee6
+d(1)*der(1)*der(2)*g6
+der(1)*der(2)*b6)
clear xxx;
% 18.) Test for the adjoint operators;
cp(der(1));
*** d not found
*** der not found
*** del not found
-der(1)
cp(der(1)*der(2));
d(1)
+der(1)*der(2)
clearrules trad;
let chiral1;
cp(der(3));
*** d not found
*** der not found
*** del not found
der(3)
cp(der(1)*d(1));
d(1)*der(1)
clearrules chiral1;
let trad;
cp(d(1));
*** d not found
*** der not found
*** del not found
-d(1)
cp(d(2));
*** d not found
*** der not found
*** del not found
-d(2)
as:=fer(f,1,0)*d(-3)*fer(g,2,0)+fer(h,1,2)*d(-3)*fer(kk,2,1);
as := fer(f,1,0)*d(-3)*fer(g,2,0)
+fer(h,1,2)*d(-3)*fer(kk,2,1)
cp(as);
*** d not found
*** der not found
*** del not found
fer(g,2,0)*d(-3)*fer(f,1,0)
+fer(kk,2,1)*d(-3)*fer(h,1,2)
cp(as*as);
*** d not found
*** der not found
*** del not found
-fer(g,2,0)*(d(-3)*fer(g,2,0)*fer(f,1,0)*d(-3)*fer(f,1,0)
+d(-3)*fer(kk,2,1)*fer(f,1,0)*d(-3)*fer(h,1,2))
+fer(kk,2,1)*(d(-3)*fer(h,1,2)*fer(g,2,0)*d(-3)*fer(f,1,0)
-d(-3)*fer(kk,2,1)*fer(h,1,2)*d(-3)*fer(h,1,2))
as:=fer(f,1,0);
as := fer(f,1,0)
cp(as);
fer(f,1,0)
cp(ws);
fer(f,1,0)
clear as;
as:=bos(f,0,0);
as := bos(f,0,0)
as1:=as*der(1);
as1 := bos(f,0,0)*der(1)
cp(as1);
-bos(f,0,0)*der(1)
-fer(f,1,0)
cp(ws);
*** d not found
*** der not found
*** del not found
bos(f,0,0)*der(1)
cp(as1)+der(1)*as;
0
as2:=as*der(1)*der(2);
as2 := bos(f,0,0)*der(1)*der(2)
cp(as2);
bos(f,3,0)
+bos(f,0,0)*der(1)*der(2)
-fer(f,2,0)*der(1)
+fer(f,1,0)*der(2)
cp(ws);
*** d not found
*** der not found
*** del not found
bos(f,0,0)*der(1)*der(2)
cp(as2) - der(1)*der(2)*as;
0
clear as;
as:=mat((fer(f,1,0)*der(1),bos(g,0,0)*d(-3)*bos(h,0,0)),
(fer(h,2,1),fer(h,1,2)*d(-3)*fer(k,2,3)));
[fer(f,1,0)*der(1) bos(g,0,0)*d(-3)*bos(h,0,0)]
as := [ ]
[ fer(h,2,1) fer(h,1,2)*d(-3)*fer(k,2,3)]
cp(as);
*** fer(h,2,1) not found
mat((bos(f,0,1)
-fer(f,1,0)*der(1),fer(h,2,1)),
(
-bos(h,0,0)*d(-3)*bos(g,0,0),fer(k,2,3)*d(-3)*fer(h,1,2)))
clear as;
% 19.) Analog of coeff
xxx:=pse_ele(2,{{f,1,b}},a);
xxx := a(2)*bos(f,3,0)
+a(3)*bos(f,0,1)
2
+a(4)*bos(f,0,0)
+a(5)*bos(f,0,0)*d(1)
+a(6)*bos(f,0,0)*der(1)*der(2)
2
+a(0)*d(1)
+a(1)*d(1)*der(1)*der(2)
+a(7)*fer(f,2,0)*der(2)
+a(8)*fer(f,2,0)*der(1)
+a(9)*fer(f,1,0)*der(2)
+a(10)*fer(f,1,0)*der(1)
yyy:=lyst(xxx);
yyy := {a(2)*bos(f,3,0),
a(3)*bos(f,0,1),
2
a(4)*bos(f,0,0) ,
a(5)*bos(f,0,0)*d(1),
a(6)*bos(f,0,0)*der(1)*der(2),
2
a(0)*d(1) ,
a(1)*d(1)*der(1)*der(2),
a(7)*fer(f,2,0)*der(2),
a(8)*fer(f,2,0)*der(1),
a(9)*fer(f,1,0)*der(2),
a(10)*fer(f,1,0)*der(1)}
zzz:=lyst1(xxx);
zzz := {a(2),
a(3),
a(4),
a(5)*d(1),
a(6)*der(1)*der(2),
2
a(0)*d(1) ,
a(1)*d(1)*der(1)*der(2),
a(7)*der(2),
a(8)*der(1),
a(9)*der(2),
a(10)*der(1)}
yyy:=lyst2(xxx);
yyy := {a(2),
a(3),
a(4),
a(5),
a(6),
a(0),
a(1),
a(7),
a(8),
a(9),
a(10)}
clear xxx,yyy,zzz;
% 20.) Simplifications;
% we would like to compute third generalizations of the SUSY KdV
% equation
% example from Z.Popowicz Phys.Lett.A.174 (1993) p.87
lax:=d(1)+d(-3)*der(1)*der(2)*bos(u,0,0);
lax := d(1)
+d(-3)*bos(u,3,0)
+d(-3)*bos(u,0,0)*der(1)*der(2)
-d(-3)*fer(u,2,0)*der(1)
+d(-3)*fer(u,1,0)*der(2)
lb2:=lax^2;
lb2 := bos(u,3,0)
+bos(u,0,0)*der(1)*der(2)
-fer(u,2,0)*der(1)
+fer(u,1,0)*der(2)
2
+d(1)
+d(-3)*bos(u,3,0)*d(1)
+d(-3)*bos(u,3,0)*d(-3)*bos(u,3,0)
+d(-3)*bos(u,3,0)*d(-3)*bos(u,0,0)*der(1)*der(2)
-d(-3)*bos(u,3,0)*d(-3)*fer(u,2,0)*der(1)
+d(-3)*bos(u,3,0)*d(-3)*fer(u,1,0)*der(2)
+d(-3)*bos(u,0,0)*d(1)*der(1)*der(2)
-d(-3)*bos(u,0,0)*d(-3)*bos(u,0,2)
-2*d(-3)*bos(u,0,0)*d(-3)*bos(u,0,1)*d(1)
2
-d(-3)*bos(u,0,0)*d(-3)*bos(u,0,0)*d(1)
-d(-3)*fer(u,2,0)*d(1)*der(1)
-d(-3)*fer(u,2,0)*d(-3)*bos(u,0,1)*der(2)
-d(-3)*fer(u,2,0)*d(-3)*bos(u,0,0)*d(1)*der(2)
-d(-3)*fer(u,2,0)*d(-3)*fer(u,2,1)
-d(-3)*fer(u,2,0)*d(-3)*fer(u,2,0)*d(1)
+d(-3)*fer(u,1,0)*d(1)*der(2)
-d(-3)*fer(u,1,0)*d(-3)*bos(u,0,1)*der(1)
-d(-3)*fer(u,1,0)*d(-3)*bos(u,0,0)*d(1)*der(1)
-d(-3)*fer(u,1,0)*d(-3)*fer(u,1,1)
-d(-3)*fer(u,1,0)*d(-3)*fer(u,1,0)*d(1)
la2:=chan(lb2);
la2 := 2*bos(u,3,0)
2
-bos(u,0,0)
+2*bos(u,0,0)*der(1)*der(2)
-2*fer(u,2,0)*der(1)
+2*fer(u,1,0)*der(2)
2
+d(1)
-d(-3)*bos(u,3,1)
+d(-3)*bos(u,3,0)*d(-3)*bos(u,3,0)
+d(-3)*bos(u,3,0)*d(-3)*bos(u,0,0)*der(1)*der(2)
-d(-3)*bos(u,3,0)*d(-3)*fer(u,2,0)*der(1)
+d(-3)*bos(u,3,0)*d(-3)*fer(u,1,0)*der(2)
+d(-3)*bos(u,0,1)*bos(u,0,0)
-d(-3)*bos(u,0,1)*der(1)*der(2)
+d(-3)*fer(u,2,1)*der(1)
-d(-3)*fer(u,2,0)*bos(u,0,0)*der(2)
-d(-3)*fer(u,1,1)*der(2)
-d(-3)*fer(u,1,0)*bos(u,0,0)*der(1)
lb3:=lax*la2;
lb3 := bos(u,3,1)
+bos(u,3,0)*(2*d(1)
+d(-3)*bos(u,3,0)
+d(-3)*bos(u,0,0)*der(1)*der(2)
-d(-3)*fer(u,2,0)*der(1)
+d(-3)*fer(u,1,0)*der(2))
-bos(u,0,1)*bos(u,0,0)
+bos(u,0,1)*der(1)*der(2)
2
-bos(u,0,0) *d(1)
+2*bos(u,0,0)*d(1)*der(1)*der(2)
-fer(u,2,1)*der(1)
-fer(u,2,0)*bos(u,0,0)*der(2)
-2*fer(u,2,0)*d(1)*der(1)
+fer(u,1,1)*der(2)
-fer(u,1,0)*bos(u,0,0)*der(1)
+2*fer(u,1,0)*d(1)*der(2)
3
+d(1)
2
+2*d(-3)*bos(u,3,0)
2
-3*d(-3)*bos(u,3,0)*bos(u,0,0)
+2*d(-3)*bos(u,3,0)*bos(u,0,0)*der(1)*der(2)
2
+d(-3)*bos(u,3,0)*d(1)
-d(-3)*bos(u,3,0)*d(-3)*bos(u,3,1)
+d(-3)*bos(u,3,0)*d(-3)*bos(u,3,0)*d(-3)*bos(u,3,0)
+d(-3)*bos(u,3,0)*d(-3)*bos(u,3,0)*d(-3)*bos(u,0,0)*der(1)*der(2)
-d(-3)*bos(u,3,0)*d(-3)*bos(u,3,0)*d(-3)*fer(u,2,0)*der(1)
+d(-3)*bos(u,3,0)*d(-3)*bos(u,3,0)*d(-3)*fer(u,1,0)*der(2)
+d(-3)*bos(u,3,0)*d(-3)*bos(u,0,1)*bos(u,0,0)
-d(-3)*bos(u,3,0)*d(-3)*bos(u,0,1)*der(1)*der(2)
+d(-3)*bos(u,3,0)*d(-3)*fer(u,2,1)*der(1)
-d(-3)*bos(u,3,0)*d(-3)*fer(u,2,0)*bos(u,0,0)*der(2)
-d(-3)*bos(u,3,0)*d(-3)*fer(u,1,1)*der(2)
-d(-3)*bos(u,3,0)*d(-3)*fer(u,1,0)*bos(u,0,0)*der(1)
-2*d(-3)*bos(u,0,2)*bos(u,0,0)
-4*d(-3)*bos(u,0,1)*bos(u,0,0)*d(1)
3
-d(-3)*bos(u,0,0) *der(1)*der(2)
2 2
-2*d(-3)*bos(u,0,0) *d(1)
2
+d(-3)*bos(u,0,0)*d(1) *der(1)*der(2)
+d(-3)*bos(u,0,0)*d(-3)*bos(u,3,1)*bos(u,0,0)
+d(-3)*bos(u,0,0)*d(-3)*bos(u,3,0)*bos(u,0,1)
+2*d(-3)*bos(u,0,0)*d(-3)*bos(u,3,0)*bos(u,0,0)*d(1)
-d(-3)*bos(u,0,0)*d(-3)*bos(u,3,0)*d(-3)*bos(u,0,2)
-2*d(-3)*bos(u,0,0)*d(-3)*bos(u,3,0)*d(-3)*bos(u,0,1)*d(1)
2
-d(-3)*bos(u,0,0)*d(-3)*bos(u,3,0)*d(-3)*bos(u,0,0)*d(1)
+d(-3)*bos(u,0,0)*d(-3)*bos(u,0,3)
+2*d(-3)*bos(u,0,0)*d(-3)*bos(u,0,2)*d(1)
-d(-3)*bos(u,0,0)*d(-3)*bos(u,0,2)*d(-3)*bos(u,3,0)
-d(-3)*bos(u,0,0)*d(-3)*bos(u,0,2)*d(-3)*bos(u,0,0)*der(1)*der(2)
+d(-3)*bos(u,0,0)*d(-3)*bos(u,0,2)*d(-3)*fer(u,2,0)*der(1)
-d(-3)*bos(u,0,0)*d(-3)*bos(u,0,2)*d(-3)*fer(u,1,0)*der(2)
-d(-3)*bos(u,0,0)*d(-3)*bos(u,0,1)*bos(u,0,0)*der(1)*der(2)
2
+d(-3)*bos(u,0,0)*d(-3)*bos(u,0,1)*d(1)
-d(-3)*bos(u,0,0)*d(-3)*fer(u,2,1)*fer(u,1,0)
-d(-3)*bos(u,0,0)*d(-3)*fer(u,2,1)*d(-3)*bos(u,0,1)*der(1)
-d(-3)*bos(u,0,0)*d(-3)*fer(u,2,1)*d(-3)*bos(u,0,0)*d(1)*der(1)
-d(-3)*bos(u,0,0)*d(-3)*fer(u,2,1)*d(-3)*fer(u,1,1)
-d(-3)*bos(u,0,0)*d(-3)*fer(u,2,1)*d(-3)*fer(u,1,0)*d(1)
-d(-3)*bos(u,0,0)*d(-3)*fer(u,2,0)*bos(u,0,0)*d(1)*der(1)
-d(-3)*bos(u,0,0)*d(-3)*fer(u,2,0)*fer(u,1,1)
-2*d(-3)*bos(u,0,0)*d(-3)*fer(u,2,0)*fer(u,1,0)*d(1)
+d(-3)*bos(u,0,0)*d(-3)*fer(u,1,1)*d(-3)*bos(u,0,1)*der(2)
+d(-3)*bos(u,0,0)*d(-3)*fer(u,1,1)*d(-3)*bos(u,0,0)*d(1)*der(2)
+d(-3)*bos(u,0,0)*d(-3)*fer(u,1,1)*d(-3)*fer(u,2,1)
+d(-3)*bos(u,0,0)*d(-3)*fer(u,1,1)*d(-3)*fer(u,2,0)*d(1)
+d(-3)*bos(u,0,0)*d(-3)*fer(u,1,0)*bos(u,0,0)*d(1)*der(2)
+2*d(-3)*fer(u,2,1)*fer(u,2,0)
-2*d(-3)*fer(u,2,0)*bos(u,3,0)*der(1)
-2*d(-3)*fer(u,2,0)*bos(u,0,1)*der(2)
2
+3*d(-3)*fer(u,2,0)*bos(u,0,0) *der(1)
-2*d(-3)*fer(u,2,0)*bos(u,0,0)*d(1)*der(2)
+6*d(-3)*fer(u,2,0)*fer(u,1,0)*bos(u,0,0)
2
-d(-3)*fer(u,2,0)*d(1) *der(1)
+d(-3)*fer(u,2,0)*d(-3)*bos(u,3,0)*bos(u,0,0)*der(2)
-d(-3)*fer(u,2,0)*d(-3)*bos(u,3,0)*d(-3)*bos(u,0,1)*der(2)
-d(-3)*fer(u,2,0)*d(-3)*bos(u,3,0)*d(-3)*bos(u,0,0)*d(1)*der(2)
-d(-3)*fer(u,2,0)*d(-3)*bos(u,3,0)*d(-3)*fer(u,2,1)
-d(-3)*fer(u,2,0)*d(-3)*bos(u,3,0)*d(-3)*fer(u,2,0)*d(1)
+d(-3)*fer(u,2,0)*d(-3)*bos(u,0,2)*der(2)
+d(-3)*fer(u,2,0)*d(-3)*bos(u,0,1)*d(1)*der(2)
+d(-3)*fer(u,2,0)*d(-3)*fer(u,2,2)
+d(-3)*fer(u,2,0)*d(-3)*fer(u,2,1)*d(1)
-d(-3)*fer(u,2,0)*d(-3)*fer(u,2,1)*d(-3)*bos(u,3,0)
-d(-3)*fer(u,2,0)*d(-3)*fer(u,2,1)*d(-3)*bos(u,0,0)*der(1)*der(2)
+d(-3)*fer(u,2,0)*d(-3)*fer(u,2,1)*d(-3)*fer(u,2,0)*der(1)
-d(-3)*fer(u,2,0)*d(-3)*fer(u,2,1)*d(-3)*fer(u,1,0)*der(2)
-d(-3)*fer(u,2,0)*d(-3)*fer(u,2,0)*bos(u,0,0)*der(1)*der(2)
-d(-3)*fer(u,2,0)*d(-3)*fer(u,2,0)*fer(u,1,0)*der(2)
-d(-3)*fer(u,2,0)*d(-3)*fer(u,1,1)*bos(u,0,0)
-d(-3)*fer(u,2,0)*d(-3)*fer(u,1,0)*bos(u,0,1)
-d(-3)*fer(u,2,0)*d(-3)*fer(u,1,0)*bos(u,0,0)*d(1)
+2*d(-3)*fer(u,1,1)*fer(u,1,0)
+2*d(-3)*fer(u,1,0)*bos(u,3,0)*der(2)
-2*d(-3)*fer(u,1,0)*bos(u,0,1)*der(1)
2
-3*d(-3)*fer(u,1,0)*bos(u,0,0) *der(2)
-2*d(-3)*fer(u,1,0)*bos(u,0,0)*d(1)*der(1)
2
+d(-3)*fer(u,1,0)*d(1) *der(2)
+d(-3)*fer(u,1,0)*d(-3)*bos(u,3,0)*bos(u,0,0)*der(1)
-d(-3)*fer(u,1,0)*d(-3)*bos(u,3,0)*d(-3)*bos(u,0,1)*der(1)
-d(-3)*fer(u,1,0)*d(-3)*bos(u,3,0)*d(-3)*bos(u,0,0)*d(1)*der(1)
-d(-3)*fer(u,1,0)*d(-3)*bos(u,3,0)*d(-3)*fer(u,1,1)
-d(-3)*fer(u,1,0)*d(-3)*bos(u,3,0)*d(-3)*fer(u,1,0)*d(1)
+d(-3)*fer(u,1,0)*d(-3)*bos(u,0,2)*der(1)
+d(-3)*fer(u,1,0)*d(-3)*bos(u,0,1)*d(1)*der(1)
+d(-3)*fer(u,1,0)*d(-3)*fer(u,2,1)*bos(u,0,0)
+d(-3)*fer(u,1,0)*d(-3)*fer(u,2,0)*bos(u,0,1)
+d(-3)*fer(u,1,0)*d(-3)*fer(u,2,0)*bos(u,0,0)*d(1)
-d(-3)*fer(u,1,0)*d(-3)*fer(u,2,0)*fer(u,1,0)*der(1)
+d(-3)*fer(u,1,0)*d(-3)*fer(u,1,2)
+d(-3)*fer(u,1,0)*d(-3)*fer(u,1,1)*d(1)
-d(-3)*fer(u,1,0)*d(-3)*fer(u,1,1)*d(-3)*bos(u,3,0)
-d(-3)*fer(u,1,0)*d(-3)*fer(u,1,1)*d(-3)*bos(u,0,0)*der(1)*der(2)
+d(-3)*fer(u,1,0)*d(-3)*fer(u,1,1)*d(-3)*fer(u,2,0)*der(1)
-d(-3)*fer(u,1,0)*d(-3)*fer(u,1,1)*d(-3)*fer(u,1,0)*der(2)
-d(-3)*fer(u,1,0)*d(-3)*fer(u,1,0)*bos(u,0,0)*der(1)*der(2)
la3:=chan(lb3);
la3 := bos(u,3,0)*(3*d(1)
+d(-3)*bos(u,3,0)
+d(-3)*bos(u,0,0)*der(1)*der(2)
-d(-3)*fer(u,2,0)*der(1)
+d(-3)*fer(u,1,0)*der(2))
2
-3*bos(u,0,0) *d(1)
+3*bos(u,0,0)*d(1)*der(1)*der(2)
-3*fer(u,2,0)*bos(u,0,0)*der(2)
-3*fer(u,2,0)*d(1)*der(1)
-3*fer(u,1,0)*bos(u,0,0)*der(1)
+3*fer(u,1,0)*d(1)*der(2)
3
+d(1)
+d(-3)*bos(u,3,2)
2
+2*d(-3)*bos(u,3,0)
2
-2*d(-3)*bos(u,3,0)*bos(u,0,0)
+2*d(-3)*bos(u,3,0)*bos(u,0,0)*der(1)*der(2)
-d(-3)*bos(u,3,0)*d(-3)*bos(u,3,1)
+d(-3)*bos(u,3,0)*d(-3)*bos(u,3,0)*d(-3)*bos(u,3,0)
+d(-3)*bos(u,3,0)*d(-3)*bos(u,3,0)*d(-3)*bos(u,0,0)*der(1)*der(2)
-d(-3)*bos(u,3,0)*d(-3)*bos(u,3,0)*d(-3)*fer(u,2,0)*der(1)
+d(-3)*bos(u,3,0)*d(-3)*bos(u,3,0)*d(-3)*fer(u,1,0)*der(2)
+d(-3)*bos(u,3,0)*d(-3)*bos(u,0,1)*bos(u,0,0)
-d(-3)*bos(u,3,0)*d(-3)*bos(u,0,1)*der(1)*der(2)
+d(-3)*bos(u,3,0)*d(-3)*fer(u,2,1)*der(1)
-d(-3)*bos(u,3,0)*d(-3)*fer(u,2,0)*bos(u,0,0)*der(2)
-d(-3)*bos(u,3,0)*d(-3)*fer(u,1,1)*der(2)
-d(-3)*bos(u,3,0)*d(-3)*fer(u,1,0)*bos(u,0,0)*der(1)
-2*d(-3)*bos(u,0,2)*bos(u,0,0)
+d(-3)*bos(u,0,2)*der(1)*der(2)
2
-d(-3)*bos(u,0,1)
3
-d(-3)*bos(u,0,0) *der(1)*der(2)
-d(-3)*bos(u,0,0)*d(-3)*bos(u,3,0)*bos(u,0,1)
-d(-3)*bos(u,0,0)*d(-3)*bos(u,0,2)*d(-3)*bos(u,3,0)
-d(-3)*bos(u,0,0)*d(-3)*bos(u,0,2)*d(-3)*bos(u,0,0)*der(1)*der(2)
+d(-3)*bos(u,0,0)*d(-3)*bos(u,0,2)*d(-3)*fer(u,2,0)*der(1)
-d(-3)*bos(u,0,0)*d(-3)*bos(u,0,2)*d(-3)*fer(u,1,0)*der(2)
-d(-3)*bos(u,0,0)*d(-3)*bos(u,0,1)*bos(u,0,0)*der(1)*der(2)
+d(-3)*bos(u,0,0)*d(-3)*fer(u,2,0)*bos(u,0,1)*der(1)
-d(-3)*bos(u,0,0)*d(-3)*fer(u,1,0)*bos(u,0,1)*der(2)
-d(-3)*fer(u,2,2)*der(1)
+2*d(-3)*fer(u,2,1)*bos(u,0,0)*der(2)
+d(-3)*fer(u,2,1)*fer(u,2,0)
-2*d(-3)*fer(u,2,0)*bos(u,3,0)*der(1)
+d(-3)*fer(u,2,0)*bos(u,0,1)*der(2)
2
+2*d(-3)*fer(u,2,0)*bos(u,0,0) *der(1)
+2*d(-3)*fer(u,2,0)*fer(u,1,0)*bos(u,0,0)
-d(-3)*fer(u,2,0)*d(-3)*fer(u,2,1)*d(-3)*bos(u,3,0)
-d(-3)*fer(u,2,0)*d(-3)*fer(u,2,1)*d(-3)*bos(u,0,0)*der(1)*der(2)
+d(-3)*fer(u,2,0)*d(-3)*fer(u,2,1)*d(-3)*fer(u,2,0)*der(1)
-d(-3)*fer(u,2,0)*d(-3)*fer(u,2,1)*d(-3)*fer(u,1,0)*der(2)
-d(-3)*fer(u,2,0)*d(-3)*fer(u,2,0)*bos(u,3,0)
-d(-3)*fer(u,2,0)*d(-3)*fer(u,2,0)*bos(u,0,0)*der(1)*der(2)
-d(-3)*fer(u,2,0)*d(-3)*fer(u,2,0)*fer(u,1,0)*der(2)
+d(-3)*fer(u,1,2)*der(2)
+2*d(-3)*fer(u,1,1)*bos(u,0,0)*der(1)
+d(-3)*fer(u,1,1)*fer(u,1,0)
+2*d(-3)*fer(u,1,0)*bos(u,3,0)*der(2)
+d(-3)*fer(u,1,0)*bos(u,0,1)*der(1)
2
-2*d(-3)*fer(u,1,0)*bos(u,0,0) *der(2)
-d(-3)*fer(u,1,0)*d(-3)*fer(u,2,0)*fer(u,1,0)*der(1)
-d(-3)*fer(u,1,0)*d(-3)*fer(u,1,1)*d(-3)*bos(u,3,0)
-d(-3)*fer(u,1,0)*d(-3)*fer(u,1,1)*d(-3)*bos(u,0,0)*der(1)*der(2)
+d(-3)*fer(u,1,0)*d(-3)*fer(u,1,1)*d(-3)*fer(u,2,0)*der(1)
-d(-3)*fer(u,1,0)*d(-3)*fer(u,1,1)*d(-3)*fer(u,1,0)*der(2)
-d(-3)*fer(u,1,0)*d(-3)*fer(u,1,0)*bos(u,3,0)
-d(-3)*fer(u,1,0)*d(-3)*fer(u,1,0)*bos(u,0,0)*der(1)*der(2)
lax3:=rzut(la3,1);
lax3 := 3*bos(u,3,0)*d(1)
2
-3*bos(u,0,0) *d(1)
+3*bos(u,0,0)*d(1)*der(1)*der(2)
-3*fer(u,2,0)*bos(u,0,0)*der(2)
-3*fer(u,2,0)*d(1)*der(1)
-3*fer(u,1,0)*bos(u,0,0)*der(1)
+3*fer(u,1,0)*d(1)*der(2)
3
+d(1)
comm:=lax*lax3 - lax3*lax;
comm :=
-bos(u,3,2)
+bos(u,3,1)*d(1)
2
-3*bos(u,3,0)
2
+3*bos(u,3,0)*bos(u,0,0)
-3*bos(u,3,0)*bos(u,0,0)*der(1)*der(2)
2
-bos(u,3,0)*d(1)
+3*bos(u,0,2)*bos(u,0,0)
-bos(u,0,2)*der(1)*der(2)
+bos(u,0,1)*d(1)*der(1)*der(2)
3
+3*bos(u,0,0) *der(1)*der(2)
2 2
+3*bos(u,0,0) *d(1)
2
-bos(u,0,0)*d(1) *der(1)*der(2)
+fer(u,2,2)*der(1)
-3*fer(u,2,1)*bos(u,0,0)*der(2)
-3*fer(u,2,1)*fer(u,2,0)
-fer(u,2,1)*d(1)*der(1)
+3*fer(u,2,0)*bos(u,3,0)*der(1)
2
-3*fer(u,2,0)*bos(u,0,0) *der(1)
+3*fer(u,2,0)*bos(u,0,0)*(d(1)*der(2)
-d(-3)*bos(u,0,1)*der(1)
-d(-3)*bos(u,0,0)*d(1)*der(1)
-d(-3)*fer(u,1,1)
-d(-3)*fer(u,1,0)*d(1))
2
+fer(u,2,0)*d(1) *der(1)
-fer(u,1,2)*der(2)
-3*fer(u,1,1)*bos(u,0,0)*der(1)
-3*fer(u,1,1)*fer(u,1,0)
+fer(u,1,1)*d(1)*der(2)
-3*fer(u,1,0)*bos(u,3,0)*der(2)
2
+3*fer(u,1,0)*bos(u,0,0) *der(2)
+3*fer(u,1,0)*bos(u,0,0)*(d(1)*der(1)
+d(-3)*bos(u,0,1)*der(2)
+d(-3)*bos(u,0,0)*d(1)*der(2)
+d(-3)*fer(u,2,1)
+d(-3)*fer(u,2,0)*d(1))
2
-fer(u,1,0)*d(1) *der(2)
2
+3*d(-3)*bos(u,3,0) *d(1)
2
-3*d(-3)*bos(u,3,0)*bos(u,0,0) *d(1)
+3*d(-3)*bos(u,3,0)*bos(u,0,0)*d(1)*der(1)*der(2)
3
+d(-3)*bos(u,3,0)*d(1)
-3*d(-3)*bos(u,0,2)*bos(u,0,0)*d(1)
2
-6*d(-3)*bos(u,0,1)*bos(u,0,0) *der(1)*der(2)
2
-6*d(-3)*bos(u,0,1)*bos(u,0,0)*d(1)
3
-3*d(-3)*bos(u,0,0) *d(1)*der(1)*der(2)
2 3
-3*d(-3)*bos(u,0,0) *d(1)
3
+d(-3)*bos(u,0,0)*d(1) *der(1)*der(2)
2
+3*d(-3)*fer(u,2,1)*bos(u,0,0) *der(1)
+3*d(-3)*fer(u,2,1)*fer(u,2,0)*d(1)
-3*d(-3)*fer(u,2,0)*bos(u,3,0)*d(1)*der(1)
+6*d(-3)*fer(u,2,0)*bos(u,0,1)*bos(u,0,0)*der(1)
-3*d(-3)*fer(u,2,0)*bos(u,0,1)*d(1)*der(2)
2
+6*d(-3)*fer(u,2,0)*bos(u,0,0) *d(1)*der(1)
2
-3*d(-3)*fer(u,2,0)*bos(u,0,0)*d(1) *der(2)
+6*d(-3)*fer(u,2,0)*fer(u,1,0)*bos(u,0,0)*d(1)
3
-d(-3)*fer(u,2,0)*d(1) *der(1)
2
-3*d(-3)*fer(u,1,1)*bos(u,0,0) *der(2)
+3*d(-3)*fer(u,1,1)*fer(u,1,0)*d(1)
+3*d(-3)*fer(u,1,0)*bos(u,3,0)*d(1)*der(2)
-6*d(-3)*fer(u,1,0)*bos(u,0,1)*bos(u,0,0)*der(2)
-3*d(-3)*fer(u,1,0)*bos(u,0,1)*d(1)*der(1)
2
-6*d(-3)*fer(u,1,0)*bos(u,0,0) *d(1)*der(2)
2
-3*d(-3)*fer(u,1,0)*bos(u,0,0)*d(1) *der(1)
3
+d(-3)*fer(u,1,0)*d(1) *der(2)
com:=chan(comm);
com :=
-d(-3)*bos(u,3,3)
-6*d(-3)*bos(u,3,1)*bos(u,3,0)
2
+3*d(-3)*bos(u,3,1)*bos(u,0,0)
-3*d(-3)*bos(u,3,1)*bos(u,0,0)*der(1)*der(2)
+6*d(-3)*bos(u,3,0)*bos(u,0,1)*bos(u,0,0)
-3*d(-3)*bos(u,3,0)*bos(u,0,1)*der(1)*der(2)
+3*d(-3)*bos(u,0,3)*bos(u,0,0)
-d(-3)*bos(u,0,3)*der(1)*der(2)
+3*d(-3)*bos(u,0,2)*bos(u,0,1)
2
+3*d(-3)*bos(u,0,1)*bos(u,0,0) *der(1)*der(2)
+d(-3)*fer(u,2,3)*der(1)
-3*d(-3)*fer(u,2,2)*bos(u,0,0)*der(2)
-3*d(-3)*fer(u,2,2)*fer(u,2,0)
+3*d(-3)*fer(u,2,1)*bos(u,3,0)*der(1)
-3*d(-3)*fer(u,2,1)*bos(u,0,1)*der(2)
2
-3*d(-3)*fer(u,2,1)*bos(u,0,0) *der(1)
-6*d(-3)*fer(u,2,1)*fer(u,1,0)*bos(u,0,0)
+3*d(-3)*fer(u,2,0)*bos(u,3,1)*der(1)
-6*d(-3)*fer(u,2,0)*bos(u,0,1)*bos(u,0,0)*der(1)
-6*d(-3)*fer(u,2,0)*fer(u,1,1)*bos(u,0,0)
-6*d(-3)*fer(u,2,0)*fer(u,1,0)*bos(u,0,1)
-d(-3)*fer(u,1,3)*der(2)
-3*d(-3)*fer(u,1,2)*bos(u,0,0)*der(1)
-3*d(-3)*fer(u,1,2)*fer(u,1,0)
-3*d(-3)*fer(u,1,1)*bos(u,3,0)*der(2)
-3*d(-3)*fer(u,1,1)*bos(u,0,1)*der(1)
2
+3*d(-3)*fer(u,1,1)*bos(u,0,0) *der(2)
-3*d(-3)*fer(u,1,0)*bos(u,3,1)*der(2)
+6*d(-3)*fer(u,1,0)*bos(u,0,1)*bos(u,0,0)*der(2)
result:=sub(der=del,com);
result :=
-3*del(1)*del(2)*d(-3)*bos(u,3,1)*bos(u,0,0)
-3*del(1)*del(2)*d(-3)*bos(u,3,0)*bos(u,0,1)
-del(1)*del(2)*d(-3)*bos(u,0,3)
2
+3*del(1)*del(2)*d(-3)*bos(u,0,1)*bos(u,0,0)
%the equation is
equ:=sub(del(1)=1,del(2)=1,d(-3)=1,result);
equ :=
-3*bos(u,3,1)*bos(u,0,0)
-3*bos(u,3,0)*bos(u,0,1)
-bos(u,0,3)
2
+3*bos(u,0,1)*bos(u,0,0)
clear lax,lb2,la2,lb3,la3,lax3,comm,com,result;
% we now compute the same but starting from
% different realizations of susy algebra
%
clearrules trad;
let chiral1;
lax:=d(1)+d(-3)*del(3)*bos(u,0,0);
lax := d(1)
+del(3)*d(-3)*bos(u,0,0)
la2:=chan(lax^2);
la2 := bos(u,0,1)*d(-3)*bos(u,0,0)
2
+bos(u,0,0)
2
+d(1)
+2*del(3)*bos(u,0,0)
+del(3)*d(-3)*bos(u,3,0)*d(-3)*bos(u,0,0)
-del(3)*d(-3)*bos(u,0,1)
+2*del(2)*fer(u,1,0)*d(-3)*bos(u,0,0)
+2*del(1)*fer(u,2,0)*d(-3)*bos(u,0,0)
la3:=rzut(chan(lax*la2),0);
la3 := 6*bos(u,0,1)*bos(u,0,0)
2
+3*bos(u,0,0) *d(1)
3
+d(1)
+3*del(3)*bos(u,0,0)*d(1)
+6*del(2)*fer(u,1,0)*bos(u,0,0)
+6*del(1)*fer(u,2,0)*bos(u,0,0)
com:=chan(lax*la3-la3*lax);
com :=
-3*del(3)*d(-3)*bos(u,3,1)*bos(u,0,0)
-3*del(3)*d(-3)*bos(u,3,0)*bos(u,0,1)
-del(3)*d(-3)*bos(u,0,3)
2
-3*del(3)*d(-3)*bos(u,0,1)*bos(u,0,0)
equ_chiral1:=sub(d(-3)=1,del(3)=1,com);
equ_chiral1 :=
-3*bos(u,3,1)*bos(u,0,0)
-3*bos(u,3,0)*bos(u,0,1)
-bos(u,0,3)
2
-3*bos(u,0,1)*bos(u,0,0)
clear lax,lb2,la2,lb3,la3,lax3,lax,comm,com,result;
clearrules chiral1;
let trad;
% 21.) Conservation laws;
% we would like to check the conservations laws for our third
%generalization of susy kdv equation;
%
ham:=fcomb({{u,1,b}},3,a,b);
*** a already defined as operator
ham := a(1)*bos(u,3,0)*bos(u,0,0)
3
+a(2)*bos(u,0,0)
conserv:=dot_ham({{u,equ}},ham);
conserv :=
-a(1)*bos(u,3,3)*bos(u,0,0)
-9*a(1)*bos(u,3,1)*bos(u,3,0)*bos(u,0,0)
3
+3*bos(u,3,1)*bos(u,0,0) *(
-3*a(2)
+a(1))
2
-3*a(1)*bos(u,3,0) *bos(u,0,1)
-a(1)*bos(u,3,0)*bos(u,0,3)
2
+9*bos(u,3,0)*bos(u,0,1)*bos(u,0,0) *(
-a(2)
+a(1))
2
+3*bos(u,0,3)*bos(u,0,0) *(
-a(2)
+a(1))
+3*a(1)*(bos(u,0,2)*bos(u,0,1)*bos(u,0,0))
4
+9*a(2)*(bos(u,0,1)*bos(u,0,0) )
-3*a(1)*fer(u,2,2)*fer(u,2,0)*bos(u,0,0)
2
-6*a(1)*fer(u,2,1)*fer(u,1,0)*bos(u,0,0)
2
-6*a(1)*fer(u,2,0)*fer(u,1,1)*bos(u,0,0)
-6*a(1)*fer(u,2,0)*fer(u,1,0)*bos(u,0,1)*bos(u,0,0)
-3*a(1)*fer(u,1,2)*fer(u,1,0)*bos(u,0,0)
% we check now on susy-divergence behaviour;
%
az:=war(conserv,u);
az := {12*(3*a(2)
+a(1)),
6*(3*a(2)
+a(1)),
12*(
-3*a(2)
-a(1)),
12*(
-3*a(2)
-a(1)),
12*(
-3*a(2)
-a(1))}
solve(az);
Unknowns: {a(2),a(1)}
{{a(2)=(
-arbcomplex(1))/3,a(1)=arbcomplex(1)}}
clear equ,ha,conserv,az;
% 22.) The residue of Lax operator
% we would like to find conservation laws for Lax susy KdV
% equation considered in the previous example
%
lax:=d(1)-d(-3)*del(1)*der(2)*bos(u,0,0);
lax := d(1)
-del(1)*d(-3)*bos(u,0,0)*der(2)
-del(1)*d(-3)*fer(u,2,0)
lb2:=lax^2;
lb2 :=
-bos(u,0,0)*(d(-3)*bos(u,0,1)
+d(-3)*bos(u,0,0)*d(1))
-fer(u,2,0)*(d(-3)*bos(u,0,0)*der(2)
+d(-3)*fer(u,2,0))
2
+d(1)
-del(1)*bos(u,0,0)*der(2)
-del(1)*fer(u,2,0)
+del(1)*d(-3)*bos(u,3,0)*d(-3)*bos(u,0,0)*der(2)
+del(1)*d(-3)*bos(u,3,0)*d(-3)*fer(u,2,0)
-del(1)*d(-3)*bos(u,0,0)*d(1)*der(2)
-del(1)*d(-3)*fer(u,2,0)*d(1)
+del(1)*d(-3)*fer(u,1,0)*d(-3)*bos(u,0,1)
+del(1)*d(-3)*fer(u,1,0)*d(-3)*bos(u,0,0)*d(1)
la2:=chan(lb2);
la2 :=
2
-bos(u,0,0)
-fer(u,2,0)*(d(-3)*bos(u,0,0)*der(2)
+d(-3)*fer(u,2,0))
2
+d(1)
-2*del(1)*bos(u,0,0)*der(2)
-2*del(1)*fer(u,2,0)
+del(1)*d(-3)*bos(u,3,0)*d(-3)*bos(u,0,0)*der(2)
+del(1)*d(-3)*bos(u,3,0)*d(-3)*fer(u,2,0)
+del(1)*d(-3)*bos(u,0,1)*der(2)
+del(1)*d(-3)*fer(u,2,1)
+del(1)*d(-3)*fer(u,1,0)*bos(u,0,0)
lb4:=la2^2;
lb4 :=
2
-2*bos(u,3,0)*bos(u,0,0)
+2*bos(u,3,0)*bos(u,0,0)*(d(-3)*bos(u,0,1)
+d(-3)*bos(u,0,0)*d(1))
-4*bos(u,0,2)*bos(u,0,0)
2
-4*bos(u,0,1)
-12*bos(u,0,1)*bos(u,0,0)*d(1)
+bos(u,0,1)*(
-d(-3)*bos(u,3,0)*bos(u,0,0)
+d(-3)*bos(u,3,0)*d(-3)*bos(u,0,1)
+d(-3)*bos(u,3,0)*d(-3)*bos(u,0,0)*d(1)
+d(-3)*bos(u,0,2)
+d(-3)*bos(u,0,1)*d(1)
+d(-3)*fer(u,2,0)*fer(u,1,0)
-d(-3)*fer(u,1,1)*d(-3)*bos(u,0,0)*der(2)
-d(-3)*fer(u,1,1)*d(-3)*fer(u,2,0)
-d(-3)*fer(u,1,0)*bos(u,0,0)*der(2))
4
+bos(u,0,0)
2 2
-6*bos(u,0,0) *d(1)
-fer(u,2,2)*(d(-3)*bos(u,0,0)*der(2)
+d(-3)*fer(u,2,0))
-4*fer(u,2,1)*bos(u,0,0)*der(2)
-fer(u,2,1)*fer(u,2,0)
+fer(u,2,1)*(d(-3)*bos(u,3,0)*d(-3)*bos(u,0,0)*der(2)
+d(-3)*bos(u,3,0)*d(-3)*fer(u,2,0)
+d(-3)*bos(u,0,1)*der(2)
+d(-3)*fer(u,2,1)
+d(-3)*fer(u,1,0)*bos(u,0,0))
+2*fer(u,2,0)*bos(u,3,0)*(d(-3)*bos(u,0,0)*der(2)
+d(-3)*fer(u,2,0))
-3*fer(u,2,0)*bos(u,0,1)*der(2)
2
+fer(u,2,0)*bos(u,0,0) *(d(-3)*bos(u,0,0)*der(2)
+d(-3)*fer(u,2,0))
-5*fer(u,2,0)*bos(u,0,0)*d(1)*der(2)
+6*fer(u,2,0)*fer(u,1,0)*bos(u,0,0)
+fer(u,2,0)*(2*d(-3)*bos(u,3,0)*bos(u,0,0)*der(2)
-d(-3)*bos(u,3,0)*d(-3)*bos(u,3,0)*d(-3)*bos(u,0,0)*der(2)
-d(-3)*bos(u,3,0)*d(-3)*bos(u,3,0)*d(-3)*fer(u,2,0)
-d(-3)*bos(u,3,0)*d(-3)*bos(u,0,1)*der(2)
-d(-3)*bos(u,3,0)*d(-3)*fer(u,2,1)
-d(-3)*bos(u,3,0)*d(-3)*fer(u,1,0)*bos(u,0,0)
+d(-3)*bos(u,0,1)*bos(u,0,0)*d(-3)*bos(u,0,0)*der(2)
+d(-3)*bos(u,0,1)*bos(u,0,0)*d(-3)*fer(u,2,0)
3
+d(-3)*bos(u,0,0) *der(2)
2
-d(-3)*bos(u,0,0)*d(1) *der(2)
+2*d(-3)*fer(u,2,0)*bos(u,3,0)
2
+3*d(-3)*fer(u,2,0)*bos(u,0,0)
-d(-3)*fer(u,2,0)*bos(u,0,0)*d(-3)*bos(u,0,1)
-d(-3)*fer(u,2,0)*bos(u,0,0)*d(-3)*bos(u,0,0)*d(1)
2
-d(-3)*fer(u,2,0)*d(1)
+2*d(-3)*fer(u,1,0)*bos(u,0,1)
+2*d(-3)*fer(u,1,0)*bos(u,0,0)*d(1)
+d(-3)*fer(u,1,0)*d(-3)*bos(u,3,0)*bos(u,0,0)
-d(-3)*fer(u,1,0)*d(-3)*bos(u,3,0)*d(-3)*bos(u,0,1)
-d(-3)*fer(u,1,0)*d(-3)*bos(u,3,0)*d(-3)*bos(u,0,0)*d(1)
-d(-3)*fer(u,1,0)*d(-3)*bos(u,0,2)
-d(-3)*fer(u,1,0)*d(-3)*bos(u,0,1)*d(1)
-d(-3)*fer(u,1,0)*d(-3)*fer(u,2,0)*fer(u,1,0)
+d(-3)*fer(u,1,0)*d(-3)*fer(u,1,1)*d(-3)*bos(u,0,0)*der(2)
+d(-3)*fer(u,1,0)*d(-3)*fer(u,1,1)*d(-3)*fer(u,2,0)
+d(-3)*fer(u,1,0)*d(-3)*fer(u,1,0)*bos(u,0,0)*der(2))
-2*fer(u,1,1)*bos(u,0,0)*(d(-3)*bos(u,0,0)*der(2)
+d(-3)*fer(u,2,0))
2
-4*fer(u,1,0)*bos(u,0,0) *der(2)
+fer(u,1,0)*bos(u,0,0)*(d(-3)*bos(u,3,0)*d(-3)*bos(u,0,0)*der(2)
+d(-3)*bos(u,3,0)*d(-3)*fer(u,2,0)
+d(-3)*bos(u,0,1)*der(2)
+d(-3)*fer(u,2,1)
+d(-3)*fer(u,1,0)*bos(u,0,0))
4
+d(1)
+del(1)*bos(u,3,1)*d(-3)*bos(u,0,0)*der(2)
+del(1)*bos(u,3,1)*d(-3)*fer(u,2,0)
+5*del(1)*bos(u,3,0)*bos(u,0,0)*der(2)
-2*del(1)*bos(u,3,0)*d(-3)*bos(u,3,0)*d(-3)*bos(u,0,0)*der(2)
-2*del(1)*bos(u,3,0)*d(-3)*bos(u,3,0)*d(-3)*fer(u,2,0)
-2*del(1)*bos(u,3,0)*d(-3)*bos(u,0,1)*der(2)
-2*del(1)*bos(u,3,0)*d(-3)*fer(u,2,1)
-2*del(1)*bos(u,3,0)*d(-3)*fer(u,1,0)*bos(u,0,0)
-del(1)*bos(u,0,2)*der(2)
+2*del(1)*bos(u,0,1)*bos(u,0,0)*d(-3)*bos(u,0,0)*der(2)
+2*del(1)*bos(u,0,1)*bos(u,0,0)*d(-3)*fer(u,2,0)
-3*del(1)*bos(u,0,1)*d(1)*der(2)
3
+4*del(1)*bos(u,0,0) *der(2)
2
-del(1)*bos(u,0,0) *d(-3)*bos(u,3,0)*d(-3)*bos(u,0,0)*der(2)
2
-del(1)*bos(u,0,0) *d(-3)*bos(u,3,0)*d(-3)*fer(u,2,0)
2
-del(1)*bos(u,0,0) *d(-3)*bos(u,0,1)*der(2)
2
-del(1)*bos(u,0,0) *d(-3)*fer(u,2,1)
2
-del(1)*bos(u,0,0) *d(-3)*fer(u,1,0)*bos(u,0,0)
2
-4*del(1)*bos(u,0,0)*d(1) *der(2)
-del(1)*fer(u,2,2)
-3*del(1)*fer(u,2,1)*d(1)
+5*del(1)*fer(u,2,0)*bos(u,3,0)
2
+8*del(1)*fer(u,2,0)*bos(u,0,0)
-2*del(1)*fer(u,2,0)*bos(u,0,0)*d(-3)*bos(u,0,1)
-2*del(1)*fer(u,2,0)*bos(u,0,0)*d(-3)*bos(u,0,0)*d(1)
2
-4*del(1)*fer(u,2,0)*d(1)
+2*del(1)*fer(u,2,0)*d(-3)*bos(u,0,1)*bos(u,0,0)
2
+2*del(1)*fer(u,2,0)*d(-3)*bos(u,0,0) *d(1)
+del(1)*fer(u,2,0)*d(-3)*bos(u,0,0)*d(-3)*bos(u,3,0)*bos(u,0,0)
-del(1)*fer(u,2,0)*d(-3)*bos(u,0,0)*d(-3)*bos(u,3,0)*d(-3)*bos(u,0,1)
-del(1)*fer(u,2,0)*d(-3)*bos(u,0,0)*d(-3)*bos(u,3,0)*d(-3)*bos(u,0,0)
*d(1)
-del(1)*fer(u,2,0)*d(-3)*bos(u,0,0)*d(-3)*bos(u,0,2)
-del(1)*fer(u,2,0)*d(-3)*bos(u,0,0)*d(-3)*bos(u,0,1)*d(1)
-del(1)*fer(u,2,0)*d(-3)*bos(u,0,0)*d(-3)*fer(u,2,0)*fer(u,1,0)
+del(1)*fer(u,2,0)*d(-3)*bos(u,0,0)*d(-3)*fer(u,1,1)*d(-3)*bos(u,0,0)
*der(2)
+del(1)*fer(u,2,0)*d(-3)*bos(u,0,0)*d(-3)*fer(u,1,1)*d(-3)*fer(u,2,0)
+del(1)*fer(u,2,0)*d(-3)*bos(u,0,0)*d(-3)*fer(u,1,0)*bos(u,0,0)*der(2)
+2*del(1)*fer(u,2,0)*d(-3)*fer(u,2,0)*bos(u,0,0)*der(2)
-del(1)*fer(u,2,0)*d(-3)*fer(u,2,0)*d(-3)*bos(u,3,0)*d(-3)*bos(u,0,0)
*der(2)
-del(1)*fer(u,2,0)*d(-3)*fer(u,2,0)*d(-3)*bos(u,3,0)*d(-3)*fer(u,2,0)
-del(1)*fer(u,2,0)*d(-3)*fer(u,2,0)*d(-3)*bos(u,0,1)*der(2)
-del(1)*fer(u,2,0)*d(-3)*fer(u,2,0)*d(-3)*fer(u,2,1)
-del(1)*fer(u,2,0)*d(-3)*fer(u,2,0)*d(-3)*fer(u,1,0)*bos(u,0,0)
+del(1)*fer(u,1,1)*bos(u,0,0)
+5*del(1)*fer(u,1,0)*bos(u,0,1)
+5*del(1)*fer(u,1,0)*bos(u,0,0)*d(1)
+2*del(1)*fer(u,1,0)*d(-3)*bos(u,3,0)*bos(u,0,0)
-2*del(1)*fer(u,1,0)*d(-3)*bos(u,3,0)*d(-3)*bos(u,0,1)
-2*del(1)*fer(u,1,0)*d(-3)*bos(u,3,0)*d(-3)*bos(u,0,0)*d(1)
-2*del(1)*fer(u,1,0)*d(-3)*bos(u,0,2)
-2*del(1)*fer(u,1,0)*d(-3)*bos(u,0,1)*d(1)
-2*del(1)*fer(u,1,0)*d(-3)*fer(u,2,0)*fer(u,1,0)
+2*del(1)*fer(u,1,0)*d(-3)*fer(u,1,1)*d(-3)*bos(u,0,0)*der(2)
+2*del(1)*fer(u,1,0)*d(-3)*fer(u,1,1)*d(-3)*fer(u,2,0)
+2*del(1)*fer(u,1,0)*d(-3)*fer(u,1,0)*bos(u,0,0)*der(2)
-2*del(1)*d(-3)*bos(u,3,1)*bos(u,0,0)*der(2)
+del(1)*d(-3)*bos(u,3,1)*d(-3)*bos(u,3,0)*d(-3)*bos(u,0,0)*der(2)
+del(1)*d(-3)*bos(u,3,1)*d(-3)*bos(u,3,0)*d(-3)*fer(u,2,0)
+del(1)*d(-3)*bos(u,3,1)*d(-3)*bos(u,0,1)*der(2)
+del(1)*d(-3)*bos(u,3,1)*d(-3)*fer(u,2,1)
+del(1)*d(-3)*bos(u,3,1)*d(-3)*fer(u,1,0)*bos(u,0,0)
-2*del(1)*d(-3)*bos(u,3,0)*d(-3)*bos(u,3,0)*bos(u,0,0)*der(2)
+del(1)*d(-3)*bos(u,3,0)*d(-3)*bos(u,3,0)*d(-3)*bos(u,3,0)*d(-3)
*bos(u,0,0)*der(2)
+del(1)*d(-3)*bos(u,3,0)*d(-3)*bos(u,3,0)*d(-3)*bos(u,3,0)*d(-3)
*fer(u,2,0)
+del(1)*d(-3)*bos(u,3,0)*d(-3)*bos(u,3,0)*d(-3)*bos(u,0,1)*der(2)
+del(1)*d(-3)*bos(u,3,0)*d(-3)*bos(u,3,0)*d(-3)*fer(u,2,1)
+del(1)*d(-3)*bos(u,3,0)*d(-3)*bos(u,3,0)*d(-3)*fer(u,1,0)*bos(u,0,0)
-del(1)*d(-3)*bos(u,3,0)*d(-3)*bos(u,0,1)*bos(u,0,0)*d(-3)*bos(u,0,0)
*der(2)
-del(1)*d(-3)*bos(u,3,0)*d(-3)*bos(u,0,1)*bos(u,0,0)*d(-3)*fer(u,2,0)
3
-del(1)*d(-3)*bos(u,3,0)*d(-3)*bos(u,0,0) *der(2)
2
+del(1)*d(-3)*bos(u,3,0)*d(-3)*bos(u,0,0)*d(1) *der(2)
-2*del(1)*d(-3)*bos(u,3,0)*d(-3)*fer(u,2,0)*bos(u,3,0)
2
-3*del(1)*d(-3)*bos(u,3,0)*d(-3)*fer(u,2,0)*bos(u,0,0)
+del(1)*d(-3)*bos(u,3,0)*d(-3)*fer(u,2,0)*bos(u,0,0)*d(-3)*bos(u,0,1)
+del(1)*d(-3)*bos(u,3,0)*d(-3)*fer(u,2,0)*bos(u,0,0)*d(-3)*bos(u,0,0)
*d(1)
2
+del(1)*d(-3)*bos(u,3,0)*d(-3)*fer(u,2,0)*d(1)
-2*del(1)*d(-3)*bos(u,3,0)*d(-3)*fer(u,1,0)*bos(u,0,1)
-2*del(1)*d(-3)*bos(u,3,0)*d(-3)*fer(u,1,0)*bos(u,0,0)*d(1)
-del(1)*d(-3)*bos(u,3,0)*d(-3)*fer(u,1,0)*d(-3)*bos(u,3,0)*bos(u,0,0)
+del(1)*d(-3)*bos(u,3,0)*d(-3)*fer(u,1,0)*d(-3)*bos(u,3,0)*d(-3)
*bos(u,0,1)
+del(1)*d(-3)*bos(u,3,0)*d(-3)*fer(u,1,0)*d(-3)*bos(u,3,0)*d(-3)
*bos(u,0,0)*d(1)
+del(1)*d(-3)*bos(u,3,0)*d(-3)*fer(u,1,0)*d(-3)*bos(u,0,2)
+del(1)*d(-3)*bos(u,3,0)*d(-3)*fer(u,1,0)*d(-3)*bos(u,0,1)*d(1)
+del(1)*d(-3)*bos(u,3,0)*d(-3)*fer(u,1,0)*d(-3)*fer(u,2,0)*fer(u,1,0)
-del(1)*d(-3)*bos(u,3,0)*d(-3)*fer(u,1,0)*d(-3)*fer(u,1,1)*d(-3)
*bos(u,0,0)*der(2)
-del(1)*d(-3)*bos(u,3,0)*d(-3)*fer(u,1,0)*d(-3)*fer(u,1,1)*d(-3)
*fer(u,2,0)
-del(1)*d(-3)*bos(u,3,0)*d(-3)*fer(u,1,0)*d(-3)*fer(u,1,0)*bos(u,0,0)
*der(2)
2
-del(1)*d(-3)*bos(u,0,1) *d(-3)*bos(u,0,0)*der(2)
2
-del(1)*d(-3)*bos(u,0,1) *d(-3)*fer(u,2,0)
2
-3*del(1)*d(-3)*bos(u,0,1)*bos(u,0,0) *der(2)
+del(1)*d(-3)*bos(u,0,1)*bos(u,0,0)*d(-3)*bos(u,3,0)*d(-3)*bos(u,0,0)
*der(2)
+del(1)*d(-3)*bos(u,0,1)*bos(u,0,0)*d(-3)*bos(u,3,0)*d(-3)*fer(u,2,0)
+del(1)*d(-3)*bos(u,0,1)*bos(u,0,0)*d(-3)*bos(u,0,1)*der(2)
+del(1)*d(-3)*bos(u,0,1)*bos(u,0,0)*d(-3)*fer(u,2,1)
+del(1)*d(-3)*bos(u,0,1)*bos(u,0,0)*d(-3)*fer(u,1,0)*bos(u,0,0)
2
+del(1)*d(-3)*bos(u,0,1)*d(1) *der(2)
2
-del(1)*d(-3)*fer(u,2,1)*bos(u,0,0)
-del(1)*d(-3)*fer(u,2,1)*fer(u,2,0)*d(-3)*bos(u,0,0)*der(2)
-del(1)*d(-3)*fer(u,2,1)*fer(u,2,0)*d(-3)*fer(u,2,0)
2
+del(1)*d(-3)*fer(u,2,1)*d(1)
-2*del(1)*d(-3)*fer(u,2,1)*d(-3)*bos(u,0,1)*bos(u,0,0)
2
-2*del(1)*d(-3)*fer(u,2,1)*d(-3)*bos(u,0,0) *d(1)
-del(1)*d(-3)*fer(u,2,1)*d(-3)*bos(u,0,0)*d(-3)*bos(u,3,0)*bos(u,0,0)
+del(1)*d(-3)*fer(u,2,1)*d(-3)*bos(u,0,0)*d(-3)*bos(u,3,0)*d(-3)
*bos(u,0,1)
+del(1)*d(-3)*fer(u,2,1)*d(-3)*bos(u,0,0)*d(-3)*bos(u,3,0)*d(-3)
*bos(u,0,0)*d(1)
+del(1)*d(-3)*fer(u,2,1)*d(-3)*bos(u,0,0)*d(-3)*bos(u,0,2)
+del(1)*d(-3)*fer(u,2,1)*d(-3)*bos(u,0,0)*d(-3)*bos(u,0,1)*d(1)
+del(1)*d(-3)*fer(u,2,1)*d(-3)*bos(u,0,0)*d(-3)*fer(u,2,0)*fer(u,1,0)
-del(1)*d(-3)*fer(u,2,1)*d(-3)*bos(u,0,0)*d(-3)*fer(u,1,1)*d(-3)
*bos(u,0,0)*der(2)
-del(1)*d(-3)*fer(u,2,1)*d(-3)*bos(u,0,0)*d(-3)*fer(u,1,1)*d(-3)
*fer(u,2,0)
-del(1)*d(-3)*fer(u,2,1)*d(-3)*bos(u,0,0)*d(-3)*fer(u,1,0)*bos(u,0,0)
*der(2)
-2*del(1)*d(-3)*fer(u,2,1)*d(-3)*fer(u,2,0)*bos(u,0,0)*der(2)
+del(1)*d(-3)*fer(u,2,1)*d(-3)*fer(u,2,0)*d(-3)*bos(u,3,0)*d(-3)
*bos(u,0,0)*der(2)
+del(1)*d(-3)*fer(u,2,1)*d(-3)*fer(u,2,0)*d(-3)*bos(u,3,0)*d(-3)
*fer(u,2,0)
+del(1)*d(-3)*fer(u,2,1)*d(-3)*fer(u,2,0)*d(-3)*bos(u,0,1)*der(2)
+del(1)*d(-3)*fer(u,2,1)*d(-3)*fer(u,2,0)*d(-3)*fer(u,2,1)
+del(1)*d(-3)*fer(u,2,1)*d(-3)*fer(u,2,0)*d(-3)*fer(u,1,0)*bos(u,0,0)
-2*del(1)*d(-3)*fer(u,2,0)*bos(u,3,1)
-4*del(1)*d(-3)*fer(u,2,0)*bos(u,0,1)*bos(u,0,0)
+del(1)*d(-3)*fer(u,2,0)*bos(u,0,1)*d(-3)*bos(u,0,1)
+del(1)*d(-3)*fer(u,2,0)*bos(u,0,1)*d(-3)*bos(u,0,0)*d(1)
+del(1)*d(-3)*fer(u,2,0)*fer(u,1,0)*bos(u,0,0)*d(-3)*bos(u,0,0)*der(2)
+del(1)*d(-3)*fer(u,2,0)*fer(u,1,0)*bos(u,0,0)*d(-3)*fer(u,2,0)
-2*del(1)*d(-3)*fer(u,1,1)*bos(u,0,1)
-2*del(1)*d(-3)*fer(u,1,1)*bos(u,0,0)*d(1)
-del(1)*d(-3)*fer(u,1,1)*d(-3)*bos(u,3,0)*bos(u,0,0)
+del(1)*d(-3)*fer(u,1,1)*d(-3)*bos(u,3,0)*d(-3)*bos(u,0,1)
+del(1)*d(-3)*fer(u,1,1)*d(-3)*bos(u,3,0)*d(-3)*bos(u,0,0)*d(1)
+del(1)*d(-3)*fer(u,1,1)*d(-3)*bos(u,0,2)
+del(1)*d(-3)*fer(u,1,1)*d(-3)*bos(u,0,1)*d(1)
+del(1)*d(-3)*fer(u,1,1)*d(-3)*fer(u,2,0)*fer(u,1,0)
-del(1)*d(-3)*fer(u,1,1)*d(-3)*fer(u,1,1)*d(-3)*bos(u,0,0)*der(2)
-del(1)*d(-3)*fer(u,1,1)*d(-3)*fer(u,1,1)*d(-3)*fer(u,2,0)
-del(1)*d(-3)*fer(u,1,1)*d(-3)*fer(u,1,0)*bos(u,0,0)*der(2)
3
-del(1)*d(-3)*fer(u,1,0)*bos(u,0,0)
2
+del(1)*d(-3)*fer(u,1,0)*bos(u,0,0)*d(1)
kxk^3:=0;
3
kxk := 0
la4:=chan(lb4);
la4 :=
-4*bos(u,0,2)*bos(u,0,0)
2
-3*bos(u,0,1)
-12*bos(u,0,1)*bos(u,0,0)*d(1)
+bos(u,0,1)*(d(-3)*fer(u,2,0)*fer(u,1,0)
-d(-3)*fer(u,1,1)*d(-3)*bos(u,0,0)*der(2)
-d(-3)*fer(u,1,1)*d(-3)*fer(u,2,0)
-d(-3)*fer(u,1,0)*bos(u,0,0)*der(2))
4
+bos(u,0,0)
2 2
-6*bos(u,0,0) *d(1)
-fer(u,2,2)*(d(-3)*bos(u,0,0)*der(2)
+d(-3)*fer(u,2,0))
-4*fer(u,2,1)*bos(u,0,0)*der(2)
-2*fer(u,2,1)*fer(u,2,0)
+fer(u,2,1)*(d(-3)*bos(u,3,0)*d(-3)*bos(u,0,0)*der(2)
+d(-3)*bos(u,3,0)*d(-3)*fer(u,2,0)
+d(-3)*bos(u,0,1)*der(2)
+d(-3)*fer(u,2,1)
+d(-3)*fer(u,1,0)*bos(u,0,0))
+2*fer(u,2,0)*bos(u,3,0)*(d(-3)*bos(u,0,0)*der(2)
+d(-3)*fer(u,2,0))
-2*fer(u,2,0)*bos(u,0,1)*der(2)
2
+fer(u,2,0)*bos(u,0,0) *(d(-3)*bos(u,0,0)*der(2)
+d(-3)*fer(u,2,0))
-6*fer(u,2,0)*bos(u,0,0)*d(1)*der(2)
+8*fer(u,2,0)*fer(u,1,0)*bos(u,0,0)
+fer(u,2,0)*(2*d(-3)*bos(u,3,0)*bos(u,0,0)*der(2)
-d(-3)*bos(u,3,0)*d(-3)*bos(u,3,0)*d(-3)*bos(u,0,0)*der(2)
-d(-3)*bos(u,3,0)*d(-3)*bos(u,3,0)*d(-3)*fer(u,2,0)
-d(-3)*bos(u,3,0)*d(-3)*bos(u,0,1)*der(2)
-d(-3)*bos(u,3,0)*d(-3)*fer(u,2,1)
-d(-3)*bos(u,3,0)*d(-3)*fer(u,1,0)*bos(u,0,0)
-d(-3)*bos(u,0,2)*der(2)
+d(-3)*bos(u,0,1)*bos(u,0,0)*d(-3)*bos(u,0,0)*der(2)
+d(-3)*bos(u,0,1)*bos(u,0,0)*d(-3)*fer(u,2,0)
3
+d(-3)*bos(u,0,0) *der(2)
-d(-3)*fer(u,2,2)
+2*d(-3)*fer(u,2,0)*bos(u,3,0)
2
+2*d(-3)*fer(u,2,0)*bos(u,0,0)
-2*d(-3)*fer(u,1,1)*bos(u,0,0)
-d(-3)*fer(u,1,0)*bos(u,0,1)
-d(-3)*fer(u,1,0)*d(-3)*fer(u,2,0)*fer(u,1,0)
+d(-3)*fer(u,1,0)*d(-3)*fer(u,1,1)*d(-3)*bos(u,0,0)*der(2)
+d(-3)*fer(u,1,0)*d(-3)*fer(u,1,1)*d(-3)*fer(u,2,0)
+d(-3)*fer(u,1,0)*d(-3)*fer(u,1,0)*bos(u,0,0)*der(2))
-2*fer(u,1,1)*bos(u,0,0)*(d(-3)*bos(u,0,0)*der(2)
+d(-3)*fer(u,2,0))
2
-4*fer(u,1,0)*bos(u,0,0) *der(2)
+fer(u,1,0)*bos(u,0,0)*(d(-3)*bos(u,3,0)*d(-3)*bos(u,0,0)*der(2)
+d(-3)*bos(u,3,0)*d(-3)*fer(u,2,0)
+d(-3)*bos(u,0,1)*der(2)
+d(-3)*fer(u,2,1)
+d(-3)*fer(u,1,0)*bos(u,0,0))
4
+d(1)
+del(1)*bos(u,3,1)*d(-3)*bos(u,0,0)*der(2)
+del(1)*bos(u,3,1)*d(-3)*fer(u,2,0)
+6*del(1)*bos(u,3,0)*bos(u,0,0)*der(2)
-2*del(1)*bos(u,3,0)*d(-3)*bos(u,3,0)*d(-3)*bos(u,0,0)*der(2)
-2*del(1)*bos(u,3,0)*d(-3)*bos(u,3,0)*d(-3)*fer(u,2,0)
-2*del(1)*bos(u,3,0)*d(-3)*bos(u,0,1)*der(2)
-2*del(1)*bos(u,3,0)*d(-3)*fer(u,2,1)
-2*del(1)*bos(u,3,0)*d(-3)*fer(u,1,0)*bos(u,0,0)
-2*del(1)*bos(u,0,2)*der(2)
+2*del(1)*bos(u,0,1)*bos(u,0,0)*d(-3)*bos(u,0,0)*der(2)
+2*del(1)*bos(u,0,1)*bos(u,0,0)*d(-3)*fer(u,2,0)
-2*del(1)*bos(u,0,1)*d(1)*der(2)
3
+4*del(1)*bos(u,0,0) *der(2)
2
-del(1)*bos(u,0,0) *d(-3)*bos(u,3,0)*d(-3)*bos(u,0,0)*der(2)
2
-del(1)*bos(u,0,0) *d(-3)*bos(u,3,0)*d(-3)*fer(u,2,0)
2
-del(1)*bos(u,0,0) *d(-3)*bos(u,0,1)*der(2)
2
-del(1)*bos(u,0,0) *d(-3)*fer(u,2,1)
2
-del(1)*bos(u,0,0) *d(-3)*fer(u,1,0)*bos(u,0,0)
2
-4*del(1)*bos(u,0,0)*d(1) *der(2)
-2*del(1)*fer(u,2,2)
-2*del(1)*fer(u,2,1)*d(1)
+6*del(1)*fer(u,2,0)*bos(u,3,0)
2
+8*del(1)*fer(u,2,0)*bos(u,0,0)
2
-4*del(1)*fer(u,2,0)*d(1)
-3*del(1)*fer(u,2,0)*d(-3)*bos(u,0,1)*bos(u,0,0)
-del(1)*fer(u,2,0)*d(-3)*bos(u,0,0)*d(-3)*fer(u,2,0)*fer(u,1,0)
+del(1)*fer(u,2,0)*d(-3)*bos(u,0,0)*d(-3)*fer(u,1,1)*d(-3)*bos(u,0,0)
*der(2)
+del(1)*fer(u,2,0)*d(-3)*bos(u,0,0)*d(-3)*fer(u,1,1)*d(-3)*fer(u,2,0)
+del(1)*fer(u,2,0)*d(-3)*bos(u,0,0)*d(-3)*fer(u,1,0)*bos(u,0,0)*der(2)
+2*del(1)*fer(u,2,0)*d(-3)*fer(u,2,0)*bos(u,0,0)*der(2)
-del(1)*fer(u,2,0)*d(-3)*fer(u,2,0)*d(-3)*bos(u,3,0)*d(-3)*bos(u,0,0)
*der(2)
-del(1)*fer(u,2,0)*d(-3)*fer(u,2,0)*d(-3)*bos(u,3,0)*d(-3)*fer(u,2,0)
-del(1)*fer(u,2,0)*d(-3)*fer(u,2,0)*d(-3)*bos(u,0,1)*der(2)
-del(1)*fer(u,2,0)*d(-3)*fer(u,2,0)*d(-3)*fer(u,2,1)
-del(1)*fer(u,2,0)*d(-3)*fer(u,2,0)*d(-3)*fer(u,1,0)*bos(u,0,0)
-2*del(1)*fer(u,1,1)*bos(u,0,0)
+2*del(1)*fer(u,1,0)*bos(u,0,1)
+6*del(1)*fer(u,1,0)*bos(u,0,0)*d(1)
-2*del(1)*fer(u,1,0)*d(-3)*fer(u,2,0)*fer(u,1,0)
+2*del(1)*fer(u,1,0)*d(-3)*fer(u,1,1)*d(-3)*bos(u,0,0)*der(2)
+2*del(1)*fer(u,1,0)*d(-3)*fer(u,1,1)*d(-3)*fer(u,2,0)
+2*del(1)*fer(u,1,0)*d(-3)*fer(u,1,0)*bos(u,0,0)*der(2)
-3*del(1)*d(-3)*bos(u,3,1)*bos(u,0,0)*der(2)
+del(1)*d(-3)*bos(u,3,1)*d(-3)*bos(u,3,0)*d(-3)*bos(u,0,0)*der(2)
+del(1)*d(-3)*bos(u,3,1)*d(-3)*bos(u,3,0)*d(-3)*fer(u,2,0)
+del(1)*d(-3)*bos(u,3,1)*d(-3)*bos(u,0,1)*der(2)
+del(1)*d(-3)*bos(u,3,1)*d(-3)*fer(u,2,1)
+del(1)*d(-3)*bos(u,3,1)*d(-3)*fer(u,1,0)*bos(u,0,0)
-2*del(1)*d(-3)*bos(u,3,0)*bos(u,0,1)*der(2)
-2*del(1)*d(-3)*bos(u,3,0)*d(-3)*bos(u,3,0)*bos(u,0,0)*der(2)
+del(1)*d(-3)*bos(u,3,0)*d(-3)*bos(u,3,0)*d(-3)*bos(u,3,0)*d(-3)
*bos(u,0,0)*der(2)
+del(1)*d(-3)*bos(u,3,0)*d(-3)*bos(u,3,0)*d(-3)*bos(u,3,0)*d(-3)
*fer(u,2,0)
+del(1)*d(-3)*bos(u,3,0)*d(-3)*bos(u,3,0)*d(-3)*bos(u,0,1)*der(2)
+del(1)*d(-3)*bos(u,3,0)*d(-3)*bos(u,3,0)*d(-3)*fer(u,2,1)
+del(1)*d(-3)*bos(u,3,0)*d(-3)*bos(u,3,0)*d(-3)*fer(u,1,0)*bos(u,0,0)
+del(1)*d(-3)*bos(u,3,0)*d(-3)*bos(u,0,2)*der(2)
-del(1)*d(-3)*bos(u,3,0)*d(-3)*bos(u,0,1)*bos(u,0,0)*d(-3)*bos(u,0,0)
*der(2)
-del(1)*d(-3)*bos(u,3,0)*d(-3)*bos(u,0,1)*bos(u,0,0)*d(-3)*fer(u,2,0)
3
-del(1)*d(-3)*bos(u,3,0)*d(-3)*bos(u,0,0) *der(2)
+del(1)*d(-3)*bos(u,3,0)*d(-3)*fer(u,2,2)
-2*del(1)*d(-3)*bos(u,3,0)*d(-3)*fer(u,2,0)*bos(u,3,0)
2
-2*del(1)*d(-3)*bos(u,3,0)*d(-3)*fer(u,2,0)*bos(u,0,0)
+2*del(1)*d(-3)*bos(u,3,0)*d(-3)*fer(u,1,1)*bos(u,0,0)
+del(1)*d(-3)*bos(u,3,0)*d(-3)*fer(u,1,0)*bos(u,0,1)
+del(1)*d(-3)*bos(u,3,0)*d(-3)*fer(u,1,0)*d(-3)*fer(u,2,0)*fer(u,1,0)
-del(1)*d(-3)*bos(u,3,0)*d(-3)*fer(u,1,0)*d(-3)*fer(u,1,1)*d(-3)
*bos(u,0,0)*der(2)
-del(1)*d(-3)*bos(u,3,0)*d(-3)*fer(u,1,0)*d(-3)*fer(u,1,1)*d(-3)
*fer(u,2,0)
-del(1)*d(-3)*bos(u,3,0)*d(-3)*fer(u,1,0)*d(-3)*fer(u,1,0)*bos(u,0,0)
*der(2)
+del(1)*d(-3)*bos(u,0,3)*der(2)
2
-del(1)*d(-3)*bos(u,0,1) *d(-3)*bos(u,0,0)*der(2)
2
-del(1)*d(-3)*bos(u,0,1) *d(-3)*fer(u,2,0)
2
-3*del(1)*d(-3)*bos(u,0,1)*bos(u,0,0) *der(2)
+del(1)*d(-3)*bos(u,0,1)*bos(u,0,0)*d(-3)*bos(u,3,0)*d(-3)*bos(u,0,0)
*der(2)
+del(1)*d(-3)*bos(u,0,1)*bos(u,0,0)*d(-3)*bos(u,3,0)*d(-3)*fer(u,2,0)
+del(1)*d(-3)*bos(u,0,1)*bos(u,0,0)*d(-3)*bos(u,0,1)*der(2)
+del(1)*d(-3)*bos(u,0,1)*bos(u,0,0)*d(-3)*fer(u,2,1)
+del(1)*d(-3)*bos(u,0,1)*bos(u,0,0)*d(-3)*fer(u,1,0)*bos(u,0,0)
+del(1)*d(-3)*fer(u,2,3)
-2*del(1)*d(-3)*fer(u,2,1)*bos(u,3,0)
2
-3*del(1)*d(-3)*fer(u,2,1)*bos(u,0,0)
-del(1)*d(-3)*fer(u,2,1)*fer(u,2,0)*d(-3)*bos(u,0,0)*der(2)
-del(1)*d(-3)*fer(u,2,1)*fer(u,2,0)*d(-3)*fer(u,2,0)
+3*del(1)*d(-3)*fer(u,2,1)*d(-3)*bos(u,0,1)*bos(u,0,0)
+del(1)*d(-3)*fer(u,2,1)*d(-3)*bos(u,0,0)*d(-3)*fer(u,2,0)*fer(u,1,0)
-del(1)*d(-3)*fer(u,2,1)*d(-3)*bos(u,0,0)*d(-3)*fer(u,1,1)*d(-3)
*bos(u,0,0)*der(2)
-del(1)*d(-3)*fer(u,2,1)*d(-3)*bos(u,0,0)*d(-3)*fer(u,1,1)*d(-3)
*fer(u,2,0)
-del(1)*d(-3)*fer(u,2,1)*d(-3)*bos(u,0,0)*d(-3)*fer(u,1,0)*bos(u,0,0)
*der(2)
-2*del(1)*d(-3)*fer(u,2,1)*d(-3)*fer(u,2,0)*bos(u,0,0)*der(2)
+del(1)*d(-3)*fer(u,2,1)*d(-3)*fer(u,2,0)*d(-3)*bos(u,3,0)*d(-3)
*bos(u,0,0)*der(2)
+del(1)*d(-3)*fer(u,2,1)*d(-3)*fer(u,2,0)*d(-3)*bos(u,3,0)*d(-3)
*fer(u,2,0)
+del(1)*d(-3)*fer(u,2,1)*d(-3)*fer(u,2,0)*d(-3)*bos(u,0,1)*der(2)
+del(1)*d(-3)*fer(u,2,1)*d(-3)*fer(u,2,0)*d(-3)*fer(u,2,1)
+del(1)*d(-3)*fer(u,2,1)*d(-3)*fer(u,2,0)*d(-3)*fer(u,1,0)*bos(u,0,0)
-3*del(1)*d(-3)*fer(u,2,0)*bos(u,3,1)
-3*del(1)*d(-3)*fer(u,2,0)*bos(u,0,1)*bos(u,0,0)
+del(1)*d(-3)*fer(u,2,0)*fer(u,1,0)*bos(u,0,0)*d(-3)*bos(u,0,0)*der(2)
+del(1)*d(-3)*fer(u,2,0)*fer(u,1,0)*bos(u,0,0)*d(-3)*fer(u,2,0)
+3*del(1)*d(-3)*fer(u,1,2)*bos(u,0,0)
+3*del(1)*d(-3)*fer(u,1,1)*bos(u,0,1)
+del(1)*d(-3)*fer(u,1,1)*d(-3)*fer(u,2,0)*fer(u,1,0)
-del(1)*d(-3)*fer(u,1,1)*d(-3)*fer(u,1,1)*d(-3)*bos(u,0,0)*der(2)
-del(1)*d(-3)*fer(u,1,1)*d(-3)*fer(u,1,1)*d(-3)*fer(u,2,0)
-del(1)*d(-3)*fer(u,1,1)*d(-3)*fer(u,1,0)*bos(u,0,0)*der(2)
-2*del(1)*d(-3)*fer(u,1,0)*bos(u,3,0)*bos(u,0,0)
+del(1)*d(-3)*fer(u,1,0)*bos(u,0,2)
3
-del(1)*d(-3)*fer(u,1,0)*bos(u,0,0)
lc4:=sub(kxk=1,qq=-3,sub(d(-3)=kxk*d(qq),la4));
lc4 :=
-4*bos(u,0,2)*bos(u,0,0)
2
-3*bos(u,0,1)
-12*bos(u,0,1)*bos(u,0,0)*d(1)
+bos(u,0,1)*(d(-3)*fer(u,2,0)*fer(u,1,0)
-d(-3)*fer(u,1,1)*d(-3)*bos(u,0,0)*der(2)
-d(-3)*fer(u,1,1)*d(-3)*fer(u,2,0)
-d(-3)*fer(u,1,0)*bos(u,0,0)*der(2))
4
+bos(u,0,0)
2 2
-6*bos(u,0,0) *d(1)
-fer(u,2,2)*(d(-3)*bos(u,0,0)*der(2)
+d(-3)*fer(u,2,0))
-4*fer(u,2,1)*bos(u,0,0)*der(2)
-2*fer(u,2,1)*fer(u,2,0)
+fer(u,2,1)*(d(-3)*bos(u,3,0)*d(-3)*bos(u,0,0)*der(2)
+d(-3)*bos(u,3,0)*d(-3)*fer(u,2,0)
+d(-3)*bos(u,0,1)*der(2)
+d(-3)*fer(u,2,1)
+d(-3)*fer(u,1,0)*bos(u,0,0))
+2*fer(u,2,0)*bos(u,3,0)*(d(-3)*bos(u,0,0)*der(2)
+d(-3)*fer(u,2,0))
-2*fer(u,2,0)*bos(u,0,1)*der(2)
2
+fer(u,2,0)*bos(u,0,0) *(d(-3)*bos(u,0,0)*der(2)
+d(-3)*fer(u,2,0))
-6*fer(u,2,0)*bos(u,0,0)*d(1)*der(2)
+8*fer(u,2,0)*fer(u,1,0)*bos(u,0,0)
+fer(u,2,0)*(2*d(-3)*bos(u,3,0)*bos(u,0,0)*der(2)
-d(-3)*bos(u,3,0)*d(-3)*bos(u,0,1)*der(2)
-d(-3)*bos(u,3,0)*d(-3)*fer(u,2,1)
-d(-3)*bos(u,3,0)*d(-3)*fer(u,1,0)*bos(u,0,0)
-d(-3)*bos(u,0,2)*der(2)
+d(-3)*bos(u,0,1)*bos(u,0,0)*d(-3)*bos(u,0,0)*der(2)
+d(-3)*bos(u,0,1)*bos(u,0,0)*d(-3)*fer(u,2,0)
3
+d(-3)*bos(u,0,0) *der(2)
-d(-3)*fer(u,2,2)
+2*d(-3)*fer(u,2,0)*bos(u,3,0)
2
+2*d(-3)*fer(u,2,0)*bos(u,0,0)
-2*d(-3)*fer(u,1,1)*bos(u,0,0)
-d(-3)*fer(u,1,0)*bos(u,0,1)
-d(-3)*fer(u,1,0)*d(-3)*fer(u,2,0)*fer(u,1,0)
+d(-3)*fer(u,1,0)*d(-3)*fer(u,1,0)*bos(u,0,0)*der(2))
-2*fer(u,1,1)*bos(u,0,0)*(d(-3)*bos(u,0,0)*der(2)
+d(-3)*fer(u,2,0))
2
-4*fer(u,1,0)*bos(u,0,0) *der(2)
+fer(u,1,0)*bos(u,0,0)*(d(-3)*bos(u,3,0)*d(-3)*bos(u,0,0)*der(2)
+d(-3)*bos(u,3,0)*d(-3)*fer(u,2,0)
+d(-3)*bos(u,0,1)*der(2)
+d(-3)*fer(u,2,1)
+d(-3)*fer(u,1,0)*bos(u,0,0))
4
+d(1)
+del(1)*bos(u,3,1)*d(-3)*bos(u,0,0)*der(2)
+del(1)*bos(u,3,1)*d(-3)*fer(u,2,0)
+6*del(1)*bos(u,3,0)*bos(u,0,0)*der(2)
-2*del(1)*bos(u,3,0)*d(-3)*bos(u,3,0)*d(-3)*bos(u,0,0)*der(2)
-2*del(1)*bos(u,3,0)*d(-3)*bos(u,3,0)*d(-3)*fer(u,2,0)
-2*del(1)*bos(u,3,0)*d(-3)*bos(u,0,1)*der(2)
-2*del(1)*bos(u,3,0)*d(-3)*fer(u,2,1)
-2*del(1)*bos(u,3,0)*d(-3)*fer(u,1,0)*bos(u,0,0)
-2*del(1)*bos(u,0,2)*der(2)
+2*del(1)*bos(u,0,1)*bos(u,0,0)*d(-3)*bos(u,0,0)*der(2)
+2*del(1)*bos(u,0,1)*bos(u,0,0)*d(-3)*fer(u,2,0)
-2*del(1)*bos(u,0,1)*d(1)*der(2)
3
+4*del(1)*bos(u,0,0) *der(2)
2
-del(1)*bos(u,0,0) *d(-3)*bos(u,3,0)*d(-3)*bos(u,0,0)*der(2)
2
-del(1)*bos(u,0,0) *d(-3)*bos(u,3,0)*d(-3)*fer(u,2,0)
2
-del(1)*bos(u,0,0) *d(-3)*bos(u,0,1)*der(2)
2
-del(1)*bos(u,0,0) *d(-3)*fer(u,2,1)
2
-del(1)*bos(u,0,0) *d(-3)*fer(u,1,0)*bos(u,0,0)
2
-4*del(1)*bos(u,0,0)*d(1) *der(2)
-2*del(1)*fer(u,2,2)
-2*del(1)*fer(u,2,1)*d(1)
+6*del(1)*fer(u,2,0)*bos(u,3,0)
2
+8*del(1)*fer(u,2,0)*bos(u,0,0)
2
-4*del(1)*fer(u,2,0)*d(1)
-3*del(1)*fer(u,2,0)*d(-3)*bos(u,0,1)*bos(u,0,0)
-del(1)*fer(u,2,0)*d(-3)*bos(u,0,0)*d(-3)*fer(u,2,0)*fer(u,1,0)
+del(1)*fer(u,2,0)*d(-3)*bos(u,0,0)*d(-3)*fer(u,1,0)*bos(u,0,0)*der(2)
+2*del(1)*fer(u,2,0)*d(-3)*fer(u,2,0)*bos(u,0,0)*der(2)
-del(1)*fer(u,2,0)*d(-3)*fer(u,2,0)*d(-3)*bos(u,0,1)*der(2)
-del(1)*fer(u,2,0)*d(-3)*fer(u,2,0)*d(-3)*fer(u,2,1)
-del(1)*fer(u,2,0)*d(-3)*fer(u,2,0)*d(-3)*fer(u,1,0)*bos(u,0,0)
-2*del(1)*fer(u,1,1)*bos(u,0,0)
+2*del(1)*fer(u,1,0)*bos(u,0,1)
+6*del(1)*fer(u,1,0)*bos(u,0,0)*d(1)
-2*del(1)*fer(u,1,0)*d(-3)*fer(u,2,0)*fer(u,1,0)
+2*del(1)*fer(u,1,0)*d(-3)*fer(u,1,1)*d(-3)*bos(u,0,0)*der(2)
+2*del(1)*fer(u,1,0)*d(-3)*fer(u,1,1)*d(-3)*fer(u,2,0)
+2*del(1)*fer(u,1,0)*d(-3)*fer(u,1,0)*bos(u,0,0)*der(2)
-3*del(1)*d(-3)*bos(u,3,1)*bos(u,0,0)*der(2)
+del(1)*d(-3)*bos(u,3,1)*d(-3)*bos(u,0,1)*der(2)
+del(1)*d(-3)*bos(u,3,1)*d(-3)*fer(u,2,1)
+del(1)*d(-3)*bos(u,3,1)*d(-3)*fer(u,1,0)*bos(u,0,0)
-2*del(1)*d(-3)*bos(u,3,0)*bos(u,0,1)*der(2)
-2*del(1)*d(-3)*bos(u,3,0)*d(-3)*bos(u,3,0)*bos(u,0,0)*der(2)
+del(1)*d(-3)*bos(u,3,0)*d(-3)*bos(u,0,2)*der(2)
3
-del(1)*d(-3)*bos(u,3,0)*d(-3)*bos(u,0,0) *der(2)
+del(1)*d(-3)*bos(u,3,0)*d(-3)*fer(u,2,2)
-2*del(1)*d(-3)*bos(u,3,0)*d(-3)*fer(u,2,0)*bos(u,3,0)
2
-2*del(1)*d(-3)*bos(u,3,0)*d(-3)*fer(u,2,0)*bos(u,0,0)
+2*del(1)*d(-3)*bos(u,3,0)*d(-3)*fer(u,1,1)*bos(u,0,0)
+del(1)*d(-3)*bos(u,3,0)*d(-3)*fer(u,1,0)*bos(u,0,1)
+del(1)*d(-3)*bos(u,0,3)*der(2)
2
-del(1)*d(-3)*bos(u,0,1) *d(-3)*bos(u,0,0)*der(2)
2
-del(1)*d(-3)*bos(u,0,1) *d(-3)*fer(u,2,0)
2
-3*del(1)*d(-3)*bos(u,0,1)*bos(u,0,0) *der(2)
+del(1)*d(-3)*bos(u,0,1)*bos(u,0,0)*d(-3)*bos(u,0,1)*der(2)
+del(1)*d(-3)*bos(u,0,1)*bos(u,0,0)*d(-3)*fer(u,2,1)
+del(1)*d(-3)*bos(u,0,1)*bos(u,0,0)*d(-3)*fer(u,1,0)*bos(u,0,0)
+del(1)*d(-3)*fer(u,2,3)
-2*del(1)*d(-3)*fer(u,2,1)*bos(u,3,0)
2
-3*del(1)*d(-3)*fer(u,2,1)*bos(u,0,0)
-del(1)*d(-3)*fer(u,2,1)*fer(u,2,0)*d(-3)*bos(u,0,0)*der(2)
-del(1)*d(-3)*fer(u,2,1)*fer(u,2,0)*d(-3)*fer(u,2,0)
+3*del(1)*d(-3)*fer(u,2,1)*d(-3)*bos(u,0,1)*bos(u,0,0)
-2*del(1)*d(-3)*fer(u,2,1)*d(-3)*fer(u,2,0)*bos(u,0,0)*der(2)
-3*del(1)*d(-3)*fer(u,2,0)*bos(u,3,1)
-3*del(1)*d(-3)*fer(u,2,0)*bos(u,0,1)*bos(u,0,0)
+del(1)*d(-3)*fer(u,2,0)*fer(u,1,0)*bos(u,0,0)*d(-3)*bos(u,0,0)*der(2)
+del(1)*d(-3)*fer(u,2,0)*fer(u,1,0)*bos(u,0,0)*d(-3)*fer(u,2,0)
+3*del(1)*d(-3)*fer(u,1,2)*bos(u,0,0)
+3*del(1)*d(-3)*fer(u,1,1)*bos(u,0,1)
+del(1)*d(-3)*fer(u,1,1)*d(-3)*fer(u,2,0)*fer(u,1,0)
-del(1)*d(-3)*fer(u,1,1)*d(-3)*fer(u,1,0)*bos(u,0,0)*der(2)
-2*del(1)*d(-3)*fer(u,1,0)*bos(u,3,0)*bos(u,0,0)
+del(1)*d(-3)*fer(u,1,0)*bos(u,0,2)
3
-del(1)*d(-3)*fer(u,1,0)*bos(u,0,0)
lb5:=lax*lc4;
2
lb5 := 2*bos(u,3,1)*bos(u,0,0)
+bos(u,3,1)*bos(u,0,0)*(d(-3)*bos(u,0,1)
+d(-3)*bos(u,0,0)*d(1))
+4*bos(u,3,0)*bos(u,0,1)*bos(u,0,0)
+2*bos(u,3,0)*bos(u,0,0)*(d(-3)*bos(u,3,0)*bos(u,0,0)
-d(-3)*bos(u,3,0)*d(-3)*bos(u,0,1)
-d(-3)*bos(u,3,0)*d(-3)*bos(u,0,0)*d(1)
-d(-3)*bos(u,0,2)
-d(-3)*bos(u,0,1)*d(1))
-6*bos(u,0,3)*bos(u,0,0)
-10*bos(u,0,2)*bos(u,0,1)
-20*bos(u,0,2)*bos(u,0,0)*d(1)
+bos(u,0,2)*(d(-3)*fer(u,2,0)*fer(u,1,0)
-d(-3)*fer(u,1,1)*d(-3)*bos(u,0,0)*der(2)
-d(-3)*fer(u,1,1)*d(-3)*fer(u,2,0)
-d(-3)*fer(u,1,0)*bos(u,0,0)*der(2))
2
-15*bos(u,0,1) *d(1)
3
+12*bos(u,0,1)*bos(u,0,0)
2
+2*bos(u,0,1)*bos(u,0,0) *(d(-3)*bos(u,0,1)
+d(-3)*bos(u,0,0)*d(1))
+bos(u,0,1)*bos(u,0,0)*(
2
-30*d(1)
-3*d(-3)*bos(u,0,1)*bos(u,0,0)
-d(-3)*bos(u,0,0)*d(-3)*fer(u,2,0)*fer(u,1,0)
+d(-3)*bos(u,0,0)*d(-3)*fer(u,1,0)*bos(u,0,0)*der(2)
+2*d(-3)*fer(u,2,0)*bos(u,0,0)*der(2)
-d(-3)*fer(u,2,0)*d(-3)*bos(u,0,1)*der(2)
-d(-3)*fer(u,2,0)*d(-3)*fer(u,2,1)
-d(-3)*fer(u,2,0)*d(-3)*fer(u,1,0)*bos(u,0,0))
4
+5*bos(u,0,0) *d(1)
3
+bos(u,0,0) *(d(-3)*bos(u,3,0)*bos(u,0,0)
-d(-3)*bos(u,3,0)*d(-3)*bos(u,0,1)
-d(-3)*bos(u,3,0)*d(-3)*bos(u,0,0)*d(1)
-d(-3)*bos(u,0,2)
-d(-3)*bos(u,0,1)*d(1)
-d(-3)*fer(u,2,0)*fer(u,1,0)
+d(-3)*fer(u,1,1)*d(-3)*bos(u,0,0)*der(2)
+d(-3)*fer(u,1,1)*d(-3)*fer(u,2,0)
+d(-3)*fer(u,1,0)*bos(u,0,0)*der(2))
2 3
-10*bos(u,0,0) *d(1)
+bos(u,0,0)*(
-3*d(-3)*bos(u,3,2)*bos(u,0,0)
-6*d(-3)*bos(u,3,1)*bos(u,0,1)
-3*d(-3)*bos(u,3,1)*bos(u,0,0)*d(1)
-d(-3)*bos(u,3,1)*d(-3)*bos(u,3,0)*bos(u,0,0)
+d(-3)*bos(u,3,1)*d(-3)*bos(u,0,2)
+d(-3)*bos(u,3,1)*d(-3)*bos(u,0,1)*d(1)
2
+2*d(-3)*bos(u,3,0) *bos(u,0,0)
-3*d(-3)*bos(u,3,0)*bos(u,0,2)
-2*d(-3)*bos(u,3,0)*bos(u,0,1)*d(1)
3
+d(-3)*bos(u,3,0)*bos(u,0,0)
-2*d(-3)*bos(u,3,0)*d(-3)*bos(u,3,1)*bos(u,0,0)
-3*d(-3)*bos(u,3,0)*d(-3)*bos(u,3,0)*bos(u,0,1)
-2*d(-3)*bos(u,3,0)*d(-3)*bos(u,3,0)*bos(u,0,0)*d(1)
+d(-3)*bos(u,3,0)*d(-3)*bos(u,0,3)
+d(-3)*bos(u,3,0)*d(-3)*bos(u,0,2)*d(1)
2
-2*d(-3)*bos(u,3,0)*d(-3)*bos(u,0,1)*bos(u,0,0)
3
-d(-3)*bos(u,3,0)*d(-3)*bos(u,0,0) *d(1)
+d(-3)*bos(u,3,0)*d(-3)*fer(u,2,1)*fer(u,1,0)
2
-d(-3)*bos(u,3,0)*d(-3)*fer(u,2,0)*bos(u,0,0) *der(2)
-d(-3)*bos(u,3,0)*d(-3)*fer(u,1,0)*bos(u,0,1)*der(2)
+d(-3)*bos(u,0,4)
+d(-3)*bos(u,0,3)*d(1)
2
-3*d(-3)*bos(u,0,2)*bos(u,0,0)
+3*d(-3)*bos(u,0,2)*d(-3)*bos(u,0,1)*bos(u,0,0)
-2*d(-3)*bos(u,0,2)*d(-3)*fer(u,2,0)*bos(u,0,0)*der(2)
2
-3*d(-3)*bos(u,0,1) *bos(u,0,0)
2
-d(-3)*bos(u,0,1) *d(-3)*bos(u,0,1)
2
-d(-3)*bos(u,0,1) *d(-3)*bos(u,0,0)*d(1)
2
-3*d(-3)*bos(u,0,1)*bos(u,0,0) *d(1)
-d(-3)*bos(u,0,1)*bos(u,0,0)*d(-3)*bos(u,3,0)*bos(u,0,0)
+d(-3)*bos(u,0,1)*bos(u,0,0)*d(-3)*bos(u,0,2)
+d(-3)*bos(u,0,1)*bos(u,0,0)*d(-3)*bos(u,0,1)*d(1)
+d(-3)*bos(u,0,1)*bos(u,0,0)*d(-3)*fer(u,2,0)*fer(u,1,0)
-d(-3)*bos(u,0,1)*bos(u,0,0)*d(-3)*fer(u,1,0)*bos(u,0,0)*der(2)
+d(-3)*fer(u,2,2)*fer(u,1,0)
-d(-3)*fer(u,2,1)*bos(u,0,1)*d(-3)*bos(u,0,0)*der(2)
-d(-3)*fer(u,2,1)*bos(u,0,1)*d(-3)*fer(u,2,0)
+d(-3)*fer(u,2,1)*bos(u,0,0)*d(-3)*bos(u,0,1)*der(2)
+d(-3)*fer(u,2,1)*bos(u,0,0)*d(-3)*fer(u,2,1)
+d(-3)*fer(u,2,1)*bos(u,0,0)*d(-3)*fer(u,1,0)*bos(u,0,0)
+3*d(-3)*fer(u,2,1)*fer(u,2,0)*bos(u,0,0)
-d(-3)*fer(u,2,1)*fer(u,2,0)*d(-3)*bos(u,0,1)
-d(-3)*fer(u,2,1)*fer(u,2,0)*d(-3)*bos(u,0,0)*d(1)
+d(-3)*fer(u,2,1)*fer(u,1,1)
-d(-3)*fer(u,2,1)*d(-3)*bos(u,0,1)*bos(u,0,0)*der(2)
-3*d(-3)*fer(u,2,1)*d(-3)*fer(u,2,1)*bos(u,0,0)
-3*d(-3)*fer(u,2,1)*d(-3)*fer(u,2,0)*bos(u,0,1)
-2*d(-3)*fer(u,2,1)*d(-3)*fer(u,2,0)*bos(u,0,0)*d(1)
+d(-3)*fer(u,2,0)*bos(u,3,0)*bos(u,0,0)*d(-3)*bos(u,0,0)*der(2)
+d(-3)*fer(u,2,0)*bos(u,3,0)*bos(u,0,0)*d(-3)*fer(u,2,0)
-d(-3)*fer(u,2,0)*bos(u,0,2)*d(-3)*bos(u,0,0)*der(2)
-d(-3)*fer(u,2,0)*bos(u,0,2)*d(-3)*fer(u,2,0)
-3*d(-3)*fer(u,2,0)*bos(u,0,1)*bos(u,0,0)*der(2)
+d(-3)*fer(u,2,0)*bos(u,0,1)*d(-3)*bos(u,0,1)*der(2)
+d(-3)*fer(u,2,0)*bos(u,0,1)*d(-3)*fer(u,2,1)
+d(-3)*fer(u,2,0)*bos(u,0,1)*d(-3)*fer(u,1,0)*bos(u,0,0)
-2*d(-3)*fer(u,2,0)*fer(u,1,0)*bos(u,3,0)
2
-3*d(-3)*fer(u,2,0)*fer(u,1,0)*bos(u,0,0)
+d(-3)*fer(u,2,0)*fer(u,1,0)*bos(u,0,0)*d(-3)*bos(u,0,1)
+d(-3)*fer(u,2,0)*fer(u,1,0)*bos(u,0,0)*d(-3)*bos(u,0,0)*d(1)
-d(-3)*fer(u,1,2)*d(-3)*bos(u,0,1)*der(2)
-d(-3)*fer(u,1,2)*d(-3)*fer(u,2,1)
-d(-3)*fer(u,1,2)*d(-3)*fer(u,1,0)*bos(u,0,0)
-d(-3)*fer(u,1,1)*bos(u,0,1)*der(2)
+2*d(-3)*fer(u,1,1)*fer(u,1,0)*bos(u,0,0)
+d(-3)*fer(u,1,1)*d(-3)*bos(u,3,0)*bos(u,0,0)*der(2)
-d(-3)*fer(u,1,1)*d(-3)*bos(u,0,2)*der(2)
3
+d(-3)*fer(u,1,1)*d(-3)*bos(u,0,0) *der(2)
-d(-3)*fer(u,1,1)*d(-3)*fer(u,2,2)
+d(-3)*fer(u,1,1)*d(-3)*fer(u,2,0)*bos(u,3,0)
2
+2*d(-3)*fer(u,1,1)*d(-3)*fer(u,2,0)*bos(u,0,0)
-2*d(-3)*fer(u,1,1)*d(-3)*fer(u,1,1)*bos(u,0,0)
-2*d(-3)*fer(u,1,1)*d(-3)*fer(u,1,0)*bos(u,0,1)
-d(-3)*fer(u,1,1)*d(-3)*fer(u,1,0)*bos(u,0,0)*d(1)
+2*d(-3)*fer(u,1,0)*bos(u,3,0)*bos(u,0,0)*der(2)
-d(-3)*fer(u,1,0)*bos(u,0,2)*der(2)
+d(-3)*fer(u,1,0)*bos(u,0,1)*bos(u,0,0)*d(-3)*bos(u,0,0)*der(2)
+d(-3)*fer(u,1,0)*bos(u,0,1)*bos(u,0,0)*d(-3)*fer(u,2,0)
3
+d(-3)*fer(u,1,0)*bos(u,0,0) *der(2))
-fer(u,2,3)*(d(-3)*bos(u,0,0)*der(2)
+d(-3)*fer(u,2,0))
-5*fer(u,2,2)*bos(u,0,0)*der(2)
+fer(u,2,2)*(d(-3)*bos(u,3,0)*d(-3)*bos(u,0,0)*der(2)
+d(-3)*bos(u,3,0)*d(-3)*fer(u,2,0)
+d(-3)*bos(u,0,1)*der(2)
+d(-3)*fer(u,2,1)
+d(-3)*fer(u,1,0)*bos(u,0,0))
+3*fer(u,2,1)*bos(u,3,0)*(d(-3)*bos(u,0,0)*der(2)
+d(-3)*fer(u,2,0))
-5*fer(u,2,1)*bos(u,0,1)*der(2)
2
+3*fer(u,2,1)*bos(u,0,0) *(d(-3)*bos(u,0,0)*der(2)
+d(-3)*fer(u,2,0))
-10*fer(u,2,1)*bos(u,0,0)*d(1)*der(2)
+10*fer(u,2,1)*fer(u,1,0)*bos(u,0,0)
+fer(u,2,1)*(2*d(-3)*bos(u,3,0)*bos(u,0,0)*der(2)
-d(-3)*bos(u,3,0)*d(-3)*bos(u,0,1)*der(2)
-d(-3)*bos(u,3,0)*d(-3)*fer(u,2,1)
-d(-3)*bos(u,3,0)*d(-3)*fer(u,1,0)*bos(u,0,0)
-d(-3)*bos(u,0,2)*der(2)
+d(-3)*bos(u,0,1)*bos(u,0,0)*d(-3)*bos(u,0,0)*der(2)
+d(-3)*bos(u,0,1)*bos(u,0,0)*d(-3)*fer(u,2,0)
3
+d(-3)*bos(u,0,0) *der(2)
-d(-3)*fer(u,2,2)
+2*d(-3)*fer(u,2,0)*bos(u,3,0)
2
+2*d(-3)*fer(u,2,0)*bos(u,0,0)
-2*d(-3)*fer(u,1,1)*bos(u,0,0)
-d(-3)*fer(u,1,0)*bos(u,0,1)
-d(-3)*fer(u,1,0)*d(-3)*fer(u,2,0)*fer(u,1,0)
+d(-3)*fer(u,1,0)*d(-3)*fer(u,1,0)*bos(u,0,0)*der(2))
+3*fer(u,2,0)*bos(u,3,1)*(d(-3)*bos(u,0,0)*der(2)
+d(-3)*fer(u,2,0))
+10*fer(u,2,0)*bos(u,3,0)*bos(u,0,0)*der(2)
+fer(u,2,0)*bos(u,3,0)*(
-2*d(-3)*bos(u,3,0)*d(-3)*bos(u,0,0)*der(2)
-2*d(-3)*bos(u,3,0)*d(-3)*fer(u,2,0)
-3*d(-3)*bos(u,0,1)*der(2)
-3*d(-3)*fer(u,2,1)
-3*d(-3)*fer(u,1,0)*bos(u,0,0))
-5*fer(u,2,0)*bos(u,0,2)*der(2)
+7*fer(u,2,0)*bos(u,0,1)*bos(u,0,0)*(d(-3)*bos(u,0,0)*der(2)
+d(-3)*fer(u,2,0))
-10*fer(u,2,0)*bos(u,0,1)*d(1)*der(2)
3
+10*fer(u,2,0)*bos(u,0,0) *der(2)
2
-3*fer(u,2,0)*bos(u,0,0) *(d(-3)*bos(u,3,0)*d(-3)*bos(u,0,0)*der(2)
+d(-3)*bos(u,3,0)*d(-3)*fer(u,2,0)
+d(-3)*bos(u,0,1)*der(2)
+d(-3)*fer(u,2,1)
+d(-3)*fer(u,1,0)*bos(u,0,0))
+fer(u,2,0)*bos(u,0,0)*(
2
-10*d(1) *der(2)
+d(-3)*bos(u,0,1)*bos(u,0,0)*der(2)
+d(-3)*bos(u,0,1)*d(-3)*bos(u,0,1)*der(2)
+d(-3)*bos(u,0,1)*d(-3)*fer(u,2,1)
+d(-3)*bos(u,0,1)*d(-3)*fer(u,1,0)*bos(u,0,0)
+d(-3)*bos(u,0,0)*d(-3)*bos(u,3,0)*bos(u,0,0)*der(2)
+d(-3)*bos(u,0,0)*d(-3)*fer(u,2,0)*bos(u,3,0)
+d(-3)*bos(u,0,0)*d(-3)*fer(u,1,0)*bos(u,0,1)
+d(-3)*bos(u,0,0)*d(-3)*fer(u,1,0)*bos(u,0,0)*d(1)
+3*d(-3)*fer(u,2,1)*bos(u,0,0)
+3*d(-3)*fer(u,2,0)*bos(u,0,1)
+2*d(-3)*fer(u,2,0)*bos(u,0,0)*d(1)
+d(-3)*fer(u,2,0)*d(-3)*bos(u,3,0)*bos(u,0,0)
-d(-3)*fer(u,2,0)*d(-3)*bos(u,0,2)
-d(-3)*fer(u,2,0)*d(-3)*bos(u,0,1)*d(1))
+10*fer(u,2,0)*fer(u,1,1)*bos(u,0,0)
+10*fer(u,2,0)*fer(u,1,0)*bos(u,0,1)
+20*fer(u,2,0)*fer(u,1,0)*bos(u,0,0)*d(1)
+fer(u,2,0)*fer(u,1,0)*(
-3*d(-3)*fer(u,2,0)*fer(u,1,0)
+2*d(-3)*fer(u,1,1)*d(-3)*bos(u,0,0)*der(2)
+2*d(-3)*fer(u,1,1)*d(-3)*fer(u,2,0)
+3*d(-3)*fer(u,1,0)*bos(u,0,0)*der(2))
+fer(u,2,0)*(
-3*d(-3)*bos(u,3,1)*bos(u,0,0)*der(2)
+d(-3)*bos(u,3,1)*d(-3)*bos(u,0,1)*der(2)
+d(-3)*bos(u,3,1)*d(-3)*fer(u,2,1)
+d(-3)*bos(u,3,1)*d(-3)*fer(u,1,0)*bos(u,0,0)
-2*d(-3)*bos(u,3,0)*bos(u,0,1)*der(2)
-2*d(-3)*bos(u,3,0)*d(-3)*bos(u,3,0)*bos(u,0,0)*der(2)
+d(-3)*bos(u,3,0)*d(-3)*bos(u,0,2)*der(2)
3
-d(-3)*bos(u,3,0)*d(-3)*bos(u,0,0) *der(2)
+d(-3)*bos(u,3,0)*d(-3)*fer(u,2,2)
-2*d(-3)*bos(u,3,0)*d(-3)*fer(u,2,0)*bos(u,3,0)
2
-2*d(-3)*bos(u,3,0)*d(-3)*fer(u,2,0)*bos(u,0,0)
+2*d(-3)*bos(u,3,0)*d(-3)*fer(u,1,1)*bos(u,0,0)
+d(-3)*bos(u,3,0)*d(-3)*fer(u,1,0)*bos(u,0,1)
+d(-3)*bos(u,0,3)*der(2)
2
-d(-3)*bos(u,0,1) *d(-3)*bos(u,0,0)*der(2)
2
-d(-3)*bos(u,0,1) *d(-3)*fer(u,2,0)
2
-3*d(-3)*bos(u,0,1)*bos(u,0,0) *der(2)
+d(-3)*bos(u,0,1)*bos(u,0,0)*d(-3)*bos(u,0,1)*der(2)
+d(-3)*bos(u,0,1)*bos(u,0,0)*d(-3)*fer(u,2,1)
+d(-3)*bos(u,0,1)*bos(u,0,0)*d(-3)*fer(u,1,0)*bos(u,0,0)
+d(-3)*fer(u,2,3)
-2*d(-3)*fer(u,2,1)*bos(u,3,0)
2
-3*d(-3)*fer(u,2,1)*bos(u,0,0)
-d(-3)*fer(u,2,1)*fer(u,2,0)*d(-3)*bos(u,0,0)*der(2)
-d(-3)*fer(u,2,1)*fer(u,2,0)*d(-3)*fer(u,2,0)
+3*d(-3)*fer(u,2,1)*d(-3)*bos(u,0,1)*bos(u,0,0)
-2*d(-3)*fer(u,2,1)*d(-3)*fer(u,2,0)*bos(u,0,0)*der(2)
-3*d(-3)*fer(u,2,0)*bos(u,3,1)
-3*d(-3)*fer(u,2,0)*bos(u,0,1)*bos(u,0,0)
+d(-3)*fer(u,2,0)*fer(u,1,0)*bos(u,0,0)*d(-3)*bos(u,0,0)*der(2)
+d(-3)*fer(u,2,0)*fer(u,1,0)*bos(u,0,0)*d(-3)*fer(u,2,0)
+3*d(-3)*fer(u,1,2)*bos(u,0,0)
+3*d(-3)*fer(u,1,1)*bos(u,0,1)
+d(-3)*fer(u,1,1)*d(-3)*fer(u,2,0)*fer(u,1,0)
-d(-3)*fer(u,1,1)*d(-3)*fer(u,1,0)*bos(u,0,0)*der(2)
-2*d(-3)*fer(u,1,0)*bos(u,3,0)*bos(u,0,0)
+d(-3)*fer(u,1,0)*bos(u,0,2)
3
-d(-3)*fer(u,1,0)*bos(u,0,0) )
-3*fer(u,1,2)*bos(u,0,0)*(d(-3)*bos(u,0,0)*der(2)
+d(-3)*fer(u,2,0))
-3*fer(u,1,1)*bos(u,0,1)*(d(-3)*bos(u,0,0)*der(2)
+d(-3)*fer(u,2,0))
2
-10*fer(u,1,1)*bos(u,0,0) *der(2)
+3*fer(u,1,1)*bos(u,0,0)*(d(-3)*bos(u,3,0)*d(-3)*bos(u,0,0)*der(2)
+d(-3)*bos(u,3,0)*d(-3)*fer(u,2,0)
+d(-3)*bos(u,0,1)*der(2)
+d(-3)*fer(u,2,1)
+d(-3)*fer(u,1,0)*bos(u,0,0))
+fer(u,1,0)*bos(u,3,0)*bos(u,0,0)*(d(-3)*bos(u,0,0)*der(2)
+d(-3)*fer(u,2,0))
-10*fer(u,1,0)*bos(u,0,1)*bos(u,0,0)*der(2)
+fer(u,1,0)*bos(u,0,1)*(d(-3)*bos(u,3,0)*d(-3)*bos(u,0,0)*der(2)
+d(-3)*bos(u,3,0)*d(-3)*fer(u,2,0)
+d(-3)*bos(u,0,1)*der(2)
+d(-3)*fer(u,2,1)
+d(-3)*fer(u,1,0)*bos(u,0,0))
2
-10*fer(u,1,0)*bos(u,0,0) *d(1)*der(2)
+2*fer(u,1,0)*bos(u,0,0)*(d(-3)*bos(u,3,1)*d(-3)*bos(u,0,0)*der(2)
+d(-3)*bos(u,3,1)*d(-3)*fer(u,2,0)
+d(-3)*bos(u,3,0)*bos(u,0,0)*der(2)
+d(-3)*fer(u,2,0)*bos(u,3,0)
+d(-3)*fer(u,1,1)*d(-3)*bos(u,0,1)
+d(-3)*fer(u,1,1)*d(-3)*bos(u,0,0)*d(1)
+d(-3)*fer(u,1,0)*bos(u,0,1)
+d(-3)*fer(u,1,0)*bos(u,0,0)*d(1))
5
+d(1)
+del(1)*bos(u,3,2)*d(-3)*bos(u,0,0)*der(2)
+del(1)*bos(u,3,2)*d(-3)*fer(u,2,0)
+4*del(1)*bos(u,3,1)*bos(u,0,0)*der(2)
-2*del(1)*bos(u,3,1)*d(-3)*bos(u,3,0)*d(-3)*bos(u,0,0)*der(2)
-2*del(1)*bos(u,3,1)*d(-3)*bos(u,3,0)*d(-3)*fer(u,2,0)
-del(1)*bos(u,3,1)*d(-3)*bos(u,0,1)*der(2)
-del(1)*bos(u,3,1)*d(-3)*fer(u,2,1)
-del(1)*bos(u,3,1)*d(-3)*fer(u,1,0)*bos(u,0,0)
2
-2*del(1)*bos(u,3,0) *d(-3)*bos(u,0,0)*der(2)
2
-2*del(1)*bos(u,3,0) *d(-3)*fer(u,2,0)
+2*del(1)*bos(u,3,0)*bos(u,0,1)*der(2)
2
-del(1)*bos(u,3,0)*bos(u,0,0) *d(-3)*bos(u,0,0)*der(2)
2
-del(1)*bos(u,3,0)*bos(u,0,0) *d(-3)*fer(u,2,0)
+6*del(1)*bos(u,3,0)*bos(u,0,0)*d(1)*der(2)
-2*del(1)*bos(u,3,0)*d(-3)*bos(u,3,0)*bos(u,0,0)*der(2)
+del(1)*bos(u,3,0)*d(-3)*bos(u,0,2)*der(2)
3
-del(1)*bos(u,3,0)*d(-3)*bos(u,0,0) *der(2)
+del(1)*bos(u,3,0)*d(-3)*fer(u,2,2)
-2*del(1)*bos(u,3,0)*d(-3)*fer(u,2,0)*bos(u,3,0)
2
-2*del(1)*bos(u,3,0)*d(-3)*fer(u,2,0)*bos(u,0,0)
+2*del(1)*bos(u,3,0)*d(-3)*fer(u,1,1)*bos(u,0,0)
+del(1)*bos(u,3,0)*d(-3)*fer(u,1,0)*bos(u,0,1)
-del(1)*bos(u,0,3)*der(2)
+2*del(1)*bos(u,0,2)*bos(u,0,0)*d(-3)*bos(u,0,0)*der(2)
+2*del(1)*bos(u,0,2)*bos(u,0,0)*d(-3)*fer(u,2,0)
-4*del(1)*bos(u,0,2)*d(1)*der(2)
2
+del(1)*bos(u,0,1) *d(-3)*bos(u,0,0)*der(2)
2
+del(1)*bos(u,0,1) *d(-3)*fer(u,2,0)
2
+10*del(1)*bos(u,0,1)*bos(u,0,0) *der(2)
-2*del(1)*bos(u,0,1)*bos(u,0,0)*d(-3)*bos(u,3,0)*d(-3)*bos(u,0,0)*der(2)
-2*del(1)*bos(u,0,1)*bos(u,0,0)*d(-3)*bos(u,3,0)*d(-3)*fer(u,2,0)
-del(1)*bos(u,0,1)*bos(u,0,0)*d(-3)*bos(u,0,1)*der(2)
-del(1)*bos(u,0,1)*bos(u,0,0)*d(-3)*fer(u,2,1)
-del(1)*bos(u,0,1)*bos(u,0,0)*d(-3)*fer(u,1,0)*bos(u,0,0)
2
-6*del(1)*bos(u,0,1)*d(1) *der(2)
3
+4*del(1)*bos(u,0,0) *d(1)*der(2)
3
-4*del(1)*bos(u,0,0)*d(1) *der(2)
-del(1)*fer(u,2,3)
-4*del(1)*fer(u,2,2)*d(1)
+2*del(1)*fer(u,2,1)*bos(u,3,0)
2
+4*del(1)*fer(u,2,1)*bos(u,0,0)
-del(1)*fer(u,2,1)*fer(u,2,0)*d(-3)*bos(u,0,0)*der(2)
-del(1)*fer(u,2,1)*fer(u,2,0)*d(-3)*fer(u,2,0)
2
-6*del(1)*fer(u,2,1)*d(1)
-del(1)*fer(u,2,1)*d(-3)*bos(u,0,0)*d(-3)*fer(u,2,0)*fer(u,1,0)
+del(1)*fer(u,2,1)*d(-3)*bos(u,0,0)*d(-3)*fer(u,1,0)*bos(u,0,0)*der(2)
-del(1)*fer(u,2,1)*d(-3)*fer(u,2,0)*d(-3)*bos(u,0,1)*der(2)
-del(1)*fer(u,2,1)*d(-3)*fer(u,2,0)*d(-3)*fer(u,2,1)
-del(1)*fer(u,2,1)*d(-3)*fer(u,2,0)*d(-3)*fer(u,1,0)*bos(u,0,0)
+4*del(1)*fer(u,2,0)*bos(u,3,1)
+6*del(1)*fer(u,2,0)*bos(u,3,0)*d(1)
+12*del(1)*fer(u,2,0)*bos(u,0,1)*bos(u,0,0)
2
+8*del(1)*fer(u,2,0)*bos(u,0,0) *d(1)
-del(1)*fer(u,2,0)*bos(u,0,0)*d(-3)*fer(u,2,0)*fer(u,1,0)
+del(1)*fer(u,2,0)*bos(u,0,0)*d(-3)*fer(u,1,0)*bos(u,0,0)*der(2)
+del(1)*fer(u,2,0)*fer(u,1,0)*bos(u,0,0)*d(-3)*bos(u,0,0)*der(2)
+del(1)*fer(u,2,0)*fer(u,1,0)*bos(u,0,0)*d(-3)*fer(u,2,0)
3
-4*del(1)*fer(u,2,0)*d(1)
+del(1)*fer(u,1,2)*bos(u,0,0)
+3*del(1)*fer(u,1,1)*bos(u,0,1)
+4*del(1)*fer(u,1,1)*bos(u,0,0)*d(1)
-2*del(1)*fer(u,1,1)*fer(u,1,0)*d(-3)*bos(u,0,0)*der(2)
-2*del(1)*fer(u,1,1)*fer(u,1,0)*d(-3)*fer(u,2,0)
-del(1)*fer(u,1,1)*d(-3)*fer(u,2,0)*fer(u,1,0)
+2*del(1)*fer(u,1,1)*d(-3)*fer(u,1,1)*d(-3)*bos(u,0,0)*der(2)
+2*del(1)*fer(u,1,1)*d(-3)*fer(u,1,1)*d(-3)*fer(u,2,0)
+del(1)*fer(u,1,1)*d(-3)*fer(u,1,0)*bos(u,0,0)*der(2)
-4*del(1)*fer(u,1,0)*bos(u,3,0)*bos(u,0,0)
+3*del(1)*fer(u,1,0)*bos(u,0,2)
+8*del(1)*fer(u,1,0)*bos(u,0,1)*d(1)
3
-2*del(1)*fer(u,1,0)*bos(u,0,0)
2
+6*del(1)*fer(u,1,0)*bos(u,0,0)*d(1)
-del(1)*d(-3)*bos(u,3,1)*bos(u,3,0)*d(-3)*bos(u,0,0)*der(2)
-del(1)*d(-3)*bos(u,3,1)*bos(u,3,0)*d(-3)*fer(u,2,0)
2
-2*del(1)*d(-3)*bos(u,3,1)*bos(u,0,0) *d(-3)*bos(u,0,0)*der(2)
2
-2*del(1)*d(-3)*bos(u,3,1)*bos(u,0,0) *d(-3)*fer(u,2,0)
2
-6*del(1)*d(-3)*bos(u,3,0) *bos(u,0,0)*der(2)
2
+2*del(1)*d(-3)*bos(u,3,0) *d(-3)*bos(u,3,0)*d(-3)*bos(u,0,0)*der(2)
2
+2*del(1)*d(-3)*bos(u,3,0) *d(-3)*bos(u,3,0)*d(-3)*fer(u,2,0)
2
+2*del(1)*d(-3)*bos(u,3,0) *d(-3)*bos(u,0,1)*der(2)
2
+2*del(1)*d(-3)*bos(u,3,0) *d(-3)*fer(u,2,1)
2
+2*del(1)*d(-3)*bos(u,3,0) *d(-3)*fer(u,1,0)*bos(u,0,0)
+2*del(1)*d(-3)*bos(u,3,0)*bos(u,0,2)*der(2)
-4*del(1)*d(-3)*bos(u,3,0)*bos(u,0,1)*bos(u,0,0)*d(-3)*bos(u,0,0)*der(2)
-4*del(1)*d(-3)*bos(u,3,0)*bos(u,0,1)*bos(u,0,0)*d(-3)*fer(u,2,0)
+2*del(1)*d(-3)*bos(u,3,0)*bos(u,0,1)*d(1)*der(2)
3
-8*del(1)*d(-3)*bos(u,3,0)*bos(u,0,0) *der(2)
2
+2*del(1)*d(-3)*bos(u,3,0)*bos(u,0,0) *d(-3)*bos(u,3,0)*d(-3)*bos(u,0,0)
*der(2)
2
+2*del(1)*d(-3)*bos(u,3,0)*bos(u,0,0) *d(-3)*bos(u,3,0)*d(-3)*fer(u,2,0)
2
+2*del(1)*d(-3)*bos(u,3,0)*bos(u,0,0) *d(-3)*bos(u,0,1)*der(2)
2
+2*del(1)*d(-3)*bos(u,3,0)*bos(u,0,0) *d(-3)*fer(u,2,1)
2
+2*del(1)*d(-3)*bos(u,3,0)*bos(u,0,0) *d(-3)*fer(u,1,0)*bos(u,0,0)
2
+4*del(1)*d(-3)*bos(u,3,0)*bos(u,0,0)*d(1) *der(2)
+3*del(1)*d(-3)*bos(u,3,0)*d(-3)*bos(u,3,1)*bos(u,0,0)*der(2)
-del(1)*d(-3)*bos(u,3,0)*d(-3)*bos(u,3,1)*d(-3)*bos(u,0,1)*der(2)
-del(1)*d(-3)*bos(u,3,0)*d(-3)*bos(u,3,1)*d(-3)*fer(u,2,1)
-del(1)*d(-3)*bos(u,3,0)*d(-3)*bos(u,3,1)*d(-3)*fer(u,1,0)*bos(u,0,0)
+2*del(1)*d(-3)*bos(u,3,0)*d(-3)*bos(u,3,0)*bos(u,0,1)*der(2)
+2*del(1)*d(-3)*bos(u,3,0)*d(-3)*bos(u,3,0)*d(-3)*bos(u,3,0)*bos(u,0,0)
*der(2)
-del(1)*d(-3)*bos(u,3,0)*d(-3)*bos(u,3,0)*d(-3)*bos(u,0,2)*der(2)
3
+del(1)*d(-3)*bos(u,3,0)*d(-3)*bos(u,3,0)*d(-3)*bos(u,0,0) *der(2)
-del(1)*d(-3)*bos(u,3,0)*d(-3)*bos(u,3,0)*d(-3)*fer(u,2,2)
+2*del(1)*d(-3)*bos(u,3,0)*d(-3)*bos(u,3,0)*d(-3)*fer(u,2,0)*bos(u,3,0)
2
+2*del(1)*d(-3)*bos(u,3,0)*d(-3)*bos(u,3,0)*d(-3)*fer(u,2,0)*bos(u,0,0)
-2*del(1)*d(-3)*bos(u,3,0)*d(-3)*bos(u,3,0)*d(-3)*fer(u,1,1)*bos(u,0,0)
-del(1)*d(-3)*bos(u,3,0)*d(-3)*bos(u,3,0)*d(-3)*fer(u,1,0)*bos(u,0,1)
-del(1)*d(-3)*bos(u,3,0)*d(-3)*bos(u,0,3)*der(2)
2
+del(1)*d(-3)*bos(u,3,0)*d(-3)*bos(u,0,1) *d(-3)*bos(u,0,0)*der(2)
2
+del(1)*d(-3)*bos(u,3,0)*d(-3)*bos(u,0,1) *d(-3)*fer(u,2,0)
2
+3*del(1)*d(-3)*bos(u,3,0)*d(-3)*bos(u,0,1)*bos(u,0,0) *der(2)
-del(1)*d(-3)*bos(u,3,0)*d(-3)*bos(u,0,1)*bos(u,0,0)*d(-3)*bos(u,0,1)
*der(2)
-del(1)*d(-3)*bos(u,3,0)*d(-3)*bos(u,0,1)*bos(u,0,0)*d(-3)*fer(u,2,1)
-del(1)*d(-3)*bos(u,3,0)*d(-3)*bos(u,0,1)*bos(u,0,0)*d(-3)*fer(u,1,0)
*bos(u,0,0)
-del(1)*d(-3)*bos(u,3,0)*d(-3)*fer(u,2,3)
+2*del(1)*d(-3)*bos(u,3,0)*d(-3)*fer(u,2,1)*bos(u,3,0)
2
+3*del(1)*d(-3)*bos(u,3,0)*d(-3)*fer(u,2,1)*bos(u,0,0)
+del(1)*d(-3)*bos(u,3,0)*d(-3)*fer(u,2,1)*fer(u,2,0)*d(-3)*bos(u,0,0)
*der(2)
+del(1)*d(-3)*bos(u,3,0)*d(-3)*fer(u,2,1)*fer(u,2,0)*d(-3)*fer(u,2,0)
-3*del(1)*d(-3)*bos(u,3,0)*d(-3)*fer(u,2,1)*d(-3)*bos(u,0,1)*bos(u,0,0)
+2*del(1)*d(-3)*bos(u,3,0)*d(-3)*fer(u,2,1)*d(-3)*fer(u,2,0)*bos(u,0,0)
*der(2)
+3*del(1)*d(-3)*bos(u,3,0)*d(-3)*fer(u,2,0)*bos(u,3,1)
+3*del(1)*d(-3)*bos(u,3,0)*d(-3)*fer(u,2,0)*bos(u,0,1)*bos(u,0,0)
-del(1)*d(-3)*bos(u,3,0)*d(-3)*fer(u,2,0)*fer(u,1,0)*bos(u,0,0)*d(-3)
*bos(u,0,0)*der(2)
-del(1)*d(-3)*bos(u,3,0)*d(-3)*fer(u,2,0)*fer(u,1,0)*bos(u,0,0)*d(-3)
*fer(u,2,0)
-3*del(1)*d(-3)*bos(u,3,0)*d(-3)*fer(u,1,2)*bos(u,0,0)
-3*del(1)*d(-3)*bos(u,3,0)*d(-3)*fer(u,1,1)*bos(u,0,1)
-del(1)*d(-3)*bos(u,3,0)*d(-3)*fer(u,1,1)*d(-3)*fer(u,2,0)*fer(u,1,0)
+del(1)*d(-3)*bos(u,3,0)*d(-3)*fer(u,1,1)*d(-3)*fer(u,1,0)*bos(u,0,0)
*der(2)
+2*del(1)*d(-3)*bos(u,3,0)*d(-3)*fer(u,1,0)*bos(u,3,0)*bos(u,0,0)
-del(1)*d(-3)*bos(u,3,0)*d(-3)*fer(u,1,0)*bos(u,0,2)
3
+del(1)*d(-3)*bos(u,3,0)*d(-3)*fer(u,1,0)*bos(u,0,0)
+del(1)*d(-3)*bos(u,0,3)*bos(u,0,0)*d(-3)*bos(u,0,0)*der(2)
+del(1)*d(-3)*bos(u,0,3)*bos(u,0,0)*d(-3)*fer(u,2,0)
2
+8*del(1)*d(-3)*bos(u,0,2)*bos(u,0,0) *der(2)
-del(1)*d(-3)*bos(u,0,2)*bos(u,0,0)*d(-3)*bos(u,3,0)*d(-3)*bos(u,0,0)
*der(2)
-del(1)*d(-3)*bos(u,0,2)*bos(u,0,0)*d(-3)*bos(u,3,0)*d(-3)*fer(u,2,0)
-del(1)*d(-3)*bos(u,0,2)*bos(u,0,0)*d(-3)*bos(u,0,1)*der(2)
-del(1)*d(-3)*bos(u,0,2)*bos(u,0,0)*d(-3)*fer(u,2,1)
-del(1)*d(-3)*bos(u,0,2)*bos(u,0,0)*d(-3)*fer(u,1,0)*bos(u,0,0)
2
+5*del(1)*d(-3)*bos(u,0,1) *bos(u,0,0)*der(2)
3
-del(1)*d(-3)*bos(u,0,1)*bos(u,0,0) *d(-3)*bos(u,0,0)*der(2)
3
-del(1)*d(-3)*bos(u,0,1)*bos(u,0,0) *d(-3)*fer(u,2,0)
2
+18*del(1)*d(-3)*bos(u,0,1)*bos(u,0,0) *d(1)*der(2)
-del(1)*d(-3)*bos(u,0,1)*bos(u,0,0)*d(-3)*bos(u,3,1)*d(-3)*bos(u,0,0)
*der(2)
-del(1)*d(-3)*bos(u,0,1)*bos(u,0,0)*d(-3)*bos(u,3,1)*d(-3)*fer(u,2,0)
-3*del(1)*d(-3)*bos(u,0,1)*bos(u,0,0)*d(-3)*bos(u,3,0)*bos(u,0,0)*der(2)
+del(1)*d(-3)*bos(u,0,1)*bos(u,0,0)*d(-3)*bos(u,3,0)*d(-3)*bos(u,0,1)
*der(2)
+del(1)*d(-3)*bos(u,0,1)*bos(u,0,0)*d(-3)*bos(u,3,0)*d(-3)*fer(u,2,1)
+del(1)*d(-3)*bos(u,0,1)*bos(u,0,0)*d(-3)*bos(u,3,0)*d(-3)*fer(u,1,0)
*bos(u,0,0)
+del(1)*d(-3)*bos(u,0,1)*bos(u,0,0)*d(-3)*bos(u,0,2)*der(2)
-del(1)*d(-3)*bos(u,0,1)*bos(u,0,0)*d(-3)*bos(u,0,1)*bos(u,0,0)*d(-3)
*bos(u,0,0)*der(2)
-del(1)*d(-3)*bos(u,0,1)*bos(u,0,0)*d(-3)*bos(u,0,1)*bos(u,0,0)*d(-3)
*fer(u,2,0)
3
-del(1)*d(-3)*bos(u,0,1)*bos(u,0,0)*d(-3)*bos(u,0,0) *der(2)
+del(1)*d(-3)*bos(u,0,1)*bos(u,0,0)*d(-3)*fer(u,2,2)
-3*del(1)*d(-3)*bos(u,0,1)*bos(u,0,0)*d(-3)*fer(u,2,0)*bos(u,3,0)
2
-2*del(1)*d(-3)*bos(u,0,1)*bos(u,0,0)*d(-3)*fer(u,2,0)*bos(u,0,0)
+2*del(1)*d(-3)*bos(u,0,1)*bos(u,0,0)*d(-3)*fer(u,1,1)*bos(u,0,0)
-del(1)*d(-3)*bos(u,0,1)*bos(u,0,0)*d(-3)*fer(u,1,1)*d(-3)*bos(u,0,1)
-del(1)*d(-3)*bos(u,0,1)*bos(u,0,0)*d(-3)*fer(u,1,1)*d(-3)*bos(u,0,0)
*d(1)
-del(1)*d(-3)*bos(u,0,1)*bos(u,0,0)*d(-3)*fer(u,1,0)*bos(u,0,0)*d(1)
+del(1)*d(-3)*bos(u,0,1)*bos(u,0,0)*d(-3)*fer(u,1,0)*d(-3)*fer(u,2,0)
*fer(u,1,0)
-del(1)*d(-3)*bos(u,0,1)*bos(u,0,0)*d(-3)*fer(u,1,0)*d(-3)*fer(u,1,0)
*bos(u,0,0)*der(2)
5
-del(1)*d(-3)*bos(u,0,0) *der(2)
3 2
+6*del(1)*d(-3)*bos(u,0,0) *d(1) *der(2)
4
-del(1)*d(-3)*bos(u,0,0)*d(1) *der(2)
+2*del(1)*d(-3)*fer(u,2,2)*bos(u,3,0)
2
+4*del(1)*d(-3)*fer(u,2,2)*bos(u,0,0)
-del(1)*d(-3)*fer(u,2,2)*bos(u,0,0)*d(-3)*bos(u,0,1)
-del(1)*d(-3)*fer(u,2,2)*bos(u,0,0)*d(-3)*bos(u,0,0)*d(1)
-del(1)*d(-3)*fer(u,2,2)*fer(u,2,0)*d(-3)*bos(u,0,0)*der(2)
-del(1)*d(-3)*fer(u,2,2)*fer(u,2,0)*d(-3)*fer(u,2,0)
+2*del(1)*d(-3)*fer(u,2,1)*bos(u,3,0)*d(1)
+4*del(1)*d(-3)*fer(u,2,1)*bos(u,0,1)*bos(u,0,0)
2
+8*del(1)*d(-3)*fer(u,2,1)*bos(u,0,0) *d(1)
-del(1)*d(-3)*fer(u,2,1)*bos(u,0,0)*d(-3)*bos(u,3,0)*bos(u,0,0)
+del(1)*d(-3)*fer(u,2,1)*bos(u,0,0)*d(-3)*bos(u,3,0)*d(-3)*bos(u,0,1)
+del(1)*d(-3)*fer(u,2,1)*bos(u,0,0)*d(-3)*bos(u,3,0)*d(-3)*bos(u,0,0)
*d(1)
+del(1)*d(-3)*fer(u,2,1)*bos(u,0,0)*d(-3)*bos(u,0,2)
+del(1)*d(-3)*fer(u,2,1)*bos(u,0,0)*d(-3)*bos(u,0,1)*d(1)
-4*del(1)*d(-3)*fer(u,2,1)*fer(u,2,0)*bos(u,0,0)*der(2)
+del(1)*d(-3)*fer(u,2,1)*fer(u,2,0)*d(-3)*bos(u,3,0)*d(-3)*bos(u,0,0)
*der(2)
+del(1)*d(-3)*fer(u,2,1)*fer(u,2,0)*d(-3)*bos(u,3,0)*d(-3)*fer(u,2,0)
+del(1)*d(-3)*fer(u,2,1)*fer(u,2,0)*d(-3)*bos(u,0,1)*der(2)
+del(1)*d(-3)*fer(u,2,1)*fer(u,2,0)*d(-3)*fer(u,2,1)
+del(1)*d(-3)*fer(u,2,1)*fer(u,2,0)*d(-3)*fer(u,1,0)*bos(u,0,0)
+2*del(1)*d(-3)*fer(u,2,1)*fer(u,1,0)*bos(u,0,0)*d(-3)*bos(u,0,0)*der(2)
+2*del(1)*d(-3)*fer(u,2,1)*fer(u,1,0)*bos(u,0,0)*d(-3)*fer(u,2,0)
2
-6*del(1)*d(-3)*fer(u,2,0)*bos(u,3,0)
2
-16*del(1)*d(-3)*fer(u,2,0)*bos(u,3,0)*bos(u,0,0)
+2*del(1)*d(-3)*fer(u,2,0)*bos(u,3,0)*bos(u,0,0)*d(-3)*bos(u,0,1)
+2*del(1)*d(-3)*fer(u,2,0)*bos(u,3,0)*bos(u,0,0)*d(-3)*bos(u,0,0)*d(1)
2
+4*del(1)*d(-3)*fer(u,2,0)*bos(u,3,0)*d(1)
+3*del(1)*d(-3)*fer(u,2,0)*bos(u,3,0)*d(-3)*bos(u,0,1)*bos(u,0,0)
+del(1)*d(-3)*fer(u,2,0)*bos(u,3,0)*d(-3)*bos(u,0,0)*d(-3)*fer(u,2,0)
*fer(u,1,0)
-del(1)*d(-3)*fer(u,2,0)*bos(u,3,0)*d(-3)*bos(u,0,0)*d(-3)*fer(u,1,0)
*bos(u,0,0)*der(2)
-2*del(1)*d(-3)*fer(u,2,0)*bos(u,3,0)*d(-3)*fer(u,2,0)*bos(u,0,0)*der(2)
+del(1)*d(-3)*fer(u,2,0)*bos(u,3,0)*d(-3)*fer(u,2,0)*d(-3)*bos(u,0,1)
*der(2)
+del(1)*d(-3)*fer(u,2,0)*bos(u,3,0)*d(-3)*fer(u,2,0)*d(-3)*fer(u,2,1)
+del(1)*d(-3)*fer(u,2,0)*bos(u,3,0)*d(-3)*fer(u,2,0)*d(-3)*fer(u,1,0)
*bos(u,0,0)
+10*del(1)*d(-3)*fer(u,2,0)*bos(u,0,2)*bos(u,0,0)
2
+3*del(1)*d(-3)*fer(u,2,0)*bos(u,0,1)
+22*del(1)*d(-3)*fer(u,2,0)*bos(u,0,1)*bos(u,0,0)*d(1)
-del(1)*d(-3)*fer(u,2,0)*bos(u,0,1)*d(-3)*fer(u,2,0)*fer(u,1,0)
+del(1)*d(-3)*fer(u,2,0)*bos(u,0,1)*d(-3)*fer(u,1,1)*d(-3)*bos(u,0,0)
*der(2)
+del(1)*d(-3)*fer(u,2,0)*bos(u,0,1)*d(-3)*fer(u,1,1)*d(-3)*fer(u,2,0)
+del(1)*d(-3)*fer(u,2,0)*bos(u,0,1)*d(-3)*fer(u,1,0)*bos(u,0,0)*der(2)
4
-5*del(1)*d(-3)*fer(u,2,0)*bos(u,0,0)
3
+del(1)*d(-3)*fer(u,2,0)*bos(u,0,0) *d(-3)*bos(u,0,1)
3
+del(1)*d(-3)*fer(u,2,0)*bos(u,0,0) *d(-3)*bos(u,0,0)*d(1)
2 2
+12*del(1)*d(-3)*fer(u,2,0)*bos(u,0,0) *d(1)
+2*del(1)*d(-3)*fer(u,2,0)*bos(u,0,0)*d(-3)*bos(u,3,1)*bos(u,0,0)
+3*del(1)*d(-3)*fer(u,2,0)*bos(u,0,0)*d(-3)*bos(u,3,0)*bos(u,0,1)
+2*del(1)*d(-3)*fer(u,2,0)*bos(u,0,0)*d(-3)*bos(u,3,0)*bos(u,0,0)*d(1)
+del(1)*d(-3)*fer(u,2,0)*bos(u,0,0)*d(-3)*bos(u,3,0)*d(-3)*bos(u,3,0)
*bos(u,0,0)
-del(1)*d(-3)*fer(u,2,0)*bos(u,0,0)*d(-3)*bos(u,3,0)*d(-3)*bos(u,0,2)
-del(1)*d(-3)*fer(u,2,0)*bos(u,0,0)*d(-3)*bos(u,3,0)*d(-3)*bos(u,0,1)
*d(1)
-del(1)*d(-3)*fer(u,2,0)*bos(u,0,0)*d(-3)*bos(u,0,3)
-del(1)*d(-3)*fer(u,2,0)*bos(u,0,0)*d(-3)*bos(u,0,2)*d(1)
2
+2*del(1)*d(-3)*fer(u,2,0)*bos(u,0,0)*d(-3)*bos(u,0,1)*bos(u,0,0)
+del(1)*d(-3)*fer(u,2,0)*bos(u,0,0)*d(-3)*bos(u,0,1)*bos(u,0,0)*d(-3)
*bos(u,0,1)
+del(1)*d(-3)*fer(u,2,0)*bos(u,0,0)*d(-3)*bos(u,0,1)*bos(u,0,0)*d(-3)
*bos(u,0,0)*d(1)
3
+del(1)*d(-3)*fer(u,2,0)*bos(u,0,0)*d(-3)*bos(u,0,0) *d(1)
+del(1)*d(-3)*fer(u,2,0)*bos(u,0,0)*d(-3)*fer(u,2,1)*bos(u,0,0)*d(-3)
*bos(u,0,0)*der(2)
+del(1)*d(-3)*fer(u,2,0)*bos(u,0,0)*d(-3)*fer(u,2,1)*bos(u,0,0)*d(-3)
*fer(u,2,0)
-del(1)*d(-3)*fer(u,2,0)*bos(u,0,0)*d(-3)*fer(u,2,1)*fer(u,1,0)
+del(1)*d(-3)*fer(u,2,0)*bos(u,0,0)*d(-3)*fer(u,2,0)*bos(u,0,1)*d(-3)
*bos(u,0,0)*der(2)
+del(1)*d(-3)*fer(u,2,0)*bos(u,0,0)*d(-3)*fer(u,2,0)*bos(u,0,1)*d(-3)
*fer(u,2,0)
2
+del(1)*d(-3)*fer(u,2,0)*bos(u,0,0)*d(-3)*fer(u,2,0)*bos(u,0,0) *der(2)
+del(1)*d(-3)*fer(u,2,0)*bos(u,0,0)*d(-3)*fer(u,1,1)*d(-3)*bos(u,0,1)
*der(2)
+del(1)*d(-3)*fer(u,2,0)*bos(u,0,0)*d(-3)*fer(u,1,1)*d(-3)*fer(u,2,1)
+del(1)*d(-3)*fer(u,2,0)*bos(u,0,0)*d(-3)*fer(u,1,1)*d(-3)*fer(u,1,0)
*bos(u,0,0)
+del(1)*d(-3)*fer(u,2,0)*bos(u,0,0)*d(-3)*fer(u,1,0)*bos(u,0,1)*der(2)
+del(1)*d(-3)*fer(u,2,0)*bos(u,0,0)*d(-3)*fer(u,1,0)*d(-3)*bos(u,3,0)
*bos(u,0,0)*der(2)
+del(1)*d(-3)*fer(u,2,0)*bos(u,0,0)*d(-3)*fer(u,1,0)*d(-3)*fer(u,2,0)
*bos(u,3,0)
+del(1)*d(-3)*fer(u,2,0)*bos(u,0,0)*d(-3)*fer(u,1,0)*d(-3)*fer(u,1,0)
*bos(u,0,1)
+del(1)*d(-3)*fer(u,2,0)*bos(u,0,0)*d(-3)*fer(u,1,0)*d(-3)*fer(u,1,0)
*bos(u,0,0)*d(1)
+2*del(1)*d(-3)*fer(u,2,0)*fer(u,1,1)*bos(u,0,0)*d(-3)*bos(u,0,0)*der(2)
+2*del(1)*d(-3)*fer(u,2,0)*fer(u,1,1)*bos(u,0,0)*d(-3)*fer(u,2,0)
-4*del(1)*d(-3)*fer(u,2,0)*fer(u,1,1)*fer(u,1,0)
+2*del(1)*d(-3)*fer(u,2,0)*fer(u,1,0)*bos(u,0,1)*d(-3)*bos(u,0,0)*der(2)
+2*del(1)*d(-3)*fer(u,2,0)*fer(u,1,0)*bos(u,0,1)*d(-3)*fer(u,2,0)
2
+8*del(1)*d(-3)*fer(u,2,0)*fer(u,1,0)*bos(u,0,0) *der(2)
-4*del(1)*d(-3)*fer(u,2,0)*fer(u,1,0)*bos(u,0,0)*d(-3)*bos(u,3,0)*d(-3)
*bos(u,0,0)*der(2)
-4*del(1)*d(-3)*fer(u,2,0)*fer(u,1,0)*bos(u,0,0)*d(-3)*bos(u,3,0)*d(-3)
*fer(u,2,0)
-4*del(1)*d(-3)*fer(u,2,0)*fer(u,1,0)*bos(u,0,0)*d(-3)*bos(u,0,1)*der(2)
-4*del(1)*d(-3)*fer(u,2,0)*fer(u,1,0)*bos(u,0,0)*d(-3)*fer(u,2,1)
-4*del(1)*d(-3)*fer(u,2,0)*fer(u,1,0)*bos(u,0,0)*d(-3)*fer(u,1,0)
*bos(u,0,0)
+del(1)*d(-3)*fer(u,2,0)*fer(u,1,0)*d(-3)*bos(u,0,1)*bos(u,0,0)*der(2)
+del(1)*d(-3)*fer(u,2,0)*fer(u,1,0)*d(-3)*bos(u,0,1)*d(-3)*bos(u,0,1)
*der(2)
+del(1)*d(-3)*fer(u,2,0)*fer(u,1,0)*d(-3)*bos(u,0,1)*d(-3)*fer(u,2,1)
+del(1)*d(-3)*fer(u,2,0)*fer(u,1,0)*d(-3)*bos(u,0,1)*d(-3)*fer(u,1,0)
*bos(u,0,0)
+del(1)*d(-3)*fer(u,2,0)*fer(u,1,0)*d(-3)*bos(u,0,0)*d(-3)*bos(u,3,0)
*bos(u,0,0)*der(2)
+del(1)*d(-3)*fer(u,2,0)*fer(u,1,0)*d(-3)*bos(u,0,0)*d(-3)*fer(u,2,0)
*bos(u,3,0)
+del(1)*d(-3)*fer(u,2,0)*fer(u,1,0)*d(-3)*bos(u,0,0)*d(-3)*fer(u,1,0)
*bos(u,0,1)
+del(1)*d(-3)*fer(u,2,0)*fer(u,1,0)*d(-3)*bos(u,0,0)*d(-3)*fer(u,1,0)
*bos(u,0,0)*d(1)
+3*del(1)*d(-3)*fer(u,2,0)*fer(u,1,0)*d(-3)*fer(u,2,1)*bos(u,0,0)
+3*del(1)*d(-3)*fer(u,2,0)*fer(u,1,0)*d(-3)*fer(u,2,0)*bos(u,0,1)
+2*del(1)*d(-3)*fer(u,2,0)*fer(u,1,0)*d(-3)*fer(u,2,0)*bos(u,0,0)*d(1)
+del(1)*d(-3)*fer(u,2,0)*fer(u,1,0)*d(-3)*fer(u,2,0)*d(-3)*bos(u,3,0)
*bos(u,0,0)
-del(1)*d(-3)*fer(u,2,0)*fer(u,1,0)*d(-3)*fer(u,2,0)*d(-3)*bos(u,0,2)
-del(1)*d(-3)*fer(u,2,0)*fer(u,1,0)*d(-3)*fer(u,2,0)*d(-3)*bos(u,0,1)
*d(1)
4
-del(1)*d(-3)*fer(u,2,0)*d(1)
-del(1)*d(-3)*fer(u,1,2)*fer(u,1,0)*d(-3)*bos(u,0,0)*der(2)
-del(1)*d(-3)*fer(u,1,2)*fer(u,1,0)*d(-3)*fer(u,2,0)
+2*del(1)*d(-3)*fer(u,1,1)*bos(u,3,0)*bos(u,0,0)
2
-2*del(1)*d(-3)*fer(u,1,1)*bos(u,0,0) *d(-3)*bos(u,0,1)
2
-2*del(1)*d(-3)*fer(u,1,1)*bos(u,0,0) *d(-3)*bos(u,0,0)*d(1)
-4*del(1)*d(-3)*fer(u,1,1)*fer(u,1,0)*bos(u,0,0)*der(2)
+2*del(1)*d(-3)*fer(u,1,1)*fer(u,1,0)*d(-3)*bos(u,3,0)*d(-3)*bos(u,0,0)
*der(2)
+2*del(1)*d(-3)*fer(u,1,1)*fer(u,1,0)*d(-3)*bos(u,3,0)*d(-3)*fer(u,2,0)
+2*del(1)*d(-3)*fer(u,1,1)*fer(u,1,0)*d(-3)*bos(u,0,1)*der(2)
+2*del(1)*d(-3)*fer(u,1,1)*fer(u,1,0)*d(-3)*fer(u,2,1)
+2*del(1)*d(-3)*fer(u,1,1)*fer(u,1,0)*d(-3)*fer(u,1,0)*bos(u,0,0)
-2*del(1)*d(-3)*fer(u,1,0)*bos(u,3,1)*bos(u,0,0)
-del(1)*d(-3)*fer(u,1,0)*bos(u,3,1)*d(-3)*bos(u,0,1)
-del(1)*d(-3)*fer(u,1,0)*bos(u,3,1)*d(-3)*bos(u,0,0)*d(1)
-6*del(1)*d(-3)*fer(u,1,0)*bos(u,3,0)*bos(u,0,1)
-6*del(1)*d(-3)*fer(u,1,0)*bos(u,3,0)*bos(u,0,0)*d(1)
-2*del(1)*d(-3)*fer(u,1,0)*bos(u,3,0)*d(-3)*bos(u,3,0)*bos(u,0,0)
+2*del(1)*d(-3)*fer(u,1,0)*bos(u,3,0)*d(-3)*bos(u,3,0)*d(-3)*bos(u,0,1)
+2*del(1)*d(-3)*fer(u,1,0)*bos(u,3,0)*d(-3)*bos(u,3,0)*d(-3)*bos(u,0,0)
*d(1)
+2*del(1)*d(-3)*fer(u,1,0)*bos(u,3,0)*d(-3)*bos(u,0,2)
+2*del(1)*d(-3)*fer(u,1,0)*bos(u,3,0)*d(-3)*bos(u,0,1)*d(1)
+2*del(1)*d(-3)*fer(u,1,0)*bos(u,3,0)*d(-3)*fer(u,2,0)*fer(u,1,0)
-2*del(1)*d(-3)*fer(u,1,0)*bos(u,3,0)*d(-3)*fer(u,1,1)*d(-3)*bos(u,0,0)
*der(2)
-2*del(1)*d(-3)*fer(u,1,0)*bos(u,3,0)*d(-3)*fer(u,1,1)*d(-3)*fer(u,2,0)
-2*del(1)*d(-3)*fer(u,1,0)*bos(u,3,0)*d(-3)*fer(u,1,0)*bos(u,0,0)*der(2)
+2*del(1)*d(-3)*fer(u,1,0)*bos(u,0,3)
+4*del(1)*d(-3)*fer(u,1,0)*bos(u,0,2)*d(1)
2
-16*del(1)*d(-3)*fer(u,1,0)*bos(u,0,1)*bos(u,0,0)
-2*del(1)*d(-3)*fer(u,1,0)*bos(u,0,1)*bos(u,0,0)*d(-3)*bos(u,0,1)
-2*del(1)*d(-3)*fer(u,1,0)*bos(u,0,1)*bos(u,0,0)*d(-3)*bos(u,0,0)*d(1)
2
+6*del(1)*d(-3)*fer(u,1,0)*bos(u,0,1)*d(1)
+3*del(1)*d(-3)*fer(u,1,0)*bos(u,0,1)*d(-3)*bos(u,0,1)*bos(u,0,0)
+del(1)*d(-3)*fer(u,1,0)*bos(u,0,1)*d(-3)*bos(u,0,0)*d(-3)*fer(u,2,0)
*fer(u,1,0)
-del(1)*d(-3)*fer(u,1,0)*bos(u,0,1)*d(-3)*bos(u,0,0)*d(-3)*fer(u,1,0)
*bos(u,0,0)*der(2)
-2*del(1)*d(-3)*fer(u,1,0)*bos(u,0,1)*d(-3)*fer(u,2,0)*bos(u,0,0)*der(2)
+del(1)*d(-3)*fer(u,1,0)*bos(u,0,1)*d(-3)*fer(u,2,0)*d(-3)*bos(u,0,1)
*der(2)
+del(1)*d(-3)*fer(u,1,0)*bos(u,0,1)*d(-3)*fer(u,2,0)*d(-3)*fer(u,2,1)
+del(1)*d(-3)*fer(u,1,0)*bos(u,0,1)*d(-3)*fer(u,2,0)*d(-3)*fer(u,1,0)
*bos(u,0,0)
3
-8*del(1)*d(-3)*fer(u,1,0)*bos(u,0,0) *d(1)
2
-2*del(1)*d(-3)*fer(u,1,0)*bos(u,0,0) *d(-3)*bos(u,3,0)*bos(u,0,0)
2
+2*del(1)*d(-3)*fer(u,1,0)*bos(u,0,0) *d(-3)*bos(u,3,0)*d(-3)*bos(u,0,1)
2
+2*del(1)*d(-3)*fer(u,1,0)*bos(u,0,0) *d(-3)*bos(u,3,0)*d(-3)*bos(u,0,0)
*d(1)
2
+2*del(1)*d(-3)*fer(u,1,0)*bos(u,0,0) *d(-3)*bos(u,0,2)
2
+2*del(1)*d(-3)*fer(u,1,0)*bos(u,0,0) *d(-3)*bos(u,0,1)*d(1)
2
+2*del(1)*d(-3)*fer(u,1,0)*bos(u,0,0) *d(-3)*fer(u,2,0)*fer(u,1,0)
2
-2*del(1)*d(-3)*fer(u,1,0)*bos(u,0,0) *d(-3)*fer(u,1,1)*d(-3)*bos(u,0,0)
*der(2)
2
-2*del(1)*d(-3)*fer(u,1,0)*bos(u,0,0) *d(-3)*fer(u,1,1)*d(-3)*fer(u,2,0)
2
-2*del(1)*d(-3)*fer(u,1,0)*bos(u,0,0) *d(-3)*fer(u,1,0)*bos(u,0,0)*der(2)
3
+4*del(1)*d(-3)*fer(u,1,0)*bos(u,0,0)*d(1)
+3*del(1)*d(-3)*fer(u,1,0)*d(-3)*bos(u,3,2)*bos(u,0,0)
+6*del(1)*d(-3)*fer(u,1,0)*d(-3)*bos(u,3,1)*bos(u,0,1)
+3*del(1)*d(-3)*fer(u,1,0)*d(-3)*bos(u,3,1)*bos(u,0,0)*d(1)
+del(1)*d(-3)*fer(u,1,0)*d(-3)*bos(u,3,1)*d(-3)*bos(u,3,0)*bos(u,0,0)
-del(1)*d(-3)*fer(u,1,0)*d(-3)*bos(u,3,1)*d(-3)*bos(u,0,2)
-del(1)*d(-3)*fer(u,1,0)*d(-3)*bos(u,3,1)*d(-3)*bos(u,0,1)*d(1)
2
-2*del(1)*d(-3)*fer(u,1,0)*d(-3)*bos(u,3,0) *bos(u,0,0)
+3*del(1)*d(-3)*fer(u,1,0)*d(-3)*bos(u,3,0)*bos(u,0,2)
+2*del(1)*d(-3)*fer(u,1,0)*d(-3)*bos(u,3,0)*bos(u,0,1)*d(1)
3
-del(1)*d(-3)*fer(u,1,0)*d(-3)*bos(u,3,0)*bos(u,0,0)
+2*del(1)*d(-3)*fer(u,1,0)*d(-3)*bos(u,3,0)*d(-3)*bos(u,3,1)*bos(u,0,0)
+3*del(1)*d(-3)*fer(u,1,0)*d(-3)*bos(u,3,0)*d(-3)*bos(u,3,0)*bos(u,0,1)
+2*del(1)*d(-3)*fer(u,1,0)*d(-3)*bos(u,3,0)*d(-3)*bos(u,3,0)*bos(u,0,0)
*d(1)
-del(1)*d(-3)*fer(u,1,0)*d(-3)*bos(u,3,0)*d(-3)*bos(u,0,3)
-del(1)*d(-3)*fer(u,1,0)*d(-3)*bos(u,3,0)*d(-3)*bos(u,0,2)*d(1)
2
+2*del(1)*d(-3)*fer(u,1,0)*d(-3)*bos(u,3,0)*d(-3)*bos(u,0,1)*bos(u,0,0)
3
+del(1)*d(-3)*fer(u,1,0)*d(-3)*bos(u,3,0)*d(-3)*bos(u,0,0) *d(1)
-del(1)*d(-3)*fer(u,1,0)*d(-3)*bos(u,3,0)*d(-3)*fer(u,2,1)*fer(u,1,0)
2
+del(1)*d(-3)*fer(u,1,0)*d(-3)*bos(u,3,0)*d(-3)*fer(u,2,0)*bos(u,0,0)
*der(2)
+del(1)*d(-3)*fer(u,1,0)*d(-3)*bos(u,3,0)*d(-3)*fer(u,1,0)*bos(u,0,1)
*der(2)
-del(1)*d(-3)*fer(u,1,0)*d(-3)*bos(u,0,4)
-del(1)*d(-3)*fer(u,1,0)*d(-3)*bos(u,0,3)*d(1)
2
+3*del(1)*d(-3)*fer(u,1,0)*d(-3)*bos(u,0,2)*bos(u,0,0)
-3*del(1)*d(-3)*fer(u,1,0)*d(-3)*bos(u,0,2)*d(-3)*bos(u,0,1)*bos(u,0,0)
+2*del(1)*d(-3)*fer(u,1,0)*d(-3)*bos(u,0,2)*d(-3)*fer(u,2,0)*bos(u,0,0)
*der(2)
2
+3*del(1)*d(-3)*fer(u,1,0)*d(-3)*bos(u,0,1) *bos(u,0,0)
2
+del(1)*d(-3)*fer(u,1,0)*d(-3)*bos(u,0,1) *d(-3)*bos(u,0,1)
2
+del(1)*d(-3)*fer(u,1,0)*d(-3)*bos(u,0,1) *d(-3)*bos(u,0,0)*d(1)
2
+3*del(1)*d(-3)*fer(u,1,0)*d(-3)*bos(u,0,1)*bos(u,0,0) *d(1)
+del(1)*d(-3)*fer(u,1,0)*d(-3)*bos(u,0,1)*bos(u,0,0)*d(-3)*bos(u,3,0)
*bos(u,0,0)
-del(1)*d(-3)*fer(u,1,0)*d(-3)*bos(u,0,1)*bos(u,0,0)*d(-3)*bos(u,0,2)
-del(1)*d(-3)*fer(u,1,0)*d(-3)*bos(u,0,1)*bos(u,0,0)*d(-3)*bos(u,0,1)
*d(1)
-del(1)*d(-3)*fer(u,1,0)*d(-3)*bos(u,0,1)*bos(u,0,0)*d(-3)*fer(u,2,0)
*fer(u,1,0)
+del(1)*d(-3)*fer(u,1,0)*d(-3)*bos(u,0,1)*bos(u,0,0)*d(-3)*fer(u,1,0)
*bos(u,0,0)*der(2)
-del(1)*d(-3)*fer(u,1,0)*d(-3)*fer(u,2,2)*fer(u,1,0)
+del(1)*d(-3)*fer(u,1,0)*d(-3)*fer(u,2,1)*bos(u,0,1)*d(-3)*bos(u,0,0)
*der(2)
+del(1)*d(-3)*fer(u,1,0)*d(-3)*fer(u,2,1)*bos(u,0,1)*d(-3)*fer(u,2,0)
-del(1)*d(-3)*fer(u,1,0)*d(-3)*fer(u,2,1)*bos(u,0,0)*d(-3)*bos(u,0,1)
*der(2)
-del(1)*d(-3)*fer(u,1,0)*d(-3)*fer(u,2,1)*bos(u,0,0)*d(-3)*fer(u,2,1)
-del(1)*d(-3)*fer(u,1,0)*d(-3)*fer(u,2,1)*bos(u,0,0)*d(-3)*fer(u,1,0)
*bos(u,0,0)
-3*del(1)*d(-3)*fer(u,1,0)*d(-3)*fer(u,2,1)*fer(u,2,0)*bos(u,0,0)
+del(1)*d(-3)*fer(u,1,0)*d(-3)*fer(u,2,1)*fer(u,2,0)*d(-3)*bos(u,0,1)
+del(1)*d(-3)*fer(u,1,0)*d(-3)*fer(u,2,1)*fer(u,2,0)*d(-3)*bos(u,0,0)
*d(1)
-del(1)*d(-3)*fer(u,1,0)*d(-3)*fer(u,2,1)*fer(u,1,1)
+del(1)*d(-3)*fer(u,1,0)*d(-3)*fer(u,2,1)*d(-3)*bos(u,0,1)*bos(u,0,0)
*der(2)
+3*del(1)*d(-3)*fer(u,1,0)*d(-3)*fer(u,2,1)*d(-3)*fer(u,2,1)*bos(u,0,0)
+3*del(1)*d(-3)*fer(u,1,0)*d(-3)*fer(u,2,1)*d(-3)*fer(u,2,0)*bos(u,0,1)
+2*del(1)*d(-3)*fer(u,1,0)*d(-3)*fer(u,2,1)*d(-3)*fer(u,2,0)*bos(u,0,0)
*d(1)
-del(1)*d(-3)*fer(u,1,0)*d(-3)*fer(u,2,0)*bos(u,3,0)*bos(u,0,0)*d(-3)
*bos(u,0,0)*der(2)
-del(1)*d(-3)*fer(u,1,0)*d(-3)*fer(u,2,0)*bos(u,3,0)*bos(u,0,0)*d(-3)
*fer(u,2,0)
+del(1)*d(-3)*fer(u,1,0)*d(-3)*fer(u,2,0)*bos(u,0,2)*d(-3)*bos(u,0,0)
*der(2)
+del(1)*d(-3)*fer(u,1,0)*d(-3)*fer(u,2,0)*bos(u,0,2)*d(-3)*fer(u,2,0)
+3*del(1)*d(-3)*fer(u,1,0)*d(-3)*fer(u,2,0)*bos(u,0,1)*bos(u,0,0)*der(2)
-del(1)*d(-3)*fer(u,1,0)*d(-3)*fer(u,2,0)*bos(u,0,1)*d(-3)*bos(u,0,1)
*der(2)
-del(1)*d(-3)*fer(u,1,0)*d(-3)*fer(u,2,0)*bos(u,0,1)*d(-3)*fer(u,2,1)
-del(1)*d(-3)*fer(u,1,0)*d(-3)*fer(u,2,0)*bos(u,0,1)*d(-3)*fer(u,1,0)
*bos(u,0,0)
+2*del(1)*d(-3)*fer(u,1,0)*d(-3)*fer(u,2,0)*fer(u,1,0)*bos(u,3,0)
2
+3*del(1)*d(-3)*fer(u,1,0)*d(-3)*fer(u,2,0)*fer(u,1,0)*bos(u,0,0)
-del(1)*d(-3)*fer(u,1,0)*d(-3)*fer(u,2,0)*fer(u,1,0)*bos(u,0,0)*d(-3)
*bos(u,0,1)
-del(1)*d(-3)*fer(u,1,0)*d(-3)*fer(u,2,0)*fer(u,1,0)*bos(u,0,0)*d(-3)
*bos(u,0,0)*d(1)
+del(1)*d(-3)*fer(u,1,0)*d(-3)*fer(u,1,2)*d(-3)*bos(u,0,1)*der(2)
+del(1)*d(-3)*fer(u,1,0)*d(-3)*fer(u,1,2)*d(-3)*fer(u,2,1)
+del(1)*d(-3)*fer(u,1,0)*d(-3)*fer(u,1,2)*d(-3)*fer(u,1,0)*bos(u,0,0)
+del(1)*d(-3)*fer(u,1,0)*d(-3)*fer(u,1,1)*bos(u,0,1)*der(2)
-2*del(1)*d(-3)*fer(u,1,0)*d(-3)*fer(u,1,1)*fer(u,1,0)*bos(u,0,0)
-del(1)*d(-3)*fer(u,1,0)*d(-3)*fer(u,1,1)*d(-3)*bos(u,3,0)*bos(u,0,0)
*der(2)
+del(1)*d(-3)*fer(u,1,0)*d(-3)*fer(u,1,1)*d(-3)*bos(u,0,2)*der(2)
3
-del(1)*d(-3)*fer(u,1,0)*d(-3)*fer(u,1,1)*d(-3)*bos(u,0,0) *der(2)
+del(1)*d(-3)*fer(u,1,0)*d(-3)*fer(u,1,1)*d(-3)*fer(u,2,2)
-del(1)*d(-3)*fer(u,1,0)*d(-3)*fer(u,1,1)*d(-3)*fer(u,2,0)*bos(u,3,0)
2
-2*del(1)*d(-3)*fer(u,1,0)*d(-3)*fer(u,1,1)*d(-3)*fer(u,2,0)*bos(u,0,0)
+2*del(1)*d(-3)*fer(u,1,0)*d(-3)*fer(u,1,1)*d(-3)*fer(u,1,1)*bos(u,0,0)
+2*del(1)*d(-3)*fer(u,1,0)*d(-3)*fer(u,1,1)*d(-3)*fer(u,1,0)*bos(u,0,1)
+del(1)*d(-3)*fer(u,1,0)*d(-3)*fer(u,1,1)*d(-3)*fer(u,1,0)*bos(u,0,0)
*d(1)
-2*del(1)*d(-3)*fer(u,1,0)*d(-3)*fer(u,1,0)*bos(u,3,0)*bos(u,0,0)*der(2)
+del(1)*d(-3)*fer(u,1,0)*d(-3)*fer(u,1,0)*bos(u,0,2)*der(2)
-del(1)*d(-3)*fer(u,1,0)*d(-3)*fer(u,1,0)*bos(u,0,1)*bos(u,0,0)*d(-3)
*bos(u,0,0)*der(2)
-del(1)*d(-3)*fer(u,1,0)*d(-3)*fer(u,1,0)*bos(u,0,1)*bos(u,0,0)*d(-3)
*fer(u,2,0)
3
-del(1)*d(-3)*fer(u,1,0)*d(-3)*fer(u,1,0)*bos(u,0,0) *der(2)
lc5:=s_part(lb5,3);
lc5 := bos(u,3,2)*d(-3)*bos(u,0,0)
+4*bos(u,3,1)*bos(u,0,0)
+bos(u,3,1)*(
-2*d(-3)*bos(u,3,0)*d(-3)*bos(u,0,0)
-d(-3)*bos(u,0,1))
2
-2*bos(u,3,0) *d(-3)*bos(u,0,0)
+2*bos(u,3,0)*bos(u,0,1)
2
-bos(u,3,0)*bos(u,0,0) *d(-3)*bos(u,0,0)
+6*bos(u,3,0)*bos(u,0,0)*d(1)
+bos(u,3,0)*(
-2*d(-3)*bos(u,3,0)*bos(u,0,0)
+d(-3)*bos(u,0,2)
3
-d(-3)*bos(u,0,0) )
-bos(u,0,3)
+2*bos(u,0,2)*bos(u,0,0)*d(-3)*bos(u,0,0)
-4*bos(u,0,2)*d(1)
2
+bos(u,0,1) *d(-3)*bos(u,0,0)
2
+10*bos(u,0,1)*bos(u,0,0)
+bos(u,0,1)*bos(u,0,0)*(
-2*d(-3)*bos(u,3,0)*d(-3)*bos(u,0,0)
-d(-3)*bos(u,0,1))
2
-6*bos(u,0,1)*d(1)
3
+4*bos(u,0,0) *d(1)
3
-4*bos(u,0,0)*d(1)
-fer(u,2,1)*fer(u,2,0)*d(-3)*bos(u,0,0)
+fer(u,2,1)*(d(-3)*bos(u,0,0)*d(-3)*fer(u,1,0)*bos(u,0,0)
-d(-3)*fer(u,2,0)*d(-3)*bos(u,0,1))
+fer(u,2,0)*bos(u,0,0)*d(-3)*fer(u,1,0)*bos(u,0,0)
+fer(u,2,0)*fer(u,1,0)*bos(u,0,0)*d(-3)*bos(u,0,0)
-2*fer(u,1,1)*fer(u,1,0)*d(-3)*bos(u,0,0)
+fer(u,1,1)*(2*d(-3)*fer(u,1,1)*d(-3)*bos(u,0,0)
+d(-3)*fer(u,1,0)*bos(u,0,0))
-d(-3)*bos(u,3,1)*bos(u,3,0)*d(-3)*bos(u,0,0)
2
-2*d(-3)*bos(u,3,1)*bos(u,0,0) *d(-3)*bos(u,0,0)
2
-6*d(-3)*bos(u,3,0) *bos(u,0,0)
2
+2*d(-3)*bos(u,3,0) *d(-3)*bos(u,3,0)*d(-3)*bos(u,0,0)
2
+2*d(-3)*bos(u,3,0) *d(-3)*bos(u,0,1)
+2*d(-3)*bos(u,3,0)*bos(u,0,2)
-4*d(-3)*bos(u,3,0)*bos(u,0,1)*bos(u,0,0)*d(-3)*bos(u,0,0)
+2*d(-3)*bos(u,3,0)*bos(u,0,1)*d(1)
3
-8*d(-3)*bos(u,3,0)*bos(u,0,0)
2
+2*d(-3)*bos(u,3,0)*bos(u,0,0) *d(-3)*bos(u,3,0)*d(-3)*bos(u,0,0)
2
+2*d(-3)*bos(u,3,0)*bos(u,0,0) *d(-3)*bos(u,0,1)
2
+4*d(-3)*bos(u,3,0)*bos(u,0,0)*d(1)
+3*d(-3)*bos(u,3,0)*d(-3)*bos(u,3,1)*bos(u,0,0)
-d(-3)*bos(u,3,0)*d(-3)*bos(u,3,1)*d(-3)*bos(u,0,1)
+2*d(-3)*bos(u,3,0)*d(-3)*bos(u,3,0)*bos(u,0,1)
+2*d(-3)*bos(u,3,0)*d(-3)*bos(u,3,0)*d(-3)*bos(u,3,0)*bos(u,0,0)
-d(-3)*bos(u,3,0)*d(-3)*bos(u,3,0)*d(-3)*bos(u,0,2)
3
+d(-3)*bos(u,3,0)*d(-3)*bos(u,3,0)*d(-3)*bos(u,0,0)
-d(-3)*bos(u,3,0)*d(-3)*bos(u,0,3)
2
+d(-3)*bos(u,3,0)*d(-3)*bos(u,0,1) *d(-3)*bos(u,0,0)
2
+3*d(-3)*bos(u,3,0)*d(-3)*bos(u,0,1)*bos(u,0,0)
-d(-3)*bos(u,3,0)*d(-3)*bos(u,0,1)*bos(u,0,0)*d(-3)*bos(u,0,1)
+d(-3)*bos(u,3,0)*d(-3)*fer(u,2,1)*fer(u,2,0)*d(-3)*bos(u,0,0)
+2*d(-3)*bos(u,3,0)*d(-3)*fer(u,2,1)*d(-3)*fer(u,2,0)*bos(u,0,0)
-d(-3)*bos(u,3,0)*d(-3)*fer(u,2,0)*fer(u,1,0)*bos(u,0,0)*d(-3)*bos(u,0,0)
+d(-3)*bos(u,3,0)*d(-3)*fer(u,1,1)*d(-3)*fer(u,1,0)*bos(u,0,0)
+d(-3)*bos(u,0,3)*bos(u,0,0)*d(-3)*bos(u,0,0)
2
+8*d(-3)*bos(u,0,2)*bos(u,0,0)
-d(-3)*bos(u,0,2)*bos(u,0,0)*d(-3)*bos(u,3,0)*d(-3)*bos(u,0,0)
-d(-3)*bos(u,0,2)*bos(u,0,0)*d(-3)*bos(u,0,1)
2
+5*d(-3)*bos(u,0,1) *bos(u,0,0)
3
-d(-3)*bos(u,0,1)*bos(u,0,0) *d(-3)*bos(u,0,0)
2
+18*d(-3)*bos(u,0,1)*bos(u,0,0) *d(1)
-d(-3)*bos(u,0,1)*bos(u,0,0)*d(-3)*bos(u,3,1)*d(-3)*bos(u,0,0)
-3*d(-3)*bos(u,0,1)*bos(u,0,0)*d(-3)*bos(u,3,0)*bos(u,0,0)
+d(-3)*bos(u,0,1)*bos(u,0,0)*d(-3)*bos(u,3,0)*d(-3)*bos(u,0,1)
+d(-3)*bos(u,0,1)*bos(u,0,0)*d(-3)*bos(u,0,2)
-d(-3)*bos(u,0,1)*bos(u,0,0)*d(-3)*bos(u,0,1)*bos(u,0,0)*d(-3)*bos(u,0,0)
3
-d(-3)*bos(u,0,1)*bos(u,0,0)*d(-3)*bos(u,0,0)
-d(-3)*bos(u,0,1)*bos(u,0,0)*d(-3)*fer(u,1,0)*d(-3)*fer(u,1,0)*bos(u,0,0)
5
-d(-3)*bos(u,0,0)
3 2
+6*d(-3)*bos(u,0,0) *d(1)
4
-d(-3)*bos(u,0,0)*d(1)
-d(-3)*fer(u,2,2)*fer(u,2,0)*d(-3)*bos(u,0,0)
-4*d(-3)*fer(u,2,1)*fer(u,2,0)*bos(u,0,0)
+d(-3)*fer(u,2,1)*fer(u,2,0)*d(-3)*bos(u,3,0)*d(-3)*bos(u,0,0)
+d(-3)*fer(u,2,1)*fer(u,2,0)*d(-3)*bos(u,0,1)
+2*d(-3)*fer(u,2,1)*fer(u,1,0)*bos(u,0,0)*d(-3)*bos(u,0,0)
-d(-3)*fer(u,2,0)*bos(u,3,0)*d(-3)*bos(u,0,0)*d(-3)*fer(u,1,0)*bos(u,0,0)
-2*d(-3)*fer(u,2,0)*bos(u,3,0)*d(-3)*fer(u,2,0)*bos(u,0,0)
+d(-3)*fer(u,2,0)*bos(u,3,0)*d(-3)*fer(u,2,0)*d(-3)*bos(u,0,1)
+d(-3)*fer(u,2,0)*bos(u,0,1)*d(-3)*fer(u,1,1)*d(-3)*bos(u,0,0)
+d(-3)*fer(u,2,0)*bos(u,0,1)*d(-3)*fer(u,1,0)*bos(u,0,0)
+d(-3)*fer(u,2,0)*bos(u,0,0)*d(-3)*fer(u,2,1)*bos(u,0,0)*d(-3)*bos(u,0,0)
+d(-3)*fer(u,2,0)*bos(u,0,0)*d(-3)*fer(u,2,0)*bos(u,0,1)*d(-3)*bos(u,0,0)
2
+d(-3)*fer(u,2,0)*bos(u,0,0)*d(-3)*fer(u,2,0)*bos(u,0,0)
+d(-3)*fer(u,2,0)*bos(u,0,0)*d(-3)*fer(u,1,1)*d(-3)*bos(u,0,1)
+d(-3)*fer(u,2,0)*bos(u,0,0)*d(-3)*fer(u,1,0)*bos(u,0,1)
+d(-3)*fer(u,2,0)*bos(u,0,0)*d(-3)*fer(u,1,0)*d(-3)*bos(u,3,0)*bos(u,0,0)
+2*d(-3)*fer(u,2,0)*fer(u,1,1)*bos(u,0,0)*d(-3)*bos(u,0,0)
+2*d(-3)*fer(u,2,0)*fer(u,1,0)*bos(u,0,1)*d(-3)*bos(u,0,0)
2
+8*d(-3)*fer(u,2,0)*fer(u,1,0)*bos(u,0,0)
-4*d(-3)*fer(u,2,0)*fer(u,1,0)*bos(u,0,0)*d(-3)*bos(u,3,0)*d(-3)
*bos(u,0,0)
-4*d(-3)*fer(u,2,0)*fer(u,1,0)*bos(u,0,0)*d(-3)*bos(u,0,1)
+d(-3)*fer(u,2,0)*fer(u,1,0)*d(-3)*bos(u,0,1)*bos(u,0,0)
+d(-3)*fer(u,2,0)*fer(u,1,0)*d(-3)*bos(u,0,1)*d(-3)*bos(u,0,1)
+d(-3)*fer(u,2,0)*fer(u,1,0)*d(-3)*bos(u,0,0)*d(-3)*bos(u,3,0)*bos(u,0,0)
-d(-3)*fer(u,1,2)*fer(u,1,0)*d(-3)*bos(u,0,0)
-4*d(-3)*fer(u,1,1)*fer(u,1,0)*bos(u,0,0)
+2*d(-3)*fer(u,1,1)*fer(u,1,0)*d(-3)*bos(u,3,0)*d(-3)*bos(u,0,0)
+2*d(-3)*fer(u,1,1)*fer(u,1,0)*d(-3)*bos(u,0,1)
-2*d(-3)*fer(u,1,0)*bos(u,3,0)*d(-3)*fer(u,1,1)*d(-3)*bos(u,0,0)
-2*d(-3)*fer(u,1,0)*bos(u,3,0)*d(-3)*fer(u,1,0)*bos(u,0,0)
-d(-3)*fer(u,1,0)*bos(u,0,1)*d(-3)*bos(u,0,0)*d(-3)*fer(u,1,0)*bos(u,0,0)
-2*d(-3)*fer(u,1,0)*bos(u,0,1)*d(-3)*fer(u,2,0)*bos(u,0,0)
+d(-3)*fer(u,1,0)*bos(u,0,1)*d(-3)*fer(u,2,0)*d(-3)*bos(u,0,1)
2
-2*d(-3)*fer(u,1,0)*bos(u,0,0) *d(-3)*fer(u,1,1)*d(-3)*bos(u,0,0)
2
-2*d(-3)*fer(u,1,0)*bos(u,0,0) *d(-3)*fer(u,1,0)*bos(u,0,0)
2
+d(-3)*fer(u,1,0)*d(-3)*bos(u,3,0)*d(-3)*fer(u,2,0)*bos(u,0,0)
+d(-3)*fer(u,1,0)*d(-3)*bos(u,3,0)*d(-3)*fer(u,1,0)*bos(u,0,1)
+2*d(-3)*fer(u,1,0)*d(-3)*bos(u,0,2)*d(-3)*fer(u,2,0)*bos(u,0,0)
+d(-3)*fer(u,1,0)*d(-3)*bos(u,0,1)*bos(u,0,0)*d(-3)*fer(u,1,0)*bos(u,0,0)
+d(-3)*fer(u,1,0)*d(-3)*fer(u,2,1)*bos(u,0,1)*d(-3)*bos(u,0,0)
-d(-3)*fer(u,1,0)*d(-3)*fer(u,2,1)*bos(u,0,0)*d(-3)*bos(u,0,1)
+d(-3)*fer(u,1,0)*d(-3)*fer(u,2,1)*d(-3)*bos(u,0,1)*bos(u,0,0)
-d(-3)*fer(u,1,0)*d(-3)*fer(u,2,0)*bos(u,3,0)*bos(u,0,0)*d(-3)*bos(u,0,0)
+d(-3)*fer(u,1,0)*d(-3)*fer(u,2,0)*bos(u,0,2)*d(-3)*bos(u,0,0)
+3*d(-3)*fer(u,1,0)*d(-3)*fer(u,2,0)*bos(u,0,1)*bos(u,0,0)
-d(-3)*fer(u,1,0)*d(-3)*fer(u,2,0)*bos(u,0,1)*d(-3)*bos(u,0,1)
+d(-3)*fer(u,1,0)*d(-3)*fer(u,1,2)*d(-3)*bos(u,0,1)
+d(-3)*fer(u,1,0)*d(-3)*fer(u,1,1)*bos(u,0,1)
-d(-3)*fer(u,1,0)*d(-3)*fer(u,1,1)*d(-3)*bos(u,3,0)*bos(u,0,0)
+d(-3)*fer(u,1,0)*d(-3)*fer(u,1,1)*d(-3)*bos(u,0,2)
3
-d(-3)*fer(u,1,0)*d(-3)*fer(u,1,1)*d(-3)*bos(u,0,0)
-2*d(-3)*fer(u,1,0)*d(-3)*fer(u,1,0)*bos(u,3,0)*bos(u,0,0)
+d(-3)*fer(u,1,0)*d(-3)*fer(u,1,0)*bos(u,0,2)
-d(-3)*fer(u,1,0)*d(-3)*fer(u,1,0)*bos(u,0,1)*bos(u,0,0)*d(-3)*bos(u,0,0)
3
-d(-3)*fer(u,1,0)*d(-3)*fer(u,1,0)*bos(u,0,0)
la5:=lc5-sub(d(-3)=0,lc5);
la5 := bos(u,3,2)*d(-3)*bos(u,0,0)
+bos(u,3,1)*(
-2*d(-3)*bos(u,3,0)*d(-3)*bos(u,0,0)
-d(-3)*bos(u,0,1))
2
-2*bos(u,3,0) *d(-3)*bos(u,0,0)
2
-bos(u,3,0)*bos(u,0,0) *d(-3)*bos(u,0,0)
+bos(u,3,0)*(
-2*d(-3)*bos(u,3,0)*bos(u,0,0)
+d(-3)*bos(u,0,2)
3
-d(-3)*bos(u,0,0) )
+2*bos(u,0,2)*bos(u,0,0)*d(-3)*bos(u,0,0)
2
+bos(u,0,1) *d(-3)*bos(u,0,0)
+bos(u,0,1)*bos(u,0,0)*(
-2*d(-3)*bos(u,3,0)*d(-3)*bos(u,0,0)
-d(-3)*bos(u,0,1))
-fer(u,2,1)*fer(u,2,0)*d(-3)*bos(u,0,0)
+fer(u,2,1)*(d(-3)*bos(u,0,0)*d(-3)*fer(u,1,0)*bos(u,0,0)
-d(-3)*fer(u,2,0)*d(-3)*bos(u,0,1))
+fer(u,2,0)*bos(u,0,0)*d(-3)*fer(u,1,0)*bos(u,0,0)
+fer(u,2,0)*fer(u,1,0)*bos(u,0,0)*d(-3)*bos(u,0,0)
-2*fer(u,1,1)*fer(u,1,0)*d(-3)*bos(u,0,0)
+fer(u,1,1)*(2*d(-3)*fer(u,1,1)*d(-3)*bos(u,0,0)
+d(-3)*fer(u,1,0)*bos(u,0,0))
-d(-3)*bos(u,3,1)*bos(u,3,0)*d(-3)*bos(u,0,0)
2
-2*d(-3)*bos(u,3,1)*bos(u,0,0) *d(-3)*bos(u,0,0)
2
-6*d(-3)*bos(u,3,0) *bos(u,0,0)
2
+2*d(-3)*bos(u,3,0) *d(-3)*bos(u,3,0)*d(-3)*bos(u,0,0)
2
+2*d(-3)*bos(u,3,0) *d(-3)*bos(u,0,1)
+2*d(-3)*bos(u,3,0)*bos(u,0,2)
-4*d(-3)*bos(u,3,0)*bos(u,0,1)*bos(u,0,0)*d(-3)*bos(u,0,0)
+2*d(-3)*bos(u,3,0)*bos(u,0,1)*d(1)
3
-8*d(-3)*bos(u,3,0)*bos(u,0,0)
2
+2*d(-3)*bos(u,3,0)*bos(u,0,0) *d(-3)*bos(u,3,0)*d(-3)*bos(u,0,0)
2
+2*d(-3)*bos(u,3,0)*bos(u,0,0) *d(-3)*bos(u,0,1)
2
+4*d(-3)*bos(u,3,0)*bos(u,0,0)*d(1)
+3*d(-3)*bos(u,3,0)*d(-3)*bos(u,3,1)*bos(u,0,0)
-d(-3)*bos(u,3,0)*d(-3)*bos(u,3,1)*d(-3)*bos(u,0,1)
+2*d(-3)*bos(u,3,0)*d(-3)*bos(u,3,0)*bos(u,0,1)
+2*d(-3)*bos(u,3,0)*d(-3)*bos(u,3,0)*d(-3)*bos(u,3,0)*bos(u,0,0)
-d(-3)*bos(u,3,0)*d(-3)*bos(u,3,0)*d(-3)*bos(u,0,2)
3
+d(-3)*bos(u,3,0)*d(-3)*bos(u,3,0)*d(-3)*bos(u,0,0)
-d(-3)*bos(u,3,0)*d(-3)*bos(u,0,3)
2
+d(-3)*bos(u,3,0)*d(-3)*bos(u,0,1) *d(-3)*bos(u,0,0)
2
+3*d(-3)*bos(u,3,0)*d(-3)*bos(u,0,1)*bos(u,0,0)
-d(-3)*bos(u,3,0)*d(-3)*bos(u,0,1)*bos(u,0,0)*d(-3)*bos(u,0,1)
+d(-3)*bos(u,3,0)*d(-3)*fer(u,2,1)*fer(u,2,0)*d(-3)*bos(u,0,0)
+2*d(-3)*bos(u,3,0)*d(-3)*fer(u,2,1)*d(-3)*fer(u,2,0)*bos(u,0,0)
-d(-3)*bos(u,3,0)*d(-3)*fer(u,2,0)*fer(u,1,0)*bos(u,0,0)*d(-3)*bos(u,0,0)
+d(-3)*bos(u,3,0)*d(-3)*fer(u,1,1)*d(-3)*fer(u,1,0)*bos(u,0,0)
+d(-3)*bos(u,0,3)*bos(u,0,0)*d(-3)*bos(u,0,0)
2
+8*d(-3)*bos(u,0,2)*bos(u,0,0)
-d(-3)*bos(u,0,2)*bos(u,0,0)*d(-3)*bos(u,3,0)*d(-3)*bos(u,0,0)
-d(-3)*bos(u,0,2)*bos(u,0,0)*d(-3)*bos(u,0,1)
2
+5*d(-3)*bos(u,0,1) *bos(u,0,0)
3
-d(-3)*bos(u,0,1)*bos(u,0,0) *d(-3)*bos(u,0,0)
2
+18*d(-3)*bos(u,0,1)*bos(u,0,0) *d(1)
-d(-3)*bos(u,0,1)*bos(u,0,0)*d(-3)*bos(u,3,1)*d(-3)*bos(u,0,0)
-3*d(-3)*bos(u,0,1)*bos(u,0,0)*d(-3)*bos(u,3,0)*bos(u,0,0)
+d(-3)*bos(u,0,1)*bos(u,0,0)*d(-3)*bos(u,3,0)*d(-3)*bos(u,0,1)
+d(-3)*bos(u,0,1)*bos(u,0,0)*d(-3)*bos(u,0,2)
-d(-3)*bos(u,0,1)*bos(u,0,0)*d(-3)*bos(u,0,1)*bos(u,0,0)*d(-3)*bos(u,0,0)
3
-d(-3)*bos(u,0,1)*bos(u,0,0)*d(-3)*bos(u,0,0)
-d(-3)*bos(u,0,1)*bos(u,0,0)*d(-3)*fer(u,1,0)*d(-3)*fer(u,1,0)*bos(u,0,0)
5
-d(-3)*bos(u,0,0)
3 2
+6*d(-3)*bos(u,0,0) *d(1)
4
-d(-3)*bos(u,0,0)*d(1)
-d(-3)*fer(u,2,2)*fer(u,2,0)*d(-3)*bos(u,0,0)
-4*d(-3)*fer(u,2,1)*fer(u,2,0)*bos(u,0,0)
+d(-3)*fer(u,2,1)*fer(u,2,0)*d(-3)*bos(u,3,0)*d(-3)*bos(u,0,0)
+d(-3)*fer(u,2,1)*fer(u,2,0)*d(-3)*bos(u,0,1)
+2*d(-3)*fer(u,2,1)*fer(u,1,0)*bos(u,0,0)*d(-3)*bos(u,0,0)
-d(-3)*fer(u,2,0)*bos(u,3,0)*d(-3)*bos(u,0,0)*d(-3)*fer(u,1,0)*bos(u,0,0)
-2*d(-3)*fer(u,2,0)*bos(u,3,0)*d(-3)*fer(u,2,0)*bos(u,0,0)
+d(-3)*fer(u,2,0)*bos(u,3,0)*d(-3)*fer(u,2,0)*d(-3)*bos(u,0,1)
+d(-3)*fer(u,2,0)*bos(u,0,1)*d(-3)*fer(u,1,1)*d(-3)*bos(u,0,0)
+d(-3)*fer(u,2,0)*bos(u,0,1)*d(-3)*fer(u,1,0)*bos(u,0,0)
+d(-3)*fer(u,2,0)*bos(u,0,0)*d(-3)*fer(u,2,1)*bos(u,0,0)*d(-3)*bos(u,0,0)
+d(-3)*fer(u,2,0)*bos(u,0,0)*d(-3)*fer(u,2,0)*bos(u,0,1)*d(-3)*bos(u,0,0)
2
+d(-3)*fer(u,2,0)*bos(u,0,0)*d(-3)*fer(u,2,0)*bos(u,0,0)
+d(-3)*fer(u,2,0)*bos(u,0,0)*d(-3)*fer(u,1,1)*d(-3)*bos(u,0,1)
+d(-3)*fer(u,2,0)*bos(u,0,0)*d(-3)*fer(u,1,0)*bos(u,0,1)
+d(-3)*fer(u,2,0)*bos(u,0,0)*d(-3)*fer(u,1,0)*d(-3)*bos(u,3,0)*bos(u,0,0)
+2*d(-3)*fer(u,2,0)*fer(u,1,1)*bos(u,0,0)*d(-3)*bos(u,0,0)
+2*d(-3)*fer(u,2,0)*fer(u,1,0)*bos(u,0,1)*d(-3)*bos(u,0,0)
2
+8*d(-3)*fer(u,2,0)*fer(u,1,0)*bos(u,0,0)
-4*d(-3)*fer(u,2,0)*fer(u,1,0)*bos(u,0,0)*d(-3)*bos(u,3,0)*d(-3)
*bos(u,0,0)
-4*d(-3)*fer(u,2,0)*fer(u,1,0)*bos(u,0,0)*d(-3)*bos(u,0,1)
+d(-3)*fer(u,2,0)*fer(u,1,0)*d(-3)*bos(u,0,1)*bos(u,0,0)
+d(-3)*fer(u,2,0)*fer(u,1,0)*d(-3)*bos(u,0,1)*d(-3)*bos(u,0,1)
+d(-3)*fer(u,2,0)*fer(u,1,0)*d(-3)*bos(u,0,0)*d(-3)*bos(u,3,0)*bos(u,0,0)
-d(-3)*fer(u,1,2)*fer(u,1,0)*d(-3)*bos(u,0,0)
-4*d(-3)*fer(u,1,1)*fer(u,1,0)*bos(u,0,0)
+2*d(-3)*fer(u,1,1)*fer(u,1,0)*d(-3)*bos(u,3,0)*d(-3)*bos(u,0,0)
+2*d(-3)*fer(u,1,1)*fer(u,1,0)*d(-3)*bos(u,0,1)
-2*d(-3)*fer(u,1,0)*bos(u,3,0)*d(-3)*fer(u,1,1)*d(-3)*bos(u,0,0)
-2*d(-3)*fer(u,1,0)*bos(u,3,0)*d(-3)*fer(u,1,0)*bos(u,0,0)
-d(-3)*fer(u,1,0)*bos(u,0,1)*d(-3)*bos(u,0,0)*d(-3)*fer(u,1,0)*bos(u,0,0)
-2*d(-3)*fer(u,1,0)*bos(u,0,1)*d(-3)*fer(u,2,0)*bos(u,0,0)
+d(-3)*fer(u,1,0)*bos(u,0,1)*d(-3)*fer(u,2,0)*d(-3)*bos(u,0,1)
2
-2*d(-3)*fer(u,1,0)*bos(u,0,0) *d(-3)*fer(u,1,1)*d(-3)*bos(u,0,0)
2
-2*d(-3)*fer(u,1,0)*bos(u,0,0) *d(-3)*fer(u,1,0)*bos(u,0,0)
2
+d(-3)*fer(u,1,0)*d(-3)*bos(u,3,0)*d(-3)*fer(u,2,0)*bos(u,0,0)
+d(-3)*fer(u,1,0)*d(-3)*bos(u,3,0)*d(-3)*fer(u,1,0)*bos(u,0,1)
+2*d(-3)*fer(u,1,0)*d(-3)*bos(u,0,2)*d(-3)*fer(u,2,0)*bos(u,0,0)
+d(-3)*fer(u,1,0)*d(-3)*bos(u,0,1)*bos(u,0,0)*d(-3)*fer(u,1,0)*bos(u,0,0)
+d(-3)*fer(u,1,0)*d(-3)*fer(u,2,1)*bos(u,0,1)*d(-3)*bos(u,0,0)
-d(-3)*fer(u,1,0)*d(-3)*fer(u,2,1)*bos(u,0,0)*d(-3)*bos(u,0,1)
+d(-3)*fer(u,1,0)*d(-3)*fer(u,2,1)*d(-3)*bos(u,0,1)*bos(u,0,0)
-d(-3)*fer(u,1,0)*d(-3)*fer(u,2,0)*bos(u,3,0)*bos(u,0,0)*d(-3)*bos(u,0,0)
+d(-3)*fer(u,1,0)*d(-3)*fer(u,2,0)*bos(u,0,2)*d(-3)*bos(u,0,0)
+3*d(-3)*fer(u,1,0)*d(-3)*fer(u,2,0)*bos(u,0,1)*bos(u,0,0)
-d(-3)*fer(u,1,0)*d(-3)*fer(u,2,0)*bos(u,0,1)*d(-3)*bos(u,0,1)
+d(-3)*fer(u,1,0)*d(-3)*fer(u,1,2)*d(-3)*bos(u,0,1)
+d(-3)*fer(u,1,0)*d(-3)*fer(u,1,1)*bos(u,0,1)
-d(-3)*fer(u,1,0)*d(-3)*fer(u,1,1)*d(-3)*bos(u,3,0)*bos(u,0,0)
+d(-3)*fer(u,1,0)*d(-3)*fer(u,1,1)*d(-3)*bos(u,0,2)
3
-d(-3)*fer(u,1,0)*d(-3)*fer(u,1,1)*d(-3)*bos(u,0,0)
-2*d(-3)*fer(u,1,0)*d(-3)*fer(u,1,0)*bos(u,3,0)*bos(u,0,0)
+d(-3)*fer(u,1,0)*d(-3)*fer(u,1,0)*bos(u,0,2)
-d(-3)*fer(u,1,0)*d(-3)*fer(u,1,0)*bos(u,0,1)*bos(u,0,0)*d(-3)*bos(u,0,0)
3
-d(-3)*fer(u,1,0)*d(-3)*fer(u,1,0)*bos(u,0,0)
ld5:=chan(la5);
ld5 := bos(u,3,2)*d(-3)*bos(u,0,0)
-4*bos(u,3,1)*bos(u,0,0)
+bos(u,3,1)*(
-2*d(-3)*bos(u,3,0)*d(-3)*bos(u,0,0)
-d(-3)*bos(u,0,1))
2
-2*bos(u,3,0) *d(-3)*bos(u,0,0)
-2*bos(u,3,0)*bos(u,0,1)
2
-bos(u,3,0)*bos(u,0,0) *d(-3)*bos(u,0,0)
+4*bos(u,3,0)*bos(u,0,0)*d(1)
+bos(u,3,0)*(
-2*d(-3)*bos(u,3,0)*bos(u,0,0)
+d(-3)*bos(u,0,2)
3
-d(-3)*bos(u,0,0) )
+bos(u,0,3)
+2*bos(u,0,2)*bos(u,0,0)*d(-3)*bos(u,0,0)
-bos(u,0,2)*d(1)
2
+bos(u,0,1) *d(-3)*bos(u,0,0)
+bos(u,0,1)*bos(u,0,0)*(
-2*d(-3)*bos(u,3,0)*d(-3)*bos(u,0,0)
-d(-3)*bos(u,0,1))
2
+bos(u,0,1)*d(1)
3
+6*bos(u,0,0) *d(1)
3
-bos(u,0,0)*d(1)
-fer(u,2,1)*fer(u,2,0)*d(-3)*bos(u,0,0)
+fer(u,2,1)*(d(-3)*bos(u,0,0)*d(-3)*fer(u,1,0)*bos(u,0,0)
-d(-3)*fer(u,2,0)*d(-3)*bos(u,0,1))
+fer(u,2,0)*bos(u,0,0)*d(-3)*fer(u,1,0)*bos(u,0,0)
+fer(u,2,0)*fer(u,1,0)*bos(u,0,0)*d(-3)*bos(u,0,0)
-2*fer(u,1,1)*fer(u,1,0)*d(-3)*bos(u,0,0)
+fer(u,1,1)*(2*d(-3)*fer(u,1,1)*d(-3)*bos(u,0,0)
+d(-3)*fer(u,1,0)*bos(u,0,0))
+4*d(-3)*bos(u,3,2)*bos(u,0,0)
-d(-3)*bos(u,3,1)*bos(u,3,0)*d(-3)*bos(u,0,0)
+6*d(-3)*bos(u,3,1)*bos(u,0,1)
2
-2*d(-3)*bos(u,3,1)*bos(u,0,0) *d(-3)*bos(u,0,0)
2
-6*d(-3)*bos(u,3,0) *bos(u,0,0)
2
+2*d(-3)*bos(u,3,0) *d(-3)*bos(u,3,0)*d(-3)*bos(u,0,0)
2
+2*d(-3)*bos(u,3,0) *d(-3)*bos(u,0,1)
+4*d(-3)*bos(u,3,0)*bos(u,0,2)
-4*d(-3)*bos(u,3,0)*bos(u,0,1)*bos(u,0,0)*d(-3)*bos(u,0,0)
3
-8*d(-3)*bos(u,3,0)*bos(u,0,0)
2
+2*d(-3)*bos(u,3,0)*bos(u,0,0) *d(-3)*bos(u,3,0)*d(-3)*bos(u,0,0)
2
+2*d(-3)*bos(u,3,0)*bos(u,0,0) *d(-3)*bos(u,0,1)
+3*d(-3)*bos(u,3,0)*d(-3)*bos(u,3,1)*bos(u,0,0)
-d(-3)*bos(u,3,0)*d(-3)*bos(u,3,1)*d(-3)*bos(u,0,1)
+2*d(-3)*bos(u,3,0)*d(-3)*bos(u,3,0)*bos(u,0,1)
+2*d(-3)*bos(u,3,0)*d(-3)*bos(u,3,0)*d(-3)*bos(u,3,0)*bos(u,0,0)
-d(-3)*bos(u,3,0)*d(-3)*bos(u,3,0)*d(-3)*bos(u,0,2)
3
+d(-3)*bos(u,3,0)*d(-3)*bos(u,3,0)*d(-3)*bos(u,0,0)
-d(-3)*bos(u,3,0)*d(-3)*bos(u,0,3)
2
+d(-3)*bos(u,3,0)*d(-3)*bos(u,0,1) *d(-3)*bos(u,0,0)
2
+3*d(-3)*bos(u,3,0)*d(-3)*bos(u,0,1)*bos(u,0,0)
-d(-3)*bos(u,3,0)*d(-3)*bos(u,0,1)*bos(u,0,0)*d(-3)*bos(u,0,1)
+d(-3)*bos(u,3,0)*d(-3)*fer(u,2,1)*fer(u,2,0)*d(-3)*bos(u,0,0)
+2*d(-3)*bos(u,3,0)*d(-3)*fer(u,2,1)*d(-3)*fer(u,2,0)*bos(u,0,0)
-d(-3)*bos(u,3,0)*d(-3)*fer(u,2,0)*fer(u,1,0)*bos(u,0,0)*d(-3)*bos(u,0,0)
+d(-3)*bos(u,3,0)*d(-3)*fer(u,1,1)*d(-3)*fer(u,1,0)*bos(u,0,0)
-d(-3)*bos(u,0,4)
+d(-3)*bos(u,0,3)*bos(u,0,0)*d(-3)*bos(u,0,0)
2
+8*d(-3)*bos(u,0,2)*bos(u,0,0)
-d(-3)*bos(u,0,2)*bos(u,0,0)*d(-3)*bos(u,3,0)*d(-3)*bos(u,0,0)
-d(-3)*bos(u,0,2)*bos(u,0,0)*d(-3)*bos(u,0,1)
2
+5*d(-3)*bos(u,0,1) *bos(u,0,0)
3
-d(-3)*bos(u,0,1)*bos(u,0,0) *d(-3)*bos(u,0,0)
-d(-3)*bos(u,0,1)*bos(u,0,0)*d(-3)*bos(u,3,1)*d(-3)*bos(u,0,0)
-3*d(-3)*bos(u,0,1)*bos(u,0,0)*d(-3)*bos(u,3,0)*bos(u,0,0)
+d(-3)*bos(u,0,1)*bos(u,0,0)*d(-3)*bos(u,3,0)*d(-3)*bos(u,0,1)
+d(-3)*bos(u,0,1)*bos(u,0,0)*d(-3)*bos(u,0,2)
-d(-3)*bos(u,0,1)*bos(u,0,0)*d(-3)*bos(u,0,1)*bos(u,0,0)*d(-3)*bos(u,0,0)
3
-d(-3)*bos(u,0,1)*bos(u,0,0)*d(-3)*bos(u,0,0)
-d(-3)*bos(u,0,1)*bos(u,0,0)*d(-3)*fer(u,1,0)*d(-3)*fer(u,1,0)*bos(u,0,0)
5
-d(-3)*bos(u,0,0)
-d(-3)*fer(u,2,2)*fer(u,2,0)*d(-3)*bos(u,0,0)
-4*d(-3)*fer(u,2,1)*fer(u,2,0)*bos(u,0,0)
+d(-3)*fer(u,2,1)*fer(u,2,0)*d(-3)*bos(u,3,0)*d(-3)*bos(u,0,0)
+d(-3)*fer(u,2,1)*fer(u,2,0)*d(-3)*bos(u,0,1)
+2*d(-3)*fer(u,2,1)*fer(u,1,0)*bos(u,0,0)*d(-3)*bos(u,0,0)
-d(-3)*fer(u,2,0)*bos(u,3,0)*d(-3)*bos(u,0,0)*d(-3)*fer(u,1,0)*bos(u,0,0)
-2*d(-3)*fer(u,2,0)*bos(u,3,0)*d(-3)*fer(u,2,0)*bos(u,0,0)
+d(-3)*fer(u,2,0)*bos(u,3,0)*d(-3)*fer(u,2,0)*d(-3)*bos(u,0,1)
+d(-3)*fer(u,2,0)*bos(u,0,1)*d(-3)*fer(u,1,1)*d(-3)*bos(u,0,0)
+d(-3)*fer(u,2,0)*bos(u,0,1)*d(-3)*fer(u,1,0)*bos(u,0,0)
+d(-3)*fer(u,2,0)*bos(u,0,0)*d(-3)*fer(u,2,1)*bos(u,0,0)*d(-3)*bos(u,0,0)
+d(-3)*fer(u,2,0)*bos(u,0,0)*d(-3)*fer(u,2,0)*bos(u,0,1)*d(-3)*bos(u,0,0)
2
+d(-3)*fer(u,2,0)*bos(u,0,0)*d(-3)*fer(u,2,0)*bos(u,0,0)
+d(-3)*fer(u,2,0)*bos(u,0,0)*d(-3)*fer(u,1,1)*d(-3)*bos(u,0,1)
+d(-3)*fer(u,2,0)*bos(u,0,0)*d(-3)*fer(u,1,0)*bos(u,0,1)
+d(-3)*fer(u,2,0)*bos(u,0,0)*d(-3)*fer(u,1,0)*d(-3)*bos(u,3,0)*bos(u,0,0)
+2*d(-3)*fer(u,2,0)*fer(u,1,1)*bos(u,0,0)*d(-3)*bos(u,0,0)
+2*d(-3)*fer(u,2,0)*fer(u,1,0)*bos(u,0,1)*d(-3)*bos(u,0,0)
2
+8*d(-3)*fer(u,2,0)*fer(u,1,0)*bos(u,0,0)
-4*d(-3)*fer(u,2,0)*fer(u,1,0)*bos(u,0,0)*d(-3)*bos(u,3,0)*d(-3)
*bos(u,0,0)
-4*d(-3)*fer(u,2,0)*fer(u,1,0)*bos(u,0,0)*d(-3)*bos(u,0,1)
+d(-3)*fer(u,2,0)*fer(u,1,0)*d(-3)*bos(u,0,1)*bos(u,0,0)
+d(-3)*fer(u,2,0)*fer(u,1,0)*d(-3)*bos(u,0,1)*d(-3)*bos(u,0,1)
+d(-3)*fer(u,2,0)*fer(u,1,0)*d(-3)*bos(u,0,0)*d(-3)*bos(u,3,0)*bos(u,0,0)
-d(-3)*fer(u,1,2)*fer(u,1,0)*d(-3)*bos(u,0,0)
-4*d(-3)*fer(u,1,1)*fer(u,1,0)*bos(u,0,0)
+2*d(-3)*fer(u,1,1)*fer(u,1,0)*d(-3)*bos(u,3,0)*d(-3)*bos(u,0,0)
+2*d(-3)*fer(u,1,1)*fer(u,1,0)*d(-3)*bos(u,0,1)
-2*d(-3)*fer(u,1,0)*bos(u,3,0)*d(-3)*fer(u,1,1)*d(-3)*bos(u,0,0)
-2*d(-3)*fer(u,1,0)*bos(u,3,0)*d(-3)*fer(u,1,0)*bos(u,0,0)
-d(-3)*fer(u,1,0)*bos(u,0,1)*d(-3)*bos(u,0,0)*d(-3)*fer(u,1,0)*bos(u,0,0)
-2*d(-3)*fer(u,1,0)*bos(u,0,1)*d(-3)*fer(u,2,0)*bos(u,0,0)
+d(-3)*fer(u,1,0)*bos(u,0,1)*d(-3)*fer(u,2,0)*d(-3)*bos(u,0,1)
2
-2*d(-3)*fer(u,1,0)*bos(u,0,0) *d(-3)*fer(u,1,1)*d(-3)*bos(u,0,0)
2
-2*d(-3)*fer(u,1,0)*bos(u,0,0) *d(-3)*fer(u,1,0)*bos(u,0,0)
2
+d(-3)*fer(u,1,0)*d(-3)*bos(u,3,0)*d(-3)*fer(u,2,0)*bos(u,0,0)
+d(-3)*fer(u,1,0)*d(-3)*bos(u,3,0)*d(-3)*fer(u,1,0)*bos(u,0,1)
+2*d(-3)*fer(u,1,0)*d(-3)*bos(u,0,2)*d(-3)*fer(u,2,0)*bos(u,0,0)
+d(-3)*fer(u,1,0)*d(-3)*bos(u,0,1)*bos(u,0,0)*d(-3)*fer(u,1,0)*bos(u,0,0)
+d(-3)*fer(u,1,0)*d(-3)*fer(u,2,1)*bos(u,0,1)*d(-3)*bos(u,0,0)
-d(-3)*fer(u,1,0)*d(-3)*fer(u,2,1)*bos(u,0,0)*d(-3)*bos(u,0,1)
+d(-3)*fer(u,1,0)*d(-3)*fer(u,2,1)*d(-3)*bos(u,0,1)*bos(u,0,0)
-d(-3)*fer(u,1,0)*d(-3)*fer(u,2,0)*bos(u,3,0)*bos(u,0,0)*d(-3)*bos(u,0,0)
+d(-3)*fer(u,1,0)*d(-3)*fer(u,2,0)*bos(u,0,2)*d(-3)*bos(u,0,0)
+3*d(-3)*fer(u,1,0)*d(-3)*fer(u,2,0)*bos(u,0,1)*bos(u,0,0)
-d(-3)*fer(u,1,0)*d(-3)*fer(u,2,0)*bos(u,0,1)*d(-3)*bos(u,0,1)
+d(-3)*fer(u,1,0)*d(-3)*fer(u,1,2)*d(-3)*bos(u,0,1)
+d(-3)*fer(u,1,0)*d(-3)*fer(u,1,1)*bos(u,0,1)
-d(-3)*fer(u,1,0)*d(-3)*fer(u,1,1)*d(-3)*bos(u,3,0)*bos(u,0,0)
+d(-3)*fer(u,1,0)*d(-3)*fer(u,1,1)*d(-3)*bos(u,0,2)
3
-d(-3)*fer(u,1,0)*d(-3)*fer(u,1,1)*d(-3)*bos(u,0,0)
-2*d(-3)*fer(u,1,0)*d(-3)*fer(u,1,0)*bos(u,3,0)*bos(u,0,0)
+d(-3)*fer(u,1,0)*d(-3)*fer(u,1,0)*bos(u,0,2)
-d(-3)*fer(u,1,0)*d(-3)*fer(u,1,0)*bos(u,0,1)*bos(u,0,0)*d(-3)*bos(u,0,0)
3
-d(-3)*fer(u,1,0)*d(-3)*fer(u,1,0)*bos(u,0,0)
konserv:=sub(d(-3)=1,d_part(ld5,-1));
konserv := 5*bos(u,3,2)*bos(u,0,0)
+5*bos(u,3,1)*bos(u,0,1)
2
-10*bos(u,3,0) *bos(u,0,0)
+5*bos(u,3,0)*bos(u,0,2)
3
-10*bos(u,3,0)*bos(u,0,0)
-bos(u,0,4)
2
+10*bos(u,0,2)*bos(u,0,0)
2
+5*bos(u,0,1) *bos(u,0,0)
5
-bos(u,0,0)
-5*fer(u,2,1)*fer(u,2,0)*bos(u,0,0)
2
+10*fer(u,2,0)*fer(u,1,0)*bos(u,0,0)
-5*fer(u,1,1)*fer(u,1,0)*bos(u,0,0)
clear lax,lb2,la2,lb4,kxk,la4,lc4,lb5,lc5,la5,konserv;
%22.) The N=2 SuSy Boussinesq equation
% example from Z.Popowicz Phys.LettB.319 (1993) 478-484
clearrules trad;
let chiral;
lax:=del(1)*(d(1)^2+bos(j,0,0)*d(1)+bos(tt,0,0))*der(2);
lax := del(1)*bos(j,0,0)*d(1)*der(2)
+del(1)*bos(tt,0,0)*der(2)
2
+del(1)*d(1) *der(2)
la2:=del(1)*(d(1)+2*bos(j,0,0)/3)*der(2);
la2 := (2*del(1)*bos(j,0,0)*der(2)
+3*del(1)*d(1)*der(2))/3
com:=sub(del(1)=1,der(2)=1,lax*la2-la2*lax);
com := (
-2*bos(j,0,3)
-2*bos(j,0,2)*bos(j,0,0)
-3*bos(j,0,2)*d(1)
-2*bos(j,0,1)*bos(j,0,0)*d(1)
+3*bos(tt,0,2)
+2*bos(tt,0,1)*bos(j,0,0)
+6*bos(tt,0,1)*d(1)
-2*bos(tt,0,0)*bos(j,0,1)
-2*fer(j,2,1)*fer(j,1,0)
+2*fer(tt,2,0)*fer(j,1,0)
+2*fer(tt,1,0)*fer(j,2,0))/3
operator boss;
boss(j,t):=d_part(com,1);
boss(j,t) := (
-3*bos(j,0,2)
-2*bos(j,0,1)*bos(j,0,0)
+6*bos(tt,0,1))/3
boss(tt,t):=d_part(com,0);
boss(tt,t) := (
-2*bos(j,0,3)
-2*bos(j,0,2)*bos(j,0,0)
+3*bos(tt,0,2)
+2*bos(tt,0,1)*bos(j,0,0)
-2*bos(tt,0,0)*bos(j,0,1)
-2*fer(j,2,1)*fer(j,1,0)
+2*fer(tt,2,0)*fer(j,1,0)
+2*fer(tt,1,0)*fer(j,2,0))/3
% let us shift bos(tt,0,0) to
bos(tt,0,0):=bos(tx,0,0)/2+bos(j,0,0)**2/6 + bos(j,0,1)/2;
bos(tt,0,0) := (3*bos(j,0,1)
2
+bos(j,0,0)
+3*bos(tx,0,0))/6
bos(tt,0,1):=pg(1,bos(tt,0,0));
bos(tt,0,1) := (3*bos(j,0,2)
+2*bos(j,0,1)*bos(j,0,0)
+3*bos(tx,0,1))/6
bos(tt,0,2):=pg(1,bos(tt,0,1));
bos(tt,0,2) := (3*bos(j,0,3)
+2*bos(j,0,2)*bos(j,0,0)
2
+2*bos(j,0,1)
+3*bos(tx,0,2))/6
fer(tt,1,0):=pr(1,bos(tt,0,0));
fer(tt,1,0) := (3*fer(j,1,1)
+2*fer(j,1,0)*bos(j,0,0)
+3*fer(tx,1,0))/6
fer(tt,2,0):=pr(2,bos(tt,0,0));
fer(tt,2,0) := (3*fer(j,2,1)
+2*fer(j,2,0)*bos(j,0,0)
+3*fer(tx,2,0))/6
% then the equations of motion are;
bos(j,t):=boss(j,t);
bos(j,t) := bos(tx,0,1)
bos(tx,t):=2*(boss(tt,t) - boss(j,t)*bos(j,0,0)/3-
pg(1,boss(j,t))/2);
bos(tx,t) := (
-3*bos(j,0,3)
2
+2*bos(j,0,1)*bos(j,0,0)
-6*bos(tx,0,0)*bos(j,0,1)
-6*fer(j,2,1)*fer(j,1,0)
-6*fer(j,2,0)*fer(j,1,1)
+6*fer(tx,2,0)*fer(j,1,0)
+6*fer(tx,1,0)*fer(j,2,0))/9
clear lax,la2;
clearrules chiral;
let trad;
%23.) the Jacobi identity;
% we will find the N=2 susy extension of the Virasoro algebra.
% First we found the most general form of the susy-pseudo-differential
% element of the dimension two.
vira:=pse_ele(2,{{f,1,b}},a);
*** a already defined as operator
vira := a(2)*bos(f,3,0)
+a(3)*bos(f,0,1)
2
+a(4)*bos(f,0,0)
+a(5)*bos(f,0,0)*d(1)
+a(6)*bos(f,0,0)*der(1)*der(2)
2
+a(0)*d(1)
+a(1)*d(1)*der(1)*der(2)
+a(7)*fer(f,2,0)*der(2)
+a(8)*fer(f,2,0)*der(1)
+a(9)*fer(f,1,0)*der(2)
+a(10)*fer(f,1,0)*der(1)
% This vira should be antisymmetrical so we found
ewa:=vira+cp(vira);
*** d not found
*** der not found
*** del not found
ewa := bos(f,3,0)*(
-a(9)
+a(8)
+a(6)
+2*a(2))
+bos(f,0,1)*(a(10)
+a(7)
-a(5)
+2*a(3))
2
+2*a(4)*bos(f,0,0)
+2*a(6)*(bos(f,0,0)*der(1)*der(2))
-a(6)*fer(f,2,0)*der(1)
+a(6)*fer(f,1,0)*der(2)
2
+2*a(0)*d(1)
%we first solve ewa in order to found free coefficients;
load_package groebner;
adam:=groesolve(sub(der(1)=1,der(2)=1,d(1)=1,lyst1(ewa)));
adam := {{a(10)=
-a(7)
+a(5)
-2*a(3),
a(9)=a(8)
+2*a(2),
a(4)=0,
a(0)=0,
a(6)=0}}
% we define now the most general antisymmetrical susy-pseudo-symmetrical
% element of conformal dimension two.
vira:=sub(adam,vira);
vira := a(2)*bos(f,3,0)
+a(3)*bos(f,0,1)
+a(5)*bos(f,0,0)*d(1)
+fer(f,2,0)*(der(2)*a(7)
+der(1)*a(8))
+fer(f,1,0)*(der(2)*a(8)
+2*der(2)*a(2)
-der(1)*a(7)
+der(1)*a(5)
-2*der(1)*a(3))
+a(1)*d(1)*der(1)*der(2)
% we make additional assumption that our Poisson tensor vira should be O(2)
% invariant under the change of susy derivatives;
dad:=odwa(vira)-vira;
dad := fer(f,2,0)*(
-2*der(2)*a(7)
+der(2)*a(5)
-2*der(2)*a(3)
-2*der(1)*a(8)
-2*der(1)*a(2))
+fer(f,1,0)*(
-2*der(2)*a(8)
-2*der(2)*a(2)
+2*der(1)*a(7)
-der(1)*a(5)
+2*der(1)*a(3))
factor der;
wyr1:=sub(der(1)=1,der(2)=1,lyst1(dad));
wyr1 := {
-2*a(7)
+a(5)
-2*a(3),
-2*(a(8)
+a(2)),
-2*(a(8)
+a(2)),
2*a(7)
-a(5)
+2*a(3)}
remfac der;
*** der not found
dad:=groesolve(wyr1);
dad := {{a(8)=
-a(2),a(7)=(a(5)
-2*a(3))/2}}
vira:=sub(dad,vira);
vira := (2*a(2)*bos(f,3,0)
+2*a(3)*bos(f,0,1)
+2*a(5)*(bos(f,0,0)*d(1))
+fer(f,2,0)*(der(2)*a(5)
-2*der(2)*a(3)
-2*der(1)*a(2))
+fer(f,1,0)*(2*der(2)*a(2)
+der(1)*a(5)
-2*der(1)*a(3))
+2*a(1)*(d(1)*der(1)*der(2)))/2
% we check wheather it is really O(2) invariant;
vira-odwa(vira);
0
% O.K
%so
%now we check the Jacobi identity
jjacob:=fjacob(vira,f);
jjacob := (4*a(3)*a(1)*(bos(#c,3,2)*bos(#b,0,0)*bos(#a,0,0))
+4*a(5)*a(1)*(bos(#c,3,1)*bos(#b,0,1)*bos(#a,0,0))
-4*a(2)*a(1)*bos(#c,0,3)*bos(#b,0,0)*bos(#a,0,0)
+4*a(5)*a(1)*(bos(#c,0,1)*bos(#b,0,0)*bos(#a,3,1))
+4*a(3)*a(1)*(bos(#c,0,0)*bos(#b,3,2)*bos(#a,0,0))
+4*a(5)*a(1)*(bos(#c,0,0)*bos(#b,3,1)*bos(#a,0,1))
-4*a(2)*a(1)*bos(#c,0,0)*bos(#b,0,3)*bos(#a,0,0)
+4*a(3)*a(1)*(bos(#c,0,0)*bos(#b,0,0)*bos(#a,3,2))
-4*a(2)*a(1)*bos(#c,0,0)*bos(#b,0,0)*bos(#a,0,3)
+24*a(3)*a(2)*(bos(f,3,1)*bos(#c,0,0)*bos(#b,0,0)*bos(#a,0,0))
2
-4*a(2) *bos(f,3,0)*bos(#c,3,0)*bos(#b,0,0)*bos(#a,0,0)
+4*bos(f,3,0)*bos(#c,0,1)*bos(#b,0,0)*bos(#a,0,0)*a(2)*(a(5)
+3*a(3))
2
-4*a(2) *bos(f,3,0)*bos(#c,0,0)*bos(#b,3,0)*bos(#a,0,0)
+4*bos(f,3,0)*bos(#c,0,0)*bos(#b,0,1)*bos(#a,0,0)*a(2)*(a(5)
+3*a(3))
2
-4*a(2) *bos(f,3,0)*bos(#c,0,0)*bos(#b,0,0)*bos(#a,3,0)
+4*bos(f,3,0)*bos(#c,0,0)*bos(#b,0,0)*bos(#a,0,1)*a(2)*(a(5)
+3*a(3))
2
+12*bos(f,0,2)*bos(#c,0,0)*bos(#b,0,0)*bos(#a,0,0)*(a(3)
2
-a(2) )
+4*bos(f,0,1)*bos(#c,3,0)*bos(#b,0,0)*bos(#a,0,0)*a(2)*(a(5)
-a(3))
+4*bos(f,0,1)*bos(#c,0,1)*bos(#b,0,0)*bos(#a,0,0)*(2*a(5)*a(3)
2
+a(3)
2
-2*a(2) )
+4*bos(f,0,1)*bos(#c,0,0)*bos(#b,3,0)*bos(#a,0,0)*a(2)*(a(5)
-a(3))
+4*bos(f,0,1)*bos(#c,0,0)*bos(#b,0,1)*bos(#a,0,0)*(2*a(5)*a(3)
2
+a(3)
2
-2*a(2) )
+4*bos(f,0,1)*bos(#c,0,0)*bos(#b,0,0)*bos(#a,3,0)*a(2)*(a(5)
-a(3))
+4*bos(f,0,1)*bos(#c,0,0)*bos(#b,0,0)*bos(#a,0,1)*(2*a(5)*a(3)
2
+a(3)
2
-2*a(2) )
+4*a(5)*a(2)*(bos(f,0,0)*bos(#c,3,1)*bos(#b,0,0)*bos(#a,0,0))
+4*a(5)*a(3)*(bos(f,0,0)*bos(#c,0,2)*bos(#b,0,0)*bos(#a,0,0))
2
+4*a(5) *(bos(f,0,0)*bos(#c,0,1)*bos(#b,0,1)*bos(#a,0,0))
2
+4*a(5) *(bos(f,0,0)*bos(#c,0,1)*bos(#b,0,0)*bos(#a,0,1))
+4*a(5)*a(2)*(bos(f,0,0)*bos(#c,0,0)*bos(#b,3,1)*bos(#a,0,0))
+4*a(5)*a(3)*(bos(f,0,0)*bos(#c,0,0)*bos(#b,0,2)*bos(#a,0,0))
2
+4*a(5) *(bos(f,0,0)*bos(#c,0,0)*bos(#b,0,1)*bos(#a,0,1))
+4*a(5)*a(2)*(bos(f,0,0)*bos(#c,0,0)*bos(#b,0,0)*bos(#a,3,1))
+4*a(5)*a(3)*(bos(f,0,0)*bos(#c,0,0)*bos(#b,0,0)*bos(#a,0,2))
+4*a(2)*a(1)*(fer(#b,2,2)*fer(#a,2,0)*bos(#c,0,0))
+2*fer(#b,2,2)*fer(#a,1,0)*bos(#c,0,0)*a(1)*(a(5)
-2*a(3))
+2*fer(#b,2,1)*fer(#a,2,0)*bos(f,0,0)*bos(#c,0,0)*a(5)*(a(5)
-2*a(3))
-4*a(5)*a(2)*fer(#b,2,1)*fer(#a,1,0)*bos(f,0,0)*bos(#c,0,0)
+2*fer(#b,2,0)*fer(#a,2,0)*bos(f,3,0)*bos(#c,0,0)*a(2)*(a(5)
-2*a(3))
2
+fer(#b,2,0)*fer(#a,2,0)*bos(f,0,1)*bos(#c,0,0)*(a(5)
-2*a(5)*a(3)
2
+4*a(2) )
2
+fer(#b,2,0)*fer(#a,1,0)*bos(f,3,0)*bos(#c,0,0)*(a(5)
-4*a(5)*a(3)
2
+4*a(3) )
-4*a(3)*a(2)*fer(#b,2,0)*fer(#a,1,0)*bos(f,0,1)*bos(#c,0,0)
+2*fer(#b,1,2)*fer(#a,2,0)*bos(#c,0,0)*a(1)*(
-a(5)
+2*a(3))
+4*a(2)*a(1)*(fer(#b,1,2)*fer(#a,1,0)*bos(#c,0,0))
+4*a(5)*a(2)*(fer(#b,1,1)*fer(#a,2,0)*bos(f,0,0)*bos(#c,0,0))
+2*fer(#b,1,1)*fer(#a,1,0)*bos(f,0,0)*bos(#c,0,0)*a(5)*(a(5)
-2*a(3))
+fer(#b,1,0)*fer(#a,2,0)*bos(f,3,0)*bos(#c,0,0)*(
2
-a(5)
+4*a(5)*a(3)
2
-4*a(3) )
+4*a(3)*a(2)*(fer(#b,1,0)*fer(#a,2,0)*bos(f,0,1)*bos(#c,0,0))
+2*fer(#b,1,0)*fer(#a,1,0)*bos(f,3,0)*bos(#c,0,0)*a(2)*(a(5)
-2*a(3))
2
+fer(#b,1,0)*fer(#a,1,0)*bos(f,0,1)*bos(#c,0,0)*(a(5)
-2*a(5)*a(3)
2
+4*a(2) )
+4*a(2)*a(1)*(fer(#c,2,2)*fer(#b,2,0)*bos(#a,0,0))
+2*fer(#c,2,2)*fer(#b,1,0)*bos(#a,0,0)*a(1)*(a(5)
-2*a(3))
+2*fer(#c,2,1)*fer(#b,2,0)*bos(f,0,0)*bos(#a,0,0)*a(5)*(a(5)
-2*a(3))
-4*a(5)*a(2)*fer(#c,2,1)*fer(#b,1,0)*bos(f,0,0)*bos(#a,0,0)
-4*a(2)*a(1)*fer(#c,2,0)*fer(#a,2,2)*bos(#b,0,0)
+2*fer(#c,2,0)*fer(#a,2,1)*bos(f,0,0)*bos(#b,0,0)*a(5)*(
-a(5)
+2*a(3))
+2*fer(#c,2,0)*fer(#a,2,0)*bos(f,3,0)*bos(#b,0,0)*a(2)*(
-a(5)
+2*a(3))
+fer(#c,2,0)*fer(#a,2,0)*bos(f,0,1)*bos(#b,0,0)*(
2
-a(5)
+2*a(5)*a(3)
2
-4*a(2) )
+2*fer(#c,2,0)*fer(#a,1,2)*bos(#b,0,0)*a(1)*(a(5)
-2*a(3))
-4*a(5)*a(2)*fer(#c,2,0)*fer(#a,1,1)*bos(f,0,0)*bos(#b,0,0)
2
+fer(#c,2,0)*fer(#a,1,0)*bos(f,3,0)*bos(#b,0,0)*(a(5)
-4*a(5)*a(3)
2
+4*a(3) )
-4*a(3)*a(2)*fer(#c,2,0)*fer(#a,1,0)*bos(f,0,1)*bos(#b,0,0)
+2*fer(#c,2,0)*fer(#b,2,0)*bos(f,3,0)*bos(#a,0,0)*a(2)*(a(5)
-2*a(3))
2
+fer(#c,2,0)*fer(#b,2,0)*bos(f,0,1)*bos(#a,0,0)*(a(5)
-2*a(5)*a(3)
2
+4*a(2) )
2
+fer(#c,2,0)*fer(#b,1,0)*bos(f,3,0)*bos(#a,0,0)*(a(5)
-4*a(5)*a(3)
2
+4*a(3) )
-4*a(3)*a(2)*fer(#c,2,0)*fer(#b,1,0)*bos(f,0,1)*bos(#a,0,0)
+2*fer(#c,1,2)*fer(#b,2,0)*bos(#a,0,0)*a(1)*(
-a(5)
+2*a(3))
+4*a(2)*a(1)*(fer(#c,1,2)*fer(#b,1,0)*bos(#a,0,0))
+4*a(5)*a(2)*(fer(#c,1,1)*fer(#b,2,0)*bos(f,0,0)*bos(#a,0,0))
+2*fer(#c,1,1)*fer(#b,1,0)*bos(f,0,0)*bos(#a,0,0)*a(5)*(a(5)
-2*a(3))
+2*fer(#c,1,0)*fer(#a,2,2)*bos(#b,0,0)*a(1)*(
-a(5)
+2*a(3))
+4*a(5)*a(2)*(fer(#c,1,0)*fer(#a,2,1)*bos(f,0,0)*bos(#b,0,0))
+fer(#c,1,0)*fer(#a,2,0)*bos(f,3,0)*bos(#b,0,0)*(
2
-a(5)
+4*a(5)*a(3)
2
-4*a(3) )
+4*a(3)*a(2)*(fer(#c,1,0)*fer(#a,2,0)*bos(f,0,1)*bos(#b,0,0))
-4*a(2)*a(1)*fer(#c,1,0)*fer(#a,1,2)*bos(#b,0,0)
+2*fer(#c,1,0)*fer(#a,1,1)*bos(f,0,0)*bos(#b,0,0)*a(5)*(
-a(5)
+2*a(3))
+2*fer(#c,1,0)*fer(#a,1,0)*bos(f,3,0)*bos(#b,0,0)*a(2)*(
-a(5)
+2*a(3))
+fer(#c,1,0)*fer(#a,1,0)*bos(f,0,1)*bos(#b,0,0)*(
2
-a(5)
+2*a(5)*a(3)
2
-4*a(2) )
+fer(#c,1,0)*fer(#b,2,0)*bos(f,3,0)*bos(#a,0,0)*(
2
-a(5)
+4*a(5)*a(3)
2
-4*a(3) )
+4*a(3)*a(2)*(fer(#c,1,0)*fer(#b,2,0)*bos(f,0,1)*bos(#a,0,0))
+2*fer(#c,1,0)*fer(#b,1,0)*bos(f,3,0)*bos(#a,0,0)*a(2)*(a(5)
-2*a(3))
2
+fer(#c,1,0)*fer(#b,1,0)*bos(f,0,1)*bos(#a,0,0)*(a(5)
-2*a(5)*a(3)
2
+4*a(2) )
+4*fer(f,2,1)*fer(#a,2,0)*bos(#c,0,0)*bos(#b,0,0)*(a(5)*a(3)
2
-2*a(3)
2
+a(2) )
-12*a(3)*a(2)*fer(f,2,1)*fer(#a,1,0)*bos(#c,0,0)*bos(#b,0,0)
+4*fer(f,2,1)*fer(#b,2,0)*bos(#c,0,0)*bos(#a,0,0)*(a(5)*a(3)
2
-2*a(3)
2
+a(2) )
-12*a(3)*a(2)*fer(f,2,1)*fer(#b,1,0)*bos(#c,0,0)*bos(#a,0,0)
+4*fer(f,2,1)*fer(#c,2,0)*bos(#b,0,0)*bos(#a,0,0)*(a(5)*a(3)
2
-2*a(3)
2
+a(2) )
-12*a(3)*a(2)*fer(f,2,1)*fer(#c,1,0)*bos(#b,0,0)*bos(#a,0,0)
+2*fer(f,2,0)*fer(#a,2,1)*bos(#c,0,0)*bos(#b,0,0)*(a(5)*a(3)
2
-2*a(3)
2
+2*a(2) )
+2*fer(f,2,0)*fer(#a,2,0)*bos(#c,0,1)*bos(#b,0,0)*a(5)*(a(5)
-2*a(3))
+4*fer(f,2,0)*fer(#a,2,0)*bos(#c,0,0)*bos(#b,3,0)*a(2)*(
-a(5)
+2*a(3))
2
+fer(f,2,0)*fer(#a,2,0)*bos(#c,0,0)*bos(#b,0,1)*(a(5)
2
-4*a(3)
2
+4*a(2) )
+2*fer(f,2,0)*fer(#a,1,1)*bos(#c,0,0)*bos(#b,0,0)*a(2)*(
-a(5)
-4*a(3))
-4*a(5)*a(2)*fer(f,2,0)*fer(#a,1,0)*bos(#c,0,1)*bos(#b,0,0)
+fer(f,2,0)*fer(#a,1,0)*bos(#c,0,0)*bos(#b,3,0)*(
2
-a(5)
+4*a(5)*a(3)
2
-4*a(3)
2
+4*a(2) )
-8*a(3)*a(2)*fer(f,2,0)*fer(#a,1,0)*bos(#c,0,0)*bos(#b,0,1)
+2*fer(f,2,0)*fer(#b,2,1)*bos(#c,0,0)*bos(#a,0,0)*(a(5)*a(3)
2
-2*a(3)
2
+2*a(2) )
+4*fer(f,2,0)*fer(#b,2,0)*bos(#c,3,0)*bos(#a,0,0)*a(2)*(
-a(5)
+2*a(3))
2
+fer(f,2,0)*fer(#b,2,0)*bos(#c,0,1)*bos(#a,0,0)*(a(5)
2
-4*a(3)
2
+4*a(2) )
+2*fer(f,2,0)*fer(#b,2,0)*bos(#c,0,0)*bos(#a,0,1)*a(5)*(a(5)
-2*a(3))
+2*fer(f,2,0)*fer(#b,1,1)*bos(#c,0,0)*bos(#a,0,0)*a(2)*(
-a(5)
-4*a(3))
+fer(f,2,0)*fer(#b,1,0)*bos(#c,3,0)*bos(#a,0,0)*(
2
-a(5)
+4*a(5)*a(3)
2
-4*a(3)
2
+4*a(2) )
-8*a(3)*a(2)*fer(f,2,0)*fer(#b,1,0)*bos(#c,0,1)*bos(#a,0,0)
-4*a(5)*a(2)*fer(f,2,0)*fer(#b,1,0)*bos(#c,0,0)*bos(#a,0,1)
+2*fer(f,2,0)*fer(#c,2,1)*bos(#b,0,0)*bos(#a,0,0)*(a(5)*a(3)
2
-2*a(3)
2
+2*a(2) )
+2*fer(f,2,0)*fer(#c,2,0)*bos(#b,0,1)*bos(#a,0,0)*a(5)*(a(5)
-2*a(3))
+4*fer(f,2,0)*fer(#c,2,0)*bos(#b,0,0)*bos(#a,3,0)*a(2)*(
-a(5)
+2*a(3))
2
+fer(f,2,0)*fer(#c,2,0)*bos(#b,0,0)*bos(#a,0,1)*(a(5)
2
-4*a(3)
2
+4*a(2) )
+2*fer(f,2,0)*fer(#c,1,1)*bos(#b,0,0)*bos(#a,0,0)*a(2)*(
-a(5)
-4*a(3))
-4*a(5)*a(2)*fer(f,2,0)*fer(#c,1,0)*bos(#b,0,1)*bos(#a,0,0)
+fer(f,2,0)*fer(#c,1,0)*bos(#b,0,0)*bos(#a,3,0)*(
2
-a(5)
+4*a(5)*a(3)
2
-4*a(3)
2
+4*a(2) )
-8*a(3)*a(2)*fer(f,2,0)*fer(#c,1,0)*bos(#b,0,0)*bos(#a,0,1)
+12*a(3)*a(2)*(fer(f,1,1)*fer(#a,2,0)*bos(#c,0,0)*bos(#b,0,0))
+4*fer(f,1,1)*fer(#a,1,0)*bos(#c,0,0)*bos(#b,0,0)*(a(5)*a(3)
2
-2*a(3)
2
+a(2) )
+12*a(3)*a(2)*(fer(f,1,1)*fer(#b,2,0)*bos(#c,0,0)*bos(#a,0,0))
+4*fer(f,1,1)*fer(#b,1,0)*bos(#c,0,0)*bos(#a,0,0)*(a(5)*a(3)
2
-2*a(3)
2
+a(2) )
+12*a(3)*a(2)*(fer(f,1,1)*fer(#c,2,0)*bos(#b,0,0)*bos(#a,0,0))
+4*fer(f,1,1)*fer(#c,1,0)*bos(#b,0,0)*bos(#a,0,0)*(a(5)*a(3)
2
-2*a(3)
2
+a(2) )
+2*fer(f,1,0)*fer(#a,2,1)*bos(#c,0,0)*bos(#b,0,0)*a(2)*(a(5)
+4*a(3))
+4*a(5)*a(2)*(fer(f,1,0)*fer(#a,2,0)*bos(#c,0,1)*bos(#b,0,0))
2
+fer(f,1,0)*fer(#a,2,0)*bos(#c,0,0)*bos(#b,3,0)*(a(5)
-4*a(5)*a(3)
2
+4*a(3)
2
-4*a(2) )
+8*a(3)*a(2)*(fer(f,1,0)*fer(#a,2,0)*bos(#c,0,0)*bos(#b,0,1))
+2*fer(f,1,0)*fer(#a,1,1)*bos(#c,0,0)*bos(#b,0,0)*(a(5)*a(3)
2
-2*a(3)
2
+2*a(2) )
+2*fer(f,1,0)*fer(#a,1,0)*bos(#c,0,1)*bos(#b,0,0)*a(5)*(a(5)
-2*a(3))
+4*fer(f,1,0)*fer(#a,1,0)*bos(#c,0,0)*bos(#b,3,0)*a(2)*(
-a(5)
+2*a(3))
2
+fer(f,1,0)*fer(#a,1,0)*bos(#c,0,0)*bos(#b,0,1)*(a(5)
2
-4*a(3)
2
+4*a(2) )
+2*fer(f,1,0)*fer(#b,2,1)*bos(#c,0,0)*bos(#a,0,0)*a(2)*(a(5)
+4*a(3))
2
+fer(f,1,0)*fer(#b,2,0)*bos(#c,3,0)*bos(#a,0,0)*(a(5)
-4*a(5)*a(3)
2
+4*a(3)
2
-4*a(2) )
+8*a(3)*a(2)*(fer(f,1,0)*fer(#b,2,0)*bos(#c,0,1)*bos(#a,0,0))
+4*a(5)*a(2)*(fer(f,1,0)*fer(#b,2,0)*bos(#c,0,0)*bos(#a,0,1))
+2*fer(f,1,0)*fer(#b,1,1)*bos(#c,0,0)*bos(#a,0,0)*(a(5)*a(3)
2
-2*a(3)
2
+2*a(2) )
+4*fer(f,1,0)*fer(#b,1,0)*bos(#c,3,0)*bos(#a,0,0)*a(2)*(
-a(5)
+2*a(3))
2
+fer(f,1,0)*fer(#b,1,0)*bos(#c,0,1)*bos(#a,0,0)*(a(5)
2
-4*a(3)
2
+4*a(2) )
+2*fer(f,1,0)*fer(#b,1,0)*bos(#c,0,0)*bos(#a,0,1)*a(5)*(a(5)
-2*a(3))
+2*fer(f,1,0)*fer(#c,2,1)*bos(#b,0,0)*bos(#a,0,0)*a(2)*(a(5)
+4*a(3))
+4*a(5)*a(2)*(fer(f,1,0)*fer(#c,2,0)*bos(#b,0,1)*bos(#a,0,0))
2
+fer(f,1,0)*fer(#c,2,0)*bos(#b,0,0)*bos(#a,3,0)*(a(5)
-4*a(5)*a(3)
2
+4*a(3)
2
-4*a(2) )
+8*a(3)*a(2)*(fer(f,1,0)*fer(#c,2,0)*bos(#b,0,0)*bos(#a,0,1))
+2*fer(f,1,0)*fer(#c,1,1)*bos(#b,0,0)*bos(#a,0,0)*(a(5)*a(3)
2
-2*a(3)
2
+2*a(2) )
+2*fer(f,1,0)*fer(#c,1,0)*bos(#b,0,1)*bos(#a,0,0)*a(5)*(a(5)
-2*a(3))
+4*fer(f,1,0)*fer(#c,1,0)*bos(#b,0,0)*bos(#a,3,0)*a(2)*(
-a(5)
+2*a(3))
2
+fer(f,1,0)*fer(#c,1,0)*bos(#b,0,0)*bos(#a,0,1)*(a(5)
2
-4*a(3)
2
+4*a(2) ))/4
% we now check jjacob on the susy-divergence behaviour w.r. to the test
% superfunction !#a;
az:=war(jjacob,!#a);
az := {2*a(1)*(a(5)
-a(3)),
a(1)*(a(5)
-a(3)),
-2*a(2)*a(1),
a(1)*(
-a(5)
+a(3)),
-a(2)*a(1),
2*a(1)*(
-a(5)
+a(3)),
a(2)*a(1),
2*a(2)*a(1),
a(2)*(
-a(5)
+2*a(3)),
a(2)*(a(5)
-2*a(3)),
a(5)*a(2),
2
-2*a(2) ,
-a(5)*a(2),
2
2*a(2) ,
2*a(5)*a(2),
a(5)*a(2),
-a(5)*a(2),
-2*a(5)*a(2),
2*a(2)*a(1),
a(1)*(a(5)
-a(3)),
2*a(2)*a(1),
-a(5)*a(2),
2*a(2)*a(1),
(a(2)*(a(5)
-2*a(3)))/2,
2
(a(5)
-3*a(5)*a(3)
2
+2*a(3)
2
+4*a(2) )/2,
a(1)*(
-a(5)
+a(3)),
a(5)*a(2),
a(1)*(
-a(5)
+a(3)),
2*a(2)*a(1),
a(5)*a(2),
2*a(2)*a(1),
a(1)*(a(5)
-a(3)),
-a(5)*a(2),
2*a(2)*a(1),
(a(2)*(a(5)
-2*a(3)))/2,
2
(a(5)
-3*a(5)*a(3)
2
+2*a(3)
2
+4*a(2) )/2,
2
a(2) ,
a(2)*(a(5)
-a(3)),
2
-a(2) ,
a(2)*(
-a(5)
+a(3)),
(
2
-a(5)
+3*a(5)*a(3)
2
-2*a(3)
2
+2*a(2) )/2,
a(5)*a(2),
(a(2)*(3*a(5)
-4*a(3)))/2,
2
(a(5)
-3*a(5)*a(3)
2
+2*a(3)
2
-2*a(2) )/2,
-a(5)*a(2),
(a(2)*(
-3*a(5)
+4*a(3)))/2,
a(2)*(
-a(5)
+a(3)),
2
a(2) ,
a(2)*(a(5)
-a(3)),
2
-a(2) ,
-a(5)*a(2),
(a(2)*(
-3*a(5)
+4*a(3)))/2,
(
2
-a(5)
+3*a(5)*a(3)
2
-2*a(3)
2
+2*a(2) )/2,
a(5)*a(2),
(a(2)*(3*a(5)
-4*a(3)))/2,
2
(a(5)
-3*a(5)*a(3)
2
+2*a(3)
2
-2*a(2) )/2}
as:=groesolve(az);
as := {{a(1)=0,a(3)=a(5)/2,a(2)=0},
{a(3)=a(5),a(2)=0,a(1)=arbcomplex(2)}}
array ew(3);
for k:=1:2 do ew(k):=part(as,k);
% as we see we have two different solutions
% first give us classical realizations of the Virasoro algebra
% (without the center term) which is
sub(ew(1),vira);
(a(5)*bos(f,0,1)
+2*a(5)*(bos(f,0,0)*d(1)))/2
% the second solution give us desired susy generalizations of
% Virasoro algebra
sub(ew(2),vira);
(2*a(5)*bos(f,0,1)
+2*a(5)*(bos(f,0,0)*d(1))
-a(5)*fer(f,2,0)*der(2)
-a(5)*fer(f,1,0)*der(1)
+2*arbcomplex(2)*(d(1)*der(1)*der(2)))/2
% the coefficient "a" could be absorbed by redefinations of
% bos(f,0,0)
% we check that previous result satisfies the antisymmetric requirements
ws + cp(ws);
*** d not found
*** der not found
*** del not found
0
clearrules trad;
let chiral1 ;
% We check that for chiral1 realization the following operator
vira:=der(3)*d(1)+bos(j,0,1)+bos(j,0,0)*d(1)+
fer(j,1,0)*der(2)+fer(j,2,0)*der(1);
vira := bos(j,0,1)
+bos(j,0,0)*d(1)
+fer(j,2,0)*der(1)
+fer(j,1,0)*der(2)
+d(1)*der(3)
% satisfy the Jacobi identity;
jjacob:=fjacob(vira,j);
jjacob := (2*bos(#c,3,2)*bos(#b,0,0)*bos(#a,0,0)
+2*bos(#c,3,1)*bos(#b,0,1)*bos(#a,0,0)
+2*bos(#c,0,1)*bos(#b,0,0)*bos(#a,3,1)
+2*bos(#c,0,0)*bos(#b,3,2)*bos(#a,0,0)
+2*bos(#c,0,0)*bos(#b,3,1)*bos(#a,0,1)
+2*bos(#c,0,0)*bos(#b,0,0)*bos(#a,3,2)
+6*bos(j,0,2)*bos(#c,0,0)*bos(#b,0,0)*bos(#a,0,0)
+6*bos(j,0,1)*bos(#c,0,1)*bos(#b,0,0)*bos(#a,0,0)
+6*bos(j,0,1)*bos(#c,0,0)*bos(#b,0,1)*bos(#a,0,0)
+6*bos(j,0,1)*bos(#c,0,0)*bos(#b,0,0)*bos(#a,0,1)
+2*bos(j,0,0)*bos(#c,0,2)*bos(#b,0,0)*bos(#a,0,0)
+2*bos(j,0,0)*bos(#c,0,1)*bos(#b,0,1)*bos(#a,0,0)
+2*bos(j,0,0)*bos(#c,0,1)*bos(#b,0,0)*bos(#a,0,1)
+2*bos(j,0,0)*bos(#c,0,0)*bos(#b,0,2)*bos(#a,0,0)
+2*bos(j,0,0)*bos(#c,0,0)*bos(#b,0,1)*bos(#a,0,1)
+2*bos(j,0,0)*bos(#c,0,0)*bos(#b,0,0)*bos(#a,0,2)
-2*fer(#b,2,2)*fer(#a,1,0)*bos(#c,0,0)
+2*fer(#b,2,1)*fer(#a,1,0)*bos(j,0,0)*bos(#c,0,0)
-fer(#b,2,0)*fer(#a,1,0)*bos(j,3,0)*bos(#c,0,0)
+fer(#b,2,0)*fer(#a,1,0)*bos(j,0,1)*bos(#c,0,0)
+2*fer(#b,1,2)*fer(#a,2,0)*bos(#c,0,0)
+2*fer(#b,1,1)*fer(#a,2,0)*bos(j,0,0)*bos(#c,0,0)
+fer(#b,1,0)*fer(#a,2,0)*bos(j,3,0)*bos(#c,0,0)
+fer(#b,1,0)*fer(#a,2,0)*bos(j,0,1)*bos(#c,0,0)
-2*fer(#c,2,2)*fer(#b,1,0)*bos(#a,0,0)
+2*fer(#c,2,1)*fer(#b,1,0)*bos(j,0,0)*bos(#a,0,0)
-2*fer(#c,2,0)*fer(#a,1,2)*bos(#b,0,0)
-2*fer(#c,2,0)*fer(#a,1,1)*bos(j,0,0)*bos(#b,0,0)
-fer(#c,2,0)*fer(#a,1,0)*bos(j,3,0)*bos(#b,0,0)
-fer(#c,2,0)*fer(#a,1,0)*bos(j,0,1)*bos(#b,0,0)
-fer(#c,2,0)*fer(#b,1,0)*bos(j,3,0)*bos(#a,0,0)
+fer(#c,2,0)*fer(#b,1,0)*bos(j,0,1)*bos(#a,0,0)
+2*fer(#c,1,2)*fer(#b,2,0)*bos(#a,0,0)
+2*fer(#c,1,1)*fer(#b,2,0)*bos(j,0,0)*bos(#a,0,0)
+2*fer(#c,1,0)*fer(#a,2,2)*bos(#b,0,0)
-2*fer(#c,1,0)*fer(#a,2,1)*bos(j,0,0)*bos(#b,0,0)
+fer(#c,1,0)*fer(#a,2,0)*bos(j,3,0)*bos(#b,0,0)
-fer(#c,1,0)*fer(#a,2,0)*bos(j,0,1)*bos(#b,0,0)
+fer(#c,1,0)*fer(#b,2,0)*bos(j,3,0)*bos(#a,0,0)
+fer(#c,1,0)*fer(#b,2,0)*bos(j,0,1)*bos(#a,0,0)
+4*fer(j,2,1)*fer(#a,1,0)*bos(#c,0,0)*bos(#b,0,0)
+4*fer(j,2,1)*fer(#b,1,0)*bos(#c,0,0)*bos(#a,0,0)
+4*fer(j,2,1)*fer(#c,1,0)*bos(#b,0,0)*bos(#a,0,0)
+2*fer(j,2,0)*fer(#a,1,1)*bos(#c,0,0)*bos(#b,0,0)
+2*fer(j,2,0)*fer(#a,1,0)*bos(#c,0,1)*bos(#b,0,0)
+fer(j,2,0)*fer(#a,1,0)*bos(#c,0,0)*bos(#b,3,0)
+3*fer(j,2,0)*fer(#a,1,0)*bos(#c,0,0)*bos(#b,0,1)
+2*fer(j,2,0)*fer(#b,1,1)*bos(#c,0,0)*bos(#a,0,0)
+fer(j,2,0)*fer(#b,1,0)*bos(#c,3,0)*bos(#a,0,0)
+3*fer(j,2,0)*fer(#b,1,0)*bos(#c,0,1)*bos(#a,0,0)
+2*fer(j,2,0)*fer(#b,1,0)*bos(#c,0,0)*bos(#a,0,1)
+2*fer(j,2,0)*fer(#c,1,1)*bos(#b,0,0)*bos(#a,0,0)
+2*fer(j,2,0)*fer(#c,1,0)*bos(#b,0,1)*bos(#a,0,0)
+fer(j,2,0)*fer(#c,1,0)*bos(#b,0,0)*bos(#a,3,0)
+3*fer(j,2,0)*fer(#c,1,0)*bos(#b,0,0)*bos(#a,0,1)
+4*fer(j,1,1)*fer(#a,2,0)*bos(#c,0,0)*bos(#b,0,0)
+4*fer(j,1,1)*fer(#b,2,0)*bos(#c,0,0)*bos(#a,0,0)
+4*fer(j,1,1)*fer(#c,2,0)*bos(#b,0,0)*bos(#a,0,0)
+2*fer(j,1,0)*fer(#a,2,1)*bos(#c,0,0)*bos(#b,0,0)
+2*fer(j,1,0)*fer(#a,2,0)*bos(#c,0,1)*bos(#b,0,0)
-fer(j,1,0)*fer(#a,2,0)*bos(#c,0,0)*bos(#b,3,0)
+3*fer(j,1,0)*fer(#a,2,0)*bos(#c,0,0)*bos(#b,0,1)
+2*fer(j,1,0)*fer(#b,2,1)*bos(#c,0,0)*bos(#a,0,0)
-fer(j,1,0)*fer(#b,2,0)*bos(#c,3,0)*bos(#a,0,0)
+3*fer(j,1,0)*fer(#b,2,0)*bos(#c,0,1)*bos(#a,0,0)
+2*fer(j,1,0)*fer(#b,2,0)*bos(#c,0,0)*bos(#a,0,1)
+2*fer(j,1,0)*fer(#c,2,1)*bos(#b,0,0)*bos(#a,0,0)
+2*fer(j,1,0)*fer(#c,2,0)*bos(#b,0,1)*bos(#a,0,0)
-fer(j,1,0)*fer(#c,2,0)*bos(#b,0,0)*bos(#a,3,0)
+3*fer(j,1,0)*fer(#c,2,0)*bos(#b,0,0)*bos(#a,0,1))/2
az:=war(jjacob,!#a);
az := 0
%24 superintegration
clearrules chiral1;
let trad;
as:=s_int(0,bos(f,3,0)^2-bos(f,0,1)^2,{f});
as :=
-bos(f,0,1)*bos(f,0,0)
2
+d(-3)*bos(f,3,0)
+d(-3)*bos(f,0,2)*bos(f,0,0)
as1:=sub(d(-3)=0,ws);
as1 :=
-bos(f,0,1)*bos(f,0,0)
as2:=sub(d(-3)=1,as-as1);
2
as2 := bos(f,3,0)
+bos(f,0,2)*bos(f,0,0)
as3:=s_int(1,as2,{f});
as3 := fer(f,2,0)*bos(f,3,0)
+del(-1)*bos(f,0,2)*bos(f,0,0)
-del(-1)*fer(f,2,1)*fer(f,2,0)
as4:=sub(del(-1)=0,ws);
as4 := fer(f,2,0)*bos(f,3,0)
as4:=sub(del(-1)=1,as3-as4);
as4 := bos(f,0,2)*bos(f,0,0)
-fer(f,2,1)*fer(f,2,0)
as5:=s_int(2,as4,{f});
as5 := fer(f,2,1)*bos(f,0,0)
end;
Time for test: 31389 ms, plus GC time: 798 ms