Artifact 9830e69c387d1e76f88cca29ebe23504fc43f45e688c96fa36e7120e62699b54:
- Executable file
r38/packages/susy2/susy2.rlg
— part of check-in
[f2fda60abd]
at
2011-09-02 18:13:33
on branch master
— Some historical releases purely for archival purposes
git-svn-id: https://svn.code.sf.net/p/reduce-algebra/code/trunk/historical@1375 2bfe0521-f11c-4a00-b80e-6202646ff360 (user: arthurcnorman@users.sourceforge.net, size: 222359) [annotate] [blame] [check-ins using] [more...]
Tue Feb 10 12:29:14 2004 run on Linux 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: 2370 ms plus GC time: 30 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: 50 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: 290 ms plus GC time: 10 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: 28730 ms, plus GC time: 430 ms