$ set Noon %SET-W-NOTSET, error modifying TO49AX$DKB100: -SET-E-INVDEV, device is invalid for requested operation FORM version 2.3 Dec 10 1997 i i,j; i ab1,ab2; i mu,nu,al,be; i b1,b2,b3,b4; i a1,a2,a3,a4,a5,a6; i aa1,aa2,aa3,aa4,aa5,aa6,aa7; i bb1,bb2,bb3,bb4,bb5,bb6,bb7; * v pp,qp,Qp,Qm,k,kb,BQ; * s n; s zi; s I0; s PZ; s XX; s PZs; s Com; s gexp; s GT,T; s selv; s Xpi; s selb; s n1,n2; s [2-3]; s [5-6]; s [2+3]; s [5+6]; s eq,egt; s Qu,Qd,srt; s denk,denkb; s one,aux,int; s ups,x1,x2,z; s rl1,rl2,rl3; s sw,swC,Gw,GwC; s gramd,restore; s l1,l2,l,lp,lv; s vv,vvs,vvc,vvq; s sel0,seld,seldd; s O,Os,Oc,Oq,Op,Om; s fws,fwt,fwsC,fwtC; s um,dm,ums,dms,QmS,QpS; s omx1,x12,x2z,ux; s Gs,GsC,Gt,GtC,GsM2,GtM2,GstM2; s Pws,Pwt,PwsC,PwtC,PwsM2,PwtM2; s [fws-fwt],[fwsC-fwtC],[Sigmas-Sigmat]; s Sigmas,SigmasC,Sigmat,SigmatC,SigmasM2; s [1+X],[x2-z],[ups+X+x1],[x1-x2],[1-x1]: s Xps,Xpis,yc,ys,omx1s,omx1c,omx1q,x12s,x12c,x2zq,x2zc,x2zs,uxs; s y,s,rs,sp,t,tp,u,up,kp,km,zp,zm,tM,uM,X,zX,Xp,Xph,tuM,tdM,Y,zXi; s cst,cqt,vet,vdt,vut,aet,adt,aut,vets,vdts,vuts,aets,adts,auts,sst; * f sl,sq,slC,sqC; f sum1_gg,sum1_zz,sum2; f wsub_gg,wsub_gz,wsub_zz; * cf es; cf fun; cf Rep; cf redf; cf kbf,qpf; cf ae,au,ad; cf tv1g,tv1gC; cf tv1z,tv1zC; cf Mods,Re,Im; cf tv0,tv1,tv0C,tv1C; cf ve,vu,vd,ss,cs,csi; cf vvvg,vvvgC,wg,wgC,wgM2; cf vvvz,vvvzC,wz,wzC,wzM2; cf I_uu_21,I_uu_22,I_uu_23,I_uu_24; cf I_dd_21,I_dd_22,I_dd_23,I_dd_24; cf I_nn_21,I_nn_22,I_nn_23,I_nn_24; cf rs1wg,rs2wg,rt1wg,rt2wg,rwwg; cf rs1wz,rs2wz,rt1wz,rt2wz,rwwz,rwwgz; cf I_un_21,I_un_22,I_un_23,I_un_24,I_un_25; cf I_dn_21,I_dn_22,I_dn_23,I_dn_24,I_dn_25; cf I_u_11,I_u_12,I_d_11,I_d_12,I_n_11,I_n_12; cf C00,B00t,B00s,B00g,C00C,B00tC,B00sC,B00gC; * .global * *---- * #procedure wtensor(compo) * * First W_{mu,nu} is constructed, gg or gz or zz * g w_'compo'= wsub_'compo'(mu,nu)*int; * id wsub_gg(mu?,nu?)= sum_(l1,1,4,sum1_gg(l1,mu,nu)); * id wsub_zz(mu?,nu?)= sum_(l1,5,9,sum1_zz(l1,mu,nu)); * id wsub_gz(mu?,nu?)= sum_(l1,1,4,sum1_zz(l1,mu,nu))+ sum_(l1,5,9,sum1_gg(l1,mu,nu)); * id sum1_gg(l?,mu?,nu?)= sum_(l2,1,4,sum2(l,l2,mu,nu)); id sum1_zz(l?,mu?,nu?)= sum_(l2,5,9,sum2(l,l2,mu,nu)); * id sum2(l?,lp?,mu?,nu?)= -sqC(i,l,nu)*(-i_*g_(i,k)+um*gi_(i))* sq(i,lp,mu)*(-i_*g_(i,kb)-dm*gi_(i))* slC(j,l,nu)*g_(j,pp)*sl(j,lp,mu)* (g_(j,pp)-g_(j,Qp)); * #call diagrams{dummy} * trace4,i; trace4,j; contract; * .store * #call kinematics{dummy} #call lin{'compo'} * *save wrl$grp04:[giampiero]outputampgg_B.sav wwww_'compo'; *save wrl$grp04:[giampiero]outputampgz_B.sav wwww_'compo'; save wrl$grp04:[giampiero]outputampzz_B.sav wwww_'compo'; * #endprocedure * *--------------------------------------------------------------- * #procedure diagrams(dummy) * * The diagrams are constructed * id sl(i?,1,mu?)= i_/8*Gt* (tv0(mu,a1,a5)+Gs*(tv1g(mu,a1,a5)-Sigmas*tv0(mu,a1,a5)))* es(T)*g_(i,a1)*g6_(i)*vvs/Pws/Pwt/s^2; id slC(i?,1,nu?)= i_/8*GtC* (tv0C(nu,b1,a6)+GsC*(tv1gC(nu,b1,a6)-SigmasC*tv0C(nu,b1,a6) ))* es(T)*g_(i,b1)*g6_(i)*vvs/PwsC/PwtC/s^2; * id sl(i?,5,mu?)= i_/32*Gt* (tv0(mu,aa1,aa5)+Gs*(tv1z(mu,aa1,aa5)-Sigmas*tv0(mu,aa1,aa5)))* GT/PZ*g_(i,aa1)*g6_(i)*vvs/Pws/Pwt/s^3; id slC(i?,5,nu?)= i_/32*GtC* (tv0C(nu,bb1,aa6)+GsC*(tv1zC(nu,bb1,aa6)-SigmasC*tv0C(nu,bb1,aa6) ))* GT/PZ*g_(i,bb1)*g6_(i)*vvs/PwsC/PwtC/s^3; * al sl(i?,2,mu?)= i_/(8*y*s)*Gs*es(T)* g_(i,mu)*(g_(i,pp)+g_(i,Qm))*g_(i,a2)*g6_(i)*vv/Pws/s; al slC(i?,2,nu?)= i_/(8*y*s)*GsC*es(T)* g_(i,b2)*g6_(i)*(g_(i,pp)+g_(i,Qm))*g_(i,nu)*vv/PwsC/s; * al sl(i?,6,mu?)= -i_/(8*y*s)*Gs*GT*csi(T)/16/PZ* g_(i,mu)*(ve(T)*g6_(i)+ae(T)*g7_(i))* (g_(i,pp)+g_(i,Qm))*g_(i,aa2)*g6_(i)*vv/Pws/s^2; al slC(i?,6,nu?)= -i_/(8*y*s)*GsC*GT*csi(T)/16/PZ* g_(i,bb2)*g6_(i)*(g_(i,pp)+g_(i,Qm))* g_(i,nu)*(ve(T)*g6_(i)+ae(T)*g7_(i))*vv/PwsC/s^2; * al sl(i?,3,mu?)= i_/8*Qu*Gt*es(T)* g_(i,a3)*g6_(i)*vv/Pwt/s/denk; al slC(i?,3,nu?)= i_/8*Qu*GtC*es(T)* g_(i,b3)*g6_(i)*vv/PwtC/s/denk; * al sl(i?,7,mu?)= -i_/8*Gt*GT*csi(T)/16/PZ* g_(i,aa3)*g6_(i)*vv/Pwt/s^2/denk; al slC(i?,7,nu?)= -i_/8*GtC*GT*csi(T)/16/PZ* g_(i,bb3)*g6_(i)*vv/PwtC/s^2/denk; * al sl(i?,4,mu?)= -i_/8*Qd*Gt*es(T)* g_(i,a4)*g6_(i)*vv/Pwt/s/denkb; al slC(i?,4,nu?)= -i_/8*Qd*GtC*es(T)* g_(i,b4)*g6_(i)*vv/PwtC/s/denkb; * al sl(i?,8,mu?)= -i_/8*Gt*GT*csi(T)/16/PZ* g_(i,aa4)*g6_(i)*vv/Pwt/s^2/denkb; al slC(i?,8,nu?)= -i_/8*GtC*GT*csi(T)/16/PZ* g_(i,bb4)*g6_(i)*vv/PwtC/s^2/denkb; * al sl(i?,9,mu?)= i_/32/km*Gs*GT*csi(T)/PZ* g_(i,aa7)*g6_(i)*(g_(i,Qm)-g_(i,qp))* g_(i,mu)*g6_(i)*vv/Pws/s^2/4; al slC(i?,9,nu?)= i_/32/km*GsC*GT*csi(T)/PZ* g_(i,nu)*g6_(i)*(g_(i,Qm)-g_(i,qp))* g_(i,bb7)*g6_(i)*vv/PwsC/s^2/4; * id sq(i?,1,mu?)= g_(i,a5)*g6_(i); id sqC(i?,1,nu?)= -g_(i,a6)*g6_(i); * al sq(i?,5,mu?)= g_(i,aa5)*g6_(i); al sqC(i?,5,nu?)= -g_(i,aa6)*g6_(i); * al sq(i?,2,mu?)= g_(i,a2)*g6_(i); al sqC(i?,2,nu?)= -g_(i,b2)*g6_(i); * al sq(i?,6,mu?)= g_(i,aa2)*g6_(i); al sqC(i?,6,nu?)= -g_(i,bb2)*g6_(i); * al sq(i?,3,mu?)= g_(i,mu)*(g_(i,Qm)-g_(i,k)-i_*um*gi_(i))*g_(i,a3)*g6_(i); al sqC(i?,3,nu?)= g_(i,b3)*g6_(i)*(-(g_(i,Qm)-g_(i,k))+i_*um*gi_(i))*g_(i,n u); * al sq(i?,7,mu?)= g_(i,mu)*(vu(T)*g6_(i)+au(T)*g7_(i))* (g_(i,Qm)-g_(i,k)-i_*um*gi_(i))*g_(i,aa3)*g6_(i); al sqC(i?,7,nu?)= g_(i,bb3)*g6_(i)*(-(g_(i,Qm)-g_(i,k))+i_*um*gi_(i))* g_(i,nu)*(vu(T)*g6_(i)+au(T)*g7_(i)); * al sq(i?,4,mu?)= g_(i,a4)*g6_(i)*(g_(i,Qm)-g_(i,kb)+i_*dm*gi_(i))*g_(i,mu); al sqC(i?,4,nu?)= g_(i,nu)*(-(g_(i,Qm)-g_(i,kb))-i_*dm*gi_(i))*g_(i,b4)*g6_ (i); * al sq(i?,8,mu?)= g_(i,aa4)*g6_(i)*(g_(i,Qm)-g_(i,kb)+i_*dm*gi_(i))* g_(i,mu)*(vd(T)*g6_(i)+ad(T)*g7_(i)) ; al sqC(i?,8,nu?)= g_(i,nu)*(vd(T)*g6_(i)+ad(T)*g7_(i))* (-(g_(i,Qm)-g_(i,kb))-i_*dm*gi_(i))*g_(i,bb4)*g6_(i); * al sq(i?,9,mu?)= g_(i,aa7)*g6_(i); al sqC(i?,9,nu?)= -g_(i,bb7)*g6_(i); * #endprocedure * .store * #procedure kinematics(dummy) * * Mostly kinematics * g ww_'compo'= w_'compo'; *nwrite statistics; * id Qu= 2/3; al Qd= -1/3; id srt^-2= 1/2; * id pp.pp= 0; al qp.qp= 0; al k.k= -ums; al kb.kb= -dms; al Qm.Qm= QmS; id um^2= ums; al dm^2= dms; * *--------------------------------------------------------------------- id Gs= gexp*Gs; al GsC= gexp*GsC; id Gt= gexp*Gt; al GtC= gexp*GtC; *--------------------------------------------------------------------- * id Gs*GsC= GsM2; al Gt*GtC= GtM2; * id Pws^-1*PwsC^-1= 1/PwsM2; id Pwt^-1*PwtC^-1= 1/PwtM2; id Pws^-1= PwsC/PwsM2; id PwsC^-1= Pws/PwsM2; id Pwt^-1= PwtC/PwtM2; id PwtC^-1= Pwt/PwtM2; * * Triple-vertex is substituted * id tv0(mu?,al?,be?)= d_(mu,al)*(Qm(be)-Qp(be))+ d_(al,be)*(2*Qp(mu)+Qm(mu))- d_(mu,be)*(2*Qm(al)+Qp(al)); al tv0C(mu?,al?,be?)= d_(mu,al)*(Qm(be)-Qp(be))+ d_(al,be)*(2*Qp(mu)+Qm(mu))- d_(mu,be)*(2*Qm(al)+Qp(al)); id tv1g(mu?,al?,be?)= sum_(lv,1,10,(vvvg(lv,mu,al,be))); id tv1gC(mu?,al?,be?)= sum_(lv,1,10,(vvvgC(lv,mu,al,be))); id tv1z(mu?,al?,be?)= sum_(lv,1,10,(vvvz(lv,mu,al,be))); id tv1zC(mu?,al?,be?)= sum_(lv,1,10,(vvvzC(lv,mu,al,be))); * * Form factors are introduced * id vvvg(1,mu?,al?,be?)= 4*wg(1)/rs*(d_(al,be)*Qp(mu)+ d_(mu,al)*Qm(be)-d_(mu,be)*(Qm(al)+Qp(al))); id vvvg(2,mu?,al?,be?)= 2*wg(2)/rs*(d_(mu,al)*Qm(be)-d_(mu,be)*(Qm(al)+Qp(a l))); id vvvg(3,mu?,al?,be?)= 2*wg(3)/rs*(d_(mu,al)*Qm(be)+d_(mu,be)*(Qm(al)+Qp(a l))); id vvvg(4,mu?,al?,be?)= 2*wg(4)/rs/(X*y*s)*Qm(be)*(Qp(al)+Qm(al))*Qp(mu); id vvvg(5,mu?,al?,be?)= wg(5)/rs*e_(Qm,mu,al,be); id vvvg(6,mu?,al?,be?)= wg(6)/rs*(e_(Qm,mu,al,be)+2*e_(Qp,mu,al,be)); id vvvg(7,mu?,al?,be?)= wg(7)/rs/(X*y*s)*e_(Qp,Qm,al,be)*(Qp(mu)+Qm(mu)); id vvvg(8,mu?,al?,be?)= 2*wg(8)/rs/(X*y*s)*Qm(be)*Qm(mu)*(Qp(al)+Qm(al)); id vvvg(9,mu?,al?,be?)= 2*wg(9)/rs*d_(al,be)*Qm(mu); id vvvg(10,mu?,al?,be?)= -wg(10)/rs/(X*y*s)*e_(Qp,Qm,al,be)*Qp(mu); * id vvvgC(1,mu?,al?,be?)= 4*wgC(1)/rs*(d_(al,be)*Qp(mu)+ d_(mu,al)*Qm(be)-d_(mu,be)*(Qm(al)+Qp(al))); id vvvgC(2,mu?,al?,be?)= 2*wgC(2)/rs*(d_(mu,al)*Qm(be)-d_(mu,be)* (Qm(al)+Qp(al))); id vvvgC(3,mu?,al?,be?)= 2*wgC(3)/rs*(d_(mu,al)*Qm(be)+d_(mu,be)* (Qm(al)+Qp(al))); id vvvgC(4,mu?,al?,be?)= 2*wgC(4)/rs/(X*y*s)*Qm(be)*(Qp(al)+Qm(al))*Qp(mu); id vvvgC(5,mu?,al?,be?)= -wgC(5)/rs*e_(Qm,mu,al,be); id vvvgC(6,mu?,al?,be?)= -wgC(6)/rs*(e_(Qm,mu,al,be)+2*e_(Qp,mu,al,be)); id vvvgC(7,mu?,al?,be?)= -wgC(7)/rs/(X*y*s)*e_(Qp,Qm,al,be)*(Qp(mu)+Qm(mu)) ; id vvvgC(8,mu?,al?,be?)= 2*wgC(8)/rs/(X*y*s)*Qm(be)*Qm(mu)*(Qp(al)+Qm(al)); id vvvgC(9,mu?,al?,be?)= 2*wgC(9)/rs*d_(al,be)*Qm(mu); id vvvgC(10,mu?,al?,be?)= wgC(10)/rs/(X*y*s)*e_(Qp,Qm,al,be)*Qp(mu); * id vvvz(1,mu?,al?,be?)= 4*wz(1)/rs*(d_(al,be)*Qp(mu)+ d_(mu,al)*Qm(be)-d_(mu,be)*(Qm(al)+Qp(al))); id vvvz(2,mu?,al?,be?)= 2*wz(2)/rs*(d_(mu,al)*Qm(be)-d_(mu,be)*(Qm(al)+Qp(a l))); id vvvz(3,mu?,al?,be?)= 2*wz(3)/rs*(d_(mu,al)*Qm(be)+d_(mu,be)*(Qm(al)+Qp(a l))); id vvvz(4,mu?,al?,be?)= 2*wz(4)/rs/(X*y*s)*Qm(be)*(Qp(al)+Qm(al))*Qp(mu); id vvvz(5,mu?,al?,be?)= wz(5)/rs*e_(Qm,mu,al,be); id vvvz(6,mu?,al?,be?)= wz(6)/rs*(e_(Qm,mu,al,be)+2*e_(Qp,mu,al,be)); id vvvz(7,mu?,al?,be?)= wz(7)/rs/(X*y*s)*e_(Qp,Qm,al,be)*(Qp(mu)+Qm(mu)); id vvvz(8,mu?,al?,be?)= 2*wz(8)/rs/(X*y*s)*Qm(be)*Qm(mu)*(Qp(al)+Qm(al)); id vvvz(9,mu?,al?,be?)= 2*wz(9)/rs*d_(al,be)*Qm(mu); id vvvz(10,mu?,al?,be?)= -wz(10)/rs/(X*y*s)*e_(Qp,Qm,al,be)*Qp(mu); * id vvvzC(1,mu?,al?,be?)= 4*wzC(1)/rs*(d_(al,be)*Qp(mu)+ d_(mu,al)*Qm(be)-d_(mu,be)*(Qm(al)+Qp(al))); id vvvzC(2,mu?,al?,be?)= 2*wzC(2)/rs*(d_(mu,al)*Qm(be)-d_(mu,be)* (Qm(al)+Qp(al))); id vvvzC(3,mu?,al?,be?)= 2*wzC(3)/rs*(d_(mu,al)*Qm(be)+d_(mu,be)* (Qm(al)+Qp(al))); id vvvzC(4,mu?,al?,be?)= 2*wzC(4)/rs/(X*y*s)*Qm(be)*(Qp(al)+Qm(al))*Qp(mu); id vvvzC(5,mu?,al?,be?)= -wzC(5)/rs*e_(Qm,mu,al,be); id vvvzC(6,mu?,al?,be?)= -wzC(6)/rs*(e_(Qm,mu,al,be)+2*e_(Qp,mu,al,be)); id vvvzC(7,mu?,al?,be?)= -wzC(7)/rs/(X*y*s)*e_(Qp,Qm,al,be)*(Qp(mu)+Qm(mu)) ; id vvvzC(8,mu?,al?,be?)= 2*wzC(8)/rs/(X*y*s)*Qm(be)*Qm(mu)*(Qp(al)+Qm(al)); id vvvzC(9,mu?,al?,be?)= 2*wzC(9)/rs*d_(al,be)*Qm(mu); id vvvzC(10,mu?,al?,be?)= wzC(10)/rs/(X*y*s)*e_(Qp,Qm,al,be)*Qp(mu); * contract; * id Sigmas= 0; al SigmasC= 0; *id Sigmas*SigmasC= SigmasM2; * id BQ(mu?)= pp(mu)-qp(mu)+Qm(mu); id Qp(mu?)= pp(mu)-qp(mu); * id e_(a1?,Qp,a2?,a3?)= e_(a1,pp,a2,a3)-e_(a1,qp,a2,a3); id e_(a1?,a2?,Qp,a3?)= e_(a1,a2,pp,a3)-e_(a1,a2,qp,a3); id e_(a1?,a2?,a3?,Qp)= e_(a1,a2,a3,pp)-e_(a1,a2,a3,qp); * id Qp.Qm= pp.Qm-qp.Qm; id kb.Qp= kb.pp-kb.qp; id k.Qp= k.pp-k.qp; id pp.Qp= -pp.qp; id Qp.Qp= -2*pp.qp; * .store * #endprocedure * #procedure lin(compo) * * Linear independent invariants are introduced * g www_'compo'= ww_'compo'*selb; *nwrite statistics; * contract; * id k.k= -ums; al kb.kb= -dms; * id denk^-1*denkb^-1= -1/2/(Qp.Qm)*(1/denk+1/denkb); * id pp.pp= 0; al qp.qp= 0; al k.k= -ums; al kb.kb= -dms; al Qm.Qm= QmS; * id selb*denkb^-2= 1/denkb^2; id selb*denkb^-1= 1/denkb; id selb= 0; * id denkb^-1= -1/uM; * id e_(k,a1?,a2?,a3?)= e_(pp,a1,a2,a3)-e_(qp,a1,a2,a3)+e_(Qm,a1,a2,a3)- e_(kb,a1,a2,a3); id k(mu?)= pp(mu)-qp(mu)+Qm(mu)-kb(mu); id QpS= -2*pp.qp; id Qp.Qm= pp.Qm-qp.Qm; id kb.Qp= kb.pp-kb.qp; id k.Qp= k.pp-k.qp; id pp.Qp= -pp.qp; id Qp.Qp= -2*pp.qp; * id pp.Qm= -1/2*(QmS+y*s); al k.kb= 1/2*(-sp+ums+dms); al Qm.k= 1/2*(QmS+t-ums); al pp.kb= 1/2*(tp-dms); al Qm.kb= 1/2*(QmS+u-dms); al pp.k= 1/2*(up-ums); al pp.qp= 1/2*kp; al Qm.qp= 1/2*(QmS+km); al kb.qp= 1/2*(dms-zp); al k.qp= 1/2*(ums-zm); * id sp= x2*y*s; al km= z*y*s; al km^-1= 1/(z*y*s); al zm= -(x2-x1)*y*s; id QmS= X*y*s; * id t= y*s * ( - 1 - ups - z - 2*X ) + ums * ( 1 ) + dms * ( 1 ); al kp= y*s * ( - 1 + x2 - z - X ); al u= y*s * ( ups ); al up= y*s * ( 1 - x1 + ups + z + X ) + ums * ( 1 ); al tp= y*s * ( - 1 + x1 - x2 - ups - X ) + dms * ( 1 ); al zp= y*s * ( 1 - x1 ) + ums * ( 1 ) + dms * ( 1 ); * id ums= 0; id dms*uM^-2= aux; id dms= 0; id aux= dms*uM^-2; * .store * g wwww_'compo'= www_'compo'; *nwrite statistics; * id t= y*s * ( - 1 - ups - z - 2*X ) + ums * ( 1 ) + dms * ( 1 ); al kp= y*s * ( - 1 + x2 - z - X ); al u= y*s * ( ups ); al up= y*s * ( 1 - x1 + ups + z + X ) + ums * ( 1 ); al tp= y*s * ( - 1 + x1 - x2 - ups - X ) + dms * ( 1 ); al zp= y*s * ( 1 - x1 ) + ums * ( 1 ) + dms * ( 1 ); * id Qp.Qm^-1= -2/(zX*y*s); ratio,z,zX,aux; id aux= 1+2*X; id aux^-1= 1/2/Xph; ratio,X,Xph,aux; id aux= 1/2; al aux^-1= 2; * id ums= 0; id dms*uM^-2= aux; id dms= 0; id aux= dms*uM^-2; * .store * #endprocedure * #procedure integration(compo) * * Integration starts * id kbf(mu?)*kbf(nu?)*int= I_dd_21*pp(mu)*pp(nu)+I_dd_22*Qm(mu)*Qm(nu)+ I_dd_23*(pp(mu)*Qm(nu)+pp(nu)*Qm(mu))+ I_dd_24*d_(mu,nu); id qpf(mu?)*qpf(nu?)*int= I_nn_21*pp(mu)*pp(nu)+I_nn_22*Qm(mu)*Qm(nu)+ I_nn_23*(pp(mu)*Qm(nu)+pp(nu)*Qm(mu))+ I_nn_24*d_(mu,nu); id kbf(mu?)*qpf(nu?)*int= I_dn_21*pp(mu)*pp(nu)+I_dn_22*Qm(mu)*Qm(nu)+ I_dn_23*pp(mu)*Qm(nu)+I_dn_24*pp(nu)*Qm(mu)+ I_dn_25*d_(mu,nu); id kbf(mu?)*int= I_d_11*pp(mu)+I_d_12*Qm(mu); id qpf(mu?)*int= I_n_11*pp(mu)+I_n_12*Qm(mu); id int= I0; * .sort * id I_d_11 = + I0*dms*Xp^-1*y^-1*s^-1 * ( 1 ) + I0*Xp^-2 * ( - 2*ups + 2*x1 - 2*x2 ) + I0*Xp^-1 * ( - 1 + ups - 2*x1 + 2*x2 ) + I0 * ( 1 ); al I_n_11 = + I0*Xp^-2 * ( 2*x2 - 2*z ) + I0*Xp^-1 * ( - 1 - 2*x2 + z ) + I0 * ( 1 ); al I_d_12 = + I0*Xp^-1 * ( ups - x1 + x2 ) + I0 * ( 1 ); al I_n_12 = + I0*Xp^-1 * ( - x2 + z ) + I0 * ( 1 ); * ratio,X,Xp,one; id one= 1; al one^-1= 1; * id ums= 0; id dms*uM^-2= aux; id dms= 0; id aux= dms*uM^-2; * .sort * id I_dd_21 = + I0*dms*Xp^-3*y^-1*s^-1 * ( - 6*ups + 6*x1 - 6*x2 ) + I0*dms*Xp^-2*y^-1*s^-1 * ( - 2 + 4*ups - 6*x1 + 6*x2 ) + I0*dms*Xp^-1*y^-1*s^-1 * ( 2 ) + I0*Xp^-4 * ( - 12*ups*x1 + 12*ups*x2 + 6*ups^2 - 12*x1*x2 + 6*x1^ 2 + 6*x2^2 ) + I0*Xp^-3 * ( 18*ups*x1 - 18*ups*x2 + 6*ups - 6*ups^2 + 24*x1*x2 - 6* x1 - 12*x1^2 + 6*x2 - 12*x2^2 ) + I0*Xp^-2 * ( 1 - 6*ups*x1 + 6*ups*x2 - 8*ups + ups^2 - 12*x1*x2 + 12 *x1 + 6*x1^2 - 12*x2 + 6*x2^2 ) + I0*Xp^-1 * ( - 2 + 2*ups - 6*x1 + 6*x2 ) + I0 * ( 1 ); al I_nn_21 = + I0*Xp^-4 * ( - 12*x2*z + 6*x2^2 + 6*z^2 ) + I0*Xp^-3 * ( 18*x2*z - 6*x2 - 12*x2^2 + 6*z - 6*z^2 ) + I0*Xp^-2 * ( 1 - 6*x2*z + 12*x2 + 6*x2^2 - 8*z + z^2 ) + I0*Xp^-1 * ( - 2 - 6*x2 + 2*z ) + I0 * ( 1 ); al I_dn_21 = + I0*ums*Xp^-2*y^-1*s^-1 * ( 1 ) + I0*ums*Xp^-1*y^-1*s^-1 * ( - 1 ) + I0*dms*Xp^-3*y^-1*s^-1 * ( 3*x2 - 3*z ) + I0*dms*Xp^-2*y^-1*s^-1 * ( - 2 - 3*x2 + 2*z ) + I0*dms*Xp^-1*y^-1*s^-1 * ( 2 ) + I0*Xp^-4 * ( - 6*ups*x2 + 6*ups*z + 6*x1*x2 - 6*x1*z + 6*x2*z - 6 * x2^2 ) + I0*Xp^-3 * ( 9*ups*x2 - 6*ups*z + 3*ups - 12*x1*x2 + 9*x1*z - 3*x1 - 9*x2*z + 12*x2^2 + 3*z ) + I0*Xp^-2 * ( 2 - 3*ups*x2 + ups*z - 4*ups + 6*x1*x2 - 3*x1*z + 5*x 1 + 3*x2*z - 6*x2^2 - 4*z ) + I0*Xp^-1 * ( - 3 + ups - 2*x1 + z ) + I0 * ( 1 ); * ratio,X,Xp,one; id one= 1; al one^-1= 1; * id ums= 0; id dms*uM^-2= aux; id dms= 0; id aux= dms*uM^-2; * .sort * id I_dd_22 = + I0*Xp^-2 * ( - 2*ups*x1 + 2*ups*x2 + ups^2 - 2*x1*x2 + x1^2 + x2^ 2 ) + I0*Xp^-1 * ( 2*ups - 2*x1 + 2*x2 ) + I0 * ( 1 ); al I_nn_22 = + I0*Xp^-2 * ( - 2*x2*z + x2^2 + z^2 ) + I0*Xp^-1 * ( - 2*x2 + 2*z ) + I0 * ( 1 ); al I_dn_22 = + I0*Xp^-2 * ( - ups*x2 + ups*z + x1*x2 - x1*z + x2*z - x2^2 ) + I0*Xp^-1 * ( ups - x1 + z ) + I0 * ( 1 ); * ratio,X,Xp,one; id one= 1; al one^-1= 1; * id ums= 0; id dms*uM^-2= aux; id dms= 0; id aux= dms*uM^-2; * .sort * id I_dd_23 = + I0*dms*Xp^-2*y^-1*s^-1 * ( 2*ups - 2*x1 + 2*x2 ) + I0*dms*Xp^-1*y^-1*s^-1 * ( 1 ) + I0*Xp^-3 * ( 6*ups*x1 - 6*ups*x2 - 3*ups^2 + 6*x1*x2 - 3*x1^2 - 3* x2^2 ) + I0*Xp^-2 * ( - 4*ups*x1 + 4*ups*x2 - 4*ups + ups^2 - 6*x1*x2 + 4* x1 + 3*x1^2 - 4*x2 + 3*x2^2 ) + I0*Xp^-1 * ( - 1 + 2*ups - 4*x1 + 4*x2 ) + I0 * ( 1 ); al I_nn_23 = + I0*Xp^-3 * ( 6*x2*z - 3*x2^2 - 3*z^2 ) + I0*Xp^-2 * ( - 4*x2*z + 4*x2 + 3*x2^2 - 4*z + z^2 ) + I0*Xp^-1 * ( - 1 - 4*x2 + 2*z ) + I0 * ( 1 ); al I_dn_23 = + I0*ums*Xp^-1*y^-1*s^-1 * ( - 1/2 ) + I0*dms*Xp^-2*y^-1*s^-1 * ( - 3/2*x2 + 3/2*z ) + I0*dms*Xp^-1*y^-1*s^-1 * ( 3/2 ) + I0*Xp^-3 * ( 3*ups*x2 - 3*ups*z - 3*x1*x2 + 3*x1*z - 3*x2*z + 3*x2 ^2 ) + I0*Xp^-2 * ( - 3/2*ups*x2 + ups*z - 5/2*ups + 3*x1*x2 - 5/2*x1*z + 5/2*x1 + 5/2*x2*z - x2 - 3*x2^2 - 3/2*z ) + I0*Xp^-1 * ( - 3/2 + ups - 2*x1 + x2 + z ) + I0 * ( 1 ); * ratio,X,Xp,one; id one= 1; al one^-1= 1; * id ums= 0; id dms*uM^-2= aux; id dms= 0; id aux= dms*uM^-2; * .sort * id I_dd_24 = + I0*dms*Xp^-1 * ( 1/2*ups - 1/2*x1 + 1/2*x2 ) + I0*Xp^-2*y*s * ( ups*x1 - ups*x2 - 1/2*ups^2 + x1*x2 - 1/2*x1^2 - 1/ 2*x2^2 ) + I0*Xp^-1*y*s * ( - 1/2*ups*x1 + 1/2*ups*x2 - 1/2*ups - x1*x2 + 1/ 2* x1 + 1/2*x1^2 - 1/2*x2 + 1/2*x2^2 ) + I0*y*s * ( - 1/2*x1 + 1/2*x2 ); id I_nn_24 = + I0*Xp^-2*y*s * ( x2*z - 1/2*x2^2 - 1/2*z^2 ) + I0*Xp^-1*y*s * ( - 1/2*x2*z + 1/2*x2 + 1/2*x2^2 - 1/2*z ) + I0*y*s * ( - 1/2*x2 ); id I_dn_24 = + I0*ums*Xp^-1*y^-1*s^-1 * ( - 1/2 ) + I0*dms*Xp^-2*y^-1*s^-1 * ( - 1/2*x2 + 1/2*z ) + I0*dms*Xp^-1*y^-1*s^-1 * ( 1/2 ) + I0*Xp^-3 * ( 3*ups*x2 - 3*ups*z - 3*x1*x2 + 3*x1*z - 3*x2*z + 3*x2 ^2 ) + I0*Xp^-2 * ( - 5/2*ups*x2 + ups*z - 3/2*ups + 3*x1*x2 - 3/2*x1*z + 3/2*x1 + 3/2*x2*z + x2 - 3*x2^2 - 5/2*z ) + I0*Xp^-1 * ( - 3/2 + ups - x1 - x2 + z ) + I0 * ( 1 ); * * ratio,X,Xp,one; id one= 1; al one^-1= 1; * id ums= 0; id dms*uM^-2= aux; id dms= 0; id aux= dms*uM^-2; * .sort * id I_dn_25 = + I0*ums * ( - 1/4 ) + I0*dms*Xp^-1 * ( - 1/4*x2 + 1/4*z ) + I0*dms * ( 1/4 ) + I0*Xp^-2*y*s * ( 1/2*ups*x2 - 1/2*ups*z - 1/2*x1*x2 + 1/2*x1*z - 1 /2 *x2*z + 1/2*x2^2 ) + I0*Xp^-1*y*s * ( - 1/4*ups*x2 - 1/4*ups + 1/2*x1*x2 - 1/4*x1*z + 1/ 4*x1 + 1/4*x2*z - 1/2*x2^2 - 1/4*z ) + I0*y*s * ( - 1/4 ); * ratio,X,Xp,one; id one= 1; al one^-1= 1; * id ums= 0; id dms*uM^-2= aux; id dms= 0; id aux= dms*uM^-2; * id uM^-1= -1/(y*s)/tdM; * id ums= 0; id dms*tdM^-2= aux; id dms= 0; id aux= dms*tdM^-2; * ratio,z,zX,aux; id aux= 1+2*X; * ratio,X,Xp,one; id one= 1; al one^-1= 1; * #endprocedure * #procedure totalgg(dummy) * * Now the full stuff * load wrl$grp04:[giampiero]outputampgg_B.sav; * g T_gg= PwsM2*PwtM2*wwww_gg/(eq*I0); *nwrite statistics; * id es(T)*es(T)= eq; * id wg(n?)= wg(n)*rs; al wgC(n?)= wgC(n)*rs; * id wg(4)= X*wg(4); al wg(7)= X*wg(7); al wg(8)= X*wg(8); al wg(10)= X*wg(10); id wgC(4)= X*wgC(4); al wgC(7)= X*wgC(7); al wgC(8)= X*wgC(8); al wgC(10)= X*wgC(10); * id wg(n?)*wgC(n?)= wgM2(n); * id GtM2*GsM2*wg(2)*wgC(1)= GtM2*GsM2*(-wgC(2)*wg(1)+ 2*Re(wg(2)*wgC(1))); al GtM2*GsM2*wg(3)*wgC(1)= GtM2*GsM2*(-wgC(3)*wg(1)+ 2*Re(wg(3)*wgC(1))); al GtM2*GsM2*wg(4)*wgC(1)= GtM2*GsM2*(-wgC(4)*wg(1)+ 2*Re(wg(4)*wgC(1))); al GtM2*GsM2*wg(5)*wgC(1)= GtM2*GsM2*(-wgC(5)*wg(1)+ 2*Re(wg(5)*wgC(1))); al GtM2*GsM2*wg(6)*wgC(1)= GtM2*GsM2*(-wgC(6)*wg(1)+ 2*Re(wg(6)*wgC(1))); al GtM2*GsM2*wg(7)*wgC(1)= GtM2*GsM2*(-wgC(7)*wg(1)+ 2*Re(wg(7)*wgC(1))); al GtM2*GsM2*wg(8)*wgC(1)= GtM2*GsM2*(-wgC(8)*wg(1)+ 2*Re(wg(8)*wgC(1))); al GtM2*GsM2*wg(9)*wgC(1)= GtM2*GsM2*(-wgC(9)*wg(1)+ 2*Re(wg(9)*wgC(1))); al GtM2*GsM2*wg(10)*wgC(1)= GtM2*GsM2*(-wgC(10)*wg(1)+ 2*Re(wg(10)*wgC(1))); * al GtM2*GsM2*wg(3)*wgC(2)= GtM2*GsM2*(-wgC(3)*wg(2)+ 2*Re(wg(3)*wgC(2))); al GtM2*GsM2*wg(4)*wgC(2)= GtM2*GsM2*(-wgC(4)*wg(2)+ 2*Re(wg(4)*wgC(2))); al GtM2*GsM2*wg(5)*wgC(2)= GtM2*GsM2*(-wgC(5)*wg(2)+ 2*Re(wg(5)*wgC(2))); al GtM2*GsM2*wg(6)*wgC(2)= GtM2*GsM2*(-wgC(6)*wg(2)+ 2*Re(wg(6)*wgC(2))); al GtM2*GsM2*wg(7)*wgC(2)= GtM2*GsM2*(-wgC(7)*wg(2)+ 2*Re(wg(7)*wgC(2))); al GtM2*GsM2*wg(8)*wgC(2)= GtM2*GsM2*(-wgC(8)*wg(2)+ 2*Re(wg(8)*wgC(2))); al GtM2*GsM2*wg(9)*wgC(2)= GtM2*GsM2*(-wgC(9)*wg(2)+ 2*Re(wg(9)*wgC(2))); al GtM2*GsM2*wg(10)*wgC(2)= GtM2*GsM2*(-wgC(10)*wg(2)+ 2*Re(wg(10)*wgC(2))); * al GtM2*GsM2*wg(4)*wgC(3)= GtM2*GsM2*(-wgC(4)*wg(3)+ 2*Re(wg(4)*wgC(3))); al GtM2*GsM2*wg(5)*wgC(3)= GtM2*GsM2*(-wgC(5)*wg(3)+ 2*Re(wg(5)*wgC(3))); al GtM2*GsM2*wg(6)*wgC(3)= GtM2*GsM2*(-wgC(6)*wg(3)+ 2*Re(wg(6)*wgC(3))); al GtM2*GsM2*wg(7)*wgC(3)= GtM2*GsM2*(-wgC(7)*wg(3)+ 2*Re(wg(7)*wgC(3))); al GtM2*GsM2*wg(8)*wgC(3)= GtM2*GsM2*(-wgC(8)*wg(3)+ 2*Re(wg(8)*wgC(3))); al GtM2*GsM2*wg(9)*wgC(3)= GtM2*GsM2*(-wgC(9)*wg(3)+ 2*Re(wg(9)*wgC(3))); al GtM2*GsM2*wg(10)*wgC(3)= GtM2*GsM2*(-wgC(10)*wg(3)+ 2*Re(wg(10)*wgC(3))); * al GtM2*GsM2*wg(5)*wgC(4)= GtM2*GsM2*(-wgC(5)*wg(4)+ 2*Re(wg(5)*wgC(4))); al GtM2*GsM2*wg(6)*wgC(4)= GtM2*GsM2*(-wgC(6)*wg(4)+ 2*Re(wg(6)*wgC(4))); al GtM2*GsM2*wg(7)*wgC(4)= GtM2*GsM2*(-wgC(7)*wg(4)+ 2*Re(wg(7)*wgC(4))); al GtM2*GsM2*wg(8)*wgC(4)= GtM2*GsM2*(-wgC(8)*wg(4)+ 2*Re(wg(8)*wgC(4))); al GtM2*GsM2*wg(9)*wgC(4)= GtM2*GsM2*(-wgC(9)*wg(4)+ 2*Re(wg(9)*wgC(4))); al GtM2*GsM2*wg(10)*wgC(4)= GtM2*GsM2*(-wgC(10)*wg(4)+ 2*Re(wg(10)*wgC(4))); * al GtM2*GsM2*wg(6)*wgC(5)= GtM2*GsM2*(-wgC(6)*wg(5)+ 2*Re(wg(6)*wgC(5))); al GtM2*GsM2*wg(7)*wgC(5)= GtM2*GsM2*(-wgC(7)*wg(5)+ 2*Re(wg(7)*wgC(5))); al GtM2*GsM2*wg(8)*wgC(5)= GtM2*GsM2*(-wgC(8)*wg(5)+ 2*Re(wg(8)*wgC(5))); al GtM2*GsM2*wg(9)*wgC(5)= GtM2*GsM2*(-wgC(9)*wg(5)+ 2*Re(wg(9)*wgC(5))); al GtM2*GsM2*wg(10)*wgC(5)= GtM2*GsM2*(-wgC(10)*wg(5)+ 2*Re(wg(10)*wgC(5))); * al GtM2*GsM2*wg(7)*wgC(6)= GtM2*GsM2*(-wgC(7)*wg(6)+ 2*Re(wg(7)*wgC(6))); al GtM2*GsM2*wg(8)*wgC(6)= GtM2*GsM2*(-wgC(8)*wg(6)+ 2*Re(wg(8)*wgC(6))); al GtM2*GsM2*wg(9)*wgC(6)= GtM2*GsM2*(-wgC(9)*wg(6)+ 2*Re(wg(9)*wgC(6))); al GtM2*GsM2*wg(10)*wgC(6)= GtM2*GsM2*(-wgC(10)*wg(6)+ 2*Re(wg(10)*wgC(6))); * al GtM2*GsM2*wg(8)*wgC(7)= GtM2*GsM2*(-wgC(8)*wg(7)+ 2*Re(wg(8)*wgC(7))); al GtM2*GsM2*wg(9)*wgC(7)= GtM2*GsM2*(-wgC(9)*wg(7)+ 2*Re(wg(9)*wgC(7))); al GtM2*GsM2*wg(10)*wgC(7)= GtM2*GsM2*(-wgC(10)*wg(7)+ 2*Re(wg(10)*wgC(7))); * al GtM2*GsM2*wg(9)*wgC(8)= GtM2*GsM2*(-wgC(9)*wg(8)+ 2*Re(wg(9)*wgC(8))); al GtM2*GsM2*wg(10)*wgC(8)= GtM2*GsM2*(-wgC(10)*wg(8)+ 2*Re(wg(10)*wgC(8))); * al GtM2*GsM2*wg(10)*wgC(9)= GtM2*GsM2*(-wgC(10)*wg(9)+ 2*Re(wg(10)*wgC(9))); * id wg(n?)*Gs*GtM2*PwsC= GtM2*(-wgC(n)*GsC*Pws+2*Re(wg(n)*Gs*PwsC)); id wg(n?)*Gt*GsM2*PwtC= GsM2*(-wgC(n)*GtC*Pwt+2*Re(wg(n)*Gt*PwtC)); id wg(n?)*Gs*GtM2= GtM2*(-GsC*wgC(n)+2*Re(Gs*wg(n))); id wg(n?)*Gt*GsM2= GsM2*(-GtC*wgC(n)+2*Re(Gt*wg(n))); * id GsM2*GtC*PwtC*wgC(n?)= GsM2*(-Gt*Pwt*wg(n)+2*Re(Gt*Pwt*wg(n))); id GtM2*GsC*PwsC*wgC(n?)= GtM2*(-Gs*Pws*wg(n)+2*Re(Gs*Pws*wg(n))); * id GsM2*GtC*PwtC= GsM2*(-Gt*Pwt+2*Re(Gt*Pwt)); id GtM2*GsC*PwsC= GtM2*(-Gs*Pws+2*Re(Gs*Pws)); * id GsC*PwsC*Gt*Pwt= -Gs*Pws*GtC*PwtC+2*Re(GsC*Gt*PwsC*Pwt); *id GsC*Gt*Pws*PwtC= -Gs*GtC*PwsC*Pwt+2*Re(Gs*GtC*PwsC*Pwt); id GsC*Gt*Pws*PwtC= Re(Gs*GtC*PwsC*Pwt)+i_*Im(Gs*GtC*PwsC*Pwt); id Gs*GtC*PwsC*Pwt= Re(Gs*GtC*PwsC*Pwt)-i_*Im(Gs*GtC*PwsC*Pwt); id GsC*Gt*PwsC*PwtC= -Gs*GtC*Pws*Pwt+2*Re(Gs*GtC*Pws*Pwt); * id Gs*GtC*Pwt= -GsC*Gt*PwtC+2*Re(Gs*GtC*Pwt); * id GtM2*PwsC= GtM2*(-Pws+2*Re(Pws)); id GsM2*PwtC= GsM2*(-Pwt+2*Re(Pwt)); * id Re(wgC(2)*wg(1))= Re(wg(2)*wgC(1)); al Re(wgC(3)*wg(1))= Re(wg(3)*wgC(1)); al Re(wgC(4)*wg(1))= Re(wg(4)*wgC(1)); al Re(wgC(5)*wg(1))= Re(wg(5)*wgC(1)); al Re(wgC(6)*wg(1))= Re(wg(6)*wgC(1)); al Re(wgC(7)*wg(1))= Re(wg(7)*wgC(1)); al Re(wgC(8)*wg(1))= Re(wg(8)*wgC(1)); al Re(wgC(9)*wg(1))= Re(wg(9)*wgC(1)); al Re(wgC(10)*wg(1))= Re(wg(10)*wgC(1)); * id Re(wgC(3)*wg(2))= Re(wg(3)*wgC(2)); al Re(wgC(4)*wg(2))= Re(wg(4)*wgC(2)); al Re(wgC(5)*wg(2))= Re(wg(5)*wgC(2)); al Re(wgC(6)*wg(2))= Re(wg(6)*wgC(2)); al Re(wgC(7)*wg(2))= Re(wg(7)*wgC(2)); al Re(wgC(8)*wg(2))= Re(wg(8)*wgC(2)); al Re(wgC(9)*wg(2))= Re(wg(9)*wgC(2)); al Re(wgC(10)*wg(2))= Re(wg(10)*wgC(2)); * id Re(wgC(4)*wg(3))= Re(wg(4)*wgC(3)); al Re(wgC(5)*wg(3))= Re(wg(5)*wgC(3)); al Re(wgC(6)*wg(3))= Re(wg(6)*wgC(3)); al Re(wgC(7)*wg(3))= Re(wg(7)*wgC(3)); al Re(wgC(8)*wg(3))= Re(wg(8)*wgC(3)); al Re(wgC(9)*wg(3))= Re(wg(9)*wgC(3)); al Re(wgC(10)*wg(3))= Re(wg(10)*wgC(3)); * id Re(wgC(5)*wg(4))= Re(wg(5)*wgC(4)); al Re(wgC(6)*wg(4))= Re(wg(6)*wgC(4)); al Re(wgC(7)*wg(4))= Re(wg(7)*wgC(4)); al Re(wgC(8)*wg(4))= Re(wg(8)*wgC(4)); al Re(wgC(9)*wg(4))= Re(wg(9)*wgC(4)); al Re(wgC(10)*wg(4))= Re(wg(10)*wgC(4)); * id Re(wgC(6)*wg(5))= Re(wg(6)*wgC(5)); al Re(wgC(7)*wg(5))= Re(wg(7)*wgC(5)); al Re(wgC(8)*wg(5))= Re(wg(8)*wgC(5)); al Re(wgC(9)*wg(5))= Re(wg(9)*wgC(5)); al Re(wgC(10)*wg(5))= Re(wg(10)*wgC(5)); * id Re(wgC(7)*wg(6))= Re(wg(7)*wgC(6)); al Re(wgC(8)*wg(6))= Re(wg(8)*wgC(6)); al Re(wgC(9)*wg(6))= Re(wg(9)*wgC(6)); al Re(wgC(10)*wg(6))= Re(wg(10)*wgC(6)); * id Re(wgC(8)*wg(7))= Re(wg(8)*wgC(7)); al Re(wgC(9)*wg(7))= Re(wg(9)*wgC(7)); al Re(wgC(10)*wg(7))= Re(wg(10)*wgC(7)); * id Re(wgC(9)*wg(8))= Re(wg(9)*wgC(8)); al Re(wgC(10)*wg(8))= Re(wg(10)*wgC(8)); * id Re(wgC(10)*wg(9))= Re(wg(10)*wgC(9)); * .store * #endprocedure * #procedure contractgg(dummy) * g Wd_gg= T_gg*d_(mu,nu); g Wpp_gg= T_gg*pp(mu)*pp(nu); * id pp.pp= 0; al qp.qp= 0; al Qm.Qm= QmS; al kb.kb= -dms; id Qp.Qm= pp.Qm-qp.Qm; id kb.Qp= kb.pp-kb.qp; id k.Qp= k.pp-k.qp; id pp.Qp= -pp.qp; id Qp.Qp= -2*pp.qp; * id pp.Qm= -1/2*(QmS+y*s); al k.kb= 1/2*(-sp+ums+dms); al Qm.k= 1/2*(QmS+t-ums); al pp.kb= 1/2*(tp-dms); al Qm.kb= 1/2*(QmS+u-dms); al pp.k= 1/2*(up-ums); al pp.qp= 1/2*kp; al Qm.qp= 1/2*(QmS+km); al kb.qp= 1/2*(dms-zp); al k.qp= 1/2*(ums-zm); * id sp= x2*y*s; al km= z*y*s; al km^-1= 1/(z*y*s); al zm= -(x2-x1)*y*s; id QmS= X*y*s; * id t= y*s * ( - 1 - ups - z - 2*X ) + ums * ( 1 ) + dms * ( 1 ); al kp= y*s * ( - 1 + x2 - z - X ); al u= y*s * ( ups ); al up= y*s * ( 1 - x1 + ups + z + X ) + ums * ( 1 ); al tp= y*s * ( - 1 + x1 - x2 - ups - X ) + dms * ( 1 ); al zp= y*s * ( 1 - x1 ) + ums * ( 1 ) + dms * ( 1 ); * id ums= 0; id dms*tdM^-2= aux; id dms= 0; id aux= dms*tdM^-2; * ratio,X,Xp,one; id one= 1; al one^-1= 1; * id kb(mu?)= kbf(mu); id qp(mu?)= qpf(mu); id e_(kb,qp,nu?,al?)= kbf(ab1)*qpf(ab2)*e_(ab1,ab2,nu,al); al e_(kb,mu?,nu?,al?)= kbf(ab1)*e_(ab1,mu,nu,al); al e_(qp,mu?,nu?,al?)= qpf(ab2)*e_(ab2,mu,nu,al); * #call integration{dummy} * id rs^-2= -1/(X*y*s); id pp.pp= 0; al qp.qp= 0; al Qm.Qm= QmS; id Qp.Qm= pp.Qm-qp.Qm; id kb.Qp= kb.pp-kb.qp; id k.Qp= k.pp-k.qp; id pp.Qp= -pp.qp; id Qp.Qp= -2*pp.qp; * id pp.Qm= -1/2*(QmS+y*s); al k.kb= 1/2*(-sp+ums+dms); al Qm.k= 1/2*(QmS+t-ums); al pp.kb= 1/2*(tp-dms); al Qm.kb= 1/2*(QmS+u-dms); al pp.k= 1/2*(up-ums); al pp.qp= 1/2*kp; al Qm.qp= 1/2*(QmS+km); al kb.qp= 1/2*(dms-zp); al k.qp= 1/2*(ums-zm); * id sp= x2*y*s; al km= z*y*s; al km^-1= 1/(z*y*s); al zm= -(x2-x1)*y*s; id QmS= X*y*s; * id t= y*s * ( - 1 - ups - z - 2*X ) + ums * ( 1 ) + dms * ( 1 ); al kp= y*s * ( - 1 + x2 - z - X ); al u= y*s * ( ups ); al up= y*s * ( 1 - x1 + ups + z + X ) + ums * ( 1 ); al tp= y*s * ( - 1 + x1 - x2 - ups - X ) + dms * ( 1 ); al zp= y*s * ( 1 - x1 ) + ums * ( 1 ) + dms * ( 1 ); * id ums= 0; id dms*tdM^-2= aux; id dms= 0; id aux= dms*tdM^-2; * ratio,X,Xp,one; id one= 1; al one^-1= 1; * .store * g GG10= (-1/2*Wd_gg-2*X/Xp^2*Wpp_gg/(y*s))*sel0*s; g GG20= (-1/2*Wd_gg-6*X/Xp^2*Wpp_gg/(y*s))*sel0*s; g GG11= (-1/2*Wd_gg-2*X/Xp^2*Wpp_gg/(y*s))*seld*s; g GG21= (-1/2*Wd_gg-6*X/Xp^2*Wpp_gg/(y*s))*seld*s; g GG12= (-1/2*Wd_gg-2*X/Xp^2*Wpp_gg/(y*s))*seldd*s; g GG22= (-1/2*Wd_gg-6*X/Xp^2*Wpp_gg/(y*s))*seldd*s; * ratio,tdM,ups,aux; id aux= dms/(y*s); * id dms*tdM^-2= aux; id dms= 0; id aux= dms*tdM^-2; * id tdM^-2*seldd= 1; id seldd= 0; * id tdM^-2*seld= 0; id tdM^-1*seld= 1; id seld= 0; * id tdM^-2*sel0= 0; id tdM^-1*sel0= 0; * id sel0= 1; * ratio,X,Xp,one; id one= 1; al one^-1= 1; * *-- id Re(wg(n?)*wgC(2))= 1/2*(Re(wg(n)*wgC([2+3]))+Re(wg(n)*wgC([2-3]))); id Re(wg(n?)*wgC(3))= 1/2*(Re(wg(n)*wgC([2+3]))-Re(wg(n)*wgC([2-3]))); id Re(wg(2)*wgC(2))= wgM2(2); id Re(wg(3)*wgC(3))= wgM2(3); * id Re(wg(2)*wgC(n?))= 1/2*(Re(wg([2+3])*wgC(n))+Re(wg([2-3])*wgC(n))); id Re(wg(3)*wgC(n?))= 1/2*(Re(wg([2+3])*wgC(n))-Re(wg([2-3])*wgC(n))); id Re(wg(2)*wgC(2))= wgM2(2); id Re(wg(3)*wgC(3))= wgM2(3); * id Re(wg(n?)*wgC(5))= 1/2*(Re(wg(n)*wgC([5+6]))+Re(wg(n)*wgC([5-6]))); id Re(wg(n?)*wgC(6))= 1/2*(Re(wg(n)*wgC([5+6]))-Re(wg(n)*wgC([5-6]))); id Re(wg(5)*wgC(5))= wgM2(5); id Re(wg(6)*wgC(6))= wgM2(6); * id Re(wg(5)*wgC(n?))= 1/2*(Re(wg([5+6])*wgC(n))+Re(wg([5-6])*wgC(n))); id Re(wg(6)*wgC(n?))= 1/2*(Re(wg([5+6])*wgC(n))-Re(wg([5-6])*wgC(n))); id Re(wg(5)*wgC(5))= wgM2(5); id Re(wg(6)*wgC(6))= wgM2(6); * id Re(wg(2)*X?*Y?)= 1/2*(Re(wg([2+3])*X*Y)+Re(wg([2-3])*X*Y)); id Re(wg(3)*X?*Y?)= 1/2*(Re(wg([2+3])*X*Y)-Re(wg([2-3])*X*Y)); id Re(wg(5)*X?*Y?)= 1/2*(Re(wg([5+6])*X*Y)+Re(wg([5-6])*X*Y)); id Re(wg(6)*X?*Y?)= 1/2*(Re(wg([5+6])*X*Y)-Re(wg([5-6])*X*Y)); * id Re(wg(2)*X?)= 1/2*(Re(wg([2+3])*X)+Re(wg([2-3])*X)); id Re(wg(3)*X?)= 1/2*(Re(wg([2+3])*X)-Re(wg([2-3])*X)); id Re(wg(5)*X?)= 1/2*(Re(wg([5+6])*X)+Re(wg([5-6])*X)); id Re(wg(6)*X?)= 1/2*(Re(wg([5+6])*X)-Re(wg([5-6])*X)); * id Re(wg([2+3])*wgC([2-3]))= Re(wg([2-3])*wgC([2+3])); id Re(wg([2+3])*wgC([5-6]))= Re(wg([5-6])*wgC([2+3])); id Re(wg([2-3])*wgC([5+6]))= Re(wg([5+6])*wgC([2-3])); id Re(wg([5+6])*wgC([5-6]))= Re(wg([5-6])*wgC([5+6])); * id Re(wg([2+3])*wgC([2+3]))= wgM2(2)+wgM2(3)+2*Re(wg(2)*wgC(3)); id Re(wg([2-3])*wgC([2-3]))= wgM2(2)+wgM2(3)-2*Re(wg(2)*wgC(3)); id Re(wg([5+6])*wgC([5+6]))= wgM2(5)+wgM2(6)+2*Re(wg(5)*wgC(6)); id Re(wg([5-6])*wgC([5-6]))= wgM2(5)+wgM2(6)-2*Re(wg(5)*wgC(6)); *-- id X= [1+X]-1; id x1= 1-[1-x1]; id x2= 1-[1-x1]-[x1-x2]; id z= 1-[1-x1]-[x1-x2]-[x2-z]; id ups= [ups+X+x1]-[1+X]+[1-x1]; id Xp^-1= 1/[1+X]; ratio,X,[1+X],one; id one= 1; al one^-1= 1; * id Re(wg(X?)*wgC(Y?))= Rep(X,Y); id GsM2*GtM2= GstM2; id [1+X] = Xp; al [1+X]^-1= Xpi; id [1-x1]= omx1; al [x1-x2]= x12; al [x2-z]= x2z; al [ups+X+x1]= ux; al zX^-1= zXi; id Xpi^2= Xpi-aux; id aux= XX; * id Xp^2= Xps; id Xpi^2= Xpis; id y^3= yc; id y^2= ys; * id omx1= O; id O^4= Oq; id O^3= Oc; id O^2= Os; id x12^3= x12c; id x12^2= x12s; id x2z^4= x2zq; id x2z^3= x2zc; id x2z^2= x2zs; id ux^2= uxs; id vv^2= vvs; id vv^3= vvc; id vvs*vv= vvc; id vvs^2= vvq; id vvc*vv= vvq; * id Re(Gs*GtC*Pwt*PwsC)= rl1; id Re(Gs*GtC*Pwt)= rl2; id Re(Pws)= rl3; id Re(wg(n?)*Gs*PwsC)= rs1wg(n); id Re(wg(n?)*Gs)= rs2wg(n); id Re(wg(n?)*Gt*PwtC)= rt1wg(n); id Re(wg(n?)*Gt)= rt2wg(n); id Rep(n1?,n2?)= rwwg(n1,n2); id Re(wg(n1?)*wgC(n2?))= rwwg(n1,n2); id wgM2(n?)= rwwg(n,n); * id fun?([2+3],n?)= fun(11,n); al fun?([2-3],n?)= fun(12,n); al fun?([5+6],n?)= fun(13,n); al fun?([5-6],n?)= fun(14,n); * id fun?(n?,[2+3])= fun(n,11); al fun?(n?,[2-3])= fun(n,12); al fun?(n?,[5+6])= fun(n,13); al fun?(n?,[5-6])= fun(n,14); * id fun?([2+3])= fun(11); al fun?([2-3])= fun(12); al fun?([5+6])= fun(13); al fun?([5-6])= fun(14); * * .store * *----g^2-------------------- * g GG10s= GG10; g GG20s= GG20; g GG11s= GG11; g GG21s= GG21; g GG12s= GG12; g GG22s= GG22; * id gexp^4= 0; id gexp^3= 0; id gexp^2= 1; * b i_,Gs,GsC,Gt,GtC,GsM2,GtM2,GstM2,Re,Im,Mods,Rep zX,ums,dms,y,ys,yc,rs,s,tuM,tdM,wg,wgC,wgM2,rs1wg,rs2wg, rt1wg,rt2wg,rwwg,rl1,rl2,rl3, Pws,PwsC,Pwt,PwtC,PwsM2,PwtM2,Sigmas,SigmasC,SigmasM2,X,Xp,Xps,Xpi,Xpis, * ux,uxs,x2z,x2zs,x2zc,x2zq,x12,x12s,x12c,zXi,XX; zXi,XX,vv,vvs,vvc,vvq; format fortran; print; * .store * *----g^3-------------------- * g GG10c= GG10; g GG20c= GG20; g GG11c= GG11; g GG21c= GG21; g GG12c= GG12; g GG22c= GG22; * id gexp^4= 0; id gexp^3= 1; id gexp^2= 0; * b i_,Gs,GsC,Gt,GtC,GsM2,GtM2,GstM2,Re,Im,Mods,Rep zX,ums,dms,y,ys,yc,rs,s,tuM,tdM,wg,wgC,wgM2,rs1wg,rs2wg, rt1wg,rt2wg,rwwg,rl1,rl2,rl3, Pws,PwsC,Pwt,PwtC,PwsM2,PwtM2,Sigmas,SigmasC,SigmasM2,X,Xp,Xps,Xpi,Xpis, * ux,uxs,x2z,x2zs,x2zc,x2zq,x12,x12s,x12c,zXi,XX; zXi,XX,vv,vvs,vvc,vvq; format fortran; print; * .store * *----g^4-------------------- * g GG10q= GG10/GstM2; g GG20q= GG20/GstM2; g GG11q= GG11/GstM2; g GG21q= GG21/GstM2; g GG12q= GG12/GstM2; g GG22q= GG22/GstM2; * id gexp^4= 1; id gexp^3= 0; id gexp^2= 0; * b i_,Gs,GsC,Gt,GtC,GsM2,GtM2,GstM2,Re,Im,Mods,Rep zX,ums,dms,y,ys,yc,rs,s,tuM,tdM,wg,wgC,wgM2,rs1wg,rs2wg, rt1wg,rt2wg,rwwg,rl1,rl2,rl3, Pws,PwsC,Pwt,PwtC,PwsM2,PwtM2,Sigmas,SigmasC,SigmasM2,X,Xp,Xps,Xpi,Xpis, * ux,uxs,x2z,x2zs,x2zc,x2zq,x12,x12s,x12c,zXi,XX; zXi,XX,vv,vvs,vvc,vvq; format fortran; print; * #endprocedure * #procedure totalgz(dummy) * * Now the full stuff * load wrl$grp04:[giampiero]outputampgz_B.sav; * g T_gz= PwsM2*PwtM2*wwww_gz/(egt*I0); *nwrite statistics; * id es(T)*GT= egt; * id wg(n?)= wg(n)*rs; al wgC(n?)= wgC(n)*rs; id wz(n?)= wz(n)*rs; al wzC(n?)= wzC(n)*rs; * id wg(4)= X*wg(4); al wg(7)= X*wg(7); al wg(8)= X*wg(8); al wg(10)= X*wg(10); id wgC(4)= X*wgC(4); al wgC(7)= X*wgC(7); al wgC(8)= X*wgC(8); al wgC(10)= X*wgC(10); * id wz(4)= X*wz(4); al wz(7)= X*wz(7); al wz(8)= X*wz(8); al wz(10)= X*wz(10); id wzC(4)= X*wzC(4); al wzC(7)= X*wzC(7); al wzC(8)= X*wzC(8); al wzC(10)= X*wzC(10); * id wg(n?)*wgC(n?)= wgM2(n); id wz(n?)*wzC(n?)= wzM2(n); * id GtM2*GsM2*wg(2)*wzC(1)= GtM2*GsM2*(-wgC(2)*wz(1)+ 2*Re(wg(2)*wzC(1))); al GtM2*GsM2*wg(3)*wzC(1)= GtM2*GsM2*(-wgC(3)*wz(1)+ 2*Re(wg(3)*wzC(1))); al GtM2*GsM2*wg(4)*wzC(1)= GtM2*GsM2*(-wgC(4)*wz(1)+ 2*Re(wg(4)*wzC(1))); al GtM2*GsM2*wg(5)*wzC(1)= GtM2*GsM2*(-wgC(5)*wz(1)+ 2*Re(wg(5)*wzC(1))); al GtM2*GsM2*wg(6)*wzC(1)= GtM2*GsM2*(-wgC(6)*wz(1)+ 2*Re(wg(6)*wzC(1))); al GtM2*GsM2*wg(7)*wzC(1)= GtM2*GsM2*(-wgC(7)*wz(1)+ 2*Re(wg(7)*wzC(1))); al GtM2*GsM2*wg(8)*wzC(1)= GtM2*GsM2*(-wgC(8)*wz(1)+ 2*Re(wg(8)*wzC(1))); al GtM2*GsM2*wg(9)*wzC(1)= GtM2*GsM2*(-wgC(9)*wz(1)+ 2*Re(wg(9)*wzC(1))); al GtM2*GsM2*wg(10)*wzC(1)= GtM2*GsM2*(-wgC(10)*wz(1)+ 2*Re(wg(10)*wzC(1))); * al GtM2*GsM2*wg(3)*wzC(2)= GtM2*GsM2*(-wgC(3)*wz(2)+ 2*Re(wg(3)*wzC(2))); al GtM2*GsM2*wg(4)*wzC(2)= GtM2*GsM2*(-wgC(4)*wz(2)+ 2*Re(wg(4)*wzC(2))); al GtM2*GsM2*wg(5)*wzC(2)= GtM2*GsM2*(-wgC(5)*wz(2)+ 2*Re(wg(5)*wzC(2))); al GtM2*GsM2*wg(6)*wzC(2)= GtM2*GsM2*(-wgC(6)*wz(2)+ 2*Re(wg(6)*wzC(2))); al GtM2*GsM2*wg(7)*wzC(2)= GtM2*GsM2*(-wgC(7)*wz(2)+ 2*Re(wg(7)*wzC(2))); al GtM2*GsM2*wg(8)*wzC(2)= GtM2*GsM2*(-wgC(8)*wz(2)+ 2*Re(wg(8)*wzC(2))); al GtM2*GsM2*wg(9)*wzC(2)= GtM2*GsM2*(-wgC(9)*wz(2)+ 2*Re(wg(9)*wzC(2))); al GtM2*GsM2*wg(10)*wzC(2)= GtM2*GsM2*(-wgC(10)*wz(2)+ 2*Re(wg(10)*wzC(2))); * al GtM2*GsM2*wg(4)*wzC(3)= GtM2*GsM2*(-wgC(4)*wz(3)+ 2*Re(wg(4)*wzC(3))); al GtM2*GsM2*wg(5)*wzC(3)= GtM2*GsM2*(-wgC(5)*wz(3)+ 2*Re(wg(5)*wzC(3))); al GtM2*GsM2*wg(6)*wzC(3)= GtM2*GsM2*(-wgC(6)*wz(3)+ 2*Re(wg(6)*wzC(3))); al GtM2*GsM2*wg(7)*wzC(3)= GtM2*GsM2*(-wgC(7)*wz(3)+ 2*Re(wg(7)*wzC(3))); al GtM2*GsM2*wg(8)*wzC(3)= GtM2*GsM2*(-wgC(8)*wz(3)+ 2*Re(wg(8)*wzC(3))); al GtM2*GsM2*wg(9)*wzC(3)= GtM2*GsM2*(-wgC(9)*wz(3)+ 2*Re(wg(9)*wzC(3))); al GtM2*GsM2*wg(10)*wzC(3)= GtM2*GsM2*(-wgC(10)*wz(3)+ 2*Re(wg(10)*wzC(3))); * al GtM2*GsM2*wg(5)*wzC(4)= GtM2*GsM2*(-wgC(5)*wz(4)+ 2*Re(wg(5)*wzC(4))); al GtM2*GsM2*wg(6)*wzC(4)= GtM2*GsM2*(-wgC(6)*wz(4)+ 2*Re(wg(6)*wzC(4))); al GtM2*GsM2*wg(7)*wzC(4)= GtM2*GsM2*(-wgC(7)*wz(4)+ 2*Re(wg(7)*wzC(4))); al GtM2*GsM2*wg(8)*wzC(4)= GtM2*GsM2*(-wgC(8)*wz(4)+ 2*Re(wg(8)*wzC(4))); al GtM2*GsM2*wg(9)*wzC(4)= GtM2*GsM2*(-wgC(9)*wz(4)+ 2*Re(wg(9)*wzC(4))); al GtM2*GsM2*wg(10)*wzC(4)= GtM2*GsM2*(-wgC(10)*wz(4)+ 2*Re(wg(10)*wzC(4))); * al GtM2*GsM2*wg(6)*wzC(5)= GtM2*GsM2*(-wgC(6)*wz(5)+ 2*Re(wg(6)*wzC(5))); al GtM2*GsM2*wg(7)*wzC(5)= GtM2*GsM2*(-wgC(7)*wz(5)+ 2*Re(wg(7)*wzC(5))); al GtM2*GsM2*wg(8)*wzC(5)= GtM2*GsM2*(-wgC(8)*wz(5)+ 2*Re(wg(8)*wzC(5))); al GtM2*GsM2*wg(9)*wzC(5)= GtM2*GsM2*(-wgC(9)*wz(5)+ 2*Re(wg(9)*wzC(5))); al GtM2*GsM2*wg(10)*wzC(5)= GtM2*GsM2*(-wgC(10)*wz(5)+ 2*Re(wg(10)*wzC(5))); * al GtM2*GsM2*wg(7)*wzC(6)= GtM2*GsM2*(-wgC(7)*wz(6)+ 2*Re(wg(7)*wzC(6))); al GtM2*GsM2*wg(8)*wzC(6)= GtM2*GsM2*(-wgC(8)*wz(6)+ 2*Re(wg(8)*wzC(6))); al GtM2*GsM2*wg(9)*wzC(6)= GtM2*GsM2*(-wgC(9)*wz(6)+ 2*Re(wg(9)*wzC(6))); al GtM2*GsM2*wg(10)*wzC(6)= GtM2*GsM2*(-wgC(10)*wz(6)+ 2*Re(wg(10)*wzC(6))); * al GtM2*GsM2*wg(8)*wzC(7)= GtM2*GsM2*(-wgC(8)*wz(7)+ 2*Re(wg(8)*wzC(7))); al GtM2*GsM2*wg(9)*wzC(7)= GtM2*GsM2*(-wgC(9)*wz(7)+ 2*Re(wg(9)*wzC(7))); al GtM2*GsM2*wg(10)*wzC(7)= GtM2*GsM2*(-wgC(10)*wz(7)+ 2*Re(wg(10)*wzC(7))); * al GtM2*GsM2*wg(9)*wzC(8)= GtM2*GsM2*(-wgC(9)*wz(8)+ 2*Re(wg(9)*wzC(8))); al GtM2*GsM2*wg(10)*wzC(8)= GtM2*GsM2*(-wgC(10)*wz(8)+ 2*Re(wg(10)*wzC(8))); * al GtM2*GsM2*wg(10)*wzC(9)= GtM2*GsM2*(-wgC(10)*wz(9)+ 2*Re(wg(10)*wzC(9))); * id GtM2*GsM2*wz(2)*wgC(1)= GtM2*GsM2*(-wzC(2)*wg(1)+ 2*Re(wz(2)*wgC(1))); al GtM2*GsM2*wz(3)*wgC(1)= GtM2*GsM2*(-wzC(3)*wg(1)+ 2*Re(wz(3)*wgC(1))); al GtM2*GsM2*wz(4)*wgC(1)= GtM2*GsM2*(-wzC(4)*wg(1)+ 2*Re(wz(4)*wgC(1))); al GtM2*GsM2*wz(5)*wgC(1)= GtM2*GsM2*(-wzC(5)*wg(1)+ 2*Re(wz(5)*wgC(1))); al GtM2*GsM2*wz(6)*wgC(1)= GtM2*GsM2*(-wzC(6)*wg(1)+ 2*Re(wz(6)*wgC(1))); al GtM2*GsM2*wz(7)*wgC(1)= GtM2*GsM2*(-wzC(7)*wg(1)+ 2*Re(wz(7)*wgC(1))); al GtM2*GsM2*wz(8)*wgC(1)= GtM2*GsM2*(-wzC(8)*wg(1)+ 2*Re(wz(8)*wgC(1))); al GtM2*GsM2*wz(9)*wgC(1)= GtM2*GsM2*(-wzC(9)*wg(1)+ 2*Re(wz(9)*wgC(1))); al GtM2*GsM2*wz(10)*wgC(1)= GtM2*GsM2*(-wzC(10)*wg(1)+ 2*Re(wz(10)*wgC(1))); * al GtM2*GsM2*wz(3)*wgC(2)= GtM2*GsM2*(-wzC(3)*wg(2)+ 2*Re(wz(3)*wgC(2))); al GtM2*GsM2*wz(4)*wgC(2)= GtM2*GsM2*(-wzC(4)*wg(2)+ 2*Re(wz(4)*wgC(2))); al GtM2*GsM2*wz(5)*wgC(2)= GtM2*GsM2*(-wzC(5)*wg(2)+ 2*Re(wz(5)*wgC(2))); al GtM2*GsM2*wz(6)*wgC(2)= GtM2*GsM2*(-wzC(6)*wg(2)+ 2*Re(wz(6)*wgC(2))); al GtM2*GsM2*wz(7)*wgC(2)= GtM2*GsM2*(-wzC(7)*wg(2)+ 2*Re(wz(7)*wgC(2))); al GtM2*GsM2*wz(8)*wgC(2)= GtM2*GsM2*(-wzC(8)*wg(2)+ 2*Re(wz(8)*wgC(2))); al GtM2*GsM2*wz(9)*wgC(2)= GtM2*GsM2*(-wzC(9)*wg(2)+ 2*Re(wz(9)*wgC(2))); al GtM2*GsM2*wz(10)*wgC(2)= GtM2*GsM2*(-wzC(10)*wg(2)+ 2*Re(wz(10)*wgC(2))); * al GtM2*GsM2*wz(4)*wgC(3)= GtM2*GsM2*(-wzC(4)*wg(3)+ 2*Re(wz(4)*wgC(3))); al GtM2*GsM2*wz(5)*wgC(3)= GtM2*GsM2*(-wzC(5)*wg(3)+ 2*Re(wz(5)*wgC(3))); al GtM2*GsM2*wz(6)*wgC(3)= GtM2*GsM2*(-wzC(6)*wg(3)+ 2*Re(wz(6)*wgC(3))); al GtM2*GsM2*wz(7)*wgC(3)= GtM2*GsM2*(-wzC(7)*wg(3)+ 2*Re(wz(7)*wgC(3))); al GtM2*GsM2*wz(8)*wgC(3)= GtM2*GsM2*(-wzC(8)*wg(3)+ 2*Re(wz(8)*wgC(3))); al GtM2*GsM2*wz(9)*wgC(3)= GtM2*GsM2*(-wzC(9)*wg(3)+ 2*Re(wz(9)*wgC(3))); al GtM2*GsM2*wz(10)*wgC(3)= GtM2*GsM2*(-wzC(10)*wg(3)+ 2*Re(wz(10)*wgC(3))); * al GtM2*GsM2*wz(5)*wgC(4)= GtM2*GsM2*(-wzC(5)*wg(4)+ 2*Re(wz(5)*wgC(4))); al GtM2*GsM2*wz(6)*wgC(4)= GtM2*GsM2*(-wzC(6)*wg(4)+ 2*Re(wz(6)*wgC(4))); al GtM2*GsM2*wz(7)*wgC(4)= GtM2*GsM2*(-wzC(7)*wg(4)+ 2*Re(wz(7)*wgC(4))); al GtM2*GsM2*wz(8)*wgC(4)= GtM2*GsM2*(-wzC(8)*wg(4)+ 2*Re(wz(8)*wgC(4))); al GtM2*GsM2*wz(9)*wgC(4)= GtM2*GsM2*(-wzC(9)*wg(4)+ 2*Re(wz(9)*wgC(4))); al GtM2*GsM2*wz(10)*wgC(4)= GtM2*GsM2*(-wzC(10)*wg(4)+ 2*Re(wz(10)*wgC(4))); * al GtM2*GsM2*wz(6)*wgC(5)= GtM2*GsM2*(-wzC(6)*wg(5)+ 2*Re(wz(6)*wgC(5))); al GtM2*GsM2*wz(7)*wgC(5)= GtM2*GsM2*(-wzC(7)*wg(5)+ 2*Re(wz(7)*wgC(5))); al GtM2*GsM2*wz(8)*wgC(5)= GtM2*GsM2*(-wzC(8)*wg(5)+ 2*Re(wz(8)*wgC(5))); al GtM2*GsM2*wz(9)*wgC(5)= GtM2*GsM2*(-wzC(9)*wg(5)+ 2*Re(wz(9)*wgC(5))); al GtM2*GsM2*wz(10)*wgC(5)= GtM2*GsM2*(-wzC(10)*wg(5)+ 2*Re(wz(10)*wgC(5))); * al GtM2*GsM2*wz(7)*wgC(6)= GtM2*GsM2*(-wzC(7)*wg(6)+ 2*Re(wz(7)*wgC(6))); al GtM2*GsM2*wz(8)*wgC(6)= GtM2*GsM2*(-wzC(8)*wg(6)+ 2*Re(wz(8)*wgC(6))); al GtM2*GsM2*wz(9)*wgC(6)= GtM2*GsM2*(-wzC(9)*wg(6)+ 2*Re(wz(9)*wgC(6))); al GtM2*GsM2*wz(10)*wgC(6)= GtM2*GsM2*(-wzC(10)*wg(6)+ 2*Re(wz(10)*wgC(6))); * al GtM2*GsM2*wz(8)*wgC(7)= GtM2*GsM2*(-wzC(8)*wg(7)+ 2*Re(wz(8)*wgC(7))); al GtM2*GsM2*wz(9)*wgC(7)= GtM2*GsM2*(-wzC(9)*wg(7)+ 2*Re(wz(9)*wgC(7))); al GtM2*GsM2*wz(10)*wgC(7)= GtM2*GsM2*(-wzC(10)*wg(7)+ 2*Re(wz(10)*wgC(7))); * al GtM2*GsM2*wz(9)*wgC(8)= GtM2*GsM2*(-wzC(9)*wg(8)+ 2*Re(wz(9)*wgC(8))); al GtM2*GsM2*wz(10)*wgC(8)= GtM2*GsM2*(-wzC(10)*wg(8)+ 2*Re(wz(10)*wgC(8))); * al GtM2*GsM2*wz(10)*wgC(9)= GtM2*GsM2*(-wzC(10)*wg(9)+ 2*Re(wz(10)*wgC(9))); * id wg(n?)*Gs*GtM2*PwsC= GtM2*(-wgC(n)*GsC*Pws+2*Re(wg(n)*Gs*PwsC)); id wg(n?)*Gt*GsM2*PwtC= GsM2*(-wgC(n)*GtC*Pwt+2*Re(wg(n)*Gt*PwtC)); id wz(n?)*Gs*GtM2*PwsC= GtM2*(-wzC(n)*GsC*Pws+2*Re(wz(n)*Gs*PwsC)); id wz(n?)*Gt*GsM2*PwtC= GsM2*(-wzC(n)*GtC*Pwt+2*Re(wz(n)*Gt*PwtC)); * id GsM2*GtC*PwtC*wgC(n?)= GsM2*(-Gt*Pwt*wg(n)+2*Re(Gt*Pwt*wg(n))); id GtM2*GsC*PwsC*wgC(n?)= GtM2*(-Gs*Pws*wg(n)+2*Re(Gs*Pws*wg(n))); id GsM2*GtC*PwtC*wzC(n?)= GsM2*(-Gt*Pwt*wz(n)+2*Re(Gt*Pwt*wz(n))); id GtM2*GsC*PwsC*wzC(n?)= GtM2*(-Gs*Pws*wz(n)+2*Re(Gs*Pws*wz(n))); * id wg(n?)*Gs*GtM2= GtM2*(-GsC*wgC(n)+2*Re(Gs*wg(n))); id wg(n?)*Gt*GsM2= GsM2*(-GtC*wgC(n)+2*Re(Gt*wg(n))); id wz(n?)*Gs*GtM2= GtM2*(-GsC*wzC(n)+2*Re(Gs*wz(n))); id wz(n?)*Gt*GsM2= GsM2*(-GtC*wzC(n)+2*Re(Gt*wz(n))); * id GsM2*GtC*PwtC= GsM2*(-Gt*Pwt+2*Re(Gt*Pwt)); id GtM2*GsC*PwsC= GtM2*(-Gs*Pws+2*Re(Gs*Pws)); * id GsC*PwsC*Gt*Pwt= -Gs*Pws*GtC*PwtC+2*Re(GsC*Gt*PwsC*Pwt); *id GsC*Gt*Pws*PwtC= -Gs*GtC*PwsC*Pwt+2*Re(Gs*GtC*PwsC*Pwt); id GsC*Gt*Pws*PwtC= Re(Gs*GtC*PwsC*Pwt)+i_*Im(Gs*GtC*PwsC*Pwt); id Gs*GtC*PwsC*Pwt= Re(Gs*GtC*PwsC*Pwt)-i_*Im(Gs*GtC*PwsC*Pwt); id GsC*Gt*PwsC*PwtC= -Gs*GtC*Pws*Pwt+2*Re(Gs*GtC*Pws*Pwt); * id Gs*GtC*Pwt= -GsC*Gt*PwtC+2*Re(Gs*GtC*Pwt); * id GtM2*PwsC= GtM2*(-Pws+2*Re(Pws)); id GsM2*PwtC= GsM2*(-Pwt+2*Re(Pwt)); * id Re(wzC(2)*wg(1))= Re(wz(2)*wgC(1)); al Re(wzC(3)*wg(1))= Re(wz(3)*wgC(1)); al Re(wzC(4)*wg(1))= Re(wz(4)*wgC(1)); al Re(wzC(5)*wg(1))= Re(wz(5)*wgC(1)); al Re(wzC(6)*wg(1))= Re(wz(6)*wgC(1)); al Re(wzC(7)*wg(1))= Re(wz(7)*wgC(1)); al Re(wzC(8)*wg(1))= Re(wz(8)*wgC(1)); al Re(wzC(9)*wg(1))= Re(wz(9)*wgC(1)); al Re(wzC(10)*wg(1))= Re(wz(10)*wgC(1)); * id Re(wgC(2)*wz(1))= Re(wg(2)*wzC(1)); al Re(wgC(3)*wz(1))= Re(wg(3)*wzC(1)); al Re(wgC(4)*wz(1))= Re(wg(4)*wzC(1)); al Re(wgC(5)*wz(1))= Re(wg(5)*wzC(1)); al Re(wgC(6)*wz(1))= Re(wg(6)*wzC(1)); al Re(wgC(7)*wz(1))= Re(wg(7)*wzC(1)); al Re(wgC(8)*wz(1))= Re(wg(8)*wzC(1)); al Re(wgC(9)*wz(1))= Re(wg(9)*wzC(1)); al Re(wgC(10)*wz(1))= Re(wg(10)*wzC(1)); * id Re(wgC(3)*wz(2))= Re(wg(3)*wzC(2)); al Re(wgC(4)*wz(2))= Re(wg(4)*wzC(2)); al Re(wgC(5)*wz(2))= Re(wg(5)*wzC(2)); al Re(wgC(6)*wz(2))= Re(wg(6)*wzC(2)); al Re(wgC(7)*wz(2))= Re(wg(7)*wzC(2)); al Re(wgC(8)*wz(2))= Re(wg(8)*wzC(2)); al Re(wgC(9)*wz(2))= Re(wg(9)*wzC(2)); al Re(wgC(10)*wz(2))= Re(wg(10)*wzC(2)); * id Re(wzC(3)*wg(2))= Re(wz(3)*wgC(2)); al Re(wzC(4)*wg(2))= Re(wz(4)*wgC(2)); al Re(wzC(5)*wg(2))= Re(wz(5)*wgC(2)); al Re(wzC(6)*wg(2))= Re(wz(6)*wgC(2)); al Re(wzC(7)*wg(2))= Re(wz(7)*wgC(2)); al Re(wzC(8)*wg(2))= Re(wz(8)*wgC(2)); al Re(wzC(9)*wg(2))= Re(wz(9)*wgC(2)); al Re(wzC(10)*wg(2))= Re(wz(10)*wgC(2)); * id Re(wgC(4)*wz(3))= Re(wg(4)*wzC(3)); al Re(wgC(5)*wz(3))= Re(wg(5)*wzC(3)); al Re(wgC(6)*wz(3))= Re(wg(6)*wzC(3)); al Re(wgC(7)*wz(3))= Re(wg(7)*wzC(3)); al Re(wgC(8)*wz(3))= Re(wg(8)*wzC(3)); al Re(wgC(9)*wz(3))= Re(wg(9)*wzC(3)); al Re(wgC(10)*wz(3))= Re(wg(10)*wzC(3)); * id Re(wzC(4)*wg(3))= Re(wz(4)*wgC(3)); al Re(wzC(5)*wg(3))= Re(wz(5)*wgC(3)); al Re(wzC(6)*wg(3))= Re(wz(6)*wgC(3)); al Re(wzC(7)*wg(3))= Re(wz(7)*wgC(3)); al Re(wzC(8)*wg(3))= Re(wz(8)*wgC(3)); al Re(wzC(9)*wg(3))= Re(wz(9)*wgC(3)); al Re(wzC(10)*wg(3))= Re(wz(10)*wgC(3)); * id Re(wgC(5)*wz(4))= Re(wg(5)*wzC(4)); al Re(wgC(6)*wz(4))= Re(wg(6)*wzC(4)); al Re(wgC(7)*wz(4))= Re(wg(7)*wzC(4)); al Re(wgC(8)*wz(4))= Re(wg(8)*wzC(4)); al Re(wgC(9)*wz(4))= Re(wg(9)*wzC(4)); al Re(wgC(10)*wz(4))= Re(wg(10)*wzC(4)); * id Re(wzC(5)*wg(4))= Re(wg(5)*wzC(4)); al Re(wzC(6)*wg(4))= Re(wg(6)*wzC(4)); al Re(wzC(7)*wg(4))= Re(wg(7)*wzC(4)); al Re(wzC(8)*wg(4))= Re(wg(8)*wzC(4)); al Re(wzC(9)*wg(4))= Re(wg(9)*wzC(4)); al Re(wzC(10)*wg(4))= Re(wg(10)*wzC(4)); * id Re(wgC(6)*wz(5))= Re(wg(6)*wzC(5)); al Re(wgC(7)*wz(5))= Re(wg(7)*wzC(5)); al Re(wgC(8)*wz(5))= Re(wg(8)*wzC(5)); al Re(wgC(9)*wz(5))= Re(wg(9)*wzC(5)); al Re(wgC(10)*wz(5))= Re(wg(10)*wzC(5)); * id Re(wzC(6)*wg(5))= Re(wz(6)*wgC(5)); al Re(wzC(7)*wg(5))= Re(wz(7)*wgC(5)); al Re(wzC(8)*wg(5))= Re(wz(8)*wgC(5)); al Re(wzC(9)*wg(5))= Re(wz(9)*wgC(5)); al Re(wzC(10)*wg(5))= Re(wz(10)*wgC(5)); * id Re(wgC(7)*wz(6))= Re(wg(7)*wzC(6)); al Re(wgC(8)*wz(6))= Re(wg(8)*wzC(6)); al Re(wgC(9)*wz(6))= Re(wg(9)*wzC(6)); al Re(wgC(10)*wz(6))= Re(wg(10)*wzC(6)); * id Re(wzC(7)*wg(6))= Re(wz(7)*wgC(6)); al Re(wzC(8)*wg(6))= Re(wz(8)*wgC(6)); al Re(wzC(9)*wg(6))= Re(wz(9)*wgC(6)); al Re(wzC(10)*wg(6))= Re(wz(10)*wgC(6)); * id Re(wgC(8)*wz(7))= Re(wg(8)*wzC(7)); al Re(wgC(9)*wz(7))= Re(wg(9)*wzC(7)); al Re(wgC(10)*wz(7))= Re(wg(10)*wzC(7)); * id Re(wzC(8)*wg(7))= Re(wz(8)*wgC(7)); al Re(wzC(9)*wg(7))= Re(wz(9)*wgC(7)); al Re(wzC(10)*wg(7))= Re(wz(10)*wgC(7)); * id Re(wgC(9)*wz(8))= Re(wg(9)*wzC(8)); al Re(wgC(10)*wz(8))= Re(wg(10)*wzC(8)); * id Re(wzC(9)*wg(8))= Re(wg(9)*wgC(8)); al Re(wzC(10)*wg(8))= Re(wg(10)*wgC(8)); * id Re(wgC(10)*wz(9))= Re(wg(10)*wzC(9)); * id Re(wzC(10)*wg(9))= Re(wz(10)*wgC(9)); * id wg(n?)*wzC(n?)= -wgC(n)*wz(n)+2*Re(wg(n)*wzC(n)); * .store * #endprocedure * #procedure contractgz(dummy) * g Wd_gz= T_gz*d_(mu,nu); g Wpp_gz= T_gz*pp(mu)*pp(nu); g We_gz= T_gz*e_(mu,nu,Qm,pp); * contract; * id rs^-1= -1/(X*y*s); id pp.pp= 0; al qp.qp= 0; al Qm.Qm= QmS; id Qp.Qm= pp.Qm-qp.Qm; id kb.Qp= kb.pp-kb.qp; id k.Qp= k.pp-k.qp; id pp.Qp= -pp.qp; id Qp.Qp= -2*pp.qp; id qp.Qp= qp.pp; * id pp.Qm= -1/2*(QmS+y*s); al k.kb= 1/2*(-sp+ums+dms); al Qm.k= 1/2*(QmS+t-ums); al pp.kb= 1/2*(tp-dms); al Qm.kb= 1/2*(QmS+u-dms); al pp.k= 1/2*(up-ums); al pp.qp= 1/2*kp; al Qm.qp= 1/2*(QmS+km); al kb.qp= 1/2*(dms-zp); al k.qp= 1/2*(ums-zm); * id sp= x2*y*s; al km= z*y*s; al km^-1= 1/(z*y*s); al zm= -(x2-x1)*y*s; id QmS= X*y*s; * id ums= 0; id dms*tdM^-2= aux; id dms= 0; id aux= dms*tdM^-2; * id t= y*s * ( - 1 - ups - z - 2*X ) + ums * ( 1 ) + dms * ( 1 ); al kp= y*s * ( - 1 + x2 - z - X ); al u= y*s * ( ups ); al up= y*s * ( 1 - x1 + ups + z + X ) + ums * ( 1 ); al tp= y*s * ( - 1 + x1 - x2 - ups - X ) + dms * ( 1 ); al zp= y*s * ( 1 - x1 ) + ums * ( 1 ) + dms * ( 1 ); * id ums= 0; id dms*tdM^-2= aux; id dms= 0; id aux= dms*tdM^-2; * ratio,X,Xp,one; id one= 1; al one^-1= 1; * id kb(mu?)= kbf(mu); id qp(mu?)= qpf(mu); al e_(kb,mu?,nu?,al?)= kbf(ab1)*e_(ab1,mu,nu,al); al e_(qp,mu?,nu?,al?)= qpf(ab2)*e_(ab2,mu,nu,al); * #call integration{dummy} * id rs^-1= -1/(X*y*s); id pp.pp= 0; al qp.qp= 0; al Qm.Qm= QmS; al kb.kb= -dms; id Qp.Qm= pp.Qm-qp.Qm; id kb.Qp= kb.pp-kb.qp; id k.Qp= k.pp-k.qp; id pp.Qp= -pp.qp; id Qp.Qp= -2*pp.qp; id qp.Qp= qp.pp; * id pp.Qm= -1/2*(QmS+y*s); al k.kb= 1/2*(-sp+ums+dms); al Qm.k= 1/2*(QmS+t-ums); al pp.kb= 1/2*(tp-dms); al Qm.kb= 1/2*(QmS+u-dms); al pp.k= 1/2*(up-ums); al pp.qp= 1/2*kp; al Qm.qp= 1/2*(QmS+km); al kb.qp= 1/2*(dms-zp); al k.qp= 1/2*(ums-zm); * id sp= x2*y*s; al km= z*y*s; al km^-1= 1/(z*y*s); al zm= -(x2-x1)*y*s; id QmS= X*y*s; * id ums= 0; id dms*tdM^-2= aux; id dms= 0; id aux= dms*tdM^-2; * id t= y*s * ( - 1 - ups - z - 2*X ) + ums * ( 1 ) + dms * ( 1 ); al kp= y*s * ( - 1 + x2 - z - X ); al u= y*s * ( ups ); al up= y*s * ( 1 - x1 + ups + z + X ) + ums * ( 1 ); al tp= y*s * ( - 1 + x1 - x2 - ups - X ) + dms * ( 1 ); al zp= y*s * ( 1 - x1 ) + ums * ( 1 ) + dms * ( 1 ); * id ums= 0; id dms*tdM^-2= aux; id dms= 0; id aux= dms*tdM^-2; * ratio,X,Xp,one; id one= 1; al one^-1= 1; * .store * g GZ10= (-1/2*Wd_gz-2*X/Xp^2*Wpp_gz/(y*s))*sel0*s^2; g GZ20= (-1/2*Wd_gz-6*X/Xp^2*Wpp_gz/(y*s))*sel0*s^2; g GZ30= (We_gz/(y*s)/Xp)*sel0*s^2; g GZ11= (-1/2*Wd_gz-2*X/Xp^2*Wpp_gz/(y*s))*seld*s^2; g GZ21= (-1/2*Wd_gz-6*X/Xp^2*Wpp_gz/(y*s))*seld*s^2; g GZ31= (We_gz/(y*s)/Xp)*seld*s^2; g GZ12= (-1/2*Wd_gz-2*X/Xp^2*Wpp_gz/(y*s))*seldd*s^2; g GZ22= (-1/2*Wd_gz-6*X/Xp^2*Wpp_gz/(y*s))*seldd*s^2; g GZ32= (We_gz/(y*s)/Xp)*seldd*s^2; * ratio,tdM,ups,aux; id aux= dms/(y*s); * id dms*tdM^-2= aux; id dms= 0; id aux= dms*tdM^-2; * id tdM^-2*seldd= 1; id seldd= 0; * id tdM^-2*seld= 0; id tdM^-1*seld= 1; id seld= 0; * id tdM^-2*sel0= 0; id tdM^-1*sel0= 0; * id sel0= 1; * ratio,X,Xp,one; id one= 1; *-- id Re(wg(n?)*wzC(2))= 1/2*(Re(wg(n)*wzC([2+3]))+Re(wg(n)*wzC([2-3]))); id Re(wg(n?)*wzC(3))= 1/2*(Re(wg(n)*wzC([2+3]))-Re(wg(n)*wzC([2-3]))); id Re(wz(n?)*wgC(2))= 1/2*(Re(wz(n)*wgC([2+3]))+Re(wz(n)*wgC([2-3]))); id Re(wz(n?)*wgC(3))= 1/2*(Re(wz(n)*wgC([2+3]))-Re(wz(n)*wgC([2-3]))); * id Re(wg(2)*wzC(n?))= 1/2*(Re(wg([2+3])*wzC(n))+Re(wg([2-3])*wzC(n))); id Re(wg(3)*wzC(n?))= 1/2*(Re(wg([2+3])*wzC(n))-Re(wg([2-3])*wzC(n))); id Re(wz(2)*wgC(n?))= 1/2*(Re(wz([2+3])*wgC(n))+Re(wz([2-3])*wgC(n))); id Re(wz(3)*wgC(n?))= 1/2*(Re(wz([2+3])*wgC(n))-Re(wz([2-3])*wgC(n))); * id Re(wg(n?)*wzC(5))= 1/2*(Re(wg(n)*wzC([5+6]))+Re(wg(n)*wzC([5-6]))); id Re(wg(n?)*wzC(6))= 1/2*(Re(wg(n)*wzC([5+6]))-Re(wg(n)*wzC([5-6]))); id Re(wz(n?)*wgC(5))= 1/2*(Re(wz(n)*wgC([5+6]))+Re(wz(n)*wgC([5-6]))); id Re(wz(n?)*wgC(6))= 1/2*(Re(wz(n)*wgC([5+6]))-Re(wz(n)*wgC([5-6]))); * id Re(wg(5)*wzC(n?))= 1/2*(Re(wg([5+6])*wzC(n))+Re(wg([5-6])*wzC(n))); id Re(wg(6)*wzC(n?))= 1/2*(Re(wg([5+6])*wzC(n))-Re(wg([5-6])*wzC(n))); id Re(wz(5)*wgC(n?))= 1/2*(Re(wz([5+6])*wgC(n))+Re(wz([5-6])*wgC(n))); id Re(wz(6)*wgC(n?))= 1/2*(Re(wz([5+6])*wgC(n))-Re(wz([5-6])*wgC(n))); * id Re(wg(2)*X?*Y?)= 1/2*(Re(wg([2+3])*X*Y)+Re(wg([2-3])*X*Y)); id Re(wg(3)*X?*Y?)= 1/2*(Re(wg([2+3])*X*Y)-Re(wg([2-3])*X*Y)); id Re(wg(5)*X?*Y?)= 1/2*(Re(wg([5+6])*X*Y)+Re(wg([5-6])*X*Y)); id Re(wg(6)*X?*Y?)= 1/2*(Re(wg([5+6])*X*Y)-Re(wg([5-6])*X*Y)); id Re(wz(2)*X?*Y?)= 1/2*(Re(wz([2+3])*X*Y)+Re(wz([2-3])*X*Y)); id Re(wz(3)*X?*Y?)= 1/2*(Re(wz([2+3])*X*Y)-Re(wz([2-3])*X*Y)); id Re(wz(5)*X?*Y?)= 1/2*(Re(wz([5+6])*X*Y)+Re(wz([5-6])*X*Y)); id Re(wz(6)*X?*Y?)= 1/2*(Re(wz([5+6])*X*Y)-Re(wz([5-6])*X*Y)); * id Re(wg(2)*X?)= 1/2*(Re(wg([2+3])*X)+Re(wg([2-3])*X)); id Re(wg(3)*X?)= 1/2*(Re(wg([2+3])*X)-Re(wg([2-3])*X)); id Re(wg(5)*X?)= 1/2*(Re(wg([5+6])*X)+Re(wg([5-6])*X)); id Re(wg(6)*X?)= 1/2*(Re(wg([5+6])*X)-Re(wg([5-6])*X)); id Re(wz(2)*X?)= 1/2*(Re(wz([2+3])*X)+Re(wz([2-3])*X)); id Re(wz(3)*X?)= 1/2*(Re(wz([2+3])*X)-Re(wz([2-3])*X)); id Re(wz(5)*X?)= 1/2*(Re(wz([5+6])*X)+Re(wz([5-6])*X)); id Re(wz(6)*X?)= 1/2*(Re(wz([5+6])*X)-Re(wz([5-6])*X)); * id Re(wg([2+3])*wzC([2-3]))= Re(wz([2-3])*wgC([2+3])); id Re(wg([2+3])*wzC([5-6]))= Re(wz([5-6])*wgC([2+3])); id Re(wg([2-3])*wzC([5+6]))= Re(wz([5+6])*wgC([2-3])); id Re(wg([5+6])*wzC([5-6]))= Re(wz([5-6])*wgC([5+6])); id Re(wz([2+3])*wgC([2-3]))= Re(wg([2-3])*wzC([2+3])); id Re(wz([2+3])*wgC([5-6]))= Re(wg([5-6])*wzC([2+3])); id Re(wz([2-3])*wgC([5+6]))= Re(wg([5+6])*wzC([2-3])); id Re(wz([5+6])*wgC([5-6]))= Re(wg([5-6])*wzC([5+6])); * id X= [1+X]-1; id x1= 1-[1-x1]; id x2= 1-[1-x1]-[x1-x2]; id z= 1-[1-x1]-[x1-x2]-[x2-z]; id ups= [ups+X+x1]-[1+X]+[1-x1]; id Xp^-1= 1/[1+X]; ratio,X,[1+X],one; id one= 1; al one^-1= 1; * id Re(wg(X?)*wzC(Y?))= Rep(X,Y); id Re(wz(X?)*wgC(Y?))= Rep(Y,X); id GsM2*GtM2= GstM2; id [1+X] = Xp; al [1+X]^-1= Xpi; id [1-x1]= omx1; al [x1-x2]= x12; al [x2-z]= x2z; al [ups+X+x1]= ux; al zX^-1= zXi; id Xpi^2= Xpi-aux; id aux= XX; * id Xp^2= Xps; id Xpi^2= Xpis; id y^3= yc; id y^2= ys; * id omx1= O; id O^4= Oq; id O^3= Oc; id O^2= Os; id x12^3= x12c; id x12^2= x12s; id x2z^4= x2zq; id x2z^3= x2zc; id x2z^2= x2zs; id ux^2= uxs; id vv^2= vvs; id vv^3= vvc; id vvs*vv= vvc; id vvs^2= vvq; id vvc*vv= vvq; id z^-1= zi; * id Re(Gs*GtC*Pwt*PwsC)= rl1; id Re(Gs*GtC*Pwt)= rl2; id Re(Pws)= rl3; id Re(wg(n?)*Gs*PwsC)= rs1wg(n); id Re(wz(n?)*Gs*PwsC)= rs1wz(n); id Re(wg(n?)*Gs)= rs2wg(n); id Re(wz(n?)*Gs)= rs2wz(n); id Re(wg(n?)*Gt*PwtC)= rt1wg(n); id Re(wz(n?)*Gt*PwtC)= rt1wz(n); id Re(wg(n?)*Gt)= rt2wg(n); id Re(wz(n?)*Gt)= rt2wz(n); id Rep(n1?,n2?)= rwwgz(n1,n2); id Re(wg(n1?)*wzC(n2?))= rwwgz(n1,n2); id Re(wz(n1?)*wgC(n2?))= rwwgz(n2,n1); * id fun?([2+3],n?)= fun(11,n); al fun?([2-3],n?)= fun(12,n); al fun?([5+6],n?)= fun(13,n); al fun?([5-6],n?)= fun(14,n); * id fun?(n?,[2+3])= fun(n,11); al fun?(n?,[2-3])= fun(n,12); al fun?(n?,[5+6])= fun(n,13); al fun?(n?,[5-6])= fun(n,14); * id fun?([2+3])= fun(11); al fun?([2-3])= fun(12); al fun?([5+6])= fun(13); al fun?([5-6])= fun(14); *-- id ve(T)= -1/2+ss(T); al vu(T)= 1/2-2/3*ss(T); al vd(T)= -1/2+1/3*ss(T); * id ss(T)*csi(T)= csi(T)-1; id csi(T)= 1/cst; al ss(T)= sst; * .store * *----g^2-------------------- * g GZ10s= GZ10; g GZ20s= GZ20; g GZ30s= GZ30; g GZ11s= GZ11; g GZ21s= GZ21; g GZ31s= GZ31; g GZ12s= GZ12; g GZ22s= GZ22; g GZ32s= GZ32; * id gexp^4= 0; id gexp^3= 0; id gexp^2= 1; * b i_,Gs,GsC,Gt,GtC,GsM2,GtM2,GstM2,Re,Im,Mods,Rep zX,ums,dms,y,ys,yc,rs,s,tuM,tdM,rs1wg,rs2wg,rt1wg,rt2wg,rwwg, rs1wz,rs2wz,rt1wz,rt2wz,rwwz,rwwgz,rl1,rl2,rl3, Pws,PwsC,Pwt,PwtC,PwsM2,PwtM2,Sigmas,SigmasC,SigmasM2,X,Xp,Xps,Xpi,Xpis, zXi,XX,vv,vvs,vvc,vvq,cst,sst,PZ; format fortran; print; * .store * *----g^3-------------------- * g GZ10c= GZ10; g GZ20c= GZ20; g GZ30c= GZ30; g GZ11c= GZ11; g GZ21c= GZ21; g GZ31c= GZ31; g GZ12c= GZ12; g GZ22c= GZ22; g GZ32c= GZ32; * id gexp^4= 0; id gexp^3= 1; id gexp^2= 0; * b i_,Gs,GsC,Gt,GtC,GsM2,GtM2,GstM2,Re,Im,Mods,Rep zX,ums,dms,y,ys,yc,rs,s,tuM,tdM,rs1wg,rs2wg,rt1wg,rt2wg,rwwg, rs1wz,rs2wz,rt1wz,rt2wz,rwwz,rwwgz,rl1,rl2,rl3, Pws,PwsC,Pwt,PwtC,PwsM2,PwtM2,Sigmas,SigmasC,SigmasM2,X,Xp,Xps,Xpi,Xpis, zXi,XX,vv,vvs,vvc,vvq,cst,sst,PZ; format fortran; print; * * .store * *----g^4-------------------- * g GZ10q= GZ10; g GZ20q= GZ20; g GZ30q= GZ30; g GZ11q= GZ11; g GZ21q= GZ21; g GZ31q= GZ31; g GZ12q= GZ12; g GZ22q= GZ22; g GZ32q= GZ32; * id gexp^4= 1; id gexp^3= 0; id gexp^2= 0; * b i_,Gs,GsC,Gt,GtC,GsM2,GtM2,GstM2,Re,Im,Mods,Rep zX,ums,dms,y,ys,yc,rs,s,tuM,tdM,rs1wg,rs2wg,rt1wg,rt2wg,rwwg, rs1wz,rs2wz,rt1wz,rt2wz,rwwz,rwwgz,rl1,rl2,rl3, Pws,PwsC,Pwt,PwtC,PwsM2,PwtM2,Sigmas,SigmasC,SigmasM2,X,Xp,Xps,Xpi,Xpis, zXi,XX,vv,vvs,vvc,vvq,cst,sst,PZ; format fortran; print; * .store * #endprocedure * #procedure totalzz(dummy) * * Now the full stuff * load wrl$grp04:[giampiero]outputampzz_B.sav; * g T_zz= PwsM2*PwtM2*wwww_zz/(GT^2*I0); *nwrite statistics; * id wz(n?)= wz(n)*rs; al wzC(n?)= wzC(n)*rs; * id wz(4)= X*wz(4); al wz(7)= X*wz(7); al wz(8)= X*wz(8); al wz(10)= X*wz(10); id wzC(4)= X*wzC(4); al wzC(7)= X*wzC(7); al wzC(8)= X*wzC(8); al wzC(10)= X*wzC(10); * id wz(n?)*wzC(n?)= wzM2(n); * id GtM2*GsM2*wz(2)*wzC(1)= GtM2*GsM2*(-wzC(2)*wz(1)+ 2*Re(wz(2)*wzC(1))); al GtM2*GsM2*wz(3)*wzC(1)= GtM2*GsM2*(-wzC(3)*wz(1)+ 2*Re(wz(3)*wzC(1))); al GtM2*GsM2*wz(4)*wzC(1)= GtM2*GsM2*(-wzC(4)*wz(1)+ 2*Re(wz(4)*wzC(1))); al GtM2*GsM2*wz(5)*wzC(1)= GtM2*GsM2*(-wzC(5)*wz(1)+ 2*Re(wz(5)*wzC(1))); al GtM2*GsM2*wz(6)*wzC(1)= GtM2*GsM2*(-wzC(6)*wz(1)+ 2*Re(wz(6)*wzC(1))); al GtM2*GsM2*wz(7)*wzC(1)= GtM2*GsM2*(-wzC(7)*wz(1)+ 2*Re(wz(7)*wzC(1))); al GtM2*GsM2*wz(8)*wzC(1)= GtM2*GsM2*(-wzC(8)*wz(1)+ 2*Re(wz(8)*wzC(1))); al GtM2*GsM2*wz(9)*wzC(1)= GtM2*GsM2*(-wzC(9)*wz(1)+ 2*Re(wz(9)*wzC(1))); al GtM2*GsM2*wz(10)*wzC(1)= GtM2*GsM2*(-wzC(10)*wz(1)+ 2*Re(wz(10)*wzC(1))); * al GtM2*GsM2*wz(3)*wzC(2)= GtM2*GsM2*(-wzC(3)*wz(2)+ 2*Re(wz(3)*wzC(2))); al GtM2*GsM2*wz(4)*wzC(2)= GtM2*GsM2*(-wzC(4)*wz(2)+ 2*Re(wz(4)*wzC(2))); al GtM2*GsM2*wz(5)*wzC(2)= GtM2*GsM2*(-wzC(5)*wz(2)+ 2*Re(wz(5)*wzC(2))); al GtM2*GsM2*wz(6)*wzC(2)= GtM2*GsM2*(-wzC(6)*wz(2)+ 2*Re(wz(6)*wzC(2))); al GtM2*GsM2*wz(7)*wzC(2)= GtM2*GsM2*(-wzC(7)*wz(2)+ 2*Re(wz(7)*wzC(2))); al GtM2*GsM2*wz(8)*wzC(2)= GtM2*GsM2*(-wzC(8)*wz(2)+ 2*Re(wz(8)*wzC(2))); al GtM2*GsM2*wz(9)*wzC(2)= GtM2*GsM2*(-wzC(9)*wz(2)+ 2*Re(wz(9)*wzC(2))); al GtM2*GsM2*wz(10)*wzC(2)= GtM2*GsM2*(-wzC(10)*wz(2)+ 2*Re(wz(10)*wzC(2))); * al GtM2*GsM2*wz(4)*wzC(3)= GtM2*GsM2*(-wzC(4)*wz(3)+ 2*Re(wz(4)*wzC(3))); al GtM2*GsM2*wz(5)*wzC(3)= GtM2*GsM2*(-wzC(5)*wz(3)+ 2*Re(wz(5)*wzC(3))); al GtM2*GsM2*wz(6)*wzC(3)= GtM2*GsM2*(-wzC(6)*wz(3)+ 2*Re(wz(6)*wzC(3))); al GtM2*GsM2*wz(7)*wzC(3)= GtM2*GsM2*(-wzC(7)*wz(3)+ 2*Re(wz(7)*wzC(3))); al GtM2*GsM2*wz(8)*wzC(3)= GtM2*GsM2*(-wzC(8)*wz(3)+ 2*Re(wz(8)*wzC(3))); al GtM2*GsM2*wz(9)*wzC(3)= GtM2*GsM2*(-wzC(9)*wz(3)+ 2*Re(wz(9)*wzC(3))); al GtM2*GsM2*wz(10)*wzC(3)= GtM2*GsM2*(-wzC(10)*wz(3)+ 2*Re(wz(10)*wzC(3))); * al GtM2*GsM2*wz(5)*wzC(4)= GtM2*GsM2*(-wzC(5)*wz(4)+ 2*Re(wz(5)*wzC(4))); al GtM2*GsM2*wz(6)*wzC(4)= GtM2*GsM2*(-wzC(6)*wz(4)+ 2*Re(wz(6)*wzC(4))); al GtM2*GsM2*wz(7)*wzC(4)= GtM2*GsM2*(-wzC(7)*wz(4)+ 2*Re(wz(7)*wzC(4))); al GtM2*GsM2*wz(8)*wzC(4)= GtM2*GsM2*(-wzC(8)*wz(4)+ 2*Re(wz(8)*wzC(4))); al GtM2*GsM2*wz(9)*wzC(4)= GtM2*GsM2*(-wzC(9)*wz(4)+ 2*Re(wz(9)*wzC(4))); al GtM2*GsM2*wz(10)*wzC(4)= GtM2*GsM2*(-wzC(10)*wz(4)+ 2*Re(wz(10)*wzC(4))); * al GtM2*GsM2*wz(6)*wzC(5)= GtM2*GsM2*(-wzC(6)*wz(5)+ 2*Re(wz(6)*wzC(5))); al GtM2*GsM2*wz(7)*wzC(5)= GtM2*GsM2*(-wzC(7)*wz(5)+ 2*Re(wz(7)*wzC(5))); al GtM2*GsM2*wz(8)*wzC(5)= GtM2*GsM2*(-wzC(8)*wz(5)+ 2*Re(wz(8)*wzC(5))); al GtM2*GsM2*wz(9)*wzC(5)= GtM2*GsM2*(-wzC(9)*wz(5)+ 2*Re(wz(9)*wzC(5))); al GtM2*GsM2*wz(10)*wzC(5)= GtM2*GsM2*(-wzC(10)*wz(5)+ 2*Re(wz(10)*wzC(5))); * al GtM2*GsM2*wz(7)*wzC(6)= GtM2*GsM2*(-wzC(7)*wz(6)+ 2*Re(wz(7)*wzC(6))); al GtM2*GsM2*wz(8)*wzC(6)= GtM2*GsM2*(-wzC(8)*wz(6)+ 2*Re(wz(8)*wzC(6))); al GtM2*GsM2*wz(9)*wzC(6)= GtM2*GsM2*(-wzC(9)*wz(6)+ 2*Re(wz(9)*wzC(6))); al GtM2*GsM2*wz(10)*wzC(6)= GtM2*GsM2*(-wzC(10)*wz(6)+ 2*Re(wz(10)*wzC(6))); * al GtM2*GsM2*wz(8)*wzC(7)= GtM2*GsM2*(-wzC(8)*wz(7)+ 2*Re(wz(8)*wzC(7))); al GtM2*GsM2*wz(9)*wzC(7)= GtM2*GsM2*(-wzC(9)*wz(7)+ 2*Re(wz(9)*wzC(7))); al GtM2*GsM2*wz(10)*wzC(7)= GtM2*GsM2*(-wzC(10)*wz(7)+ 2*Re(wz(10)*wzC(7))); * al GtM2*GsM2*wz(9)*wzC(8)= GtM2*GsM2*(-wzC(9)*wz(8)+ 2*Re(wz(9)*wzC(8))); al GtM2*GsM2*wz(10)*wzC(8)= GtM2*GsM2*(-wzC(10)*wz(8)+ 2*Re(wz(10)*wzC(8))); * al GtM2*GsM2*wz(10)*wzC(9)= GtM2*GsM2*(-wzC(10)*wz(9)+ 2*Re(wz(10)*wzC(9))); * id wz(n?)*Gs*GtM2*PwsC= GtM2*(-wzC(n)*GsC*Pws+2*Re(wz(n)*Gs*PwsC)); id wz(n?)*Gt*GsM2*PwtC= GsM2*(-wzC(n)*GtC*Pwt+2*Re(wz(n)*Gt*PwtC)); id wz(n?)*Gs*GtM2= GtM2*(-GsC*wzC(n)+2*Re(Gs*wz(n))); id wz(n?)*Gt*GsM2= GsM2*(-GtC*wzC(n)+2*Re(Gt*wz(n))); * id GsM2*GtC*PwtC*wzC(n?)= GsM2*(-Gt*Pwt*wz(n)+2*Re(Gt*Pwt*wz(n))); id GtM2*GsC*PwsC*wzC(n?)= GtM2*(-Gs*Pws*wz(n)+2*Re(Gs*Pws*wz(n))); * id GsM2*GtC*PwtC= GsM2*(-Gt*Pwt+2*Re(Gt*Pwt)); id GtM2*GsC*PwsC= GtM2*(-Gs*Pws+2*Re(Gs*Pws)); * id GsC*PwsC*Gt*Pwt= -Gs*Pws*GtC*PwtC+2*Re(GsC*Gt*PwsC*Pwt); id GsC*Gt*Pws*PwtC= Re(Gs*GtC*PwsC*Pwt)-i_*Im(Gs*GtC*PwsC*Pwt); id Gs*GtC*PwsC*Pwt= Re(Gs*GtC*PwsC*Pwt)+i_*Im(Gs*GtC*PwsC*Pwt); id GsC*Gt*PwsC*PwtC= -Gs*GtC*Pws*Pwt+2*Re(Gs*GtC*Pws*Pwt); * id Gs*GtC*Pwt= -GsC*Gt*PwtC+2*Re(Gs*GtC*Pwt); * id GtM2*PwsC= GtM2*(-Pws+2*Re(Pws)); id GsM2*PwtC= GsM2*(-Pwt+2*Re(Pwt)); * id Re(wzC(2)*wz(1))= Re(wz(2)*wzC(1)); al Re(wzC(3)*wz(1))= Re(wz(3)*wzC(1)); al Re(wzC(4)*wz(1))= Re(wz(4)*wzC(1)); al Re(wzC(5)*wz(1))= Re(wz(5)*wzC(1)); al Re(wzC(6)*wz(1))= Re(wz(6)*wzC(1)); al Re(wzC(7)*wz(1))= Re(wz(7)*wzC(1)); al Re(wzC(8)*wz(1))= Re(wz(8)*wzC(1)); al Re(wzC(9)*wz(1))= Re(wz(9)*wzC(1)); al Re(wzC(10)*wz(1))= Re(wz(10)*wzC(1)); * id Re(wzC(3)*wz(2))= Re(wz(3)*wzC(2)); al Re(wzC(4)*wz(2))= Re(wz(4)*wzC(2)); al Re(wzC(5)*wz(2))= Re(wz(5)*wzC(2)); al Re(wzC(6)*wz(2))= Re(wz(6)*wzC(2)); al Re(wzC(7)*wz(2))= Re(wz(7)*wzC(2)); al Re(wzC(8)*wz(2))= Re(wz(8)*wzC(2)); al Re(wzC(9)*wz(2))= Re(wz(9)*wzC(2)); al Re(wzC(10)*wz(2))= Re(wz(10)*wzC(2)); * id Re(wzC(4)*wz(3))= Re(wz(4)*wzC(3)); al Re(wzC(5)*wz(3))= Re(wz(5)*wzC(3)); al Re(wzC(6)*wz(3))= Re(wz(6)*wzC(3)); al Re(wzC(7)*wz(3))= Re(wz(7)*wzC(3)); al Re(wzC(8)*wz(3))= Re(wz(8)*wzC(3)); al Re(wzC(9)*wz(3))= Re(wz(9)*wzC(3)); al Re(wzC(10)*wz(3))= Re(wz(10)*wzC(3)); * id Re(wzC(5)*wz(4))= Re(wz(5)*wzC(4)); al Re(wzC(6)*wz(4))= Re(wz(6)*wzC(4)); al Re(wzC(7)*wz(4))= Re(wz(7)*wzC(4)); al Re(wzC(8)*wz(4))= Re(wz(8)*wzC(4)); al Re(wzC(9)*wz(4))= Re(wz(9)*wzC(4)); al Re(wzC(10)*wz(4))= Re(wz(10)*wzC(4)); * id Re(wzC(6)*wz(5))= Re(wz(6)*wzC(5)); al Re(wzC(7)*wz(5))= Re(wz(7)*wzC(5)); al Re(wzC(8)*wz(5))= Re(wz(8)*wzC(5)); al Re(wzC(9)*wz(5))= Re(wz(9)*wzC(5)); al Re(wzC(10)*wz(5))= Re(wz(10)*wzC(5)); * id Re(wzC(7)*wz(6))= Re(wz(7)*wzC(6)); al Re(wzC(8)*wz(6))= Re(wz(8)*wzC(6)); al Re(wzC(9)*wz(6))= Re(wz(9)*wzC(6)); al Re(wzC(10)*wz(6))= Re(wz(10)*wzC(6)); * id Re(wzC(8)*wz(7))= Re(wz(8)*wzC(7)); al Re(wzC(9)*wz(7))= Re(wz(9)*wzC(7)); al Re(wzC(10)*wz(7))= Re(wz(10)*wzC(7)); * id Re(wzC(9)*wz(8))= Re(wz(9)*wzC(8)); al Re(wzC(10)*wz(8))= Re(wz(10)*wzC(8)); * id Re(wzC(10)*wz(9))= Re(wz(10)*wzC(9)); * .store * #endprocedure * #procedure contractzz(dummy) * g Wd_zz= T_zz*d_(mu,nu); g Wpp_zz= T_zz*pp(mu)*pp(nu); g Wqq_zz= T_zz*Qm(mu)*Qm(nu); g Wpq_zz= T_zz*(pp(mu)*Qm(nu)+pp(nu)*Qm(mu)); g We_zz= T_zz*e_(mu,nu,Qm,pp); * contract; * id rs^-1= -1/(X*y*s); id pp.pp= 0; al qp.qp= 0; al Qm.Qm= QmS; al kb.kb= -dms; id Qp.Qm= pp.Qm-qp.Qm; id kb.Qp= kb.pp-kb.qp; id k.Qp= k.pp-k.qp; id pp.Qp= -pp.qp; id Qp.Qp= -2*pp.qp; id qp.Qp= qp.pp; * id pp.Qm= -1/2*(QmS+y*s); al k.kb= 1/2*(-sp+ums+dms); al Qm.k= 1/2*(QmS+t-ums); al pp.kb= 1/2*(tp-dms); al Qm.kb= 1/2*(QmS+u-dms); al pp.k= 1/2*(up-ums); al pp.qp= 1/2*kp; al Qm.qp= 1/2*(QmS+km); al kb.qp= 1/2*(dms-zp); al k.qp= 1/2*(ums-zm); * id sp= x2*y*s; al km= z*y*s; al km^-1= 1/(z*y*s); al zm= -(x2-x1)*y*s; id QmS= X*y*s; * id ums= 0; id dms*tdM^-2= aux; id dms= 0; id aux= dms*tdM^-2; * id t= y*s * ( - 1 - ups - z - 2*X ) + ums * ( 1 ) + dms * ( 1 ); al kp= y*s * ( - 1 + x2 - z - X ); al u= y*s * ( ups ); al up= y*s * ( 1 - x1 + ups + z + X ) + ums * ( 1 ); al tp= y*s * ( - 1 + x1 - x2 - ups - X ) + dms * ( 1 ); al zp= y*s * ( 1 - x1 ) + ums * ( 1 ) + dms * ( 1 ); * id ums= 0; id dms*tdM^-2= aux; id dms= 0; id aux= dms*tdM^-2; * ratio,X,Xp,one; id one= 1; al one^-1= 1; * id kb(mu?)= kbf(mu); id qp(mu?)= qpf(mu); al e_(kb,mu?,nu?,al?)= kbf(ab1)*e_(ab1,mu,nu,al); al e_(qp,mu?,nu?,al?)= qpf(ab2)*e_(ab2,mu,nu,al); * id uM^-1= -1/(y*s)/tdM; * id dms*tdM^-2= aux; id dms= 0; id aux= dms*tdM^-2; * #call integration{dummy} * id rs^-1= -1/(X*y*s); id pp.pp= 0; al qp.qp= 0; al Qm.Qm= QmS; id Qp.Qm= pp.Qm-qp.Qm; id kb.Qp= kb.pp-kb.qp; id k.Qp= k.pp-k.qp; id pp.Qp= -pp.qp; id Qp.Qp= -2*pp.qp; id qp.Qp= qp.pp; * id pp.Qm= -1/2*(QmS+y*s); al k.kb= 1/2*(-sp+ums+dms); al Qm.k= 1/2*(QmS+t-ums); al pp.kb= 1/2*(tp-dms); al Qm.kb= 1/2*(QmS+u-dms); al pp.k= 1/2*(up-ums); al pp.qp= 1/2*kp; al Qm.qp= 1/2*(QmS+km); al kb.qp= 1/2*(dms-zp); al k.qp= 1/2*(ums-zm); * id sp= x2*y*s; al km= z*y*s; al km^-1= 1/(z*y*s); al zm= -(x2-x1)*y*s; id QmS= X*y*s; * id ums= 0; id dms*tdM^-2= aux; id dms= 0; id aux= dms*tdM^-2; * id t= y*s * ( - 1 - ups - z - 2*X ) + ums * ( 1 ) + dms * ( 1 ); al kp= y*s * ( - 1 + x2 - z - X ); al u= y*s * ( ups ); al up= y*s * ( 1 - x1 + ups + z + X ) + ums * ( 1 ); al tp= y*s * ( - 1 + x1 - x2 - ups - X ) + dms * ( 1 ); al zp= y*s * ( 1 - x1 ) + ums * ( 1 ) + dms * ( 1 ); * id ums= 0; id dms*tdM^-2= aux; id dms= 0; id aux= dms*tdM^-2; * ratio,X,Xp,one; id one= 1; al one^-1= 1; * .store * g ZZ10= (-1/2*Wd_zz-2*X/Xp^2*Wpp_zz/(y*s)-Wpq_zz/(y*s)/Xp)*sel0*s^3; g ZZ20= (-1/2*Wd_zz-6*X/Xp^2*Wpp_zz/(y*s)-3*Wpq_zz/(y*s)/Xp- Wqq_zz/(y*s)/Xp)*sel0*s^3; g ZZ30= (We_zz/(y*s)/Xp)*sel0*s^3; g ZZ40= (-2/Xp*Wqq_zz/(y*s)-2*X/Xp^2*Wpq_zz/(y*s))*sel0*s^3; *g W5_zz_0u= (-Wqq_zz/(y*s)/X-2/Xp*Wpq_zz/(y*s))*sel0*s^3; g ZZ11= (-1/2*Wd_zz-2*X/Xp^2*Wpp_zz/(y*s)-Wpq_zz/(y*s)/Xp)*seld*s^3; g ZZ21= (-1/2*Wd_zz-6*X/Xp^2*Wpp_zz/(y*s)-3*Wpq_zz/(y*s)/Xp- Wqq_zz/(y*s)/Xp)*seld*s^3; g ZZ31= (We_zz/(y*s)/Xp)*seld*s^3; g ZZ41= (-2/Xp*Wqq_zz/(y*s)-2*X/Xp^2*Wpq_zz/(y*s))*seld*s^3; *g W5_zz_u= (-Wqq_zz/(y*s)/X-2/Xp*Wpq_zz/(y*s))*seld*s^3; g ZZ12= (-1/2*Wd_zz-2*X/Xp^2*Wpp_zz/(y*s)-Wpq_zz/(y*s)/Xp)*seldd*s^3; g ZZ22= (-1/2*Wd_zz-6*X/Xp^2*Wpp_zz/(y*s)-3*Wpq_zz/(y*s)/Xp- Wqq_zz/(y*s)/Xp)*seldd*s^3; g ZZ32= (We_zz/(y*s)/Xp)*seldd*s^3; g ZZ42= (-2/Xp*Wqq_zz/(y*s)-2*X/Xp^2*Wpq_zz/(y*s))*seldd*s^3; *g W5_zz_uu= (-Wqq_zz/(y*s)/X-2/Xp*Wpq_zz/(y*s))*seldd*s^3; * ratio,tdM,ups,aux; id aux= dms/(y*s); * id dms*tdM^-2= aux; id dms= 0; id aux= dms*tdM^-2; * id tdM^-2*seldd= 1; id seldd= 0; * id tdM^-2*seld= 0; id tdM^-1*seld= 1; id seld= 0; * id tdM^-2*sel0= 0; id tdM^-1*sel0= 0; id sel0= 1; * ratio,X,Xp,one; id one= 1; al one^-1= 1; * id cs(T)*csi(T)= 1; * *-- id Re(wz(n?)*wzC(2))= 1/2*(Re(wz(n)*wzC([2+3]))+Re(wz(n)*wzC([2-3]))); id Re(wz(n?)*wzC(3))= 1/2*(Re(wz(n)*wzC([2+3]))-Re(wz(n)*wzC([2-3]))); id Re(wz(2)*wzC(2))= wzM2(2); id Re(wz(3)*wzC(3))= wzM2(3); * id Re(wz(2)*wzC(n?))= 1/2*(Re(wz([2+3])*wzC(n))+Re(wz([2-3])*wzC(n))); id Re(wz(3)*wzC(n?))= 1/2*(Re(wz([2+3])*wzC(n))-Re(wz([2-3])*wzC(n))); id Re(wz(2)*wzC(2))= wzM2(2); id Re(wz(3)*wzC(3))= wzM2(3); * id Re(wz(n?)*wzC(5))= 1/2*(Re(wz(n)*wzC([5+6]))+Re(wz(n)*wzC([5-6]))); id Re(wz(n?)*wzC(6))= 1/2*(Re(wz(n)*wzC([5+6]))-Re(wz(n)*wzC([5-6]))); id Re(wz(5)*wzC(5))= wzM2(5); id Re(wz(6)*wzC(6))= wzM2(6); * id Re(wz(5)*wzC(n?))= 1/2*(Re(wz([5+6])*wzC(n))+Re(wz([5-6])*wzC(n))); id Re(wz(6)*wzC(n?))= 1/2*(Re(wz([5+6])*wzC(n))-Re(wz([5-6])*wzC(n))); id Re(wz(5)*wzC(5))= wzM2(5); id Re(wz(6)*wzC(6))= wzM2(6); * id Re(wz(2)*X?*Y?)= 1/2*(Re(wz([2+3])*X*Y)+Re(wz([2-3])*X*Y)); id Re(wz(3)*X?*Y?)= 1/2*(Re(wz([2+3])*X*Y)-Re(wz([2-3])*X*Y)); id Re(wz(5)*X?*Y?)= 1/2*(Re(wz([5+6])*X*Y)+Re(wz([5-6])*X*Y)); id Re(wz(6)*X?*Y?)= 1/2*(Re(wz([5+6])*X*Y)-Re(wz([5-6])*X*Y)); * id Re(wz(2)*X?)= 1/2*(Re(wz([2+3])*X)+Re(wz([2-3])*X)); id Re(wz(3)*X?)= 1/2*(Re(wz([2+3])*X)-Re(wz([2-3])*X)); id Re(wz(5)*X?)= 1/2*(Re(wz([5+6])*X)+Re(wz([5-6])*X)); id Re(wz(6)*X?)= 1/2*(Re(wz([5+6])*X)-Re(wz([5-6])*X)); * id Re(wz([2+3])*wzC([2-3]))= Re(wz([2-3])*wzC([2+3])); id Re(wz([2+3])*wzC([5-6]))= Re(wz([5-6])*wzC([2+3])); id Re(wz([2-3])*wzC([5+6]))= Re(wz([5+6])*wzC([2-3])); id Re(wz([5+6])*wzC([5-6]))= Re(wz([5-6])*wzC([5+6])); * id Re(wz([2+3])*wzC([2+3]))= wzM2(2)+wzM2(3)+2*Re(wz(2)*wzC(3)); id Re(wz([2-3])*wzC([2-3]))= wzM2(2)+wzM2(3)-2*Re(wz(2)*wzC(3)); id Re(wz([5+6])*wzC([5+6]))= wzM2(5)+wzM2(6)+2*Re(wz(5)*wzC(6)); id Re(wz([5-6])*wzC([5-6]))= wzM2(5)+wzM2(6)-2*Re(wz(5)*wzC(6)); *-- id X= [1+X]-1; id x1= 1-[1-x1]; id x2= 1-[1-x1]-[x1-x2]; id z= 1-[1-x1]-[x1-x2]-[x2-z]; id ups= [ups+X+x1]-[1+X]+[1-x1]; id Xp^-1= 1/[1+X]; ratio,X,[1+X],one; id one= 1; al one^-1= 1; * id Re(wz(X?)*wzC(Y?))= Rep(X,Y); id GsM2*GtM2= GstM2; id [1+X] = Xp; al [1+X]^-1= Xpi; id [1-x1]= omx1; al [x1-x2]= x12; al [x2-z]= x2z; al [ups+X+x1]= ux; al zX^-1= zXi; id Xpi^2= Xpi-aux; id aux= XX; * id Xp^2= Xps; id Xpi^2= Xpis; id y^3= yc; id y^2= ys; id PZ^-2= 1/PZs; * id omx1= O; id O^4= Oq; id O^3= Oc; id O^2= Os; id x12^3= x12c; id x12^2= x12s; id x2z^4= x2zq; id x2z^3= x2zc; id x2z^2= x2zs; id ux^2= uxs; id vv^2= vvs; id vv^3= vvc; id vvs*vv= vvc; id vvs^2= vvq; id vvc*vv= vvq; id csi(T)= 1/cst; id cst^-2= 1/cqt; id ve(T)= vet; al vd(T)= vdt; al vu(T)= vut; id ae(T)= aet; al ad(T)= adt; al au(T)= aut; * id vet^2= vets; al vdt^2= vdts; al vut^2= vuts; id aet^2= aets; al adt^2= adts; al aut^2= auts; * id Re(Gs*GtC*Pwt*PwsC)= rl1; id Re(Gs*GtC*Pwt)= rl2; id Re(Pws)= rl3; id Re(wz(n?)*Gs*PwsC)= rs1wz(n); id Re(wz(n?)*Gs)= rs2wz(n); id Re(wz(n?)*Gt*PwtC)= rt1wz(n); id Re(wz(n?)*Gt)= rt2wz(n); id Rep(n1?,n2?)= rwwz(n1,n2); id Re(wz(n1?)*wzC(n2?))= rwwz(n1,n2); id wzM2(n?)= rwwz(n,n); * id fun?([2+3],n?)= fun(11,n); al fun?([2-3],n?)= fun(12,n); al fun?([5+6],n?)= fun(13,n); al fun?([5-6],n?)= fun(14,n); * id fun?(n?,[2+3])= fun(n,11); al fun?(n?,[2-3])= fun(n,12); al fun?(n?,[5+6])= fun(n,13); al fun?(n?,[5-6])= fun(n,14); * id fun?([2+3])= fun(11); al fun?([2-3])= fun(12); al fun?([5+6])= fun(13); al fun?([5-6])= fun(14); * .store * *----g^2-------------------- * g ZZ10s= ZZ10; g ZZ20s= ZZ20; g ZZ30s= ZZ30; g ZZ40s= ZZ40; g ZZ11s= ZZ11; g ZZ21s= ZZ21; g ZZ31s= ZZ31; g ZZ41s= ZZ41; g ZZ12s= ZZ12; g ZZ22s= ZZ22; g ZZ32s= ZZ32; g ZZ42s= ZZ32; * id gexp^4= 0; id gexp^3= 0; id gexp^2= 1; * b i_,Gs,GsC,Gt,GtC,GsM2,GtM2,GstM2,Re,Im,Mods,Rep,PZs, zX,ums,dms,y,ys,yc,rs,s,tuM,tdM,wz,wzC,wzM2,rs1wz,rs2wz, rt1wz,rt2wz,rwwz,rl1,rl2,rl3, Pws,PwsC,Pwt,PwtC,PwsM2,PwtM2,Sigmas,SigmasC,SigmasM2,X,Xp,Xps,Xpi,Xpis, zXi,XX,vv,vvs,vvc,vvq, cst,cqt,vet,vdt,vut,aet,adt,aut,vets,vdts,vuts,aets,adts,auts; * format fortran; print; * .store * *----g^3-------------------- * g ZZ10c= ZZ10; g ZZ20c= ZZ20; g ZZ30c= ZZ30; g ZZ40c= ZZ40; g ZZ11c= ZZ11; g ZZ21c= ZZ21; g ZZ31c= ZZ31; g ZZ41c= ZZ41; g ZZ12c= ZZ12; g ZZ22c= ZZ22; g ZZ32c= ZZ32; g ZZ42c= ZZ42; * id gexp^4= 0; id gexp^3= 1; id gexp^2= 0; * b i_,Gs,GsC,Gt,GtC,GsM2,GtM2,GstM2,Re,Im,Mods,Rep,PZs, zX,ums,dms,y,ys,yc,rs,s,tuM,tdM,wz,wzC,wzM2,rs1wz,rs2wz, rt1wz,rt2wz,rwwz,rl1,rl2,rl3, Pws,PwsC,Pwt,PwtC,PwsM2,PwtM2,Sigmas,SigmasC,SigmasM2,X,Xp,Xps,Xpi,Xpis, zXi,XX,vv,vvs,vvc,vvq, cst,cqt,vet,vdt,vut,aet,adt,aut,vets,vdts,vuts,aets,adts,auts; format fortran; print; * .store * *----g^4-------------------- * g ZZ10q= ZZ10/GstM2; g ZZ20q= ZZ20/GstM2; g ZZ30q= ZZ30/GstM2; g ZZ40q= ZZ40/GstM2; g ZZ11q= ZZ11/GstM2; g ZZ21q= ZZ21/GstM2; g ZZ31q= ZZ31/GstM2; g ZZ41q= ZZ41/GstM2; g ZZ12q= ZZ12/GstM2; g ZZ22q= ZZ22/GstM2; g ZZ32q= ZZ32/GstM2; g ZZ42q= ZZ42/GstM2; * id gexp^4= 1; id gexp^3= 0; id gexp^2= 0; * b i_,Gs,GsC,Gt,GtC,GsM2,GtM2,GstM2,Re,Im,Mods,Rep,PZs, zX,ums,dms,y,ys,yc,rs,s,tuM,tdM,wz,wzC,wzM2,rs1wz,rs2wz, rt1wz,rt2wz,rwwz,rl1,rl2,rl3, Pws,PwsC,Pwt,PwtC,PwsM2,PwtM2,Sigmas,SigmasC,SigmasM2,X,Xp,Xps,Xpi,Xpis, zXi,XX,vv,vvs,vvc,vvq, cst,cqt,vet,vdt,vut,aet,adt,aut,vets,vdts,vuts,aets,adts,auts; format fortran; print; * #endprocedure * */////////////////////////////////////////////////////////////////////// * *#call wtensor{gg} *#call totalgg{dummy} *#call contractgg{dummy} *---------------------------------------------------------------- *#call wtensor{gz} *#call totalgz{dummy} *#call contractgz{dummy} *---------------------------------------------------------------- *#call wtensor{zz} #call totalzz{dummy} wwww_zz loaded Time = 2.24 sec Generated terms = 8484 T_zz Terms left = 2346 Bytes used = 110306 Time = 4.58 sec Generated terms = 16404 T_zz Terms left = 6306 Bytes used = 310916 Time = 7.06 sec Generated terms = 24379 T_zz Terms left = 10033 Bytes used = 508766 Time = 7.11 sec Generated terms = 24379 T_zz Terms in output = 7518 Bytes used = 373522 #call contractzz{dummy} Time = 8.80 sec Generated terms = 12404 Wd_zz Terms left = 519 Bytes used = 22138 Time = 10.66 sec Generated terms = 24117 Wd_zz Terms left = 673 Bytes used = 29492 Time = 10.85 sec Generated terms = 24950 Wd_zz Terms left = 725 Bytes used = 32258 Time = 10.86 sec Generated terms = 24950 Wd_zz Terms in output = 589 Bytes used = 25358 Time = 12.03 sec Generated terms = 9641 Wpp_zz Terms left = 213 Bytes used = 8804 Time = 13.19 sec Generated terms = 19575 Wpp_zz Terms left = 673 Bytes used = 28348 Time = 14.42 sec Generated terms = 29635 Wpp_zz Terms left = 1216 Bytes used = 51046 Time = 15.76 sec Generated terms = 40024 Wpp_zz Terms left = 1605 Bytes used = 68710 Time = 17.31 sec Generated terms = 52392 Wpp_zz Terms left = 1929 Bytes used = 83848 Time = 18.86 sec Generated terms = 63754 Wpp_zz Terms left = 2175 Bytes used = 94956 Time = 19.62 sec Generated terms = 68902 Wpp_zz Terms left = 2283 Bytes used = 99866 Time = 19.62 sec Generated terms = 68902 Wpp_zz Terms in output = 1447 Bytes used = 62490 Time = 21.27 sec Generated terms = 11300 Wqq_zz Terms left = 218 Bytes used = 9128 Time = 23.40 sec Generated terms = 23203 Wqq_zz Terms left = 471 Bytes used = 20414 Time = 24.46 sec Generated terms = 28493 Wqq_zz Terms left = 497 Bytes used = 21534 Time = 24.47 sec Generated terms = 28493 Wqq_zz Terms in output = 354 Bytes used = 16222 Time = 25.69 sec Generated terms = 9652 Wpq_zz Terms left = 171 Bytes used = 6890 Time = 27.00 sec Generated terms = 20114 Wpq_zz Terms left = 363 Bytes used = 14972 Time = 28.27 sec Generated terms = 30397 Wpq_zz Terms left = 665 Bytes used = 27290 Time = 29.73 sec Generated terms = 41283 Wpq_zz Terms left = 1087 Bytes used = 44418 Time = 31.20 sec Generated terms = 51920 Wpq_zz Terms left = 1389 Bytes used = 56586 Time = 32.90 sec Generated terms = 64258 Wpq_zz Terms left = 1660 Bytes used = 69150 Time = 34.47 sec Generated terms = 75340 Wpq_zz Terms left = 1821 Bytes used = 76366 Time = 35.99 sec Generated terms = 86252 Wpq_zz Terms left = 2005 Bytes used = 84440 Time = 37.66 sec Generated terms = 95201 Wpq_zz Terms left = 2082 Bytes used = 87750 Time = 37.67 sec Generated terms = 95201 Wpq_zz Terms in output = 1179 Bytes used = 50696 Time = 38.83 sec Generated terms = 8476 We_zz Terms left = 110 Bytes used = 4100 Time = 39.95 sec Generated terms = 17383 We_zz Terms left = 276 Bytes used = 10468 Time = 41.06 sec Generated terms = 26533 We_zz Terms left = 491 Bytes used = 19170 Time = 42.14 sec Generated terms = 35342 We_zz Terms left = 689 Bytes used = 27196 Time = 43.27 sec Generated terms = 44463 We_zz Terms left = 930 Bytes used = 36874 Time = 44.37 sec Generated terms = 53383 We_zz Terms left = 1152 Bytes used = 45758 Time = 45.47 sec Generated terms = 62295 We_zz Terms left = 1388 Bytes used = 55018 Time = 46.82 sec Generated terms = 73713 We_zz Terms left = 1581 Bytes used = 62392 Time = 47.90 sec Generated terms = 81499 We_zz Terms left = 1632 Bytes used = 64232 Time = 49.17 sec Generated terms = 91149 We_zz Terms left = 1796 Bytes used = 72146 Time = 50.62 sec Generated terms = 103426 We_zz Terms left = 2027 Bytes used = 83256 Time = 51.86 sec Generated terms = 113970 We_zz Terms left = 2117 Bytes used = 87670 Time = 53.18 sec Generated terms = 124572 We_zz Terms left = 2193 Bytes used = 91264 Time = 54.43 sec Generated terms = 134946 We_zz Terms left = 2289 Bytes used = 95754 Time = 55.70 sec Generated terms = 145512 We_zz Terms left = 2371 Bytes used = 99744 Time = 57.06 sec Generated terms = 155884 We_zz Terms left = 2504 Bytes used = 105758 Time = 58.37 sec Generated terms = 166296 We_zz Terms left = 2675 Bytes used = 113522 Time = 59.64 sec Generated terms = 176628 We_zz Terms left = 2784 Bytes used = 118744 Time = 60.28 sec Generated terms = 181829 We_zz Terms left = 2866 Bytes used = 122674 Time = 60.29 sec Generated terms = 181829 We_zz Terms in output = 1183 Bytes used = 49348 Time = 60.33 sec Generated terms = 589 Wd_zz Terms in output = 589 Bytes used = 25358 Time = 60.43 sec Generated terms = 1447 Wpp_zz Terms in output = 1447 Bytes used = 62490 Time = 60.46 sec Generated terms = 354 Wqq_zz Terms in output = 354 Bytes used = 16222 Time = 60.54 sec Generated terms = 1179 Wpq_zz Terms in output = 1179 Bytes used = 50696 Time = 60.62 sec Generated terms = 1183 We_zz Terms in output = 1183 Bytes used = 49348 Time = 60.68 sec Generated terms = 589 Wd_zz Terms in output = 589 Bytes used = 25358 Time = 60.77 sec Generated terms = 1447 Wpp_zz Terms in output = 1447 Bytes used = 62490 Time = 60.81 sec Generated terms = 354 Wqq_zz Terms in output = 354 Bytes used = 16222 Time = 60.89 sec Generated terms = 1179 Wpq_zz Terms in output = 1179 Bytes used = 50696 Time = 60.97 sec Generated terms = 1183 We_zz Terms in output = 1183 Bytes used = 49348 Time = 61.01 sec Generated terms = 589 Wd_zz Terms in output = 589 Bytes used = 25358 Time = 61.10 sec Generated terms = 1447 Wpp_zz Terms in output = 1447 Bytes used = 62490 Time = 61.14 sec Generated terms = 354 Wqq_zz Terms in output = 354 Bytes used = 16222 Time = 61.21 sec Generated terms = 1179 Wpq_zz Terms in output = 1179 Bytes used = 50696 Time = 61.29 sec Generated terms = 1183 We_zz Terms in output = 1183 Bytes used = 49348 Time = 61.34 sec Generated terms = 589 Wd_zz Terms in output = 589 Bytes used = 25358 Time = 61.43 sec Generated terms = 1447 Wpp_zz Terms in output = 1447 Bytes used = 62490 Time = 61.46 sec Generated terms = 354 Wqq_zz Terms in output = 354 Bytes used = 16222 Time = 61.54 sec Generated terms = 1179 Wpq_zz Terms in output = 1179 Bytes used = 50696 Time = 61.61 sec Generated terms = 1183 We_zz Terms in output = 1183 Bytes used = 49348 Time = 61.67 sec Generated terms = 589 Wd_zz Terms in output = 589 Bytes used = 25358 Time = 61.76 sec Generated terms = 1447 Wpp_zz Terms in output = 1447 Bytes used = 62490 Time = 61.80 sec Generated terms = 354 Wqq_zz Terms in output = 354 Bytes used = 16222 Time = 61.88 sec Generated terms = 1179 Wpq_zz Terms in output = 1179 Bytes used = 50696 Time = 61.97 sec Generated terms = 1183 We_zz Terms in output = 1183 Bytes used = 49348 Time = 62.05 sec Generated terms = 605 Wd_zz Terms in output = 575 Bytes used = 24592 Time = 62.26 sec Generated terms = 1520 Wpp_zz Terms in output = 1403 Bytes used = 60070 Time = 62.32 sec Generated terms = 405 Wqq_zz Terms in output = 312 Bytes used = 13954 Time = 62.49 sec Generated terms = 1256 Wpq_zz Terms in output = 1119 Bytes used = 47302 Time = 62.67 sec Generated terms = 1299 We_zz Terms in output = 1125 Bytes used = 46238 Time = 67.23 sec Generated terms = 10282 ZZ10 Terms left = 396 Bytes used = 15080 Time = 71.55 sec Generated terms = 19062 ZZ10 Terms left = 648 Bytes used = 24966 Time = 75.87 sec Generated terms = 27940 ZZ10 Terms left = 822 Bytes used = 31700 Time = 80.04 sec Generated terms = 37000 ZZ10 Terms left = 1044 Bytes used = 40548 Time = 84.58 sec Generated terms = 47495 ZZ10 Terms left = 1426 Bytes used = 55826 Time = 86.73 sec Generated terms = 52801 ZZ10 Terms left = 1678 Bytes used = 66050 Time = 86.74 sec Generated terms = 52801 ZZ10 Terms in output = 777 Bytes used = 31424 Time = 91.23 sec Generated terms = 10282 ZZ20 Terms left = 399 Bytes used = 15194 Time = 95.55 sec Generated terms = 19062 ZZ20 Terms left = 651 Bytes used = 25080 Time = 99.87 sec Generated terms = 27940 ZZ20 Terms left = 825 Bytes used = 31814 Time = 104.04 sec Generated terms = 37000 ZZ20 Terms left = 1047 Bytes used = 40662 Time = 108.59 sec Generated terms = 47495 ZZ20 Terms left = 1429 Bytes used = 55940 Time = 113.06 sec Generated terms = 57816 ZZ20 Terms left = 1928 Bytes used = 75116 Time = 114.23 sec Generated terms = 60444 ZZ20 Terms left = 2090 Bytes used = 81562 Time = 114.23 sec Generated terms = 60444 ZZ20 Terms in output = 849 Bytes used = 33752 Time = 118.87 sec Generated terms = 10843 ZZ30 Terms left = 415 Bytes used = 15550 Time = 120.01 sec Generated terms = 13708 ZZ30 Terms left = 599 Bytes used = 23358 Time = 120.02 sec Generated terms = 13708 ZZ30 Terms in output = 531 Bytes used = 20566 Time = 124.49 sec Generated terms = 9956 ZZ40 Terms left = 535 Bytes used = 20454 Time = 128.82 sec Generated terms = 18677 ZZ40 Terms left = 742 Bytes used = 28318 Time = 133.18 sec Generated terms = 27565 ZZ40 Terms left = 990 Bytes used = 37834 Time = 137.43 sec Generated terms = 36515 ZZ40 Terms left = 1327 Bytes used = 50884 Time = 138.10 sec Generated terms = 38339 ZZ40 Terms left = 1433 Bytes used = 55930 Time = 138.10 sec Generated terms = 38339 ZZ40 Terms in output = 902 Bytes used = 35754 Time = 142.42 sec Generated terms = 9915 ZZ11 Terms left = 419 Bytes used = 16686 Time = 146.83 sec Generated terms = 18619 ZZ11 Terms left = 537 Bytes used = 21274 Time = 151.06 sec Generated terms = 27099 ZZ11 Terms left = 738 Bytes used = 28978 Time = 155.47 sec Generated terms = 35696 ZZ11 Terms left = 878 Bytes used = 34460 Time = 159.68 sec Generated terms = 43885 ZZ11 Terms left = 1128 Bytes used = 44508 Time = 163.90 sec Generated terms = 52683 ZZ11 Terms left = 1438 Bytes used = 56766 Time = 167.88 sec Generated terms = 60940 ZZ11 Terms left = 1624 Bytes used = 64156 Time = 172.25 sec Generated terms = 71014 ZZ11 Terms left = 1932 Bytes used = 76600 Time = 176.66 sec Generated terms = 80301 ZZ11 Terms left = 2252 Bytes used = 88596 Time = 178.02 sec Generated terms = 83466 ZZ11 Terms left = 2416 Bytes used = 95252 Time = 178.02 sec Generated terms = 83466 ZZ11 Terms in output = 697 Bytes used = 27838 Time = 182.33 sec Generated terms = 9915 ZZ21 Terms left = 420 Bytes used = 16734 Time = 186.75 sec Generated terms = 18619 ZZ21 Terms left = 538 Bytes used = 21322 Time = 190.98 sec Generated terms = 27099 ZZ21 Terms left = 739 Bytes used = 29026 Time = 195.38 sec Generated terms = 35696 ZZ21 Terms left = 879 Bytes used = 34508 Time = 199.60 sec Generated terms = 43885 ZZ21 Terms left = 1129 Bytes used = 44556 Time = 203.84 sec Generated terms = 52683 ZZ21 Terms left = 1439 Bytes used = 56814 Time = 207.84 sec Generated terms = 60940 ZZ21 Terms left = 1625 Bytes used = 64204 Time = 212.20 sec Generated terms = 71014 ZZ21 Terms left = 1933 Bytes used = 76648 Time = 216.62 sec Generated terms = 80301 ZZ21 Terms left = 2253 Bytes used = 88644 Time = 218.07 sec Generated terms = 84689 ZZ21 Terms left = 2417 Bytes used = 95300 Time = 218.07 sec Generated terms = 84689 ZZ21 Terms in output = 708 Bytes used = 28098 Time = 222.66 sec Generated terms = 10181 ZZ31 Terms left = 317 Bytes used = 12512 Time = 227.12 sec Generated terms = 19419 ZZ31 Terms left = 609 Bytes used = 23644 Time = 228.38 sec Generated terms = 22387 ZZ31 Terms left = 827 Bytes used = 32648 Time = 228.39 sec Generated terms = 22387 ZZ31 Terms in output = 564 Bytes used = 22216 Time = 232.84 sec Generated terms = 10552 ZZ41 Terms left = 268 Bytes used = 10440 Time = 237.11 sec Generated terms = 18956 ZZ41 Terms left = 557 Bytes used = 21576 Time = 241.35 sec Generated terms = 27389 ZZ41 Terms left = 852 Bytes used = 33134 Time = 245.56 sec Generated terms = 35861 ZZ41 Terms left = 1104 Bytes used = 43032 Time = 248.38 sec Generated terms = 42206 ZZ41 Terms left = 1330 Bytes used = 52206 Time = 248.38 sec Generated terms = 42206 ZZ41 Terms in output = 690 Bytes used = 26820 Time = 250.49 sec Generated terms = 11341 ZZ12 Terms in output = 44 Bytes used = 1792 Time = 252.66 sec Generated terms = 12564 ZZ22 Terms in output = 44 Bytes used = 1792 Time = 253.22 sec Generated terms = 3847 ZZ32 Terms in output = 38 Bytes used = 1524 Time = 253.82 sec Generated terms = 5085 ZZ42 Terms in output = 20 Bytes used = 856 Time = 253.92 sec Generated terms = 229 ZZ10s Terms in output = 229 Bytes used = 4670 Time = 253.95 sec Generated terms = 235 ZZ20s Terms in output = 235 Bytes used = 4754 Time = 253.97 sec Generated terms = 156 ZZ30s Terms in output = 156 Bytes used = 3204 Time = 254.01 sec Generated terms = 179 ZZ40s Terms in output = 179 Bytes used = 3758 Time = 254.04 sec Generated terms = 227 ZZ11s Terms in output = 227 Bytes used = 4880 Time = 254.07 sec Generated terms = 228 ZZ21s Terms in output = 228 Bytes used = 4894 Time = 254.09 sec Generated terms = 173 ZZ31s Terms in output = 173 Bytes used = 3678 Time = 254.12 sec Generated terms = 129 ZZ41s Terms in output = 129 Bytes used = 2898 Time = 254.12 sec Generated terms = 44 ZZ12s Terms in output = 44 Bytes used = 1132 Time = 254.12 sec Generated terms = 44 ZZ22s Terms in output = 44 Bytes used = 1132 Time = 254.13 sec Generated terms = 38 ZZ32s Terms in output = 38 Bytes used = 934 Time = 254.13 sec Generated terms = 38 ZZ42s Terms in output = 38 Bytes used = 934 ZZ10s = + + XX*PZs**(-1)*rl1*vvs*y*cqt**(-1)*vdt * ( 1./16. - 1./16.* + z**(-1)*O*x12*ux - 3./16.*z**(-1)*O*x12 + 1./32.*z**(-1)*O*ux + + 3./16.*z**(-1)*O*x12s - 1./32.*z**(-1)*O*uxs + 1./8.* + z**(-1)*O + 1./16.*z**(-1)*Os*x12 - 1./8.*z**(-1)*Os*ux + 1./ + 32.*z**(-1)*Os - 1./8.*z**(-1)*Oc - 1./32.*z**(-1)*x12*uxs + + 3./32.*z**(-1)*x12 + 1./16.*z**(-1)*ux*x12s + 1./32.*z**(-1)* + ux - 1./8.*z**(-1)*x12s - 1./16.*z**(-1) + 3./32.*O*x12 + 1./ + 32.*O*x2z - 1./16.*O*ux - 1./16.*O - 3./32.*Os - 1./32.*x12* + x2z - 1./32.*x12*ux - 1./32.*x12 + 1./16.*x2z - 1./32.*ux + 3. + /32.*x12s ) ZZ10s = ZZ10s + XX*PZs**(-1)*rl3*vvc*GtM2*ys*cst**(-1)*vdt * ( + - 3./16.*O*x12*x2z + 1./16.*O*x12*ux + 1./8.*O*x2z*ux + 1./ + 16.*O*x2z - 1./16.*O*x2zs - 1./16.*O*uxs + 1./8.*Os*x12 + 1./ + 8.*Os*x2z - 1./8.*Os*ux - 1./16.*Oc + 1./16.*x12*x2z*ux - 1./ + 8.*x12*x2z + 1./16.*x12*x2zs - 1./16.*x12*uxs + 1./16.*x2z*ux + - 1./8.*x2z*x12s + 3./16.*ux*x12s - 3./16.*x12c - 1./8.*x2zs + ) ZZ10s = ZZ10s + XX*PZs**(-1)*vvs*GtM2*PwsM2*y*zXi*cqt**(-1)*vdt* + vut * ( 3./16.*O*x12*ux - 3./32.*O*x12 - 1./32.*O*ux - 1./32.*O* + uxs + 5./16.*Os*x12 - 1./8.*Os*ux - 3./32.*Os - 1./8.*Oc - 1./ + 32.*x12*ux + 1./32.*x12*uxs ) ZZ10s = ZZ10s + XX*PZs**(-1)*vvs*GtM2*PwsM2*y*cqt**(-1)*vdt*vut + * ( 9./32.*O*x12 + 1./32.*O*x2z - 1./16.*O*ux - 3./32.*O - 3./ + 32.*Os - 3./32.*x12*x2z + 3./32.*x12*ux + 1./16.*x2z - 1./32. + *ux - 3./32.*x12s ) ZZ10s = ZZ10s + XX*PZs**(-1)*vvs*GtM2*PwsM2*y*cqt**(-1)*vdts * ( + - 1./32.*O*x12 + 1./16.*x12*x2z - 1./32.*x12*ux + 3./32.* + x12s ) ZZ10s = ZZ10s + PZs**(-1)*Xpi*rl1*vvs*y*cqt**(-1)*vet*vdt * ( 3./ + 64.*O*x12 + 1./64.*O*x2z - 1./64.*O*ux - 1./64.*Os - 1./32.* + x12*x2z + 1./64.*x12*ux + 1./64.*x2z - 1./32.*x12s ) ZZ10s = ZZ10s + PZs**(-1)*Xpi*rl1*vvs*y*cqt**(-1)*vdt * ( 7./64. + + 5./64.*z**(-1)*O*x12*ux - 11./64.*z**(-1)*O*x12 - 1./16.* + z**(-1)*O*ux + 1./64.*z**(-1)*O*uxs + 13./64.*z**(-1)*O + 3./ + 32.*z**(-1)*Os*x12 + 5./64.*z**(-1)*Os*ux - 9./64.*z**(-1)*Os + + 3./32.*z**(-1)*Oc - 3./64.*z**(-1)*x12*ux + 1./64.*z**(-1) + *x12*uxs + 3./32.*z**(-1)*x12 + 3./64.*z**(-1)*ux - 1./16.* + z**(-1)*x12s - 7./64.*z**(-1) - 1./64.*O*x12 - 3./64.*O*x2z + + 1./16.*O*ux - 1./16.*O + 3./32.*Os + 1./64.*x12*x2z + 1./ + 64.*x12*ux - 3./64.*x12 - 1./64.*ux + 1./64.*x12s ) ZZ10s = ZZ10s + PZs**(-1)*Xpi*rl3*vvc*GtM2*ys*cst**(-1)*vdt * ( 3. + /32.*O*x12*x2z - 1./4.*O*x12 - 1./8.*O*x2z*ux + 1./16.*O*ux + + 3./32.*O*x2zs + 1./32.*O*uxs + 1./16.*O + 1./32.*Os*x12 - + 3./32.*Os*x2z + 1./32.*Os*ux + 1./16.*Os - 1./32.*x12*x2z*ux + + 3./16.*x12*x2z - 1./16.*x12*ux - 1./32.*x12*x2zs + 1./32.* + x12*uxs - 1./8.*x12 + 1./32.*x2z*ux - 1./16.*x2z*x12s - 1./4. + *x2z - 1./32.*ux*x12s + 1./16.*ux + 1./16.*x12s - 1./32.*x12c + ) ZZ10s = ZZ10s + PZs**(-1)*Xpi*vvs*GtM2*PwsM2*y*zXi*cqt**(-1)*vdt* + vut * ( - 5./64.*O*x12*ux + 11./32.*O*x12 - 5./64.*O*ux + 3./64. + *O*uxs - 5./32.*O - 3./32.*Os*x12 + 11./64.*Os*ux - 5./32.*Os + + 5./32.*Oc + 7./64.*x12*ux - 1./64.*x12*uxs - 1./16.*x12 - + 1./32.*ux ) ZZ10s = ZZ10s + PZs**(-1)*Xpi*vvs*GtM2*PwsM2*y*cqt**(-1)*vdt*vut + * ( - 9./64.*O*x12 - 3./64.*O*x2z + 3./32.*O*ux + 1./8.*Os + 3. + /64.*x12*x2z - 3./64.*x12*ux - 1./32.*x12 - 1./32.*x2z + 1./ + 64.*ux + 3./64.*x12s ) ZZ10s = ZZ10s + PZs**(-1)*Xpi*vvs*GtM2*PwsM2*y*cqt**(-1)*vdts + * ( 3./64.*O*x12 + 1./64.*O*x2z - 1./64.*O*ux - 1./64.*Os - 1./ + 32.*x12*x2z + 1./64.*x12*ux + 1./16.*x12 + 1./64.*x2z - 1./32. + *x12s ) ZZ10s = ZZ10s + PZs**(-1)*rl1*vvs*Xps*y*cqt**(-1)*vdt * ( 1./32.* + z**(-1) ) ZZ10s = ZZ10s + PZs**(-1)*rl1*vvs*y*Xp*cqt**(-1)*vet*vdt * ( 1./ + 64. - 1./64.*O - 3./64.*x12 ) ZZ10s = ZZ10s + PZs**(-1)*rl1*vvs*y*Xp*cqt**(-1)*vdt * ( 1./16. + + 1./8.*z**(-1)*O + 1./32.*z**(-1)*ux - 1./8.*z**(-1) ) ZZ10s = ZZ10s + PZs**(-1)*rl1*vvs*y*cqt**(-1)*vet*vdt * ( - 1./ + 64. + 1./64.*O*x2z - 1./64.*O*ux - 1./64.*O + 1./32.*x12*x2z + - 1./64.*x12*ux + 3./64.*x12 - 1./64.*x2z + 1./32.*x12s ) ZZ10s = ZZ10s + PZs**(-1)*rl1*vvs*y*cqt**(-1)*vdt * ( - 5./32. + + 3./32.*z**(-1)*O*x12 + 3./64.*z**(-1)*O*ux - 21./64.* + z**(-1)*O + 1./8.*z**(-1)*Os + 1./64.*z**(-1)*x12*ux - 5./64. + *z**(-1)*x12 - 5./64.*z**(-1)*ux + 1./16.*z**(-1)*x12s + 13./ + 64.*z**(-1) + 7./64.*O - 1./64.*x12 - 1./32.*x2z + 1./32.*ux + ) ZZ10s = ZZ10s + PZs**(-1)*rl3*vvc*GtM2*Xps*ys*cst**(-1)*vdt * ( 1. + /16. ) ZZ10s = ZZ10s + PZs**(-1)*rl3*vvc*GtM2*ys*Xp*cst**(-1)*vdt * ( + - 5./32. + 5./32.*O - 1./32.*x12 - 1./8.*x2z + 1./16.*ux ) ZZ10s = ZZ10s + PZs**(-1)*rl3*vvc*GtM2*ys*cst**(-1)*vdt * ( 1./8. + - 3./16.*O*x2z + 1./16.*O*ux - 3./32.*O + 1./32.*Os + 1./32. + *x12*x2z + 1./32.*x12 - 1./16.*x2z*ux + 9./32.*x2z - 3./32.* + ux + 3./32.*x12s + 1./16.*x2zs ) ZZ10s = ZZ10s + PZs**(-1)*vvs*GtM2*PwsM2*y*Xp*zXi*cqt**(-1)*vdt* + vut * ( - 1./64. - 1./64.*O + 1./64.*x12 ) ZZ10s = ZZ10s + PZs**(-1)*vvs*GtM2*PwsM2*y*Xp*cqt**(-1)*vdts * ( + 1./64. ) ZZ10s = ZZ10s + PZs**(-1)*vvs*GtM2*PwsM2*y*zXi*cqt**(-1)*vdt*vut + * ( 1./16. - 9./64.*O*x12 - 1./32.*O*ux + 5./32.*O - 1./64.*Os + - 1./32.*x12*ux - 1./16.*x12 + 1./64.*ux ) ZZ10s = ZZ10s + PZs**(-1)*vvs*GtM2*PwsM2*y*cqt**(-1)*vdt*vut * ( + - 1./64. + 1./32.*O + 3./64.*x12 ) ZZ10s = ZZ10s + PZs**(-1)*vvs*GtM2*PwsM2*y*cqt**(-1)*vdts * ( - + 1./64. - 1./64.*O - 3./64.*x12 - 1./64.*x2z ) ZZ20s = + + XX*PZs**(-1)*rl1*vvs*y*cqt**(-1)*vdt * ( 3./16. - 3./16.* + z**(-1)*O*x12*ux - 9./16.*z**(-1)*O*x12 + 3./32.*z**(-1)*O*ux + + 9./16.*z**(-1)*O*x12s - 3./32.*z**(-1)*O*uxs + 3./8.* + z**(-1)*O + 3./16.*z**(-1)*Os*x12 - 3./8.*z**(-1)*Os*ux + 3./ + 32.*z**(-1)*Os - 3./8.*z**(-1)*Oc - 3./32.*z**(-1)*x12*uxs + + 9./32.*z**(-1)*x12 + 3./16.*z**(-1)*ux*x12s + 3./32.*z**(-1)* + ux - 3./8.*z**(-1)*x12s - 3./16.*z**(-1) + 9./32.*O*x12 + 3./ + 32.*O*x2z - 3./16.*O*ux - 3./16.*O - 9./32.*Os - 3./32.*x12* + x2z - 3./32.*x12*ux - 3./32.*x12 + 3./16.*x2z - 3./32.*ux + 9. + /32.*x12s ) ZZ20s = ZZ20s + XX*PZs**(-1)*rl3*vvc*GtM2*ys*cst**(-1)*vdt * ( + - 9./16.*O*x12*x2z + 3./16.*O*x12*ux + 3./8.*O*x2z*ux + 3./ + 16.*O*x2z - 3./16.*O*x2zs - 3./16.*O*uxs + 3./8.*Os*x12 + 3./ + 8.*Os*x2z - 3./8.*Os*ux - 3./16.*Oc + 3./16.*x12*x2z*ux - 3./ + 8.*x12*x2z + 3./16.*x12*x2zs - 3./16.*x12*uxs + 3./16.*x2z*ux + - 3./8.*x2z*x12s + 9./16.*ux*x12s - 9./16.*x12c - 3./8.*x2zs + ) ZZ20s = ZZ20s + XX*PZs**(-1)*vvs*GtM2*PwsM2*y*zXi*cqt**(-1)*vdt* + vut * ( 9./16.*O*x12*ux - 9./32.*O*x12 - 3./32.*O*ux - 3./32.*O* + uxs + 15./16.*Os*x12 - 3./8.*Os*ux - 9./32.*Os - 3./8.*Oc - 3. + /32.*x12*ux + 3./32.*x12*uxs ) ZZ20s = ZZ20s + XX*PZs**(-1)*vvs*GtM2*PwsM2*y*cqt**(-1)*vdt*vut + * ( 27./32.*O*x12 + 3./32.*O*x2z - 3./16.*O*ux - 9./32.*O - 9./ + 32.*Os - 9./32.*x12*x2z + 9./32.*x12*ux + 3./16.*x2z - 3./32. + *ux - 9./32.*x12s ) ZZ20s = ZZ20s + XX*PZs**(-1)*vvs*GtM2*PwsM2*y*cqt**(-1)*vdts * ( + - 3./32.*O*x12 + 3./16.*x12*x2z - 3./32.*x12*ux + 9./32.* + x12s ) ZZ20s = ZZ20s + PZs**(-1)*Xpi*rl1*vvs*y*cqt**(-1)*vet*vdt * ( 7./ + 64.*O*x12 + 1./64.*O*x2z - 1./64.*O*ux - 1./64.*Os - 3./32.* + x12*x2z + 3./64.*x12*ux + 3./64.*x2z - 3./32.*x12s ) ZZ20s = ZZ20s + PZs**(-1)*Xpi*rl1*vvs*y*cqt**(-1)*vdt * ( 21./64. + + 15./64.*z**(-1)*O*x12*ux - 33./64.*z**(-1)*O*x12 - 3./16.* + z**(-1)*O*ux + 3./64.*z**(-1)*O*uxs + 39./64.*z**(-1)*O + 9./ + 32.*z**(-1)*Os*x12 + 15./64.*z**(-1)*Os*ux - 27./64.*z**(-1)* + Os + 9./32.*z**(-1)*Oc - 9./64.*z**(-1)*x12*ux + 3./64.* + z**(-1)*x12*uxs + 9./32.*z**(-1)*x12 + 9./64.*z**(-1)*ux - 3./ + 16.*z**(-1)*x12s - 21./64.*z**(-1) - 1./64.*O*x12 - 7./64.*O* + x2z + 5./32.*O*ux - 3./16.*O + 1./4.*Os + 3./64.*x12*x2z + 3./ + 64.*x12*ux - 9./64.*x12 - 3./64.*ux + 3./64.*x12s ) ZZ20s = ZZ20s + PZs**(-1)*Xpi*rl3*vvc*GtM2*ys*cst**(-1)*vdt * ( 5. + /32.*O*x12*x2z + 1./16.*O*x12*ux - 11./16.*O*x12 - 5./16.*O* + x2z*ux + 1./16.*O*x2z + 1./8.*O*ux - 1./16.*O*x12s + 7./32.*O + *x2zs + 3./32.*O*uxs + 3./16.*O + 3./32.*Os*x12 - 9./32.*Os* + x2z + 5./32.*Os*ux + 1./8.*Os + 1./16.*Oc - 3./32.*x12*x2z*ux + + 9./16.*x12*x2z - 3./16.*x12*ux - 3./32.*x12*x2zs + 3./32.* + x12*uxs - 3./8.*x12 + 3./32.*x2z*ux - 3./16.*x2z*x12s - 3./4. + *x2z - 3./32.*ux*x12s + 3./16.*ux + 3./16.*x12s - 3./32.*x12c + ) ZZ20s = ZZ20s + PZs**(-1)*Xpi*vvs*GtM2*PwsM2*y*zXi*cqt**(-1)*vdt* + vut * ( - 15./64.*O*x12*ux + 33./32.*O*x12 - 15./64.*O*ux + 7./ + 64.*O*uxs - 15./32.*O - 9./32.*Os*x12 + 27./64.*Os*ux - 15./ + 32.*Os + 13./32.*Oc + 21./64.*x12*ux - 3./64.*x12*uxs - 3./16. + *x12 - 3./32.*ux ) ZZ20s = ZZ20s + PZs**(-1)*Xpi*vvs*GtM2*PwsM2*y*cqt**(-1)*vdt*vut + * ( - 25./64.*O*x12 - 7./64.*O*x2z + 7./32.*O*ux + 5./16.*Os + + 9./64.*x12*x2z - 9./64.*x12*ux - 3./32.*x12 - 3./32.*x2z + + 3./64.*ux + 9./64.*x12s ) ZZ20s = ZZ20s + PZs**(-1)*Xpi*vvs*GtM2*PwsM2*y*cqt**(-1)*vdts + * ( 1./8.*O*x12 + 1./32.*O*x2z - 1./32.*O*ux - 1./32.*Os - 3./ + 32.*x12*x2z + 3./64.*x12*ux + 3./16.*x12 + 3./64.*x2z - 3./32. + *x12s ) ZZ20s = ZZ20s + PZs**(-1)*rl1*vvs*Xps*y*cqt**(-1)*vdt * ( 1./32.* + z**(-1) ) ZZ20s = ZZ20s + PZs**(-1)*rl1*vvs*y*Xp*cqt**(-1)*vet*vdt * ( 1./ + 64. - 1./64.*O - 3./64.*x12 ) ZZ20s = ZZ20s + PZs**(-1)*rl1*vvs*y*Xp*cqt**(-1)*vdt * ( 1./16. + + 1./8.*z**(-1)*O + 1./32.*z**(-1)*ux - 3./16.*z**(-1) ) ZZ20s = ZZ20s + PZs**(-1)*rl1*vvs*y*cqt**(-1)*vet*vdt * ( - 3./ + 64. + 1./64.*O*x2z - 1./64.*O*ux - 1./64.*O + 1./32.*x12*x2z + - 1./64.*x12*ux + 7./64.*x12 - 1./64.*x2z + 1./32.*x12s ) ZZ20s = ZZ20s + PZs**(-1)*rl1*vvs*y*cqt**(-1)*vdt * ( - 11./32. + + 9./32.*z**(-1)*O*x12 + 5./64.*z**(-1)*O*ux - 43./64.* + z**(-1)*O + 3./16.*z**(-1)*Os + 3./64.*z**(-1)*x12*ux - 15./ + 64.*z**(-1)*x12 - 11./64.*z**(-1)*ux + 3./16.*z**(-1)*x12s + + 31./64.*z**(-1) + 9./64.*O + 1./64.*x12 - 1./32.*x2z + 1./32. + *ux ) ZZ20s = ZZ20s + PZs**(-1)*rl3*vvc*GtM2*Xps*ys*cst**(-1)*vdt * ( 1. + /16. ) ZZ20s = ZZ20s + PZs**(-1)*rl3*vvc*GtM2*ys*Xp*cst**(-1)*vdt * ( + - 9./32. + 5./32.*O - 1./32.*x12 - 1./8.*x2z + 1./16.*ux ) ZZ20s = ZZ20s + PZs**(-1)*rl3*vvc*GtM2*ys*cst**(-1)*vdt * ( 3./8. + + 1./4.*O*x12 - 1./4.*O*x2z + 1./8.*O*ux - 11./32.*O + 3./32. + *Os - 1./32.*x12*x2z + 1./16.*x12*ux + 1./32.*x12 - 1./16.* + x2z*ux + 21./32.*x2z - 9./32.*ux + 9./32.*x12s + 1./16.*x2zs + ) ZZ20s = ZZ20s + PZs**(-1)*vvs*GtM2*PwsM2*y*Xp*zXi*cqt**(-1)*vdt* + vut * ( - 5./64. - 1./64.*O + 5./64.*x12 ) ZZ20s = ZZ20s + PZs**(-1)*vvs*GtM2*PwsM2*y*Xp*cqt**(-1)*vdts * ( + 1./64. ) ZZ20s = ZZ20s + PZs**(-1)*vvs*GtM2*PwsM2*y*zXi*cqt**(-1)*vdt*vut + * ( 3./16. - 33./64.*O*x12 - 1./32.*O*ux + 15./32.*O - 1./64.* + Os - 1./8.*x12*ux - 1./8.*x12 + 3./64.*ux ) ZZ20s = ZZ20s + PZs**(-1)*vvs*GtM2*PwsM2*y*cqt**(-1)*vdt*vut * ( + - 1./64. + 1./32.*O + 5./64.*x12 ) ZZ20s = ZZ20s + PZs**(-1)*vvs*GtM2*PwsM2*y*cqt**(-1)*vdts * ( - + 3./64. - 1./64.*O - 7./64.*x12 - 1./64.*x2z ) ZZ30s = + + PZs**(-1)*Xpi*rl1*vvs*y*cqt**(-1)*vet*vdt * ( 3./64.*O*x12 + + 1./64.*O*x2z - 1./64.*O*ux - 1./64.*Os - 1./32.*x12*x2z + 1./ + 64.*x12*ux + 1./64.*x2z - 1./32.*x12s ) ZZ30s = ZZ30s + PZs**(-1)*Xpi*rl1*vvs*y*cqt**(-1)*vdt * ( 5./64. + - 3./64.*z**(-1)*O*x12*ux + 1./64.*z**(-1)*O*x12 - 1./32.* + z**(-1)*O*ux - 1./64.*z**(-1)*O*uxs + 13./64.*z**(-1)*O - 1./ + 32.*z**(-1)*Os*x12 - 3./64.*z**(-1)*Os*ux - 7./64.*z**(-1)*Os + - 1./32.*z**(-1)*Oc + 1./64.*z**(-1)*x12*ux - 1./64.*z**(-1) + *x12*uxs + 3./64.*z**(-1)*ux - 5./64.*z**(-1) - 3./64.*O*x12 + - 1./64.*O*x2z - 1./8.*O - 1./64.*x12*x2z - 1./64.*x12*ux + + 5./64.*x12 + 1./16.*x2z - 3./64.*ux - 1./64.*x12s ) ZZ30s = ZZ30s + PZs**(-1)*Xpi*rl3*vvc*GtM2*ys*cst**(-1)*vdt * ( 5. + /32.*O*x12*x2z - 1./16.*O*x12*ux - 1./16.*O*x12 + 1./16.*O* + x2z + 1./16.*O*ux + 1./8.*O*x12s + 1./32.*O*x2zs - 1./32.*O* + uxs + 1./32.*Os*x12 + 1./32.*Os*x2z - 3./32.*Os*ux + 1./16.* + Os - 1./16.*Oc + 1./32.*x12*x2z*ux - 1./4.*x12*x2z + 1./16.* + x12*ux + 1./32.*x12*x2zs - 1./32.*x12*uxs + 3./32.*x2z*ux + 1. + /16.*x2z*x12s - 1./16.*x2z + 1./32.*ux*x12s - 1./8.*x12s + 1./ + 32.*x12c - 1./8.*x2zs ) ZZ30s = ZZ30s + PZs**(-1)*Xpi*vvs*GtM2*PwsM2*y*zXi*cqt**(-1)*vdt* + vut * ( 3./64.*O*x12*ux - 3./16.*O*x12 + 1./64.*O*ux + 1./64.*O* + uxs + 1./32.*O + 1./32.*Os*x12 + 3./64.*Os*ux + 1./32.*Oc - 3. + /64.*x12*ux + 1./64.*x12*uxs + 1./32.*x12 ) ZZ30s = ZZ30s + PZs**(-1)*Xpi*vvs*GtM2*PwsM2*y*cqt**(-1)*vdt*vut + * ( 1./32. + 1./64.*O*x12 - 1./64.*O*x2z + 1./32.*O*ux - 1./32. + *O + 1./32.*Os - 3./64.*x12*x2z + 3./64.*x12*ux - 1./16.*x12 + + 1./32.*x2z - 1./64.*ux - 3./64.*x12s ) ZZ30s = ZZ30s + PZs**(-1)*Xpi*vvs*GtM2*PwsM2*y*cqt**(-1)*vdts + * ( 1./64.*O*x12 + 1./64.*O*x2z - 1./64.*O*ux - 1./64.*Os + 1./ + 32.*x12*x2z - 1./64.*x12*ux + 1./32.*x12 + 1./64.*x2z + 1./32. + *x12s ) ZZ30s = ZZ30s + PZs**(-1)*rl1*vvs*Xps*y*cqt**(-1)*vdt * ( 1./32.* + z**(-1) ) ZZ30s = ZZ30s + PZs**(-1)*rl1*vvs*y*Xp*cqt**(-1)*vet*vdt * ( 1./ + 64. - 1./64.*O - 3./64.*x12 ) ZZ30s = ZZ30s + PZs**(-1)*rl1*vvs*y*Xp*cqt**(-1)*vdt * ( 1./16. + + 1./8.*z**(-1)*O + 1./32.*z**(-1)*ux - 1./8.*z**(-1) ) ZZ30s = ZZ30s + PZs**(-1)*rl1*vvs*y*cqt**(-1)*vet*vdt * ( - 1./ + 64. + 1./64.*O*x2z - 1./64.*O*ux - 1./64.*O + 1./32.*x12*x2z + - 1./64.*x12*ux + 3./64.*x12 - 1./64.*x2z + 1./32.*x12s ) ZZ30s = ZZ30s + PZs**(-1)*rl1*vvs*y*cqt**(-1)*vdt * ( - 5./32. + + 1./32.*z**(-1)*O*x12 + 3./64.*z**(-1)*O*ux - 21./64.* + z**(-1)*O + 1./8.*z**(-1)*Os + 1./64.*z**(-1)*x12*ux - 1./64. + *z**(-1)*x12 - 5./64.*z**(-1)*ux + 11./64.*z**(-1) + 7./64.*O + - 1./64.*x12 - 1./32.*x2z + 1./32.*ux ) ZZ30s = ZZ30s + PZs**(-1)*rl3*vvc*GtM2*Xps*ys*cst**(-1)*vdt * ( 1. + /16. ) ZZ30s = ZZ30s + PZs**(-1)*rl3*vvc*GtM2*ys*Xp*cst**(-1)*vdt * ( + - 5./32. + 5./32.*O - 1./32.*x12 - 1./8.*x2z + 1./16.*ux ) ZZ30s = ZZ30s + PZs**(-1)*rl3*vvc*GtM2*ys*cst**(-1)*vdt * ( 1./16. + - 1./8.*O*x12 - 3./16.*O*x2z + 1./16.*O*ux - 3./32.*O + 1./ + 32.*Os + 1./32.*x12*x2z + 5./32.*x12 - 1./16.*x2z*ux + 9./32. + *x2z - 3./32.*ux - 1./32.*x12s + 1./16.*x2zs ) ZZ30s = ZZ30s + PZs**(-1)*vvs*GtM2*PwsM2*y*Xp*zXi*cqt**(-1)*vdt* + vut * ( - 1./64. - 1./64.*O + 1./64.*x12 ) ZZ30s = ZZ30s + PZs**(-1)*vvs*GtM2*PwsM2*y*Xp*cqt**(-1)*vdts * ( + 1./64. ) ZZ30s = ZZ30s + PZs**(-1)*vvs*GtM2*PwsM2*y*zXi*cqt**(-1)*vdt*vut + * ( - 1./32. + 3./64.*O*x12 - 1./32.*O*ux + 1./32.*O - 1./64.* + Os - 1./32.*x12*ux + 1./16.*x12 + 1./64.*ux ) ZZ30s = ZZ30s + PZs**(-1)*vvs*GtM2*PwsM2*y*cqt**(-1)*vdt*vut * ( + - 1./64. + 1./32.*O + 3./64.*x12 ) ZZ30s = ZZ30s + PZs**(-1)*vvs*GtM2*PwsM2*y*cqt**(-1)*vdts * ( - + 1./64. - 1./64.*O - 3./64.*x12 - 1./64.*x2z ) ZZ40s = + + XX*PZs**(-1)*rl1*vvs*y*cqt**(-1)*vet*vdt * ( 3./32.*O*x12 + 1. + /32.*O*x2z - 1./32.*O*ux - 1./32.*Os - 1./16.*x12*x2z + 1./32. + *x12*ux + 1./32.*x2z - 1./16.*x12s ) ZZ40s = ZZ40s + XX*PZs**(-1)*rl1*vvs*y*cqt**(-1)*vdt * ( 1./32. + + 5./32.*z**(-1)*O*x12*ux - 7./32.*z**(-1)*O*x12 - 1./8.* + z**(-1)*O*ux + 1./32.*z**(-1)*O*uxs + 5./32.*z**(-1)*O + 3./ + 16.*z**(-1)*Os*x12 + 5./32.*z**(-1)*Os*ux - 9./32.*z**(-1)*Os + + 3./16.*z**(-1)*Oc - 3./32.*z**(-1)*x12*ux + 1./32.*z**(-1) + *x12*uxs + 1./16.*z**(-1)*x12 + 1./32.*z**(-1)*ux - 1./32.* + z**(-1) - 1./32.*O*x12 - 3./32.*O*x2z + 1./8.*O*ux - 1./8.*O + + 3./16.*Os + 1./32.*x12*x2z + 1./32.*x12*ux - 1./32.*x12 - + 1./32.*ux + 1./32.*x12s ) ZZ40s = ZZ40s + XX*PZs**(-1)*rl3*vvc*GtM2*ys*cst**(-1)*vdt * ( 3./ + 16.*O*x12*x2z - 3./16.*O*x12 - 1./4.*O*x2z*ux + 1./16.*O*x2z + + 1./16.*O*ux + 3./16.*O*x2zs + 1./16.*O*uxs + 1./16.*Os*x12 + - 3./16.*Os*x2z + 1./16.*Os*ux + 1./16.*Os - 1./16.*x12*x2z* + ux + 1./8.*x12*x2z - 1./16.*x12*ux - 1./16.*x12*x2zs + 1./16. + *x12*uxs + 1./16.*x2z*ux - 1./8.*x2z*x12s - 1./16.*x2z - 1./ + 16.*ux*x12s + 1./8.*x12s - 1./16.*x12c ) ZZ40s = ZZ40s + XX*PZs**(-1)*vvs*GtM2*PwsM2*y*zXi*cqt**(-1)*vdt* + vut * ( - 5./32.*O*x12*ux + 1./16.*O*x12 + 1./32.*O*ux + 3./32. + *O*uxs - 3./16.*Os*x12 + 11./32.*Os*ux + 1./16.*Os + 5./16.* + Oc + 1./32.*x12*ux - 1./32.*x12*uxs ) ZZ40s = ZZ40s + XX*PZs**(-1)*vvs*GtM2*PwsM2*y*cqt**(-1)*vdt*vut + * ( - 9./32.*O*x12 - 3./32.*O*x2z + 3./16.*O*ux + 1./16.*O + 1. + /4.*Os + 3./32.*x12*x2z - 3./32.*x12*ux - 1./16.*x2z + 1./32. + *ux + 3./32.*x12s ) ZZ40s = ZZ40s + XX*PZs**(-1)*vvs*GtM2*PwsM2*y*cqt**(-1)*vdts * ( + 3./32.*O*x12 + 1./32.*O*x2z - 1./32.*O*ux - 1./32.*Os - 1./16. + *x12*x2z + 1./32.*x12*ux + 1./32.*x2z - 1./16.*x12s ) ZZ40s = ZZ40s + PZs**(-1)*Xpi*rl1*vvs*y*cqt**(-1)*vet*vdt * ( 1./ + 32. - 1./16.*O*x12 - 1./16.*O*x2z + 1./16.*O*ux + 1./16.*Os + - 1./16.*x12 ) ZZ40s = ZZ40s + PZs**(-1)*Xpi*rl1*vvs*y*cqt**(-1)*vdt * ( - 1./ + 16.*z**(-1)*O*x12 - 1./32.*z**(-1)*O*ux + 3./32.*z**(-1)*O - + 1./16.*z**(-1)*Os - 1./32.*z**(-1)*x12*ux + 1./32.*z**(-1)* + x12 + 1./32.*z**(-1)*ux - 1./32.*z**(-1) + 1./16.*O*x12 + 1./ + 16.*O*x2z - 1./16.*O*ux - 1./32.*O - 1./16.*Os + 1./32.*x12 ) ZZ40s = ZZ40s + PZs**(-1)*Xpi*rl3*vvc*GtM2*ys*cst**(-1)*vdt * ( + - 1./16. - 1./4.*O*x12*x2z + 1./8.*O*x12*ux + 1./4.*O*x12 + + 1./8.*O*x2z*ux + 5./16.*O*x2z - 5./16.*O*ux - 1./8.*O*x12s - + 1./8.*O*x2zs + 1./8.*O + 1./8.*Os*ux - 5./16.*Os + 1./8.*Oc + - 3./16.*x12*x2z + 1./8.*x12 + 1./16.*x2z + 1./16.*ux - 3./ + 16.*x12s ) ZZ40s = ZZ40s + PZs**(-1)*Xpi*vvs*GtM2*PwsM2*y*zXi*cqt**(-1)*vdt* + vut * ( - 1./4.*O*x12 + 9./32.*O*ux - 1./16.*O*uxs + 1./8.*O - + 3./16.*Os*ux + 1./2.*Os - 1./8.*Oc - 3./32.*x12*ux + 1./16.* + x12 + 1./32.*ux ) ZZ40s = ZZ40s + PZs**(-1)*Xpi*vvs*GtM2*PwsM2*y*cqt**(-1)*vdt*vut + * ( 1./16.*O*x12 + 1./16.*O*x2z - 1./8.*O*ux + 3./32.*O - 1./8. + *Os + 1./32.*x12 ) ZZ40s = ZZ40s + PZs**(-1)*Xpi*vvs*GtM2*PwsM2*y*cqt**(-1)*vdts + * ( 1./32. - 1./32.*O*x12 - 1./32.*O*x2z + 1./32.*O*ux + 1./32. + *Os - 1./16.*x12 ) ZZ40s = ZZ40s + PZs**(-1)*rl1*vvs*y*cqt**(-1)*vet*vdt * ( - 1./ + 32. + 1./16.*x12 ) ZZ40s = ZZ40s + PZs**(-1)*rl1*vvs*y*cqt**(-1)*vdt * ( 1./16.* + z**(-1)*O*x12 + 1./32.*z**(-1)*O*ux - 3./32.*z**(-1)*O + 1./ + 16.*z**(-1)*Os + 1./32.*z**(-1)*x12*ux - 1./32.*z**(-1)*x12 + - 1./32.*z**(-1)*ux + 1./32.*z**(-1) + 1./32.*O - 1./32.*x12 + ) ZZ40s = ZZ40s + PZs**(-1)*rl3*vvc*GtM2*ys*Xp*cst**(-1)*vdt * ( 1./ + 16. - 1./8.*x12 ) ZZ40s = ZZ40s + PZs**(-1)*rl3*vvc*GtM2*ys*cst**(-1)*vdt * ( - 1./ + 16.*O*x2z + 1./16.*O*ux - 1./8.*O + 1./16.*Os + 3./16.*x12* + x2z - 1./16.*x2z - 1./16.*ux + 3./16.*x12s ) ZZ40s = ZZ40s + PZs**(-1)*vvs*GtM2*PwsM2*y*Xp*zXi*cqt**(-1)*vdt* + vut * ( 1./16. + 1./16.*O - 1./16.*x12 ) ZZ40s = ZZ40s + PZs**(-1)*vvs*GtM2*PwsM2*y*zXi*cqt**(-1)*vdt*vut + * ( - 1./16. + 1./4.*O*x12 - 3./32.*O*ux - 5./16.*O - 1./4.*Os + + 3./32.*x12*ux - 1./32.*ux ) ZZ40s = ZZ40s + PZs**(-1)*vvs*GtM2*PwsM2*y*cqt**(-1)*vdt*vut * ( + - 1./32.*O - 1./32.*x12 ) ZZ40s = ZZ40s + PZs**(-1)*vvs*GtM2*PwsM2*y*cqt**(-1)*vdts * ( - + 1./32. + 1./16.*x12 ) ZZ11s = + + XX*PZs**(-1)*rl1*vvs*y*cqt**(-1)*vdt * ( - 1./32. + 3./16.* + z**(-1)*O*x12 - 1./8.*z**(-1)*O*x12s - 3./32.*z**(-1)*O - 3./ + 16.*z**(-1)*Os*x12 + 1./16.*z**(-1)*Os*x12s + 3./32.*z**(-1)* + Os + 1./16.*z**(-1)*Oc*x12 - 1./32.*z**(-1)*Oc - 1./16.* + z**(-1)*x12 + 1./16.*z**(-1)*x12s + 1./32.*z**(-1) - 1./16.*O + *x12*x2z - 3./32.*O*x12 + 1./32.*O*x2z + 1./16.*O + 1./16.*Os + *x12 - 1./32.*Os + 1./32.*x12*x2zs + 1./32.*x12 - 1./32.*x2z + - 1./32.*x12s - 1./32.*x12c - 1./32.*x2zs ) ZZ11s = ZZ11s + XX*PZs**(-1)*rl3*vvc*GtM2*ys*cst**(-1)*vdt * ( 1./ + 16.*O*x12*x2zs + 1./8.*O*x2z*x12s + 1./16.*O*x12c + 1./16.* + x12*x12c - 1./16.*x12*x2zc + 1./8.*x12*x2zs + 1./16.*x2z*x12s + + 1./16.*x2z*x12c - 1./16.*x12s*x2zs + 1./16.*x2zc ) ZZ11s = ZZ11s + XX*PZs**(-1)*vvs*GtM2*PwsM2*y*zXi*cqt**(-1)*vdt* + vut * ( - 1./32.*Os*x12 + 1./16.*Oc*x12 - 1./32.*Oc ) ZZ11s = ZZ11s + XX*PZs**(-1)*vvs*GtM2*PwsM2*y*cqt**(-1)*vdt*vut + * ( - 1./16.*O*x12*x2z + 1./32.*O*x2z - 1./16.*O*x12s + 1./16. + *Os*x12 - 1./32.*Os - 1./32.*x12*x2z + 1./32.*x12*x2zs + 1./ + 16.*x2z*x12s + 1./32.*x12c - 1./32.*x2zs ) ZZ11s = ZZ11s + XX*PZs**(-1)*vvs*GtM2*PwsM2*y*cqt**(-1)*vdts * ( + - 1./32.*x12*x2zs - 1./8.*x2z*x12s - 3./32.*x12c ) ZZ11s = ZZ11s + PZs**(-1)*Xpi*rl1*vvs*y*cqt**(-1)*vet*vdt * ( - + 1./64.*O*x12*x2z - 1./64.*O*x12s - 1./64.*x12*x2z + 1./64.* + x12*x2zs + 1./32.*x2z*x12s + 1./64.*x12c - 1./64.*x2zs ) ZZ11s = ZZ11s + PZs**(-1)*Xpi*rl1*vvs*y*cqt**(-1)*vdt * ( - 3./ + 32. + 1./4.*z**(-1)*O*x12 - 1./8.*z**(-1)*O*x12s - 3./16.* + z**(-1)*O - 1./8.*z**(-1)*Os*x12 + 3./32.*z**(-1)*Os - 1./8.* + z**(-1)*x12 + 1./8.*z**(-1)*x12s + 3./32.*z**(-1) + 1./64.*O* + x12*x2z - 1./8.*O*x12 + 1./64.*O*x12s + 3./32.*O + 5./64.*x12 + *x2z - 1./64.*x12*x2zs + 1./32.*x12 - 1./32.*x2z*x12s - 3./32. + *x2z - 1./16.*x12s - 1./64.*x12c + 1./64.*x2zs ) ZZ11s = ZZ11s + PZs**(-1)*Xpi*rl3*vvc*GtM2*ys*cst**(-1)*vdt * ( 5. + /32.*O*x12*x2z + 3./16.*O*x12s - 1./32.*O*x2zs - 1./32.*Os* + x12*x2z - 1./32.*Os*x12s + 5./16.*x12*x2z + 1./32.*x12*x12c + + 1./32.*x12*x2zc - 1./4.*x12*x2zs - 5./32.*x2z*x12s + 3./32. + *x2z*x12c + 3./32.*x12s*x2zs + 1./16.*x12s + 1./16.*x12c - 1./ + 32.*x2zc + 1./4.*x2zs ) ZZ11s = ZZ11s + PZs**(-1)*Xpi*vvs*GtM2*PwsM2*y*zXi*cqt**(-1)*vdt* + vut * ( - 1./32.*O*x12 + 1./16.*Os*x12 - 1./16.*Os ) ZZ11s = ZZ11s + PZs**(-1)*Xpi*vvs*GtM2*PwsM2*y*cqt**(-1)*vdt*vut + * ( 1./64.*O*x12*x2z - 1./16.*O*x12 + 1./64.*O*x12s + 7./64.* + x12*x2z - 1./64.*x12*x2zs - 1./32.*x12 - 1./32.*x2z*x12s - 1./ + 16.*x2z + 3./32.*x12s - 1./64.*x12c + 1./64.*x2zs ) ZZ11s = ZZ11s + PZs**(-1)*Xpi*vvs*GtM2*PwsM2*y*cqt**(-1)*vdts + * ( - 1./64.*O*x12*x2z - 1./64.*O*x12s - 9./64.*x12*x2z + 1./ + 64.*x12*x2zs + 1./32.*x2z*x12s - 3./16.*x12s + 1./64.*x12c - + 1./64.*x2zs ) ZZ11s = ZZ11s + PZs**(-1)*rl1*vvs*Xps*y*Xp*cqt**(-1)*vdt * ( 1./ + 32.*z**(-1) ) ZZ11s = ZZ11s + PZs**(-1)*rl1*vvs*Xps*y*cqt**(-1)*vet*vdt * ( 1./ + 32. - 1./32.*O - 1./16.*x12 ) ZZ11s = ZZ11s + PZs**(-1)*rl1*vvs*Xps*y*cqt**(-1)*vdt * ( 1./16. + + 3./32.*z**(-1)*O - 1./8.*z**(-1) ) ZZ11s = ZZ11s + PZs**(-1)*rl1*vvs*y*Xp*cqt**(-1)*vet*vdt * ( - 1. + /32. + 1./32.*O*x2z + 1./64.*O + 1./16.*x12*x2z + 3./64.*x12 + - 3./64.*x2z + 1./16.*x12s ) ZZ11s = ZZ11s + PZs**(-1)*rl1*vvs*y*Xp*cqt**(-1)*vdt * ( - 11./ + 64. + 1./16.*z**(-1)*O*x12 - 9./32.*z**(-1)*O + 3./32.* + z**(-1)*Os - 1./16.*z**(-1)*x12 + 1./16.*z**(-1)*x12s + 7./32. + *z**(-1) + 3./32.*O - 1./32.*x12 - 1./32.*x2z ) ZZ11s = ZZ11s + PZs**(-1)*rl1*vvs*y*cqt**(-1)*vet*vdt * ( 1./32.* + O*x12 - 1./64.*O*x2z - 1./64.*Os*x12 - 3./64.*x12*x2z - 1./64. + *x12*x2zs + 1./64.*x12 - 1./32.*x2z*x12s + 3./64.*x2z - 1./16. + *x12s - 1./64.*x12c + 1./64.*x2zs ) ZZ11s = ZZ11s + PZs**(-1)*rl1*vvs*y*cqt**(-1)*vdt * ( 7./32. - 5./ + 16.*z**(-1)*O*x12 + 1./8.*z**(-1)*O*x12s + 3./8.*z**(-1)*O + + 1./8.*z**(-1)*Os*x12 - 3./16.*z**(-1)*Os + 1./32.*z**(-1)*Oc + + 3./16.*z**(-1)*x12 - 3./16.*z**(-1)*x12s - 7./32.*z**(-1) + + 5./64.*O*x12 - 1./32.*O*x2z - 5./32.*O + 1./32.*Os - 1./64. + *x12*x2z - 3./64.*x12 + 3./32.*x2z + 7./64.*x12s ) ZZ11s = ZZ11s + PZs**(-1)*rl3*vvc*GtM2*Xps*ys*Xp*cst**(-1)*vdt + * ( 1./16. ) ZZ11s = ZZ11s + PZs**(-1)*rl3*vvc*GtM2*Xps*ys*cst**(-1)*vdt * ( + - 3./16. + 1./8.*O - 1./8.*x2z ) ZZ11s = ZZ11s + PZs**(-1)*rl3*vvc*GtM2*ys*Xp*cst**(-1)*vdt * ( 5./ + 32. - 3./16.*O*x2z - 1./16.*O + 1./16.*x12 + 3./8.*x2z + 1./ + 16.*x12s + 1./16.*x2zs ) ZZ11s = ZZ11s + PZs**(-1)*rl3*vvc*GtM2*ys*cst**(-1)*vdt * ( - 1./ + 16.*O*x12*x2z - 1./8.*O*x12 + 3./32.*O*x2z - 1./8.*O*x12s + 1. + /16.*O*x2zs + 1./16.*Os*x12 - 1./32.*x12*x2z + 1./16.*x12* + x2zs - 3./16.*x12 - 1./8.*x2z*x12s - 11./32.*x2z + 1./16.* + x12s - 3./16.*x12c - 7./32.*x2zs ) ZZ11s = ZZ11s + PZs**(-1)*vvs*GtM2*PwsM2*Xps*y*cqt**(-1)*vdts + * ( 1./32. ) ZZ11s = ZZ11s + PZs**(-1)*vvs*GtM2*PwsM2*y*Xp*zXi*cqt**(-1)*vdt* + vut * ( - 1./64. + 1./32.*O*x12 - 1./32.*Os ) ZZ11s = ZZ11s + PZs**(-1)*vvs*GtM2*PwsM2*y*Xp*cqt**(-1)*vdt*vut + * ( - 1./32. + 1./32.*O + 1./16.*x12 ) ZZ11s = ZZ11s + PZs**(-1)*vvs*GtM2*PwsM2*y*Xp*cqt**(-1)*vdts * ( + - 1./32. - 1./64.*O - 7./64.*x12 - 3./64.*x2z ) ZZ11s = ZZ11s + PZs**(-1)*vvs*GtM2*PwsM2*y*zXi*cqt**(-1)*vdt*vut + * ( - 1./32.*O*x12 + 3./64.*O - 1./32.*Os*x12 + 1./32.*Os + 1./ + 32.*Oc + 1./64.*x12 ) ZZ11s = ZZ11s + PZs**(-1)*vvs*GtM2*PwsM2*y*cqt**(-1)*vdt*vut * ( + 3./64. + 1./32.*O*x12 - 1./32.*O*x2z - 1./32.*O + 1./32.*Os + - 1./16.*x12*x2z - 1./16.*x12 + 3./64.*x2z - 1./16.*x12s ) ZZ11s = ZZ11s + PZs**(-1)*vvs*GtM2*PwsM2*y*cqt**(-1)*vdts * ( 1./ + 32.*O*x12 + 1./64.*O*x2z + 7./64.*x12*x2z + 1./8.*x12 + 3./64. + *x2z + 5./32.*x12s + 1./64.*x2zs ) ZZ21s = + + XX*PZs**(-1)*rl1*vvs*y*cqt**(-1)*vdt * ( - 3./32. + 9./16.* + z**(-1)*O*x12 - 3./8.*z**(-1)*O*x12s - 9./32.*z**(-1)*O - 9./ + 16.*z**(-1)*Os*x12 + 3./16.*z**(-1)*Os*x12s + 9./32.*z**(-1)* + Os + 3./16.*z**(-1)*Oc*x12 - 3./32.*z**(-1)*Oc - 3./16.* + z**(-1)*x12 + 3./16.*z**(-1)*x12s + 3./32.*z**(-1) - 3./16.*O + *x12*x2z - 9./32.*O*x12 + 3./32.*O*x2z + 3./16.*O + 3./16.*Os + *x12 - 3./32.*Os + 3./32.*x12*x2zs + 3./32.*x12 - 3./32.*x2z + - 3./32.*x12s - 3./32.*x12c - 3./32.*x2zs ) ZZ21s = ZZ21s + XX*PZs**(-1)*rl3*vvc*GtM2*ys*cst**(-1)*vdt * ( 3./ + 16.*O*x12*x2zs + 3./8.*O*x2z*x12s + 3./16.*O*x12c + 3./16.* + x12*x12c - 3./16.*x12*x2zc + 3./8.*x12*x2zs + 3./16.*x2z*x12s + + 3./16.*x2z*x12c - 3./16.*x12s*x2zs + 3./16.*x2zc ) ZZ21s = ZZ21s + XX*PZs**(-1)*vvs*GtM2*PwsM2*y*zXi*cqt**(-1)*vdt* + vut * ( - 3./32.*Os*x12 + 3./16.*Oc*x12 - 3./32.*Oc ) ZZ21s = ZZ21s + XX*PZs**(-1)*vvs*GtM2*PwsM2*y*cqt**(-1)*vdt*vut + * ( - 3./16.*O*x12*x2z + 3./32.*O*x2z - 3./16.*O*x12s + 3./16. + *Os*x12 - 3./32.*Os - 3./32.*x12*x2z + 3./32.*x12*x2zs + 3./ + 16.*x2z*x12s + 3./32.*x12c - 3./32.*x2zs ) ZZ21s = ZZ21s + XX*PZs**(-1)*vvs*GtM2*PwsM2*y*cqt**(-1)*vdts * ( + - 3./32.*x12*x2zs - 3./8.*x2z*x12s - 9./32.*x12c ) ZZ21s = ZZ21s + PZs**(-1)*Xpi*rl1*vvs*y*cqt**(-1)*vet*vdt * ( - + 3./64.*O*x12*x2z - 3./64.*O*x12s - 3./64.*x12*x2z + 3./64.* + x12*x2zs + 3./32.*x2z*x12s + 3./64.*x12c - 3./64.*x2zs ) ZZ21s = ZZ21s + PZs**(-1)*Xpi*rl1*vvs*y*cqt**(-1)*vdt * ( - 9./ + 32. + 3./4.*z**(-1)*O*x12 - 3./8.*z**(-1)*O*x12s - 9./16.* + z**(-1)*O - 3./8.*z**(-1)*Os*x12 + 9./32.*z**(-1)*Os - 3./8.* + z**(-1)*x12 + 3./8.*z**(-1)*x12s + 9./32.*z**(-1) + 3./64.*O* + x12*x2z - 3./8.*O*x12 + 3./64.*O*x12s + 9./32.*O + 15./64.* + x12*x2z - 3./64.*x12*x2zs + 3./32.*x12 - 3./32.*x2z*x12s - 9./ + 32.*x2z - 3./16.*x12s - 3./64.*x12c + 3./64.*x2zs ) ZZ21s = ZZ21s + PZs**(-1)*Xpi*rl3*vvc*GtM2*ys*cst**(-1)*vdt * ( + 15./32.*O*x12*x2z + 9./16.*O*x12s - 3./32.*O*x2zs - 3./32.*Os + *x12*x2z - 3./32.*Os*x12s + 15./16.*x12*x2z + 3./32.*x12*x12c + + 3./32.*x12*x2zc - 3./4.*x12*x2zs - 15./32.*x2z*x12s + 9./ + 32.*x2z*x12c + 9./32.*x12s*x2zs + 3./16.*x12s + 3./16.*x12c + - 3./32.*x2zc + 3./4.*x2zs ) ZZ21s = ZZ21s + PZs**(-1)*Xpi*vvs*GtM2*PwsM2*y*zXi*cqt**(-1)*vdt* + vut * ( - 3./32.*O*x12 + 3./16.*Os*x12 - 3./16.*Os ) ZZ21s = ZZ21s + PZs**(-1)*Xpi*vvs*GtM2*PwsM2*y*cqt**(-1)*vdt*vut + * ( 3./64.*O*x12*x2z - 3./16.*O*x12 + 3./64.*O*x12s + 21./64.* + x12*x2z - 3./64.*x12*x2zs - 3./32.*x12 - 3./32.*x2z*x12s - 3./ + 16.*x2z + 9./32.*x12s - 3./64.*x12c + 3./64.*x2zs ) ZZ21s = ZZ21s + PZs**(-1)*Xpi*vvs*GtM2*PwsM2*y*cqt**(-1)*vdts + * ( - 3./64.*O*x12*x2z - 3./64.*O*x12s - 27./64.*x12*x2z + 3./ + 64.*x12*x2zs + 3./32.*x2z*x12s - 9./16.*x12s + 3./64.*x12c - + 3./64.*x2zs ) ZZ21s = ZZ21s + PZs**(-1)*rl1*vvs*Xps*y*Xp*cqt**(-1)*vdt * ( 1./ + 32.*z**(-1) ) ZZ21s = ZZ21s + PZs**(-1)*rl1*vvs*Xps*y*cqt**(-1)*vet*vdt * ( 1./ + 32. - 1./32.*O - 1./16.*x12 ) ZZ21s = ZZ21s + PZs**(-1)*rl1*vvs*Xps*y*cqt**(-1)*vdt * ( 1./16. + + 3./32.*z**(-1)*O - 3./16.*z**(-1) ) ZZ21s = ZZ21s + PZs**(-1)*rl1*vvs*y*Xp*cqt**(-1)*vet*vdt * ( - 1. + /16. + 1./32.*O*x2z + 1./64.*O + 1./16.*x12*x2z + 7./64.*x12 + - 3./64.*x2z + 1./16.*x12s ) ZZ21s = ZZ21s + PZs**(-1)*rl1*vvs*y*Xp*cqt**(-1)*vdt * ( - 21./ + 64. + 3./16.*z**(-1)*O*x12 - 15./32.*z**(-1)*O + 3./32.* + z**(-1)*Os - 3./16.*z**(-1)*x12 + 3./16.*z**(-1)*x12s + 15./ + 32.*z**(-1) + 3./32.*O - 1./32.*x12 - 1./32.*x2z ) ZZ21s = ZZ21s + PZs**(-1)*rl1*vvs*y*cqt**(-1)*vet*vdt * ( 1./16.* + O*x12 - 1./64.*O*x2z - 1./64.*Os*x12 - 9./64.*x12*x2z - 1./64. + *x12*x2zs + 3./64.*x12 - 1./32.*x2z*x12s + 7./64.*x2z - 5./32. + *x12s - 1./64.*x12c + 1./64.*x2zs ) ZZ21s = ZZ21s + PZs**(-1)*rl1*vvs*y*cqt**(-1)*vdt * ( 19./32. - + 15./16.*z**(-1)*O*x12 + 3./8.*z**(-1)*O*x12s + 15./16.* + z**(-1)*O + 3./8.*z**(-1)*Os*x12 - 3./8.*z**(-1)*Os + 1./32.* + z**(-1)*Oc + 9./16.*z**(-1)*x12 - 9./16.*z**(-1)*x12s - 19./ + 32.*z**(-1) + 19./64.*O*x12 - 1./32.*O*x2z - 11./32.*O + 1./ + 32.*Os - 3./64.*x12*x2z - 13./64.*x12 + 7./32.*x2z + 21./64.* + x12s ) ZZ21s = ZZ21s + PZs**(-1)*rl3*vvc*GtM2*Xps*ys*Xp*cst**(-1)*vdt + * ( 1./16. ) ZZ21s = ZZ21s + PZs**(-1)*rl3*vvc*GtM2*Xps*ys*cst**(-1)*vdt * ( + - 5./16. + 1./8.*O - 1./8.*x2z ) ZZ21s = ZZ21s + PZs**(-1)*rl3*vvc*GtM2*ys*Xp*cst**(-1)*vdt * ( 13. + /32. + 1./4.*O*x12 - 3./16.*O*x2z - 1./8.*O + 11./16.*x2z + 5. + /16.*x12s + 1./16.*x2zs ) ZZ21s = ZZ21s + PZs**(-1)*rl3*vvc*GtM2*ys*cst**(-1)*vdt * ( - 7./ + 16.*O*x12*x2z - 5./16.*O*x12 + 7./32.*O*x2z - 1./2.*O*x12s + + 1./16.*O*x2zs + 1./8.*Os*x12 + 5./32.*x12*x2z + 1./8.*x12* + x2zs - 9./16.*x12 - 1./2.*x2z*x12s - 31./32.*x2z + 1./4.*x12s + - 5./8.*x12c - 15./32.*x2zs ) ZZ21s = ZZ21s + PZs**(-1)*vvs*GtM2*PwsM2*Xps*y*cqt**(-1)*vdts + * ( 1./32. ) ZZ21s = ZZ21s + PZs**(-1)*vvs*GtM2*PwsM2*y*Xp*zXi*cqt**(-1)*vdt* + vut * ( - 1./64. + 1./32.*O*x12 - 1./16.*O - 1./32.*Os ) ZZ21s = ZZ21s + PZs**(-1)*vvs*GtM2*PwsM2*y*Xp*cqt**(-1)*vdt*vut + * ( - 1./16. + 1./32.*O + 1./8.*x12 ) ZZ21s = ZZ21s + PZs**(-1)*vvs*GtM2*PwsM2*y*Xp*cqt**(-1)*vdts * ( + - 1./16. - 1./64.*O - 15./64.*x12 - 3./64.*x2z ) ZZ21s = ZZ21s + PZs**(-1)*vvs*GtM2*PwsM2*y*zXi*cqt**(-1)*vdt*vut + * ( 1./32.*O*x12 + 7./64.*O - 5./32.*Os*x12 + 5./32.*Os + 1./32. + *Oc + 1./64.*x12 ) ZZ21s = ZZ21s + PZs**(-1)*vvs*GtM2*PwsM2*y*cqt**(-1)*vdt*vut * ( + 7./64. + 1./8.*O*x12 - 1./32.*O*x2z - 1./32.*O + 1./32.*Os - + 5./32.*x12*x2z - 5./32.*x12 + 7./64.*x2z - 5./32.*x12s ) ZZ21s = ZZ21s + PZs**(-1)*vvs*GtM2*PwsM2*y*cqt**(-1)*vdts * ( 1./ + 16.*O*x12 + 1./64.*O*x2z + 17./64.*x12*x2z + 11./32.*x12 + 7./ + 64.*x2z + 7./16.*x12s + 1./64.*x2zs ) ZZ31s = + + PZs**(-1)*Xpi*rl1*vvs*y*cqt**(-1)*vet*vdt * ( - 1./64.*O*x12 + *x2z - 1./64.*O*x12s - 1./64.*x12*x2z + 1./64.*x12*x2zs + 1./ + 32.*x2z*x12s + 1./64.*x12c - 1./64.*x2zs ) ZZ31s = ZZ31s + PZs**(-1)*Xpi*rl1*vvs*y*cqt**(-1)*vdt * ( - 1./ + 32. - 3./32.*z**(-1)*O + 3./32.*z**(-1)*Os - 1./32.*z**(-1)* + Oc + 1./32.*z**(-1) + 1./64.*O*x12*x2z + 1./32.*O*x12 + 1./32. + *O*x2z + 1./64.*O*x12s + 1./16.*O - 1./32.*Os - 3./64.*x12* + x2z + 1./64.*x12*x2zs - 1./32.*x12 + 1./32.*x2z*x12s - 1./32. + *x2z - 1./32.*x12s + 1./64.*x12c - 1./64.*x2zs ) ZZ31s = ZZ31s + PZs**(-1)*Xpi*rl3*vvc*GtM2*ys*cst**(-1)*vdt * ( 1. + /32.*O*x12*x2z - 1./16.*O*x12*x2zs - 1./8.*O*x2z*x12s + 1./16. + *O*x12s - 1./16.*O*x12c - 1./32.*O*x2zs - 1./32.*Os*x12*x2z + - 1./32.*Os*x12s + 1./16.*x12*x2z - 1./32.*x12*x12c - 1./32. + *x12*x2zc + 1./8.*x12*x2zs + 5./32.*x2z*x12s - 3./32.*x2z* + x12c - 3./32.*x12s*x2zs + 1./16.*x12c + 1./32.*x2zc + 1./16.* + x2zs ) ZZ31s = ZZ31s + PZs**(-1)*Xpi*vvs*GtM2*PwsM2*y*zXi*cqt**(-1)*vdt* + vut * ( 1./32.*O*x12 - 3./32.*Os*x12 + 1./32.*Os - 1./32.*Oc ) ZZ31s = ZZ31s + PZs**(-1)*Xpi*vvs*GtM2*PwsM2*y*cqt**(-1)*vdt*vut + * ( 1./64.*O*x12*x2z - 1./16.*O*x12 + 1./32.*O*x2z + 1./64.*O* + x12s + 1./32.*O - 1./32.*Os + 1./64.*x12*x2z + 1./64.*x12* + x2zs + 1./32.*x2z*x12s - 1./32.*x2z + 1./32.*x12s + 1./64.* + x12c - 1./64.*x2zs ) ZZ31s = ZZ31s + PZs**(-1)*Xpi*vvs*GtM2*PwsM2*y*cqt**(-1)*vdts + * ( - 1./64.*O*x12*x2z - 1./64.*O*x12s - 5./64.*x12*x2z - 1./ + 64.*x12*x2zs - 1./32.*x2z*x12s - 1./16.*x12s - 1./64.*x12c - + 1./64.*x2zs ) ZZ31s = ZZ31s + PZs**(-1)*rl1*vvs*Xps*y*Xp*cqt**(-1)*vdt * ( 1./ + 32.*z**(-1) ) ZZ31s = ZZ31s + PZs**(-1)*rl1*vvs*Xps*y*cqt**(-1)*vet*vdt * ( 1./ + 32. - 1./32.*O - 1./16.*x12 ) ZZ31s = ZZ31s + PZs**(-1)*rl1*vvs*Xps*y*cqt**(-1)*vdt * ( 1./16. + + 3./32.*z**(-1)*O - 1./8.*z**(-1) ) ZZ31s = ZZ31s + PZs**(-1)*rl1*vvs*y*Xp*cqt**(-1)*vet*vdt * ( - 1. + /32. + 1./32.*O*x2z + 1./64.*O + 1./16.*x12*x2z + 3./64.*x12 + - 3./64.*x2z + 1./16.*x12s ) ZZ31s = ZZ31s + PZs**(-1)*rl1*vvs*y*Xp*cqt**(-1)*vdt * ( - 11./ + 64. - 9./32.*z**(-1)*O + 3./32.*z**(-1)*Os + 3./16.*z**(-1) + + 3./32.*O - 1./32.*x12 - 1./32.*x2z ) ZZ31s = ZZ31s + PZs**(-1)*rl1*vvs*y*cqt**(-1)*vet*vdt * ( 1./32.* + O*x12 - 1./64.*O*x2z - 1./64.*Os*x12 - 3./64.*x12*x2z - 1./64. + *x12*x2zs + 1./64.*x12 - 1./32.*x2z*x12s + 3./64.*x2z - 1./16. + *x12s - 1./64.*x12c + 1./64.*x2zs ) ZZ31s = ZZ31s + PZs**(-1)*rl1*vvs*y*cqt**(-1)*vdt * ( 1./8. + 9./ + 32.*z**(-1)*O - 3./16.*z**(-1)*Os + 1./32.*z**(-1)*Oc - 1./8. + *z**(-1) - 3./64.*O*x12 - 1./32.*O*x2z - 5./32.*O + 1./32.*Os + - 1./64.*x12*x2z + 7./64.*x12 + 3./32.*x2z - 1./64.*x12s ) ZZ31s = ZZ31s + PZs**(-1)*rl3*vvc*GtM2*Xps*ys*Xp*cst**(-1)*vdt + * ( 1./16. ) ZZ31s = ZZ31s + PZs**(-1)*rl3*vvc*GtM2*Xps*ys*cst**(-1)*vdt * ( + - 3./16. + 1./8.*O - 1./8.*x2z ) ZZ31s = ZZ31s + PZs**(-1)*rl3*vvc*GtM2*ys*Xp*cst**(-1)*vdt * ( 3./ + 32. - 1./8.*O*x12 - 3./16.*O*x2z - 1./16.*O + 3./16.*x12 + 3./ + 8.*x2z - 1./16.*x12s + 1./16.*x2zs ) ZZ31s = ZZ31s + PZs**(-1)*rl3*vvc*GtM2*ys*cst**(-1)*vdt * ( 3./16. + *O*x12*x2z - 1./16.*O*x12 + 3./32.*O*x2z + 1./8.*O*x12s + 1./ + 16.*O*x2zs + 1./16.*Os*x12 - 11./32.*x12*x2z + 1./16.*x12* + x2zs - 1./16.*x12 + 1./8.*x2z*x12s - 5./32.*x2z - 1./8.*x12s + + 1./16.*x12c - 7./32.*x2zs ) ZZ31s = ZZ31s + PZs**(-1)*vvs*GtM2*PwsM2*Xps*y*cqt**(-1)*vdts + * ( 1./32. ) ZZ31s = ZZ31s + PZs**(-1)*vvs*GtM2*PwsM2*y*Xp*zXi*cqt**(-1)*vdt* + vut * ( 1./64. - 1./32.*O*x12 - 1./32.*Os ) ZZ31s = ZZ31s + PZs**(-1)*vvs*GtM2*PwsM2*y*Xp*cqt**(-1)*vdt*vut + * ( - 1./32. + 1./32.*O + 1./16.*x12 ) ZZ31s = ZZ31s + PZs**(-1)*vvs*GtM2*PwsM2*y*Xp*cqt**(-1)*vdts * ( + - 1./32. - 1./64.*O - 7./64.*x12 - 3./64.*x2z ) ZZ31s = ZZ31s + PZs**(-1)*vvs*GtM2*PwsM2*y*zXi*cqt**(-1)*vdt*vut + * ( 1./32.*O*x12 - 3./64.*O + 3./32.*Os*x12 + 1./32.*Os + 1./32. + *Oc - 1./64.*x12 ) ZZ31s = ZZ31s + PZs**(-1)*vvs*GtM2*PwsM2*y*cqt**(-1)*vdt*vut * ( + 1./64. + 1./32.*O*x12 - 1./32.*O*x2z - 1./32.*O + 1./32.*Os + - 1./16.*x12*x2z - 1./32.*x12 + 3./64.*x2z - 1./16.*x12s ) ZZ31s = ZZ31s + PZs**(-1)*vvs*GtM2*PwsM2*y*cqt**(-1)*vdts * ( 1./ + 32.*O*x12 + 1./64.*O*x2z + 7./64.*x12*x2z + 3./32.*x12 + 3./ + 64.*x2z + 3./32.*x12s + 1./64.*x2zs ) ZZ41s = + + XX*PZs**(-1)*rl1*vvs*y*cqt**(-1)*vet*vdt * ( - 1./32.*O*x12* + x2z - 1./32.*O*x12s - 1./32.*x12*x2z + 1./32.*x12*x2zs + 1./ + 16.*x2z*x12s + 1./32.*x12c - 1./32.*x2zs ) ZZ41s = ZZ41s + XX*PZs**(-1)*rl1*vvs*y*cqt**(-1)*vdt * ( 1./32.*O + *x12*x2z + 1./32.*O*x12s + 1./32.*x12*x2z - 1./32.*x12*x2zs + - 1./16.*x2z*x12s - 1./32.*x12c + 1./32.*x2zs ) ZZ41s = ZZ41s + XX*PZs**(-1)*rl3*vvc*GtM2*ys*cst**(-1)*vdt * ( 1./ + 16.*O*x12s - 1./16.*O*x2zs - 1./16.*Os*x12*x2z - 1./16.*Os* + x12s + 1./16.*x12*x2z + 1./16.*x12*x12c + 1./16.*x12*x2zc - 3. + /16.*x12*x2zs - 3./16.*x2z*x12s + 3./16.*x2z*x12c + 3./16.* + x12s*x2zs - 1./16.*x12c - 1./16.*x2zc + 1./16.*x2zs ) ZZ41s = ZZ41s + XX*PZs**(-1)*vvs*GtM2*PwsM2*y*cqt**(-1)*vdt*vut + * ( 1./32.*O*x12*x2z + 1./32.*O*x12s + 1./32.*x12*x2z - 1./32.* + x12*x2zs - 1./16.*x2z*x12s - 1./32.*x12c + 1./32.*x2zs ) ZZ41s = ZZ41s + XX*PZs**(-1)*vvs*GtM2*PwsM2*y*cqt**(-1)*vdts * ( + - 1./32.*O*x12*x2z - 1./32.*O*x12s - 1./32.*x12*x2z + 1./32. + *x12*x2zs + 1./16.*x2z*x12s + 1./32.*x12c - 1./32.*x2zs ) ZZ41s = ZZ41s + PZs**(-1)*Xpi*rl1*vvs*y*cqt**(-1)*vet*vdt * ( - + 1./32.*O*x12 + 3./32.*x12*x2z - 1./32.*x12 - 1./16.*x2z + 3./ + 32.*x12s ) ZZ41s = ZZ41s + PZs**(-1)*Xpi*rl1*vvs*y*cqt**(-1)*vdt * ( 1./32.* + O*x12 - 3./32.*x12*x2z + 1./32.*x12 + 1./16.*x2z - 3./32.* + x12s ) ZZ41s = ZZ41s + PZs**(-1)*Xpi*rl3*vvc*GtM2*ys*cst**(-1)*vdt * ( 1. + /16.*O*x12*x2z - 1./8.*O*x2z + 1./16.*O*x12s - 1./16.*Os*x12 + - 7./16.*x12*x2z + 1./4.*x12*x2zs + 1./16.*x12 + 1./2.*x2z* + x12s + 1./8.*x2z - 1./4.*x12s + 1./4.*x12c - 3./16.*x2zs ) ZZ41s = ZZ41s + PZs**(-1)*Xpi*vvs*GtM2*PwsM2*y*cqt**(-1)*vdt*vut + * ( 1./32.*O*x12 - 3./32.*x12*x2z + 1./32.*x12 + 1./16.*x2z - 3. + /32.*x12s ) ZZ41s = ZZ41s + PZs**(-1)*Xpi*vvs*GtM2*PwsM2*y*cqt**(-1)*vdts + * ( - 1./32.*O*x12 + 3./32.*x12*x2z - 1./32.*x12 - 1./16.*x2z + + 3./32.*x12s ) ZZ41s = ZZ41s + PZs**(-1)*rl1*vvs*y*Xp*cqt**(-1)*vet*vdt * ( - 1. + /32. + 1./16.*x12 ) ZZ41s = ZZ41s + PZs**(-1)*rl1*vvs*y*Xp*cqt**(-1)*vdt * ( 1./32. + - 1./16.*x12 ) ZZ41s = ZZ41s + PZs**(-1)*rl1*vvs*y*cqt**(-1)*vet*vdt * ( 1./32. + + 1./32.*O*x12 - 3./32.*x12*x2z - 1./32.*x12 + 1./16.*x2z - + 3./32.*x12s ) ZZ41s = ZZ41s + PZs**(-1)*rl1*vvs*y*cqt**(-1)*vdt * ( - 1./32. + - 1./32.*O*x12 + 3./32.*x12*x2z + 1./32.*x12 - 1./16.*x2z + + 3./32.*x12s ) ZZ41s = ZZ41s + PZs**(-1)*rl3*vvc*GtM2*Xps*ys*cst**(-1)*vdt * ( 1. + /16. - 1./8.*x12 ) ZZ41s = ZZ41s + PZs**(-1)*rl3*vvc*GtM2*ys*Xp*cst**(-1)*vdt * ( 1./ + 16.*O*x12 - 1./16.*O + 5./16.*x12*x2z - 1./8.*x12 - 3./16.* + x2z + 5./16.*x12s ) ZZ41s = ZZ41s + PZs**(-1)*rl3*vvc*GtM2*ys*cst**(-1)*vdt * ( - 1./ + 16. - 1./16.*O*x12*x2z - 1./16.*O*x12 + 1./8.*O*x2z - 1./16.* + O*x12s + 1./16.*O + 1./16.*Os*x12 + 1./8.*x12*x2z - 1./4.*x12 + *x2zs + 3./16.*x12 - 1./2.*x2z*x12s + 1./16.*x2z - 1./16.* + x12s - 1./4.*x12c + 3./16.*x2zs ) ZZ41s = ZZ41s + PZs**(-1)*vvs*GtM2*PwsM2*y*Xp*cqt**(-1)*vdt*vut + * ( 1./32. - 1./16.*x12 ) ZZ41s = ZZ41s + PZs**(-1)*vvs*GtM2*PwsM2*y*Xp*cqt**(-1)*vdts * ( + - 1./32. + 1./16.*x12 ) ZZ41s = ZZ41s + PZs**(-1)*vvs*GtM2*PwsM2*y*cqt**(-1)*vdt*vut * ( + - 1./32. - 1./32.*O*x12 + 3./32.*x12*x2z + 1./32.*x12 - 1./ + 16.*x2z + 3./32.*x12s ) ZZ41s = ZZ41s + PZs**(-1)*vvs*GtM2*PwsM2*y*cqt**(-1)*vdts * ( 1./ + 32. + 1./32.*O*x12 - 3./32.*x12*x2z - 1./32.*x12 + 1./16.*x2z + - 3./32.*x12s ) ZZ12s = + + XX*PZs**(-1)*vvs*dms*GtM2*PwsM2*s**(-1)*cqt**(-1)*vdts * ( + - 1./32.*x12*x2zs - 1./8.*x2z*x12s - 3./32.*x12c ) ZZ12s = ZZ12s + XX*PZs**(-1)*vvs*GtM2*PwsM2*y*cqt**(-1)*vdts * ( + 1./32.*x12*x12c + 1./16.*x2z*x12c + 1./32.*x12s*x2zs ) ZZ12s = ZZ12s + PZs**(-1)*Xpi*vvs*dms*GtM2*PwsM2*s**(-1)* + cqt**(-1)*vdts * ( - 1./64.*O*x12*x2z - 1./64.*O*x12s - 9./64.* + x12*x2z + 1./64.*x12*x2zs + 1./32.*x2z*x12s - 3./16.*x12s + 1. + /64.*x12c - 1./64.*x2zs ) ZZ12s = ZZ12s + PZs**(-1)*Xpi*vvs*GtM2*PwsM2*y*cqt**(-1)*vdts + * ( 1./32.*x12*x2zs + 1./8.*x2z*x12s + 3./32.*x12c ) ZZ12s = ZZ12s + PZs**(-1)*vvs*dms*GtM2*PwsM2*s**(-1)*Xps* + cqt**(-1)*vdts * ( 1./32. ) ZZ12s = ZZ12s + PZs**(-1)*vvs*dms*GtM2*PwsM2*s**(-1)*Xp*cqt**(-1) + *vdts * ( - 1./32. - 1./64.*O - 7./64.*x12 - 3./64.*x2z ) ZZ12s = ZZ12s + PZs**(-1)*vvs*dms*GtM2*PwsM2*s**(-1)*cqt**(-1)* + vdts * ( 1./32.*O*x12 + 1./64.*O*x2z + 7./64.*x12*x2z + 1./8.* + x12 + 3./64.*x2z + 5./32.*x12s + 1./64.*x2zs ) ZZ12s = ZZ12s + PZs**(-1)*vvs*GtM2*PwsM2*Xps*y*Xp*cqt**(-1)*vdts + * ( 1./64. ) ZZ12s = ZZ12s + PZs**(-1)*vvs*GtM2*PwsM2*Xps*y*cqt**(-1)*vdts + * ( - 1./64. - 1./16.*x12 - 1./32.*x2z ) ZZ12s = ZZ12s + PZs**(-1)*vvs*GtM2*PwsM2*y*Xp*cqt**(-1)*vdts * ( + 3./32.*x12*x2z + 1./16.*x12 + 1./32.*x2z + 7./64.*x12s + 1./ + 64.*x2zs ) ZZ12s = ZZ12s + PZs**(-1)*vvs*GtM2*PwsM2*y*cqt**(-1)*vdts * ( - + 3./32.*x12*x2z - 1./32.*x12*x2zs - 1./8.*x2z*x12s - 7./64.* + x12s - 3./32.*x12c - 1./64.*x2zs ) ZZ22s = + + XX*PZs**(-1)*vvs*dms*GtM2*PwsM2*s**(-1)*cqt**(-1)*vdts * ( + - 3./32.*x12*x2zs - 3./8.*x2z*x12s - 9./32.*x12c ) ZZ22s = ZZ22s + XX*PZs**(-1)*vvs*GtM2*PwsM2*y*cqt**(-1)*vdts * ( + 3./32.*x12*x12c + 3./16.*x2z*x12c + 3./32.*x12s*x2zs ) ZZ22s = ZZ22s + PZs**(-1)*Xpi*vvs*dms*GtM2*PwsM2*s**(-1)* + cqt**(-1)*vdts * ( - 3./64.*O*x12*x2z - 3./64.*O*x12s - 27./64. + *x12*x2z + 3./64.*x12*x2zs + 3./32.*x2z*x12s - 9./16.*x12s + + 3./64.*x12c - 3./64.*x2zs ) ZZ22s = ZZ22s + PZs**(-1)*Xpi*vvs*GtM2*PwsM2*y*cqt**(-1)*vdts + * ( 3./32.*x12*x2zs + 3./8.*x2z*x12s + 9./32.*x12c ) ZZ22s = ZZ22s + PZs**(-1)*vvs*dms*GtM2*PwsM2*s**(-1)*Xps* + cqt**(-1)*vdts * ( 1./32. ) ZZ22s = ZZ22s + PZs**(-1)*vvs*dms*GtM2*PwsM2*s**(-1)*Xp*cqt**(-1) + *vdts * ( - 1./16. - 1./64.*O - 15./64.*x12 - 3./64.*x2z ) ZZ22s = ZZ22s + PZs**(-1)*vvs*dms*GtM2*PwsM2*s**(-1)*cqt**(-1)* + vdts * ( 1./16.*O*x12 + 1./64.*O*x2z + 17./64.*x12*x2z + 11./32. + *x12 + 7./64.*x2z + 7./16.*x12s + 1./64.*x2zs ) ZZ22s = ZZ22s + PZs**(-1)*vvs*GtM2*PwsM2*Xps*y*Xp*cqt**(-1)*vdts + * ( 1./64. ) ZZ22s = ZZ22s + PZs**(-1)*vvs*GtM2*PwsM2*Xps*y*cqt**(-1)*vdts + * ( - 1./64. - 1./8.*x12 - 1./32.*x2z ) ZZ22s = ZZ22s + PZs**(-1)*vvs*GtM2*PwsM2*y*Xp*cqt**(-1)*vdts * ( + 7./32.*x12*x2z + 1./8.*x12 + 1./32.*x2z + 19./64.*x12s + 1./ + 64.*x2zs ) ZZ22s = ZZ22s + PZs**(-1)*vvs*GtM2*PwsM2*y*cqt**(-1)*vdts * ( - + 7./32.*x12*x2z - 3./32.*x12*x2zs - 3./8.*x2z*x12s - 19./64.* + x12s - 9./32.*x12c - 1./64.*x2zs ) ZZ32s = + + PZs**(-1)*Xpi*vvs*dms*GtM2*PwsM2*s**(-1)*cqt**(-1)*vdts * ( + - 1./64.*O*x12*x2z - 1./64.*O*x12s - 5./64.*x12*x2z - 1./64. + *x12*x2zs - 1./32.*x2z*x12s - 1./16.*x12s - 1./64.*x12c - 1./ + 64.*x2zs ) ZZ32s = ZZ32s + PZs**(-1)*Xpi*vvs*GtM2*PwsM2*y*cqt**(-1)*vdts + * ( 1./32.*x12*x2zs + 1./16.*x2z*x12s + 1./32.*x12c ) ZZ32s = ZZ32s + PZs**(-1)*vvs*dms*GtM2*PwsM2*s**(-1)*Xps* + cqt**(-1)*vdts * ( 1./32. ) ZZ32s = ZZ32s + PZs**(-1)*vvs*dms*GtM2*PwsM2*s**(-1)*Xp*cqt**(-1) + *vdts * ( - 1./32. - 1./64.*O - 7./64.*x12 - 3./64.*x2z ) ZZ32s = ZZ32s + PZs**(-1)*vvs*dms*GtM2*PwsM2*s**(-1)*cqt**(-1)* + vdts * ( 1./32.*O*x12 + 1./64.*O*x2z + 7./64.*x12*x2z + 3./32.* + x12 + 3./64.*x2z + 3./32.*x12s + 1./64.*x2zs ) ZZ32s = ZZ32s + PZs**(-1)*vvs*GtM2*PwsM2*Xps*y*Xp*cqt**(-1)*vdts + * ( 1./64. ) ZZ32s = ZZ32s + PZs**(-1)*vvs*GtM2*PwsM2*Xps*y*cqt**(-1)*vdts + * ( - 1./64. - 1./16.*x12 - 1./32.*x2z ) ZZ32s = ZZ32s + PZs**(-1)*vvs*GtM2*PwsM2*y*Xp*cqt**(-1)*vdts * ( + 3./32.*x12*x2z + 1./16.*x12 + 1./32.*x2z + 5./64.*x12s + 1./ + 64.*x2zs ) ZZ32s = ZZ32s + PZs**(-1)*vvs*GtM2*PwsM2*y*cqt**(-1)*vdts * ( - + 3./32.*x12*x2z - 1./32.*x12*x2zs - 1./16.*x2z*x12s - 5./64.* + x12s - 1./32.*x12c - 1./64.*x2zs ) ZZ42s = + + PZs**(-1)*Xpi*vvs*dms*GtM2*PwsM2*s**(-1)*cqt**(-1)*vdts * ( + - 1./64.*O*x12*x2z - 1./64.*O*x12s - 5./64.*x12*x2z - 1./64. + *x12*x2zs - 1./32.*x2z*x12s - 1./16.*x12s - 1./64.*x12c - 1./ + 64.*x2zs ) ZZ42s = ZZ42s + PZs**(-1)*Xpi*vvs*GtM2*PwsM2*y*cqt**(-1)*vdts + * ( 1./32.*x12*x2zs + 1./16.*x2z*x12s + 1./32.*x12c ) ZZ42s = ZZ42s + PZs**(-1)*vvs*dms*GtM2*PwsM2*s**(-1)*Xps* + cqt**(-1)*vdts * ( 1./32. ) ZZ42s = ZZ42s + PZs**(-1)*vvs*dms*GtM2*PwsM2*s**(-1)*Xp*cqt**(-1) + *vdts * ( - 1./32. - 1./64.*O - 7./64.*x12 - 3./64.*x2z ) ZZ42s = ZZ42s + PZs**(-1)*vvs*dms*GtM2*PwsM2*s**(-1)*cqt**(-1)* + vdts * ( 1./32.*O*x12 + 1./64.*O*x2z + 7./64.*x12*x2z + 3./32.* + x12 + 3./64.*x2z + 3./32.*x12s + 1./64.*x2zs ) ZZ42s = ZZ42s + PZs**(-1)*vvs*GtM2*PwsM2*Xps*y*Xp*cqt**(-1)*vdts + * ( 1./64. ) ZZ42s = ZZ42s + PZs**(-1)*vvs*GtM2*PwsM2*Xps*y*cqt**(-1)*vdts + * ( - 1./64. - 1./16.*x12 - 1./32.*x2z ) ZZ42s = ZZ42s + PZs**(-1)*vvs*GtM2*PwsM2*y*Xp*cqt**(-1)*vdts * ( + 3./32.*x12*x2z + 1./16.*x12 + 1./32.*x2z + 5./64.*x12s + 1./ + 64.*x2zs ) ZZ42s = ZZ42s + PZs**(-1)*vvs*GtM2*PwsM2*y*cqt**(-1)*vdts * ( - + 3./32.*x12*x2z - 1./32.*x12*x2zs - 1./16.*x2z*x12s - 5./64.* + x12s - 1./32.*x12c - 1./64.*x2zs ) Time = 254.30 sec Generated terms = 548 ZZ10c Terms in output = 548 Bytes used = 10504 Time = 254.36 sec Generated terms = 614 ZZ20c Terms in output = 614 Bytes used = 11620 Time = 254.39 sec Generated terms = 375 ZZ30c Terms in output = 375 Bytes used = 7140 Time = 254.46 sec Generated terms = 723 ZZ40c Terms in output = 723 Bytes used = 13524 Time = 254.50 sec Generated terms = 470 ZZ11c Terms in output = 470 Bytes used = 9350 Time = 254.54 sec Generated terms = 480 ZZ21c Terms in output = 480 Bytes used = 9542 Time = 254.58 sec Generated terms = 391 ZZ31c Terms in output = 391 Bytes used = 7756 Time = 254.63 sec Generated terms = 561 ZZ41c Terms in output = 561 Bytes used = 11198 Time = 254.63 sec Generated terms = 0 ZZ12c Terms in output = 0 Bytes used = 2 Time = 254.63 sec Generated terms = 0 ZZ22c Terms in output = 0 Bytes used = 2 Time = 254.63 sec Generated terms = 0 ZZ32c Terms in output = 0 Bytes used = 2 Time = 254.63 sec Generated terms = 0 ZZ42c Terms in output = 0 Bytes used = 2 ZZ10c = + + rs1wz(1)*XX*PZs**(-1)*vvc*GtM2*ys*cst**(-1)*vdt * ( - 3./8.* + O*x12*x2z + 1./8.*O*x12*ux + 1./4.*O*x2z*ux + 1./8.*O*x2z - 1. + /8.*O*x2zs - 1./8.*O*uxs + 1./4.*Os*x12 + 1./4.*Os*x2z - 1./4. + *Os*ux - 1./8.*Oc + 1./8.*x12*x2z*ux - 1./4.*x12*x2z + 1./8.* + x12*x2zs - 1./8.*x12*uxs + 1./8.*x2z*ux - 1./4.*x2z*x12s + 3./ + 8.*ux*x12s - 3./8.*x12c - 1./4.*x2zs ) ZZ10c = ZZ10c + rs1wz(1)*PZs**(-1)*Xpi*vvc*GtM2*ys*cst**(-1)*vdt + * ( 3./16.*O*x12*x2z - 1./2.*O*x12 - 1./4.*O*x2z*ux + 1./8.*O* + ux + 3./16.*O*x2zs + 1./16.*O*uxs + 1./8.*O + 1./16.*Os*x12 + - 3./16.*Os*x2z + 1./16.*Os*ux + 1./8.*Os - 1./16.*x12*x2z* + ux + 3./8.*x12*x2z - 1./8.*x12*ux - 1./16.*x12*x2zs + 1./16.* + x12*uxs - 1./4.*x12 + 1./16.*x2z*ux - 1./8.*x2z*x12s - 1./2.* + x2z - 1./16.*ux*x12s + 1./8.*ux + 1./8.*x12s - 1./16.*x12c ) ZZ10c = ZZ10c + rs1wz(1)*PZs**(-1)*vvc*GtM2*Xps*ys*cst**(-1)*vdt + * ( 1./8. ) ZZ10c = ZZ10c + rs1wz(1)*PZs**(-1)*vvc*GtM2*ys*Xp*cst**(-1)*vdt + * ( - 5./16. + 5./16.*O - 1./16.*x12 - 1./4.*x2z + 1./8.*ux ) ZZ10c = ZZ10c + rs1wz(1)*PZs**(-1)*vvc*GtM2*ys*cst**(-1)*vdt * ( + 1./4. - 3./8.*O*x2z + 1./8.*O*ux - 3./16.*O + 1./16.*Os + 1./ + 16.*x12*x2z + 1./16.*x12 - 1./8.*x2z*ux + 9./16.*x2z - 3./16. + *ux + 3./16.*x12s + 1./8.*x2zs ) ZZ10c = ZZ10c + rs1wz(4)*XX*PZs**(-1)*vvc*GtM2*ys*cst**(-1)*vdt + * ( - 1./16.*O*x12*x2z*ux + 1./32.*O*x12*x2zs + 1./16.*O*x2z* + x12s + 1./32.*O*x2z*uxs - 1./32.*O*ux*x2zs + 1./32.*O*x2zs - + 1./32.*Os*x12*x2z + 1./32.*Os*x2z*ux - 1./32.*Os*x2zs + 1./32. + *x12*x2z*uxs - 1./16.*x12*ux*x2zs + 1./32.*x12*x2zc + 1./32.* + x12*x2zs - 3./32.*x2z*ux*x12s + 3./32.*x2z*x12c - 1./32.*ux* + x2zs + 1./8.*x12s*x2zs + 1./32.*x2zc ) ZZ10c = ZZ10c + rs1wz(4)*PZs**(-1)*Xpi*vvc*GtM2*ys*cst**(-1)*vdt + * ( 3./32.*O*x12*x2z*ux + 1./32.*O*x12*x2z - 1./16.*O*x12*ux - + 1./32.*O*x12*x2zs - 1./32.*O*x12*uxs - 1./64.*O*x2z*ux - 7./ + 64.*O*x2z*x12s - 1./32.*O*x2z*uxs + 1./16.*O*x2z + 5./64.*O* + ux*x12s + 1./32.*O*ux*x2zs + 1./16.*O*x12s - 5./64.*O*x12c - + 1./16.*O*x2zs + 1./32.*O*uxs + 1./32.*Os*x12*x2z + 1./64.*Os* + x12*ux - 1./32.*Os*x12 - 1./64.*Os*x2z*ux - 5./64.*Os*x2z + 1. + /32.*Os*ux - 1./64.*Os*x12s + 1./32.*Os*x2zs - 1./64.*Os*uxs + + 1./64.*Oc*x12 + 1./64.*Oc*x2z - 1./64.*Oc*ux - 3./64.*x12* + x2z*ux - 1./32.*x12*x2z*uxs + 1./16.*x12*x2z + 1./16.*x12*ux* + x2zs - 3./64.*x12*x12c - 1./32.*x12*x2zc + 3./64.*x12*x2zs + + 1./32.*x12*uxs + 7./64.*x2z*ux*x12s - 1./16.*x2z*ux + 11./64. + *x2z*x12s - 1./8.*x2z*x12c - 3./32.*ux*x12s + 3./64.*ux*x12c + - 7./64.*x12s*x2zs - 1./64.*x12s*uxs + 3./32.*x12c + 3./32.* + x2zs ) ZZ10c = ZZ10c + rs1wz(4)*PZs**(-1)*vvc*GtM2*Xps*ys*cst**(-1)*vdt + * ( - 1./32. + 1./32.*O + 1./32.*x12 ) ZZ10c = ZZ10c + rs1wz(4)*PZs**(-1)*vvc*GtM2*ys*Xp*cst**(-1)*vdt + * ( 1./32. - 1./32.*O*x12 - 1./16.*O*x2z + 1./32.*O*ux - 1./32. + *O + 1./64.*Os - 1./16.*x12*x2z + 1./32.*x12*ux + 1./32.*x12 + + 3./32.*x2z - 1./32.*ux - 3./64.*x12s ) ZZ10c = ZZ10c + rs1wz(4)*PZs**(-1)*vvc*GtM2*ys*cst**(-1)*vdt * ( + 1./64.*O*x12*x2z - 1./32.*O*x2z*ux + 1./16.*O*x2z - 1./64.*O* + ux + 3./64.*O*x12s + 1./32.*O*x2zs - 1./32.*O - 1./64.*Os*x2z + + 3./64.*Os - 1./64.*Oc - 1./32.*x12*x2z*ux - 5./64.*x12*x2z + - 1./64.*x12*ux + 1./32.*x12*x2zs - 1./32.*x12 + 1./16.*x2z* + ux + 1./32.*x2z*x12s - 3./32.*x2z + 1./32.*ux - 3./64.*x12s + + 1./32.*x12c - 3./32.*x2zs ) ZZ10c = ZZ10c + rs1wz(7)*XX*PZs**(-1)*vvc*GtM2*ys*cst**(-1)*vdt + * ( - 1./64.*O*x12*x2zs + 1./64.*O*x2z*x12s - 1./64.*O*x2z*uxs + + 1./32.*O*ux*x2zs - 1./64.*O*x2zc + 1./32.*O*x2zs + 1./64.* + Os*x12*x2z - 1./32.*Os*x2z*ux + 1./64.*Os*x2zs - 1./64.*Oc* + x2z - 1./64.*x12*x2z*uxs + 1./64.*x12*ux*x2zs + 1./64.*x12* + x2zc - 1./16.*x12*x2zs + 1./32.*x2z*ux*x12s - 1./64.*x2z*x12c + + 1./64.*ux*x2zs - 1./32.*x2zc ) ZZ10c = ZZ10c + rs1wz(7)*PZs**(-1)*Xpi*vvc*GtM2*ys*cst**(-1)*vdt + * ( - 1./32.*O*x12*x2z*ux + 1./64.*O*x12*x2z + 3./128.*O*x12* + x2zs + 1./64.*O*x12*uxs + 3./128.*O*x2z*ux + 1./64.*O*x2z*uxs + + 1./16.*O*x2z - 1./64.*O*ux*x12s - 5./128.*O*ux*x2zs + 1./ + 64.*O*x12s + 3./128.*O*x2zc - 1./64.*O*x2zs - 1./64.*O*uxs - + 1./64.*Os*x12*x2z + 1./64.*Os*x12*ux + 1./64.*Os*x12 + 1./128. + *Os*x2z*ux - 1./64.*Os*x2z - 1./32.*Os*ux - 1./64.*Os*x12s - + 1./128.*Os*x2zs + 1./128.*Os*uxs + 1./64.*Oc*ux - 1./64.*Oc + + 1./128.*Oq + 1./128.*x12*x2z*ux + 1./64.*x12*x2z*uxs - 1./ + 8.*x12*x2z - 3./128.*x12*ux*x2zs + 1./128.*x12*x12c + 9./128. + *x12*x2zs - 1./64.*x12*uxs - 5./128.*x2z*ux*x12s + 1./32.*x2z + *ux + 1./16.*x2z*x12s + 1./64.*x2z*x12c + 1./32.*ux*x12s - 1./ + 64.*ux*x12c + 1./128.*x12s*x2zs + 1./128.*x12s*uxs - 1./64.* + x12c + 1./128.*x2zc - 5./64.*x2zs ) ZZ10c = ZZ10c + rs1wz(7)*PZs**(-1)*vvc*GtM2*Xps*ys*cst**(-1)*vdt + * ( 1./64. - 1./64.*O - 1./64.*x12 ) ZZ10c = ZZ10c + rs1wz(7)*PZs**(-1)*vvc*GtM2*ys*Xp*cst**(-1)*vdt + * ( - 1./64. + 3./64.*O*x12 + 3./64.*O*x2z - 1./64.*O*ux + 3./ + 128.*O - 1./128.*Os + 3./64.*x12*x2z - 1./64.*x12*ux - 5./128. + *x12 - 7./128.*x2z + 1./64.*ux + 7./128.*x12s ) ZZ10c = ZZ10c + rs1wz(7)*PZs**(-1)*vvc*GtM2*ys*cst**(-1)*vdt * ( + - 7./128.*O*x12*x2z + 1./64.*O*x12*ux - 1./32.*O*x12 + 3./ + 128.*O*x2z*ux - 7./128.*O*x2z + 1./128.*O*ux - 5./128.*O*x2zs + - 1./32.*O + 1./128.*Os*x2z + 1./128.*Os*ux + 1./32.*Os + 3./ + 128.*x12*x2z*ux + 3./64.*x12*x2z + 1./128.*x12*ux - 3./64.* + x12*x2zs + 1./16.*x12 - 1./32.*x2z*ux - 1./16.*x2z*x12s + 1./ + 16.*x2z + 1./128.*ux*x12s - 1./64.*ux - 1./16.*x12s + 1./16.* + x2zs ) ZZ10c = ZZ10c + rs1wz(10)*XX*PZs**(-1)*vvc*GtM2*ys*cst**(-1)*vdt + * ( 1./64.*O*x12*x2zs - 1./64.*O*x2z*x12s + 1./64.*O*x2z*uxs - + 1./32.*O*ux*x2zs + 1./64.*O*x2zc - 1./32.*O*x2zs - 1./64.*Os* + x12*x2z + 1./32.*Os*x2z*ux - 1./64.*Os*x2zs + 1./64.*Oc*x2z + + 1./64.*x12*x2z*uxs - 1./64.*x12*ux*x2zs - 1./64.*x12*x2zc + + 1./16.*x12*x2zs - 1./32.*x2z*ux*x12s + 1./64.*x2z*x12c - 1. + /64.*ux*x2zs + 1./32.*x2zc ) ZZ10c = ZZ10c + rs1wz(10)*PZs**(-1)*Xpi*vvc*GtM2*ys*cst**(-1)*vdt + * ( 1./32.*O*x12*x2z*ux - 1./64.*O*x12*x2z - 3./128.*O*x12*x2zs + - 1./64.*O*x12*uxs - 3./128.*O*x2z*ux - 1./64.*O*x2z*uxs - 1. + /16.*O*x2z + 1./64.*O*ux*x12s + 5./128.*O*ux*x2zs - 1./64.*O* + x12s - 3./128.*O*x2zc + 1./64.*O*x2zs + 1./64.*O*uxs + 1./64. + *Os*x12*x2z - 1./64.*Os*x12*ux - 1./64.*Os*x12 - 1./128.*Os* + x2z*ux + 1./64.*Os*x2z + 1./32.*Os*ux + 1./64.*Os*x12s + 1./ + 128.*Os*x2zs - 1./128.*Os*uxs - 1./64.*Oc*ux + 1./64.*Oc - 1./ + 128.*Oq - 1./128.*x12*x2z*ux - 1./64.*x12*x2z*uxs + 1./8.*x12 + *x2z + 3./128.*x12*ux*x2zs - 1./128.*x12*x12c - 9./128.*x12* + x2zs + 1./64.*x12*uxs + 5./128.*x2z*ux*x12s - 1./32.*x2z*ux + - 1./16.*x2z*x12s - 1./64.*x2z*x12c - 1./32.*ux*x12s + 1./64. + *ux*x12c - 1./128.*x12s*x2zs - 1./128.*x12s*uxs + 1./64.*x12c + - 1./128.*x2zc + 5./64.*x2zs ) ZZ10c = ZZ10c + rs1wz(10)*PZs**(-1)*vvc*GtM2*Xps*ys*cst**(-1)*vdt + * ( - 1./64. + 1./64.*O + 1./64.*x12 ) ZZ10c = ZZ10c + rs1wz(10)*PZs**(-1)*vvc*GtM2*ys*Xp*cst**(-1)*vdt + * ( 1./64. - 3./64.*O*x12 - 3./64.*O*x2z + 1./64.*O*ux - 3./128. + *O + 1./128.*Os - 3./64.*x12*x2z + 1./64.*x12*ux + 5./128.* + x12 + 7./128.*x2z - 1./64.*ux - 7./128.*x12s ) ZZ10c = ZZ10c + rs1wz(10)*PZs**(-1)*vvc*GtM2*ys*cst**(-1)*vdt + * ( 7./128.*O*x12*x2z - 1./64.*O*x12*ux + 1./32.*O*x12 - 3./128. + *O*x2z*ux + 7./128.*O*x2z - 1./128.*O*ux + 5./128.*O*x2zs + 1. + /32.*O - 1./128.*Os*x2z - 1./128.*Os*ux - 1./32.*Os - 3./128. + *x12*x2z*ux - 3./64.*x12*x2z - 1./128.*x12*ux + 3./64.*x12* + x2zs - 1./16.*x12 + 1./32.*x2z*ux + 1./16.*x2z*x12s - 1./16.* + x2z - 1./128.*ux*x12s + 1./64.*ux + 1./16.*x12s - 1./16.*x2zs + ) ZZ10c = ZZ10c + rs1wz(11)*PZs**(-1)*Xpi*vvc*GtM2*ys*cst**(-1)*vdt + * ( - 1./32.*O*x12*x2z + 1./16.*O*x12*ux + 1./32.*O*x2z*ux - 1. + /32.*O*x2z - 1./16.*O*x12s - 1./32.*O*uxs + 1./32.*Os*x12 + 1. + /32.*Os*x2z - 1./32.*Os*ux + 1./16.*x12*x2z*ux - 1./32.*x12* + x2z - 1./32.*x12*x2zs - 1./32.*x12*uxs + 1./32.*x2z*ux - 1./8. + *x2z*x12s + 3./32.*ux*x12s - 3./32.*x12c - 1./32.*x2zs ) ZZ10c = ZZ10c + rs1wz(11)*PZs**(-1)*vvc*GtM2*Xps*ys*cst**(-1)*vdt + * ( 1./16. ) ZZ10c = ZZ10c + rs1wz(11)*PZs**(-1)*vvc*GtM2*ys*Xp*cst**(-1)*vdt + * ( - 1./32. + 1./32.*O - 5./32.*x12 - 1./8.*x2z + 1./16.*ux ) ZZ10c = ZZ10c + rs1wz(11)*PZs**(-1)*vvc*GtM2*ys*cst**(-1)*vdt + * ( - 1./32.*O*x2z + 1./32.*O - 1./32.*Os + 3./16.*x12*x2z - 1. + /16.*x12*ux + 1./32.*x12 - 1./16.*x2z*ux + 1./16.*x2z - 1./32. + *ux + 5./32.*x12s + 1./16.*x2zs ) ZZ10c = ZZ10c + rs1wz(12)*XX*PZs**(-1)*vvc*GtM2*ys*cst**(-1)*vdt + * ( 1./16.*O*x12*ux + 1./16.*O*x2z*ux + 1./16.*O*x2z - 1./16.*O + *uxs + 1./8.*Os*x12 + 1./16.*Os*x2z - 1./8.*Os*ux - 1./16.*Oc + + 1./8.*x12*x2z*ux - 1./8.*x12*x2z - 1./16.*x12*x2zs - 1./16. + *x12*uxs + 1./16.*x2z*ux - 1./4.*x2z*x12s + 3./16.*ux*x12s - + 3./16.*x12c - 1./16.*x2zs ) ZZ10c = ZZ10c + rs1wz(12)*PZs**(-1)*Xpi*vvc*GtM2*ys*cst**(-1)*vdt + * ( - 1./16.*O*x12*ux - 1./16.*O*x12 - 1./16.*O*x2z*ux + 1./16. + *O*x2z + 1./32.*O*x12s + 1./16.*O*uxs + 1./16.*O - 1./16.*Os* + x12 - 1./16.*Os*x2z + 3./32.*Os*ux + 1./32.*Oc - 1./8.*x12* + x2z*ux - 1./16.*x12*x2z + 1./16.*x12*x2zs + 1./16.*x12*uxs - + 1./8.*x12 + 3./16.*x2z*x12s - 1./8.*x2z - 5./32.*ux*x12s + 1./ + 16.*ux - 1./16.*x12s + 1./8.*x12c ) ZZ10c = ZZ10c + rs1wz(12)*PZs**(-1)*vvc*GtM2*ys*Xp*cst**(-1)*vdt + * ( - 3./32. + 1./16.*O + 1./16.*x12 ) ZZ10c = ZZ10c + rs1wz(12)*PZs**(-1)*vvc*GtM2*ys*cst**(-1)*vdt + * ( 1./16. - 1./32.*O*x12 - 1./16.*O*x2z + 1./32.*O*ux - 3./32. + *O + 1./32.*Os - 1./32.*x12*x2z + 1./32.*x12*ux + 5./32.*x12 + + 5./32.*x2z - 1./16.*ux - 1./16.*x12s ) ZZ10c = ZZ10c + rs1wz(13)*XX*PZs**(-1)*vvc*GtM2*ys*cst**(-1)*vdt + * ( - 3./32.*O*x12*x2z + 1./32.*O*x12*ux + 1./16.*O*x2z*ux + 1. + /32.*O*x2z - 1./32.*O*x2zs - 1./32.*O*uxs + 1./16.*Os*x12 + 1. + /16.*Os*x2z - 1./16.*Os*ux - 1./32.*Oc + 1./32.*x12*x2z*ux - + 1./16.*x12*x2z + 1./32.*x12*x2zs - 1./32.*x12*uxs + 1./32.* + x2z*ux - 1./16.*x2z*x12s + 3./32.*ux*x12s - 3./32.*x12c - 1./ + 16.*x2zs ) ZZ10c = ZZ10c + rs1wz(13)*PZs**(-1)*Xpi*vvc*GtM2*ys*cst**(-1)*vdt + * ( 1./32.*O*x12*x2z - 1./32.*O*x12 - 5./64.*O*x2z*ux - 1./64.* + O*x2z - 1./32.*O*x12s + 3./64.*O*x2zs + 1./32.*O*uxs + 1./32. + *O - 1./32.*Os*x12 - 1./16.*Os*x2z + 1./16.*Os*ux + 1./32.*Oc + - 3./64.*x12*x2z*ux + 5./64.*x12*x2z + 1./32.*x12*uxs - 1./ + 16.*x12 + 1./32.*x2z*x12s - 3./32.*x2z - 1./16.*ux*x12s + 1./ + 32.*ux - 1./32.*x12s + 1./32.*x12c + 1./64.*x2zs ) ZZ10c = ZZ10c + rs1wz(13)*PZs**(-1)*vvc*GtM2*ys*Xp*cst**(-1)*vdt + * ( - 1./32. ) ZZ10c = ZZ10c + rs1wz(13)*PZs**(-1)*vvc*GtM2*ys*cst**(-1)*vdt + * ( 1./32. + 1./32.*O*x12 - 1./64.*O*x2z - 1./32.*O - 3./64.* + x12*x2z + 1./16.*x12 + 5./64.*x2z - 1./32.*ux + 1./32.*x12s ) ZZ10c = ZZ10c + rs1wz(14)*XX*PZs**(-1)*vvc*GtM2*ys*cst**(-1)*vdt + * ( 3./32.*O*x12*x2z - 1./32.*O*x2z*ux + 1./32.*O*x2zs - 1./32. + *Os*x2z + 1./32.*x12*x2z*ux - 1./16.*x12*x2zs - 1./16.*x2z* + x12s + 1./32.*x2zs ) ZZ10c = ZZ10c + rs1wz(14)*PZs**(-1)*Xpi*vvc*GtM2*ys*cst**(-1)*vdt + * ( - 3./64.*O*x12*x2z + 3./32.*O*x12 + 1./16.*O*x2z*ux + 1./ + 16.*O*x2z - 1./32.*O*ux + 1./64.*O*x12s - 3./64.*O*x2zs - 1./ + 64.*O*uxs + 1./64.*Os*x12 + 3./64.*Os*x2z - 1./32.*Os*ux - 1./ + 32.*Os - 1./64.*Oc + 1./64.*x12*x2z*ux - 3./16.*x12*x2z + 1./ + 32.*x12*ux + 1./64.*x12*x2zs - 1./64.*x12*uxs + 1./64.*x2z*ux + + 1./16.*x2z + 1./32.*ux*x12s - 1./16.*x12s - 1./64.*x12c - + 1./32.*x2zs ) ZZ10c = ZZ10c + rs1wz(14)*PZs**(-1)*vvc*GtM2*Xps*ys*cst**(-1)*vdt + * ( 1./32. ) ZZ10c = ZZ10c + rs1wz(14)*PZs**(-1)*vvc*GtM2*ys*Xp*cst**(-1)*vdt + * ( 1./64.*O - 9./64.*x12 - 1./16.*x2z + 1./32.*ux ) ZZ10c = ZZ10c + rs1wz(14)*PZs**(-1)*vvc*GtM2*ys*cst**(-1)*vdt + * ( - 1./32. - 3./64.*O*x12 - 1./64.*O*ux - 1./32.*O + 3./16.* + x12*x2z - 3./64.*x12*ux + 1./8.*x12 - 1./32.*x2z*ux - 1./64.* + ux + 5./64.*x12s + 1./32.*x2zs ) ZZ20c = + + rs1wz(1)*XX*PZs**(-1)*vvc*GtM2*ys*cst**(-1)*vdt * ( - 9./8.* + O*x12*x2z + 3./8.*O*x12*ux + 3./4.*O*x2z*ux + 3./8.*O*x2z - 3. + /8.*O*x2zs - 3./8.*O*uxs + 3./4.*Os*x12 + 3./4.*Os*x2z - 3./4. + *Os*ux - 3./8.*Oc + 3./8.*x12*x2z*ux - 3./4.*x12*x2z + 3./8.* + x12*x2zs - 3./8.*x12*uxs + 3./8.*x2z*ux - 3./4.*x2z*x12s + 9./ + 8.*ux*x12s - 9./8.*x12c - 3./4.*x2zs ) ZZ20c = ZZ20c + rs1wz(1)*PZs**(-1)*Xpi*vvc*GtM2*ys*cst**(-1)*vdt + * ( 5./16.*O*x12*x2z + 1./8.*O*x12*ux - 3./2.*O*x12 - 5./8.*O* + x2z*ux + 3./8.*O*ux - 1./8.*O*x12s + 7./16.*O*x2zs + 3./16.*O + *uxs + 3./8.*O + 3./16.*Os*x12 - 9./16.*Os*x2z + 5./16.*Os*ux + + 3./8.*Os + 1./8.*Oc - 3./16.*x12*x2z*ux + 9./8.*x12*x2z - + 3./8.*x12*ux - 3./16.*x12*x2zs + 3./16.*x12*uxs - 3./4.*x12 + + 3./16.*x2z*ux - 3./8.*x2z*x12s - 3./2.*x2z - 3./16.*ux* + x12s + 3./8.*ux + 3./8.*x12s - 3./16.*x12c ) ZZ20c = ZZ20c + rs1wz(1)*PZs**(-1)*vvc*GtM2*Xps*ys*cst**(-1)*vdt + * ( 1./8. ) ZZ20c = ZZ20c + rs1wz(1)*PZs**(-1)*vvc*GtM2*ys*Xp*cst**(-1)*vdt + * ( - 9./16. + 5./16.*O - 1./16.*x12 - 1./4.*x2z + 1./8.*ux ) ZZ20c = ZZ20c + rs1wz(1)*PZs**(-1)*vvc*GtM2*ys*cst**(-1)*vdt * ( + 3./4. + 1./2.*O*x12 - 1./2.*O*x2z + 1./4.*O*ux - 11./16.*O + + 3./16.*Os - 1./16.*x12*x2z + 1./8.*x12*ux + 1./16.*x12 - 1./8. + *x2z*ux + 21./16.*x2z - 9./16.*ux + 9./16.*x12s + 1./8.*x2zs + ) ZZ20c = ZZ20c + rs1wz(4)*XX*PZs**(-1)*vvc*GtM2*ys*cst**(-1)*vdt + * ( - 3./16.*O*x12*x2z*ux + 3./32.*O*x12*x2zs + 3./16.*O*x2z* + x12s + 3./32.*O*x2z*uxs - 3./32.*O*ux*x2zs + 3./32.*O*x2zs - + 3./32.*Os*x12*x2z + 3./32.*Os*x2z*ux - 3./32.*Os*x2zs + 3./32. + *x12*x2z*uxs - 3./16.*x12*ux*x2zs + 3./32.*x12*x2zc + 3./32.* + x12*x2zs - 9./32.*x2z*ux*x12s + 9./32.*x2z*x12c - 3./32.*ux* + x2zs + 3./8.*x12s*x2zs + 3./32.*x2zc ) ZZ20c = ZZ20c + rs1wz(4)*PZs**(-1)*Xpi*vvc*GtM2*ys*cst**(-1)*vdt + * ( 7./32.*O*x12*x2z*ux + 7./64.*O*x12*x2z - 3./16.*O*x12*ux - + 5./64.*O*x12*x2zs - 1./16.*O*x12*uxs - 1./32.*O*x2z*ux - 19./ + 64.*O*x2z*x12s - 5./64.*O*x2z*uxs + 3./16.*O*x2z + 3./16.*O* + ux*x12s + 5./64.*O*ux*x2zs + 3./16.*O*x12s - 7./32.*O*x12c - + 11./64.*O*x2zs + 3./32.*O*uxs + 1./16.*Os*x12*x2z + 3./64.*Os + *x12*ux - 3./32.*Os*x12 - 3./64.*Os*x2z*ux - 13./64.*Os*x2z + + 3./32.*Os*ux - 1./16.*Os*x12s + 5./64.*Os*x2zs - 1./32.*Os + *uxs + 1./32.*Oc*x12 + 1./32.*Oc*x2z - 1./32.*Oc*ux - 1./8.* + x12*x2z*ux - 5./64.*x12*x2z*uxs + 3./16.*x12*x2z + 5./32.*x12 + *ux*x2zs - 1./8.*x12*x12c - 5./64.*x12*x2zc + 7./64.*x12*x2zs + + 3./32.*x12*uxs + 17./64.*x2z*ux*x12s - 3./16.*x2z*ux + 1./ + 2.*x2z*x12s - 21./64.*x2z*x12c - 9./32.*ux*x12s + 7./64.*ux* + x12c + 1./64.*ux*x2zs - 9./32.*x12s*x2zs - 1./32.*x12s*uxs + + 9./32.*x12c - 1./64.*x2zc + 9./32.*x2zs ) ZZ20c = ZZ20c + rs1wz(4)*PZs**(-1)*vvc*GtM2*Xps*ys*cst**(-1)*vdt + * ( - 1./32. + 1./32.*O + 1./32.*x12 ) ZZ20c = ZZ20c + rs1wz(4)*PZs**(-1)*vvc*GtM2*ys*Xp*cst**(-1)*vdt + * ( 3./32. - 1./32.*O*x12 - 1./16.*O*x2z + 1./32.*O*ux - 1./16. + *O + 1./64.*Os - 1./16.*x12*x2z + 1./32.*x12*ux + 1./8.*x2z + - 1./32.*ux - 3./64.*x12s ) ZZ20c = ZZ20c + rs1wz(4)*PZs**(-1)*vvc*GtM2*ys*cst**(-1)*vdt * ( + - 1./32.*O*x12*x2z + 1./32.*O*x12*ux - 1./64.*O*x12 - 3./64. + *O*x2z*ux + 9./64.*O*x2z - 1./16.*O*ux + 9./64.*O*x12s + 3./ + 64.*O*x2zs - 3./32.*O + 3./64.*Os*x12 - 1./32.*Os*x2z + 1./64. + *Os*ux + 7./64.*Os - 1./64.*Oc - 3./64.*x12*x2z*ux - 7./64.* + x12*x2z - 1./16.*x12*ux + 1./64.*x12*x2zs - 3./32.*x12 + 7./ + 64.*x2z*ux - 9./32.*x2z + 1./64.*ux*x12s + 3./32.*ux - 1./8.* + x12s + 5./64.*x12c - 11./64.*x2zs ) ZZ20c = ZZ20c + rs1wz(7)*XX*PZs**(-1)*vvc*GtM2*ys*cst**(-1)*vdt + * ( - 3./64.*O*x12*x2zs + 3./64.*O*x2z*x12s - 3./64.*O*x2z*uxs + + 3./32.*O*ux*x2zs - 3./64.*O*x2zc + 3./32.*O*x2zs + 3./64.* + Os*x12*x2z - 3./32.*Os*x2z*ux + 3./64.*Os*x2zs - 3./64.*Oc* + x2z - 3./64.*x12*x2z*uxs + 3./64.*x12*ux*x2zs + 3./64.*x12* + x2zc - 3./16.*x12*x2zs + 3./32.*x2z*ux*x12s - 3./64.*x2z*x12c + + 3./64.*ux*x2zs - 3./32.*x2zc ) ZZ20c = ZZ20c + rs1wz(7)*PZs**(-1)*Xpi*vvc*GtM2*ys*cst**(-1)*vdt + * ( - 3./64.*O*x12*x2z*ux + 11./128.*O*x12*x2z - 1./64.*O*x12* + ux + 1./32.*O*x12*x2zs + 1./32.*O*x12*uxs + 1./64.*O*x2z*ux + - 1./32.*O*x2z*x12s + 5./128.*O*x2z*uxs + 3./16.*O*x2z - 3./ + 128.*O*ux*x12s - 3./32.*O*ux*x2zs + 3./64.*O*x12s - 1./128.*O + *x12c + 7./128.*O*x2zc - 1./128.*O*x2zs - 1./32.*O*uxs - 3./ + 64.*Os*x12*x2z + 3./64.*Os*x12*ux + 1./32.*Os*x12 + 5./128.* + Os*x2z*ux - 1./16.*Os*x2z - 5./64.*Os*ux - 5./128.*Os*x12s - + 1./32.*Os*x2zs + 1./64.*Os*uxs + 1./128.*Oc*x12 + 1./128.*Oc* + x2z + 5./128.*Oc*ux - 3./64.*Oc + 3./128.*Oq - 1./64.*x12*x2z + *ux + 5./128.*x12*x2z*uxs - 25./64.*x12*x2z - 7./128.*x12*ux* + x2zs + 1./64.*x12*x12c - 1./128.*x12*x2zc + 31./128.*x12*x2zs + - 1./32.*x12*uxs - 11./128.*x2z*ux*x12s + 7./64.*x2z*ux + 29. + /128.*x2z*x12s + 3./128.*x2z*x12c + 1./16.*ux*x12s - 1./32.* + ux*x12c - 1./128.*ux*x2zs + 1./64.*x12s*uxs - 1./32.*x12c + 1. + /32.*x2zc ) ZZ20c = ZZ20c + rs1wz(7)*PZs**(-1)*Xpi*vvc*GtM2*ys*cst**(-1)*vdt + * ( - 1./4.*x2zs ) ZZ20c = ZZ20c + rs1wz(7)*PZs**(-1)*vvc*GtM2*Xps*ys*cst**(-1)*vdt + * ( 1./64. - 1./64.*O - 1./64.*x12 ) ZZ20c = ZZ20c + rs1wz(7)*PZs**(-1)*vvc*GtM2*ys*Xp*cst**(-1)*vdt + * ( - 3./64. + 3./64.*O*x12 + 3./64.*O*x2z - 1./64.*O*ux + 5./ + 128.*O - 1./128.*Os + 3./64.*x12*x2z - 1./64.*x12*ux - 3./128. + *x12 - 9./128.*x2z + 1./64.*ux + 7./128.*x12s ) ZZ20c = ZZ20c + rs1wz(7)*PZs**(-1)*vvc*GtM2*ys*cst**(-1)*vdt * ( + - 3./64.*O*x12*x2z - 15./128.*O*x12 + 1./32.*O*x2z*ux - 5./ + 32.*O*x2z + 3./64.*O*ux + 1./16.*O*x12s - 3./64.*O*x2zs - 3./ + 32.*O + 1./128.*Os*x12 + 1./32.*Os*x2z + 3./32.*Os - 1./64.* + Oc + 1./32.*x12*x2z*ux + 1./64.*x12*x2z + 3./64.*x12*ux - 9./ + 128.*x12*x2zs + 13./64.*x12 - 7./128.*x2z*ux - 5./64.*x2z* + x12s + 13./64.*x2z - 1./16.*ux - 27./128.*x12s + 5./128.*x12c + + 15./128.*x2zs ) ZZ20c = ZZ20c + rs1wz(8)*PZs**(-1)*Xpi*vvc*GtM2*ys*cst**(-1)*vdt + * ( 1./32.*O*x12*ux + 1./32.*O*x2z*ux - 1./16.*O*x2z - 1./32.*O + *uxs + 1./32.*Os*x12 + 1./32.*Os*x2z - 1./32.*Os*ux + 1./16.* + x12*x2z*ux + 1./32.*x12*x2z - 1./32.*x12*x2zs - 1./32.*x12* + uxs - 1./32.*x2z*ux - 1./16.*x2z*x12s + 1./16.*ux*x12s - 1./ + 32.*x12c + 1./32.*x2zs ) ZZ20c = ZZ20c + rs1wz(8)*PZs**(-1)*vvc*GtM2*ys*cst**(-1)*vdt * ( + - 1./32.*O*x12 + 1./32.*O*x2z - 1./32.*O*ux + 1./16.*O - 1./ + 16.*Os + 1./32.*x12*x2z - 1./32.*x12*ux - 1./32.*x12 - 1./32. + *x2z + 1./32.*ux + 1./32.*x12s ) ZZ20c = ZZ20c + rs1wz(9)*PZs**(-1)*Xpi*vvc*GtM2*ys*cst**(-1)*vdt + * ( 1./8.*O*x12 + 1./8.*O*x2z - 1./8.*O*ux - 1./8.*Os ) ZZ20c = ZZ20c + rs1wz(10)*XX*PZs**(-1)*vvc*GtM2*ys*cst**(-1)*vdt + * ( 3./64.*O*x12*x2zs - 3./64.*O*x2z*x12s + 3./64.*O*x2z*uxs - + 3./32.*O*ux*x2zs + 3./64.*O*x2zc - 3./32.*O*x2zs - 3./64.*Os* + x12*x2z + 3./32.*Os*x2z*ux - 3./64.*Os*x2zs + 3./64.*Oc*x2z + + 3./64.*x12*x2z*uxs - 3./64.*x12*ux*x2zs - 3./64.*x12*x2zc + + 3./16.*x12*x2zs - 3./32.*x2z*ux*x12s + 3./64.*x2z*x12c - 3. + /64.*ux*x2zs + 3./32.*x2zc ) ZZ20c = ZZ20c + rs1wz(10)*PZs**(-1)*Xpi*vvc*GtM2*ys*cst**(-1)*vdt + * ( 3./64.*O*x12*x2z*ux - 7./128.*O*x12*x2z - 1./32.*O*x12*x2zs + - 1./32.*O*x12*uxs - 1./16.*O*x2z*ux + 1./32.*O*x2z*x12s - 5. + /128.*O*x2z*uxs - 3./16.*O*x2z + 3./128.*O*ux*x12s + 3./32.*O + *ux*x2zs - 3./64.*O*x12s + 1./128.*O*x12c - 7./128.*O*x2zc + + 5./128.*O*x2zs + 3./64.*O*uxs + 3./64.*Os*x12*x2z - 3./64.*Os + *x12*ux - 3./64.*Os*x12 - 5./128.*Os*x2z*ux + 3./64.*Os*x2z + + 3./32.*Os*ux + 5./128.*Os*x12s + 1./32.*Os*x2zs - 1./64.* + Os*uxs - 1./128.*Oc*x12 - 1./128.*Oc*x2z - 5./128.*Oc*ux + 3./ + 64.*Oc - 3./128.*Oq - 1./64.*x12*x2z*ux - 5./128.*x12*x2z*uxs + + 3./8.*x12*x2z + 7./128.*x12*ux*x2zs - 1./64.*x12*x12c + 1./ + 128.*x12*x2zc - 29./128.*x12*x2zs + 3./64.*x12*uxs + 11./128. + *x2z*ux*x12s - 3./32.*x2z*ux - 25./128.*x2z*x12s - 3./128.* + x2z*x12c - 3./32.*ux*x12s + 1./32.*ux*x12c + 1./128.*ux*x2zs + - 1./64.*x12s*uxs + 3./64.*x12c - 1./32.*x2zc + 15./64.*x2zs + ) ZZ20c = ZZ20c + rs1wz(10)*PZs**(-1)*vvc*GtM2*Xps*ys*cst**(-1)*vdt + * ( - 1./64. + 1./64.*O + 1./64.*x12 ) ZZ20c = ZZ20c + rs1wz(10)*PZs**(-1)*vvc*GtM2*ys*Xp*cst**(-1)*vdt + * ( 3./64. - 3./64.*O*x12 - 3./64.*O*x2z + 1./64.*O*ux - 5./128. + *O + 1./128.*Os - 3./64.*x12*x2z + 1./64.*x12*ux + 3./128.* + x12 + 9./128.*x2z - 1./64.*ux - 7./128.*x12s ) ZZ20c = ZZ20c + rs1wz(10)*PZs**(-1)*vvc*GtM2*ys*cst**(-1)*vdt + * ( 3./64.*O*x12*x2z + 13./128.*O*x12 - 1./32.*O*x2z*ux + 9./64. + *O*x2z - 1./32.*O*ux - 1./16.*O*x12s + 3./64.*O*x2zs + 3./32. + *O - 1./128.*Os*x12 - 1./32.*Os*x2z - 3./32.*Os + 1./64.*Oc + - 1./32.*x12*x2z*ux - 1./32.*x12*x2z - 1./32.*x12*ux + 9./ + 128.*x12*x2zs - 3./16.*x12 + 7./128.*x2z*ux + 5./64.*x2z*x12s + - 3./16.*x2z + 3./64.*ux + 25./128.*x12s - 5./128.*x12c - 15. + /128.*x2zs ) ZZ20c = ZZ20c + rs1wz(11)*PZs**(-1)*Xpi*vvc*GtM2*ys*cst**(-1)*vdt + * ( - 3./32.*O*x12*x2z + 5./32.*O*x12*ux + 1./16.*O*x2z*ux - 1. + /32.*O*x2z - 3./16.*O*x12s - 1./16.*O*uxs + 1./16.*Os*x12 + 1. + /16.*Os*x2z - 1./16.*Os*ux + 1./8.*x12*x2z*ux - 1./8.*x12*x2z + - 1./16.*x12*x2zs - 1./16.*x12*uxs + 1./8.*x2z*ux - 5./16.* + x2z*x12s + 7./32.*ux*x12s - 1./4.*x12c - 1./8.*x2zs ) ZZ20c = ZZ20c + rs1wz(11)*PZs**(-1)*vvc*GtM2*Xps*ys*cst**(-1)*vdt + * ( 1./16. ) ZZ20c = ZZ20c + rs1wz(11)*PZs**(-1)*vvc*GtM2*ys*Xp*cst**(-1)*vdt + * ( - 3./32. + 1./32.*O - 5./32.*x12 - 1./8.*x2z + 1./16.*ux ) ZZ20c = ZZ20c + rs1wz(11)*PZs**(-1)*vvc*GtM2*ys*cst**(-1)*vdt + * ( 3./32.*O*x12 - 1./16.*O*x2z + 1./32.*O*ux + 1./32.*O - 1./ + 32.*Os + 7./32.*x12*x2z - 1./32.*x12*ux + 1./8.*x12 - 1./16.* + x2z*ux + 7./32.*x2z - 1./8.*ux + 1./4.*x12s + 1./16.*x2zs ) ZZ20c = ZZ20c + rs1wz(12)*XX*PZs**(-1)*vvc*GtM2*ys*cst**(-1)*vdt + * ( 3./16.*O*x12*ux + 3./16.*O*x2z*ux + 3./16.*O*x2z - 3./16.*O + *uxs + 3./8.*Os*x12 + 3./16.*Os*x2z - 3./8.*Os*ux - 3./16.*Oc + + 3./8.*x12*x2z*ux - 3./8.*x12*x2z - 3./16.*x12*x2zs - 3./16. + *x12*uxs + 3./16.*x2z*ux - 3./4.*x2z*x12s + 9./16.*ux*x12s - + 9./16.*x12c - 3./16.*x2zs ) ZZ20c = ZZ20c + rs1wz(12)*PZs**(-1)*Xpi*vvc*GtM2*ys*cst**(-1)*vdt + * ( - 5./32.*O*x12*ux - 3./16.*O*x12 - 5./32.*O*x2z*ux + 1./8. + *O*x2z + 3./32.*O*x12s + 5./32.*O*uxs + 3./16.*O - 5./32.*Os* + x12 - 5./32.*Os*x2z + 1./4.*Os*ux + 3./32.*Oc - 5./16.*x12* + x2z*ux - 5./32.*x12*x2z + 5./32.*x12*x2zs + 5./32.*x12*uxs - + 3./8.*x12 - 1./32.*x2z*ux + 1./2.*x2z*x12s - 3./8.*x2z - 13./ + 32.*ux*x12s + 3./16.*ux - 3./16.*x12s + 11./32.*x12c + 1./32. + *x2zs ) ZZ20c = ZZ20c + rs1wz(12)*PZs**(-1)*vvc*GtM2*ys*Xp*cst**(-1)*vdt + * ( - 5./32. + 1./16.*O + 1./16.*x12 ) ZZ20c = ZZ20c + rs1wz(12)*PZs**(-1)*vvc*GtM2*ys*cst**(-1)*vdt + * ( 3./16. - 3./32.*O*x2z + 1./16.*O*ux - 9./32.*O + 3./32.*Os + + 1./16.*x12*ux + 3./8.*x12 + 5./16.*x2z - 5./32.*ux - 3./32. + *x12s ) ZZ20c = ZZ20c + rs1wz(13)*XX*PZs**(-1)*vvc*GtM2*ys*cst**(-1)*vdt + * ( - 9./32.*O*x12*x2z + 3./32.*O*x12*ux + 3./16.*O*x2z*ux + 3. + /32.*O*x2z - 3./32.*O*x2zs - 3./32.*O*uxs + 3./16.*Os*x12 + 3. + /16.*Os*x2z - 3./16.*Os*ux - 3./32.*Oc + 3./32.*x12*x2z*ux - + 3./16.*x12*x2z + 3./32.*x12*x2zs - 3./32.*x12*uxs + 3./32.* + x2z*ux - 3./16.*x2z*x12s + 9./32.*ux*x12s - 9./32.*x12c - 3./ + 16.*x2zs ) ZZ20c = ZZ20c + rs1wz(13)*PZs**(-1)*Xpi*vvc*GtM2*ys*cst**(-1)*vdt + * ( 1./16.*O*x12*x2z + 1./64.*O*x12*ux - 3./32.*O*x12 - 3./16.* + O*x2z*ux - 3./64.*O*x2z - 3./32.*O*x12s + 7./64.*O*x2zs + 5./ + 64.*O*uxs + 3./32.*O - 5./64.*Os*x12 - 11./64.*Os*x2z + 11./ + 64.*Os*ux + 3./32.*Oc - 7./64.*x12*x2z*ux + 1./4.*x12*x2z - 1. + /64.*x12*x2zs + 5./64.*x12*uxs - 3./16.*x12 - 1./64.*x2z*ux + + 1./16.*x2z*x12s - 9./32.*x2z - 5./32.*ux*x12s + 3./32.*ux + - 3./32.*x12s + 5./64.*x12c + 1./16.*x2zs ) ZZ20c = ZZ20c + rs1wz(13)*PZs**(-1)*vvc*GtM2*ys*Xp*cst**(-1)*vdt + * ( - 1./16. ) ZZ20c = ZZ20c + rs1wz(13)*PZs**(-1)*vvc*GtM2*ys*cst**(-1)*vdt + * ( 3./32. + 9./64.*O*x12 - 1./32.*O*x2z + 1./64.*O*ux - 1./16. + *O - 3./32.*x12*x2z + 1./64.*x12*ux + 5./64.*x12 + 3./16.*x2z + - 5./64.*ux + 9./64.*x12s ) ZZ20c = ZZ20c + rs1wz(14)*XX*PZs**(-1)*vvc*GtM2*ys*cst**(-1)*vdt + * ( 9./32.*O*x12*x2z - 3./32.*O*x2z*ux + 3./32.*O*x2zs - 3./32. + *Os*x2z + 3./32.*x12*x2z*ux - 3./16.*x12*x2zs - 3./16.*x2z* + x12s + 3./32.*x2zs ) ZZ20c = ZZ20c + rs1wz(14)*PZs**(-1)*Xpi*vvc*GtM2*ys*cst**(-1)*vdt + * ( - 7./64.*O*x12*x2z - 1./64.*O*x12*ux + 9./32.*O*x12 + 9./ + 64.*O*x2z*ux + 3./16.*O*x2z - 3./32.*O*ux + 3./64.*O*x12s - 7. + /64.*O*x2zs - 1./32.*O*uxs + 1./32.*Os*x12 + 1./8.*Os*x2z - 5. + /64.*Os*ux - 3./32.*Os - 3./64.*Oc + 1./64.*x12*x2z*ux - 37./ + 64.*x12*x2z + 3./32.*x12*ux + 1./16.*x12*x2zs - 1./32.*x12* + uxs + 1./16.*x2z*ux + 1./32.*x2z*x12s + 3./16.*x2z + 1./16.* + ux*x12s - 3./16.*x12s - 1./32.*x12c - 7./64.*x2zs ) ZZ20c = ZZ20c + rs1wz(14)*PZs**(-1)*vvc*GtM2*Xps*ys*cst**(-1)*vdt + * ( 1./32. ) ZZ20c = ZZ20c + rs1wz(14)*PZs**(-1)*vvc*GtM2*ys*Xp*cst**(-1)*vdt + * ( 1./32. + 1./64.*O - 17./64.*x12 - 1./16.*x2z + 1./32.*ux ) ZZ20c = ZZ20c + rs1wz(14)*PZs**(-1)*vvc*GtM2*ys*cst**(-1)*vdt + * ( - 3./32. - 7./32.*O*x12 - 1./64.*O*x2z - 3./32.*O + 1./32. + *Os + 25./64.*x12*x2z - 3./32.*x12*ux + 25./64.*x12 - 1./32.* + x2z*ux - 1./64.*x2z - 1./16.*ux + 1./8.*x12s + 1./32.*x2zs ) ZZ30c = + + rs1wz(1)*PZs**(-1)*Xpi*vvc*GtM2*ys*cst**(-1)*vdt * ( 5./16.*O + *x12*x2z - 1./8.*O*x12*ux - 1./8.*O*x12 + 1./8.*O*x2z + 1./8. + *O*ux + 1./4.*O*x12s + 1./16.*O*x2zs - 1./16.*O*uxs + 1./16.* + Os*x12 + 1./16.*Os*x2z - 3./16.*Os*ux + 1./8.*Os - 1./8.*Oc + + 1./16.*x12*x2z*ux - 1./2.*x12*x2z + 1./8.*x12*ux + 1./16.* + x12*x2zs - 1./16.*x12*uxs + 3./16.*x2z*ux + 1./8.*x2z*x12s - + 1./8.*x2z + 1./16.*ux*x12s - 1./4.*x12s + 1./16.*x12c - 1./4. + *x2zs ) ZZ30c = ZZ30c + rs1wz(1)*PZs**(-1)*vvc*GtM2*Xps*ys*cst**(-1)*vdt + * ( 1./8. ) ZZ30c = ZZ30c + rs1wz(1)*PZs**(-1)*vvc*GtM2*ys*Xp*cst**(-1)*vdt + * ( - 5./16. + 5./16.*O - 1./16.*x12 - 1./4.*x2z + 1./8.*ux ) ZZ30c = ZZ30c + rs1wz(1)*PZs**(-1)*vvc*GtM2*ys*cst**(-1)*vdt * ( + 1./8. - 1./4.*O*x12 - 3./8.*O*x2z + 1./8.*O*ux - 3./16.*O + 1. + /16.*Os + 1./16.*x12*x2z + 5./16.*x12 - 1./8.*x2z*ux + 9./16. + *x2z - 3./16.*ux - 1./16.*x12s + 1./8.*x2zs ) ZZ30c = ZZ30c + rs1wz(4)*PZs**(-1)*Xpi*vvc*GtM2*ys*cst**(-1)*vdt + * ( 1./16.*O*x12*x2z*ux - 1./16.*O*x12*x2z - 1./32.*O*x12*x2zs + - 1./32.*O*x12*uxs + 1./64.*O*x2z*ux - 7./64.*O*x2z*x12s + 5. + /64.*O*ux*x12s - 5./64.*O*x12c - 1./32.*O*x2zs + 1./64.*Os* + x12*ux + 1./64.*Os*x2z*ux - 1./64.*Os*x2z - 1./64.*Os*x12s - + 1./64.*Os*uxs + 1./64.*Oc*x12 + 1./64.*Oc*x2z - 1./64.*Oc*ux + - 3./64.*x12*x2z*ux - 3./64.*x12*x12c + 7./64.*x12*x2zs + 3./ + 64.*x2z*ux*x12s + 5./64.*x2z*x12s - 3./32.*x2z*x12c + 3./64.* + ux*x12c - 1./32.*ux*x2zs - 3./64.*x12s*x2zs - 1./64.*x12s*uxs + + 1./32.*x2zc ) ZZ30c = ZZ30c + rs1wz(4)*PZs**(-1)*vvc*GtM2*Xps*ys*cst**(-1)*vdt + * ( - 1./32. + 1./32.*O + 1./32.*x12 ) ZZ30c = ZZ30c + rs1wz(4)*PZs**(-1)*vvc*GtM2*ys*Xp*cst**(-1)*vdt + * ( - 3./32.*O*x12 - 1./16.*O*x2z + 1./32.*O*ux - 1./32.*O + 1. + /64.*Os - 1./16.*x12*x2z + 1./32.*x12*ux + 3./32.*x12 + 3./32. + *x2z - 1./32.*ux - 7./64.*x12s ) ZZ30c = ZZ30c + rs1wz(4)*PZs**(-1)*vvc*GtM2*ys*cst**(-1)*vdt * ( + 9./64.*O*x12*x2z - 1./16.*O*x12*ux + 1./16.*O*x12 - 1./32.*O* + x2z*ux + 1./16.*O*x2z - 1./64.*O*ux + 7./64.*O*x12s + 1./32.* + O*x2zs - 1./32.*Os*x12 - 1./64.*Os*x2z + 1./64.*Os - 1./64.* + Oc - 1./32.*x12*x2z*ux - 13./64.*x12*x2z + 3./64.*x12*ux + 1./ + 32.*x12*x2zs + 1./16.*x2z*ux + 5./32.*x2z*x12s - 1./16.*ux* + x12s - 5./64.*x12s + 1./8.*x12c - 3./32.*x2zs ) ZZ30c = ZZ30c + rs1wz(7)*PZs**(-1)*Xpi*vvc*GtM2*ys*cst**(-1)*vdt + * ( - 1./16.*O*x12*x2z*ux + 3./64.*O*x12*x2z + 9./128.*O*x12* + x2zs + 1./64.*O*x12*uxs - 1./128.*O*x2z*ux + 7./64.*O*x2z* + x12s - 3./64.*O*ux*x12s - 1./128.*O*ux*x2zs + 3./64.*O*x12c + + 1./128.*O*x2zc + 1./32.*O*x2zs - 3./128.*Os*x2z*ux - 1./64. + *Os*x2z - 1./64.*Os*x12s + 1./128.*Os*x2zs + 1./128.*Os*uxs + - 1./64.*Oc*x12 - 1./64.*Oc*x2z + 1./64.*Oc*ux + 1./128.*Oq + + 3./128.*x12*x2z*ux - 1./128.*x12*ux*x2zs + 5./128.*x12* + x12c + 1./64.*x12*x2zc - 11./128.*x12*x2zs - 5./128.*x2z*ux* + x12s - 1./16.*x2z*x12s + 3./32.*x2z*x12c - 1./32.*ux*x12c + 1. + /64.*ux*x2zs + 9./128.*x12s*x2zs + 1./128.*x12s*uxs - 3./128. + *x2zc ) ZZ30c = ZZ30c + rs1wz(7)*PZs**(-1)*vvc*GtM2*Xps*ys*cst**(-1)*vdt + * ( 1./64. - 1./64.*O - 1./64.*x12 ) ZZ30c = ZZ30c + rs1wz(7)*PZs**(-1)*vvc*GtM2*ys*Xp*cst**(-1)*vdt + * ( 5./64.*O*x12 + 3./64.*O*x2z - 1./64.*O*ux + 3./128.*O - 1./ + 128.*Os + 3./64.*x12*x2z - 1./64.*x12*ux - 9./128.*x12 - 7./ + 128.*x2z + 1./64.*ux + 11./128.*x12s ) ZZ30c = ZZ30c + rs1wz(7)*PZs**(-1)*vvc*GtM2*ys*cst**(-1)*vdt * ( + - 19./128.*O*x12*x2z + 3./64.*O*x12*ux - 3./64.*O*x12 + 3./ + 128.*O*x2z*ux - 7./128.*O*x2z + 1./128.*O*ux - 3./32.*O*x12s + - 5./128.*O*x2zs + 1./64.*Os*x12 + 1./128.*Os*x2z + 1./128.* + Os*ux + 1./64.*Os + 3./128.*x12*x2z*ux + 5./32.*x12*x2z - 3./ + 128.*x12*ux - 3./64.*x12*x2zs - 1./32.*x2z*ux - 5./32.*x2z* + x12s + 5./128.*ux*x12s + 1./16.*x12s - 7./64.*x12c + 1./16.* + x2zs ) ZZ30c = ZZ30c + rs1wz(10)*PZs**(-1)*Xpi*vvc*GtM2*ys*cst**(-1)*vdt + * ( 1./16.*O*x12*x2z*ux - 3./64.*O*x12*x2z - 9./128.*O*x12*x2zs + - 1./64.*O*x12*uxs + 1./128.*O*x2z*ux - 7./64.*O*x2z*x12s + + 3./64.*O*ux*x12s + 1./128.*O*ux*x2zs - 3./64.*O*x12c - 1./128. + *O*x2zc - 1./32.*O*x2zs + 3./128.*Os*x2z*ux + 1./64.*Os*x2z + + 1./64.*Os*x12s - 1./128.*Os*x2zs - 1./128.*Os*uxs + 1./64. + *Oc*x12 + 1./64.*Oc*x2z - 1./64.*Oc*ux - 1./128.*Oq - 3./128. + *x12*x2z*ux + 1./128.*x12*ux*x2zs - 5./128.*x12*x12c - 1./64. + *x12*x2zc + 11./128.*x12*x2zs + 5./128.*x2z*ux*x12s + 1./16.* + x2z*x12s - 3./32.*x2z*x12c + 1./32.*ux*x12c - 1./64.*ux*x2zs + - 9./128.*x12s*x2zs - 1./128.*x12s*uxs + 3./128.*x2zc ) ZZ30c = ZZ30c + rs1wz(10)*PZs**(-1)*vvc*GtM2*Xps*ys*cst**(-1)*vdt + * ( - 1./64. + 1./64.*O + 1./64.*x12 ) ZZ30c = ZZ30c + rs1wz(10)*PZs**(-1)*vvc*GtM2*ys*Xp*cst**(-1)*vdt + * ( - 5./64.*O*x12 - 3./64.*O*x2z + 1./64.*O*ux - 3./128.*O + + 1./128.*Os - 3./64.*x12*x2z + 1./64.*x12*ux + 9./128.*x12 + 7. + /128.*x2z - 1./64.*ux - 11./128.*x12s ) ZZ30c = ZZ30c + rs1wz(10)*PZs**(-1)*vvc*GtM2*ys*cst**(-1)*vdt + * ( 19./128.*O*x12*x2z - 3./64.*O*x12*ux + 3./64.*O*x12 - 3./ + 128.*O*x2z*ux + 7./128.*O*x2z - 1./128.*O*ux + 3./32.*O*x12s + + 5./128.*O*x2zs - 1./64.*Os*x12 - 1./128.*Os*x2z - 1./128.* + Os*ux - 1./64.*Os - 3./128.*x12*x2z*ux - 5./32.*x12*x2z + 3./ + 128.*x12*ux + 3./64.*x12*x2zs + 1./32.*x2z*ux + 5./32.*x2z* + x12s - 5./128.*ux*x12s - 1./16.*x12s + 7./64.*x12c - 1./16.* + x2zs ) ZZ30c = ZZ30c + rs1wz(11)*PZs**(-1)*Xpi*vvc*GtM2*ys*cst**(-1)*vdt + * ( - 1./32.*O*x12*x2z + 1./16.*O*x12*ux + 1./32.*O*x2z*ux - 1. + /32.*O*x2z - 1./16.*O*x12s - 1./32.*O*uxs + 1./32.*Os*x12 + 1. + /32.*Os*x2z - 1./32.*Os*ux + 1./16.*x12*x2z*ux - 1./32.*x12* + x2z - 1./32.*x12*x2zs - 1./32.*x12*uxs + 1./32.*x2z*ux - 1./8. + *x2z*x12s + 3./32.*ux*x12s - 3./32.*x12c - 1./32.*x2zs ) ZZ30c = ZZ30c + rs1wz(11)*PZs**(-1)*vvc*GtM2*Xps*ys*cst**(-1)*vdt + * ( 1./16. ) ZZ30c = ZZ30c + rs1wz(11)*PZs**(-1)*vvc*GtM2*ys*Xp*cst**(-1)*vdt + * ( - 1./32. + 1./32.*O - 5./32.*x12 - 1./8.*x2z + 1./16.*ux ) ZZ30c = ZZ30c + rs1wz(11)*PZs**(-1)*vvc*GtM2*ys*cst**(-1)*vdt + * ( - 1./32.*O*x2z + 1./32.*O - 1./32.*Os + 3./16.*x12*x2z - 1. + /16.*x12*ux + 1./32.*x12 - 1./16.*x2z*ux + 1./16.*x2z - 1./32. + *ux + 5./32.*x12s + 1./16.*x2zs ) ZZ30c = ZZ30c + rs1wz(12)*PZs**(-1)*Xpi*vvc*GtM2*ys*cst**(-1)*vdt + * ( 1./16.*O*x12*x2z - 1./16.*O*x12*ux - 1./16.*O*x12 + 1./16.* + O*x2z + 1./16.*O*ux + 3./32.*O*x12s - 1./32.*Os*ux + 1./16.* + Os - 1./32.*Oc - 3./16.*x12*x2z + 1./16.*x12*ux + 1./16.*x2z* + ux + 1./16.*x2z*x12s - 1./16.*x2z - 1./32.*ux*x12s - 1./8.* + x12s + 1./16.*x12c - 1./16.*x2zs ) ZZ30c = ZZ30c + rs1wz(12)*PZs**(-1)*vvc*GtM2*ys*Xp*cst**(-1)*vdt + * ( - 3./32. + 1./16.*O + 1./16.*x12 ) ZZ30c = ZZ30c + rs1wz(12)*PZs**(-1)*vvc*GtM2*ys*cst**(-1)*vdt + * ( 1./16. - 1./32.*O*x12 - 1./16.*O*x2z + 1./32.*O*ux - 3./32. + *O + 1./32.*Os - 1./32.*x12*x2z + 1./32.*x12*ux + 3./32.*x12 + + 5./32.*x2z - 1./16.*ux - 1./16.*x12s ) ZZ30c = ZZ30c + rs1wz(13)*PZs**(-1)*Xpi*vvc*GtM2*ys*cst**(-1)*vdt + * ( 1./16.*O*x12*x2z - 1./32.*O*x12*ux + 1./16.*O*x12 - 1./64.* + O*x2z*ux + 1./64.*O*x2z + 1./32.*O*x12s + 1./64.*O*x2zs - 1./ + 32.*Os*x12 - 1./64.*x12*x2z*ux - 9./64.*x12*x2z + 1./16.*x12* + ux + 1./32.*x12*x2zs + 1./32.*x2z*ux + 3./32.*x2z*x12s - 1./ + 32.*ux*x12s - 1./8.*x12s + 1./16.*x12c - 3./64.*x2zs ) ZZ30c = ZZ30c + rs1wz(13)*PZs**(-1)*vvc*GtM2*ys*Xp*cst**(-1)*vdt + * ( - 1./32. ) ZZ30c = ZZ30c + rs1wz(13)*PZs**(-1)*vvc*GtM2*ys*cst**(-1)*vdt + * ( - 1./32.*O*x12 - 1./64.*O*x2z - 1./32.*O - 3./64.*x12*x2z + + 1./8.*x12 + 5./64.*x2z - 1./32.*ux - 1./32.*x12s ) ZZ30c = ZZ30c + rs1wz(14)*PZs**(-1)*Xpi*vvc*GtM2*ys*cst**(-1)*vdt + * ( - 3./64.*O*x12*x2z + 1./32.*O*x12*ux + 1./32.*O*x2z*ux + 1. + /32.*O*x2z - 1./64.*O*x12s - 1./64.*O*x2zs - 1./64.*O*uxs + 3. + /64.*Os*x12 + 1./64.*Os*x2z - 1./32.*Os*ux - 1./64.*Oc + 3./ + 64.*x12*x2z*ux - 1./32.*x12*x2z - 3./64.*x12*x2zs - 1./64.* + x12*uxs + 1./64.*x2z*ux - 1./8.*x2z*x12s + 1./16.*ux*x12s - 5. + /64.*x12c ) ZZ30c = ZZ30c + rs1wz(14)*PZs**(-1)*vvc*GtM2*Xps*ys*cst**(-1)*vdt + * ( 1./32. ) ZZ30c = ZZ30c + rs1wz(14)*PZs**(-1)*vvc*GtM2*ys*Xp*cst**(-1)*vdt + * ( 1./64.*O - 9./64.*x12 - 1./16.*x2z + 1./32.*ux ) ZZ30c = ZZ30c + rs1wz(14)*PZs**(-1)*vvc*GtM2*ys*cst**(-1)*vdt + * ( 1./64.*O*x12 - 1./64.*O*ux - 1./32.*O + 3./16.*x12*x2z - 3./ + 64.*x12*ux + 1./32.*x12 - 1./32.*x2z*ux - 1./64.*ux + 9./64.* + x12s + 1./32.*x2zs ) ZZ40c = + + rs1wz(1)*XX*PZs**(-1)*vvc*GtM2*ys*cst**(-1)*vdt * ( 3./8.*O* + x12*x2z - 1./2.*O*x2z*ux + 1./4.*O*x2z + 3./8.*O*x2zs + 1./8. + *O*uxs + 1./8.*Os*x12 - 3./8.*Os*x2z + 1./8.*Os*ux - 1./8.* + x12*x2z*ux - 1./8.*x12*x2zs + 1./8.*x12*uxs + 1./8.*x2z*ux - + 1./4.*x2z*x12s - 1./8.*ux*x12s - 1./8.*x12c ) ZZ40c = ZZ40c + rs1wz(1)*PZs**(-1)*Xpi*vvc*GtM2*ys*cst**(-1)*vdt + * ( - 1./2.*O*x12*x2z + 1./4.*O*x12*ux + 3./4.*O*x12 + 1./4.*O + *x2z*ux + 5./8.*O*x2z - 5./8.*O*ux - 1./4.*O*x12s - 1./4.*O* + x2zs + 1./4.*O + 1./4.*Os*ux - 5./8.*Os + 1./4.*Oc - 5./8.* + x12*x2z + 1./8.*x12*ux + 1./4.*x2z + 1./8.*ux - 5./8.*x12s ) ZZ40c = ZZ40c + rs1wz(1)*PZs**(-1)*vvc*GtM2*ys*Xp*cst**(-1)*vdt + * ( 1./4. - 1./2.*x12 ) ZZ40c = ZZ40c + rs1wz(1)*PZs**(-1)*vvc*GtM2*ys*cst**(-1)*vdt * ( + - 1./4. - 1./4.*O*x12 - 1./8.*O*x2z + 1./8.*O*ux - 1./4.*O + + 1./8.*Os + 5./8.*x12*x2z - 1./8.*x12*ux + 1./2.*x12 - 1./4. + *x2z - 1./8.*ux + 5./8.*x12s ) ZZ40c = ZZ40c + rs1wz(4)*XX*PZs**(-1)*vvc*GtM2*ys*cst**(-1)*vdt + * ( 3./16.*O*x12*x2z*ux - 1./16.*O*x12*x2z - 1./16.*O*x12*x2zs + - 1./16.*O*x12*uxs + 1./32.*O*x2z*ux - 7./32.*O*x2z*x12s - 1. + /16.*O*x2z*uxs + 5./32.*O*ux*x12s + 1./16.*O*ux*x2zs - 5./32. + *O*x12c - 1./8.*O*x2zs + 1./16.*Os*x12*x2z + 1./32.*Os*x12*ux + - 1./32.*Os*x2z*ux - 1./32.*Os*x2z - 1./32.*Os*x12s + 1./16. + *Os*x2zs - 1./32.*Os*uxs + 1./32.*Oc*x12 + 1./32.*Oc*x2z - 1./ + 32.*Oc*ux + 1./32.*x12*x2z*ux - 1./16.*x12*x2z*uxs + 1./8.* + x12*ux*x2zs - 3./32.*x12*x12c - 1./16.*x12*x2zc - 1./32.*x12* + x2zs + 7./32.*x2z*ux*x12s - 1./32.*x2z*x12s - 1./4.*x2z*x12c + + 3./32.*ux*x12c - 7./32.*x12s*x2zs - 1./32.*x12s*uxs ) ZZ40c = ZZ40c + rs1wz(4)*PZs**(-1)*Xpi*vvc*GtM2*ys*cst**(-1)*vdt + * ( - 1./8.*O*x12*x2z*ux - 1./16.*O*x12*x2z + 5./32.*O*x12*ux + + 1./32.*O*x12*x2zs + 1./16.*O*x12*uxs - 1./16.*O*x12 + 5./ + 32.*O*x2z*ux + 1./16.*O*x2z*x12s + 1./32.*O*x2z*uxs - 9./32.* + O*x2z - 3./32.*O*ux*x12s - 1./32.*O*ux*x2zs + 1./32.*O*ux - 7. + /32.*O*x12s + 1./32.*O*x12c - 3./32.*O*uxs - 1./16.*Os*x12* + x2z + 3./32.*Os*x12 + 1./4.*Os*x2z - 3./32.*Os*ux - 1./32.*Os + *x12s - 1./32.*Os*x2zs + 1./32.*Os*uxs - 1./32.*Os - 1./32.* + Oc*x12 - 1./32.*Oc*x2z + 1./32.*Oc*ux + 1./32.*Oc + 1./4.*x12 + *x2z*ux + 1./32.*x12*x2z*uxs - 3./32.*x12*x2z - 1./16.*x12*ux + *x2zs + 1./32.*x12*ux + 1./32.*x12*x12c + 1./32.*x12*x2zc - 7. + /32.*x12*x2zs - 3./32.*x12*uxs - 1./8.*x2z*ux*x12s + 1./32.* + x2z*ux - 15./32.*x2z*x12s + 3./32.*x2z*x12c + 1./4.*ux*x12s + - 1./16.*ux*x12c + 1./32.*ux*x2zs + 3./32.*x12s*x2zs + 1./32. + *x12s*uxs - 1./32.*x12s - 9./32.*x12c - 1./32.*x2zc - 1./16.* + x2zs ) ZZ40c = ZZ40c + rs1wz(4)*PZs**(-1)*vvc*GtM2*Xps*ys*cst**(-1)*vdt + * ( 1./16. ) ZZ40c = ZZ40c + rs1wz(4)*PZs**(-1)*vvc*GtM2*ys*Xp*cst**(-1)*vdt + * ( - 1./16. - 3./32.*O*x12 + 1./32.*O*x2z - 1./32.*O*ux - 1./ + 32.*O - 1./32.*x12*x2z - 1./32.*x12*ux - 1./8.*x12 - 3./16.* + x2z + 3./32.*ux - 3./32.*x12s ) ZZ40c = ZZ40c + rs1wz(4)*PZs**(-1)*vvc*GtM2*ys*cst**(-1)*vdt * ( + 1./16.*O*x12*x2z - 1./32.*O*x12*ux + 1./16.*O*x12 - 1./32.*O* + x2z*ux + 5./32.*O*x2z - 3./32.*O*ux + 7./32.*O*x12s + 1./32.* + O*uxs + 5./32.*O + 1./16.*Os*x12 - 3./32.*Os*x2z + 1./16.*Os* + ux - 5./32.*Os + 1./32.*Oc - 1./16.*x12*x2z*ux + 5./16.*x12* + x2z - 3./32.*x12*ux + 1./16.*x12*x2zs + 1./32.*x12*uxs + 1./ + 16.*x12 - 1./8.*x2z*ux + 1./4.*x2z*x12s + 1./8.*x2z - 3./32.* + ux*x12s - 1./32.*ux + 7./32.*x12s + 3./16.*x12c + 5./32.*x2zs + ) ZZ40c = ZZ40c + rs1wz(7)*XX*PZs**(-1)*vvc*GtM2*ys*cst**(-1)*vdt + * ( - 1./16.*O*x12*x2z*ux + 3./64.*O*x12*x2zs + 1./32.*O*x12* + uxs + 3./64.*O*x2z*ux + 1./32.*O*x2z*uxs + 1./16.*O*x2z - 1./ + 32.*O*ux*x12s - 5./64.*O*ux*x2zs + 1./32.*O*x12s + 3./64.*O* + x2zc - 1./32.*O*x2zs - 1./32.*O*uxs - 1./32.*Os*x12*x2z + 1./ + 32.*Os*x12*ux + 1./32.*Os*x12 + 1./64.*Os*x2z*ux - 1./16.*Os* + ux - 1./32.*Os*x12s - 1./64.*Os*x2zs + 1./64.*Os*uxs + 1./32. + *Oc*ux - 1./32.*Oc + 1./64.*Oq + 1./64.*x12*x2z*ux + 1./32.* + x12*x2z*uxs - 1./8.*x12*x2z - 3./64.*x12*ux*x2zs + 1./64.*x12 + *x12c + 7./64.*x12*x2zs - 1./32.*x12*uxs - 5./64.*x2z*ux*x12s + + 1./32.*x2z*ux + 1./16.*x2z*x12s + 1./32.*x2z*x12c + 1./16. + *ux*x12s - 1./32.*ux*x12c + 1./64.*x12s*x2zs + 1./64.*x12s* + uxs - 1./32.*x12c + 1./64.*x2zc - 1./16.*x2zs ) ZZ40c = ZZ40c + rs1wz(7)*PZs**(-1)*Xpi*vvc*GtM2*ys*cst**(-1)*vdt + * ( 3./32.*O*x12*x2z*ux + 1./16.*O*x12*x2z - 1./32.*O*x12*ux - + 5./64.*O*x12*x2zs - 1./32.*O*x12*uxs + 1./16.*O*x12 - 1./8.*O + *x2z*ux - 1./16.*O*x2z*x12s - 1./64.*O*x2z*uxs + 1./64.*O*x2z + + 3./64.*O*ux*x12s + 3./64.*O*ux*x2zs - 1./64.*O*ux - 3./64. + *O*x12s - 1./64.*O*x12c - 1./32.*O*x2zc + 3./32.*O*x2zs + 1./ + 32.*O*uxs + 1./16.*O - 1./32.*Os*x12 + 1./32.*Os*x2z*ux - 1./ + 64.*Os*x2z + 1./32.*Os*ux + 1./64.*Os*x12s - 1./64.*Os*x2zs + - 1./64.*Os*uxs - 1./16.*Os + 1./64.*Oc*x12 + 1./64.*Oc*x2z + - 1./64.*Oc*ux + 1./64.*Oc - 3./32.*x12*x2z*ux - 1./64.*x12* + x2z*uxs + 3./32.*x12*x2z + 1./32.*x12*ux*x2zs - 1./64.*x12*ux + - 1./64.*x12*x12c - 1./64.*x12*x2zc + 1./16.*x12*x2zs + 1./ + 32.*x12*uxs - 1./8.*x12 + 1./16.*x2z*ux*x12s + 1./32.*x2z*ux + + 3./64.*x2z*x12s - 3./64.*x2z*x12c - 3./32.*x2z - 1./16.*ux + *x12s + 1./32.*ux*x12c - 1./64.*ux*x2zs + 1./32.*ux - 3./64.* + x12s*x2zs ) ZZ40c = ZZ40c + rs1wz(7)*PZs**(-1)*Xpi*vvc*GtM2*ys*cst**(-1)*vdt + * ( - 1./64.*x12s*uxs + 1./8.*x12s + 1./64.*x2zc ) ZZ40c = ZZ40c + rs1wz(7)*PZs**(-1)*vvc*GtM2*ys*Xp*cst**(-1)*vdt + * ( - 1./32. + 1./64.*O + 1./64.*x12 + 1./64.*x2z ) ZZ40c = ZZ40c + rs1wz(7)*PZs**(-1)*vvc*GtM2*ys*cst**(-1)*vdt * ( + 1./32. + 1./16.*O*x12*x2z - 1./32.*O*x12*ux - 7./64.*O*x12 - + 1./16.*O*x2z + 1./16.*O*ux + 5./64.*O*x12s - 5./64.*O + 1./64. + *Os*x12 - 1./64.*Os*ux + 1./16.*Os - 1./64.*Oc - 3./16.*x12* + x2z + 1./16.*x12*ux + 1./64.*x12*x2zs + 9./64.*x12 + 1./64.* + x2z*ux + 1./16.*x2z*x12s + 7./64.*x2z - 1./64.*ux*x12s - 1./ + 16.*ux - 11./64.*x12s + 3./64.*x12c - 3./64.*x2zs ) ZZ40c = ZZ40c + rs1wz(8)*XX*PZs**(-1)*vvc*GtM2*ys*cst**(-1)*vdt + * ( 1./16.*O*x12*x2z - 1./8.*O*x12*ux - 1./16.*O*x2z*ux + 1./16. + *O*x2z + 1./8.*O*x12s + 1./16.*O*uxs - 1./16.*Os*x12 - 1./16. + *Os*x2z + 1./16.*Os*ux - 1./8.*x12*x2z*ux + 1./16.*x12*x2z + + 1./16.*x12*x2zs + 1./16.*x12*uxs - 1./16.*x2z*ux + 1./4.*x2z* + x12s - 3./16.*ux*x12s + 3./16.*x12c + 1./16.*x2zs ) ZZ40c = ZZ40c + rs1wz(8)*PZs**(-1)*Xpi*vvc*GtM2*ys*cst**(-1)*vdt + * ( 1./16.*O*x12*x2z - 3./32.*O*x12*ux + 1./16.*O*x12 - 1./32.* + O*x2z*ux + 1./8.*O*x12s + 1./32.*O*uxs + 1./16.*O - 1./32.*Os + *x12 - 1./32.*Os*x2z + 1./32.*Os*ux - 1./16.*Os - 1./16.*x12* + x2z*ux + 5./32.*x12*x2z + 1./32.*x12*x2zs + 1./32.*x12*uxs + + 1./16.*x12 - 3./32.*x2z*ux + 3./16.*x2z*x12s + 1./8.*x2z - 1./ + 8.*ux*x12s - 1./16.*ux + 1./8.*x12s + 5./32.*x12c + 3./32.* + x2zs ) ZZ40c = ZZ40c + rs1wz(8)*PZs**(-1)*vvc*GtM2*Xps*ys*cst**(-1)*vdt + * ( - 1./16. ) ZZ40c = ZZ40c + rs1wz(8)*PZs**(-1)*vvc*GtM2*ys*Xp*cst**(-1)*vdt + * ( 1./8. + 3./32.*O*x12 - 1./32.*O*x2z + 1./32.*O*ux + 1./32.* + x12*x2z + 1./32.*x12*ux + 3./32.*x12 + 5./32.*x2z - 3./32.*ux + + 3./32.*x12s ) ZZ40c = ZZ40c + rs1wz(8)*PZs**(-1)*vvc*GtM2*ys*cst**(-1)*vdt * ( + - 1./16. - 1./16.*O*x12*x2z + 3./32.*O*x12*ux - 5./32.*O*x12 + + 1./32.*O*x2z*ux + 1./32.*O*x2z - 1./32.*O*ux - 1./8.*O* + x12s - 1./32.*O*uxs - 1./16.*O + 1./32.*Os*x12 + 1./32.*Os* + x2z - 1./32.*Os*ux + 1./16.*Os + 1./16.*x12*x2z*ux - 3./16.* + x12*x2z - 1./32.*x12*ux - 1./32.*x12*x2zs - 1./32.*x12*uxs - + 5./32.*x12 + 3./32.*x2z*ux - 3./16.*x2z*x12s - 9./32.*x2z + 1. + /8.*ux*x12s + 5./32.*ux - 7./32.*x12s - 5./32.*x12c - 3./32.* + x2zs ) ZZ40c = ZZ40c + rs1wz(9)*XX*PZs**(-1)*vvc*GtM2*ys*cst**(-1)*vdt + * ( - 3./8.*O*x12 - 1./8.*O*x2z + 1./8.*O*ux + 1./8.*Os + 1./4. + *x12*x2z - 1./8.*x12*ux - 1./8.*x2z + 1./4.*x12s ) ZZ40c = ZZ40c + rs1wz(9)*PZs**(-1)*Xpi*vvc*GtM2*ys*cst**(-1)*vdt + * ( - 1./8. - 1./4.*O*x12 + 1./4.*x12*x2z - 1./8.*x12*ux + 1./ + 4.*x12 - 1./8.*x2z + 1./4.*x12s ) ZZ40c = ZZ40c + rs1wz(9)*PZs**(-1)*vvc*GtM2*ys*Xp*cst**(-1)*vdt + * ( - 1./8. + 1./4.*x12 ) ZZ40c = ZZ40c + rs1wz(9)*PZs**(-1)*vvc*GtM2*ys*cst**(-1)*vdt * ( + 1./4. + 1./4.*O*x12 - 1./4.*x12*x2z + 1./8.*x12*ux - 1./2.* + x12 + 1./8.*x2z - 1./4.*x12s ) ZZ40c = ZZ40c + rs1wz(10)*XX*PZs**(-1)*vvc*GtM2*ys*cst**(-1)*vdt + * ( 1./16.*O*x12*x2z*ux - 1./32.*O*x12*x2z - 3./64.*O*x12*x2zs + - 1./32.*O*x12*uxs + 1./64.*O*x2z*ux - 1./32.*O*x2z*uxs + 1./ + 32.*O*ux*x12s + 5./64.*O*ux*x2zs - 3./64.*O*x2zc + 1./32.*Os* + x12*x2z - 1./32.*Os*x12*ux - 1./64.*Os*x2z*ux + 1./32.*Os*x2z + + 1./32.*Os*x12s + 1./64.*Os*x2zs - 1./64.*Os*uxs - 1./32.* + Oc*ux - 1./64.*Oq + 1./64.*x12*x2z*ux - 1./32.*x12*x2z*uxs + + 3./64.*x12*ux*x2zs - 1./64.*x12*x12c - 5./64.*x12*x2zs + 5./ + 64.*x2z*ux*x12s - 1./16.*x2z*x12s - 1./32.*x2z*x12c + 1./32.* + ux*x12c - 1./64.*x12s*x2zs - 1./64.*x12s*uxs - 1./64.*x2zc ) ZZ40c = ZZ40c + rs1wz(10)*PZs**(-1)*Xpi*vvc*GtM2*ys*cst**(-1)*vdt + * ( - 3./32.*O*x12*x2z*ux - 1./16.*O*x12*x2z + 1./64.*O*x12*ux + + 5./64.*O*x12*x2zs + 1./32.*O*x12*uxs - 1./32.*O*x12 + 9./ + 64.*O*x2z*ux + 1./16.*O*x2z*x12s + 1./64.*O*x2z*uxs + 3./64.* + O*x2z - 3./64.*O*ux*x12s - 3./64.*O*ux*x2zs + 1./64.*O*ux + 5. + /64.*O*x12s + 1./64.*O*x12c + 1./32.*O*x2zc - 3./32.*O*x2zs + - 3./64.*O*uxs + 3./64.*Os*x12 - 1./32.*Os*x2z*ux + 1./32.* + Os*x2z - 5./64.*Os*ux - 1./64.*Os*x12s + 1./64.*Os*x2zs + 1./ + 64.*Os*uxs + 1./32.*Os - 1./64.*Oc*x12 - 1./64.*Oc*x2z + 1./ + 64.*Oc*ux - 3./64.*Oc + 3./32.*x12*x2z*ux + 1./64.*x12*x2z* + uxs - 13./64.*x12*x2z - 1./32.*x12*ux*x2zs + 1./64.*x12*ux + + 1./64.*x12*x12c + 1./64.*x12*x2zc - 1./64.*x12*x2zs - 3./64.* + x12*uxs - 1./16.*x2z*ux*x12s + 1./64.*x2z*ux - 1./64.*x2z* + x12s + 3./64.*x2z*x12c + 3./32.*ux*x12s - 1./32.*ux*x12c + 1./ + 64.*ux*x2zs + 3./64.*x12s*x2zs + 1./64.*x12s*uxs - 1./16.* + x12s ) ZZ40c = ZZ40c + rs1wz(10)*PZs**(-1)*Xpi*vvc*GtM2*ys*cst**(-1)*vdt + * ( - 1./64.*x12c - 1./64.*x2zc - 5./64.*x2zs ) ZZ40c = ZZ40c + rs1wz(10)*PZs**(-1)*vvc*GtM2*Xps*ys*cst**(-1)*vdt + * ( 1./32. ) ZZ40c = ZZ40c + rs1wz(10)*PZs**(-1)*vvc*GtM2*ys*Xp*cst**(-1)*vdt + * ( - 1./32. + 3./64.*O*x12 + 1./64.*O*x2z - 1./64.*O*ux + 3./ + 64.*O - 1./32.*Os + 3./64.*x12*x2z - 1./64.*x12*ux - 5./32.* + x12 - 1./8.*x2z + 3./64.*ux + 5./64.*x12s ) ZZ40c = ZZ40c + rs1wz(10)*PZs**(-1)*vvc*GtM2*ys*cst**(-1)*vdt + * ( - 1./16.*O*x12*x2z + 3./64.*O*x12*ux + 1./32.*O*x12 - 1./ + 64.*O*x2z*ux - 1./64.*O*x2z - 3./64.*O*ux - 7./64.*O*x12s + 1. + /64.*O*uxs - 3./64.*O - 1./32.*Os*x12 - 1./64.*Os*x2z + 1./16. + *Os*ux + 3./64.*Oc + 1./4.*x12*x2z - 3./64.*x12*ux - 1./16.* + x12*x2zs + 1./64.*x12*uxs + 1./8.*x12 - 1./16.*x2z*ux - 3./32. + *x2z*x12s + 3./32.*x2z - 1./64.*ux*x12s - 1./64.*ux + 1./32.* + x12s - 1./32.*x12c + 1./8.*x2zs ) ZZ40c = ZZ40c + rs1wz(11)*XX*PZs**(-1)*vvc*GtM2*ys*cst**(-1)*vdt + * ( - 1./16.*O*x12*x2z + 1./8.*O*x12*ux + 1./16.*O*x2z*ux - 1./ + 16.*O*x2z - 1./8.*O*x12s - 1./16.*O*uxs + 1./16.*Os*x12 + 1./ + 16.*Os*x2z - 1./16.*Os*ux + 1./8.*x12*x2z*ux - 1./16.*x12*x2z + - 1./16.*x12*x2zs - 1./16.*x12*uxs + 1./16.*x2z*ux - 1./4.* + x2z*x12s + 3./16.*ux*x12s - 3./16.*x12c - 1./16.*x2zs ) ZZ40c = ZZ40c + rs1wz(11)*PZs**(-1)*Xpi*vvc*GtM2*ys*cst**(-1)*vdt + * ( - 1./16.*O*x12*ux - 1./16.*O*x12 - 1./16.*O*x2z*ux + 1./8. + *O*x2z + 1./16.*O*uxs - 1./16.*O - 1./16.*Os*x12 - 1./16.*Os* + x2z + 1./16.*Os*ux + 1./16.*Os - 1./8.*x12*x2z*ux - 1./8.*x12 + *x2z + 1./16.*x12*x2zs + 1./16.*x12*uxs - 1./16.*x12 + 1./16. + *x2z*ux + 1./8.*x2z*x12s - 1./8.*x2z - 1./8.*ux*x12s + 1./16. + *ux - 1./8.*x12s + 1./16.*x12c - 1./16.*x2zs ) ZZ40c = ZZ40c + rs1wz(11)*PZs**(-1)*vvc*GtM2*ys*Xp*cst**(-1)*vdt + * ( - 1./16. ) ZZ40c = ZZ40c + rs1wz(11)*PZs**(-1)*vvc*GtM2*ys*cst**(-1)*vdt + * ( 1./16. + 1./8.*O*x12 - 1./16.*O*x2z + 1./16.*O*ux - 1./16.* + O + 1./16.*Os + 1./16.*x12*ux + 1./8.*x12 + 3./16.*x2z - 1./8. + *ux + 1./16.*x12s ) ZZ40c = ZZ40c + rs1wz(12)*XX*PZs**(-1)*vvc*GtM2*ys*cst**(-1)*vdt + * ( - 1./8.*O*x12*ux - 1./8.*O*x2z*ux + 1./8.*O*x2z + 1./16.*O + *x12s + 1./8.*O*uxs - 1./8.*Os*x12 - 1./8.*Os*x2z + 3./16.*Os + *ux + 1./16.*Oc - 1./4.*x12*x2z*ux + 1./8.*x12*x2zs + 1./8.* + x12*uxs + 3./8.*x2z*x12s - 5./16.*ux*x12s + 1./4.*x12c ) ZZ40c = ZZ40c + rs1wz(12)*PZs**(-1)*Xpi*vvc*GtM2*ys*cst**(-1)*vdt + * ( 1./16.*O*x12*ux + 1./16.*O*x12 + 1./16.*O*x2z*ux - 1./16.*O + *x2z - 1./16.*O*ux - 1./16.*O*uxs + 1./8.*O + 1./16.*Os*x12 + + 1./16.*Os*x2z - 1./16.*Os*ux - 1./8.*Os + 1./8.*x12*x2z*ux + + 3./16.*x12*x2z - 1./16.*x12*ux - 1./16.*x12*x2zs - 1./16.* + x12*uxs - 1./16.*x2z*ux - 1./8.*x2z*x12s + 1./16.*x2z + 1./8. + *ux*x12s + 3./16.*x12s - 1./16.*x12c + 1./16.*x2zs ) ZZ40c = ZZ40c + rs1wz(12)*PZs**(-1)*vvc*GtM2*ys*Xp*cst**(-1)*vdt + * ( 1./16. ) ZZ40c = ZZ40c + rs1wz(12)*PZs**(-1)*vvc*GtM2*ys*cst**(-1)*vdt + * ( - 1./16. - 1./8.*O*x12 - 1./16.*x12*x2z - 1./16.*x12 - 1./ + 8.*x2z + 1./16.*ux - 1./8.*x12s ) ZZ40c = ZZ40c + rs1wz(13)*XX*PZs**(-1)*vvc*GtM2*ys*cst**(-1)*vdt + * ( 1./16.*O*x12*x2z - 5./32.*O*x2z*ux - 1./32.*O*x2z - 1./16.* + O*x12s + 3./32.*O*x2zs + 1./16.*O*uxs - 1./16.*Os*x12 - 1./8. + *Os*x2z + 1./8.*Os*ux + 1./16.*Oc - 3./32.*x12*x2z*ux + 3./32. + *x12*x2z + 1./16.*x12*uxs + 1./16.*x2z*x12s - 1./8.*ux*x12s + + 1./16.*x12c + 1./32.*x2zs ) ZZ40c = ZZ40c + rs1wz(13)*PZs**(-1)*Xpi*vvc*GtM2*ys*cst**(-1)*vdt + * ( - 1./16.*O*x12*x2z + 1./32.*O*x12*ux - 1./32.*O*x12 + 3./ + 32.*O*x2z*ux + 1./32.*O*x2z - 1./32.*O*ux - 1./16.*O*x2zs - 1. + /32.*O*uxs - 1./32.*O + 1./32.*Os*x12 + 1./32.*Os*x2z - 1./32. + *Os*ux + 1./16.*x12*x2z*ux + 1./32.*x12*x2z - 1./32.*x12*ux + - 1./32.*x12*x2zs - 1./32.*x12*uxs + 3./32.*x12 - 1./32.*x2z + *ux - 1./16.*x2z*x12s + 1./16.*x2z + 1./16.*ux*x12s - 1./32.* + x12s - 1./32.*x12c + 1./32.*x2zs ) ZZ40c = ZZ40c + rs1wz(13)*PZs**(-1)*vvc*GtM2*ys*Xp*cst**(-1)*vdt + * ( 1./32. ) ZZ40c = ZZ40c + rs1wz(13)*PZs**(-1)*vvc*GtM2*ys*cst**(-1)*vdt + * ( - 1./32. + 1./16.*O*x12 + 1./32.*O + 1./32.*x12*x2z - 1./8. + *x12 - 3./32.*x2z + 1./32.*ux + 1./16.*x12s ) ZZ40c = ZZ40c + rs1wz(14)*XX*PZs**(-1)*vvc*GtM2*ys*cst**(-1)*vdt + * ( - 3./32.*O*x12*x2z + 1./8.*O*x2z*ux + 1./16.*O*x2z + 1./32. + *O*x12s - 3./32.*O*x2zs - 1./32.*O*uxs + 1./32.*Os*x12 + 3./ + 32.*Os*x2z - 1./16.*Os*ux - 1./32.*Oc + 1./32.*x12*x2z*ux - 1. + /8.*x12*x2z + 1./32.*x12*x2zs - 1./32.*x12*uxs + 1./32.*x2z* + ux + 1./16.*ux*x12s - 1./32.*x12c - 1./16.*x2zs ) ZZ40c = ZZ40c + rs1wz(14)*PZs**(-1)*Xpi*vvc*GtM2*ys*cst**(-1)*vdt + * ( 1./16.*O*x12*x2z - 1./32.*O*x12*ux - 1./32.*O*x12 - 3./32.* + O*x2z*ux - 1./16.*O*x2z + 1./16.*O*ux + 1./16.*O*x2zs + 1./32. + *O*uxs + 1./16.*O - 1./32.*Os*x12 - 1./32.*Os*x2z + 1./32.*Os + *ux + 1./32.*Os - 1./16.*x12*x2z*ux + 1./32.*x12*x2zs + 1./32. + *x12*uxs - 1./8.*x12 + 1./32.*x2z*ux + 1./16.*x2z*x12s - 3./ + 32.*x2z - 1./16.*ux*x12s + 1./32.*ux + 1./16.*x12s + 1./32.* + x12c - 1./32.*x2zs ) ZZ40c = ZZ40c + rs1wz(14)*PZs**(-1)*vvc*GtM2*ys*Xp*cst**(-1)*vdt + * ( - 1./32. ) ZZ40c = ZZ40c + rs1wz(14)*PZs**(-1)*vvc*GtM2*ys*cst**(-1)*vdt + * ( 1./32. + 1./32.*O*x2z - 1./32.*O*ux - 1./16.*O - 1./32.*Os + - 1./16.*x12*x2z + 1./32.*x12*ux + 5./32.*x12 + 1./8.*x2z - + 1./16.*ux - 3./32.*x12s ) ZZ11c = + + rs1wz(1)*XX*PZs**(-1)*vvc*GtM2*ys*cst**(-1)*vdt * ( 1./8.*O* + x12*x2zs + 1./4.*O*x2z*x12s + 1./8.*O*x12c + 1./8.*x12*x12c + - 1./8.*x12*x2zc + 1./4.*x12*x2zs + 1./8.*x2z*x12s + 1./8.* + x2z*x12c - 1./8.*x12s*x2zs + 1./8.*x2zc ) ZZ11c = ZZ11c + rs1wz(1)*PZs**(-1)*Xpi*vvc*GtM2*ys*cst**(-1)*vdt + * ( 5./16.*O*x12*x2z + 3./8.*O*x12s - 1./16.*O*x2zs - 1./16.*Os + *x12*x2z - 1./16.*Os*x12s + 5./8.*x12*x2z + 1./16.*x12*x12c + + 1./16.*x12*x2zc - 1./2.*x12*x2zs - 5./16.*x2z*x12s + 3./16. + *x2z*x12c + 3./16.*x12s*x2zs + 1./8.*x12s + 1./8.*x12c - 1./ + 16.*x2zc + 1./2.*x2zs ) ZZ11c = ZZ11c + rs1wz(1)*PZs**(-1)*vvc*GtM2*Xps*ys*Xp*cst**(-1)* + vdt * ( 1./8. ) ZZ11c = ZZ11c + rs1wz(1)*PZs**(-1)*vvc*GtM2*Xps*ys*cst**(-1)*vdt + * ( - 3./8. + 1./4.*O - 1./4.*x2z ) ZZ11c = ZZ11c + rs1wz(1)*PZs**(-1)*vvc*GtM2*ys*Xp*cst**(-1)*vdt + * ( 5./16. - 3./8.*O*x2z - 1./8.*O + 1./8.*x12 + 3./4.*x2z + 1./ + 8.*x12s + 1./8.*x2zs ) ZZ11c = ZZ11c + rs1wz(1)*PZs**(-1)*vvc*GtM2*ys*cst**(-1)*vdt * ( + - 1./8.*O*x12*x2z - 1./4.*O*x12 + 3./16.*O*x2z - 1./4.*O* + x12s + 1./8.*O*x2zs + 1./8.*Os*x12 - 1./16.*x12*x2z + 1./8.* + x12*x2zs - 3./8.*x12 - 1./4.*x2z*x12s - 11./16.*x2z + 1./8.* + x12s - 3./8.*x12c - 7./16.*x2zs ) ZZ11c = ZZ11c + rs1wz(4)*XX*PZs**(-1)*vvc*GtM2*ys*cst**(-1)*vdt + * ( - 1./16.*O*x12*x2zs - 1./16.*O*x2z*x12c - 1./16.*O*x12s* + x2zs - 1./32.*Os*x2z*x12s - 1./32.*x12*x2z*x12c - 1./32.*x12s + *x2zc - 1./16.*x12c*x2zs - 1./32.*x2zc ) ZZ11c = ZZ11c + rs1wz(4)*PZs**(-1)*Xpi*vvc*GtM2*ys*cst**(-1)*vdt + * ( - 1./8.*O*x12*x2z + 3./64.*O*x12*x12c - 1./16.*O*x12*x2zs + - 1./8.*O*x2z*x12s + 3./32.*O*x2z*x12c + 3./64.*O*x12s*x2zs + - 1./16.*O*x12c + 1./64.*O*x2zs + 1./32.*Os*x12*x2z + 3./64. + *Os*x2z*x12s - 1./32.*Os*x12s + 3./64.*Os*x12c + 1./64.*Oc* + x12s + 3./64.*x12*x2z*x12c - 1./32.*x12*x12c - 1./32.*x12* + x2zc + 3./64.*x12*x2zs - 5./32.*x2z*x12c + 1./64.*x12s*x12c + + 1./64.*x12s*x2zc - 5./32.*x12s*x2zs + 3./64.*x12c*x2zs - 1. + /64.*x2zc - 3./32.*x2zs ) ZZ11c = ZZ11c + rs1wz(4)*PZs**(-1)*vvc*GtM2*Xps*ys*Xp*cst**(-1)* + vdt * ( - 1./32. + 1./32.*O + 1./32.*x12 ) ZZ11c = ZZ11c + rs1wz(4)*PZs**(-1)*vvc*GtM2*Xps*ys*cst**(-1)*vdt + * ( 3./64. - 1./32.*O*x12 - 1./16.*O*x2z - 1./32.*O - 1./16.* + x12*x2z + 3./32.*x2z - 1./32.*x12s ) ZZ11c = ZZ11c + rs1wz(4)*PZs**(-1)*vvc*GtM2*ys*Xp*cst**(-1)*vdt + * ( - 1./32. + 1./32.*O*x12*x2z - 1./8.*O*x12 + 1./16.*O*x2z + + 1./8.*O*x12s + 1./32.*O*x2zs + 1./64.*O + 1./16.*Os*x12 - + 1./32.*x12*x2z + 1./32.*x12*x2zs + 3./64.*x12 + 1./32.*x2z* + x12s - 9./64.*x2z - 1./8.*x12s + 1./16.*x12c - 3./32.*x2zs ) ZZ11c = ZZ11c + rs1wz(4)*PZs**(-1)*vvc*GtM2*ys*cst**(-1)*vdt * ( + 1./4.*O*x12*x2z + 1./16.*O*x12 - 3./32.*O*x2z*x12s - 1./32.*O + *x2z + 1./16.*O*x12s - 3./32.*O*x12c - 1./32.*O*x2zs - 1./16. + *Os*x12*x2z - 1./32.*Os*x12 - 3./64.*Os*x12s - 3./32.*x12*x2z + - 3./64.*x12*x12c + 1./16.*x12*x2zs + 1./4.*x2z*x12s - 1./32. + *x2z*x12c + 3./32.*x2z + 1./64.*x12s*x2zs + 3./32.*x12c + 1./ + 32.*x2zc + 9./64.*x2zs ) ZZ11c = ZZ11c + rs1wz(7)*XX*PZs**(-1)*vvc*GtM2*ys*cst**(-1)*vdt + * ( - 1./64.*O*x12*x2zs + 1./64.*O*x2zc + 1./64.*Os*x12*x2zs + - 1./64.*x12*x2zq + 1./16.*x12*x2zc - 1./32.*x12s*x2zc + 3./ + 64.*x12s*x2zs - 1./64.*x12c*x2zs + 1./64.*x2zq - 1./64.*x2zc + ) ZZ11c = ZZ11c + rs1wz(7)*PZs**(-1)*Xpi*vvc*GtM2*ys*cst**(-1)*vdt + * ( - 1./32.*O*x12*x2z + 1./128.*O*x12*x2zc - 5./64.*O*x12* + x2zs - 1./32.*O*x2z*x12s + 1./128.*O*x2z*x12c + 1./64.*O*x12s + *x2zs - 1./64.*O*x2zc + 7./128.*O*x2zs + 5./128.*Os*x12*x2z + - 1./128.*Os*x12*x2zs - 1./128.*Os*x2z*x12s - 1./128.*Os* + x2zs - 1./128.*Oc*x12*x2z + 1./128.*x12*x2z*x12c + 1./128.* + x12*x2zq - 11./128.*x12*x2zc + 29./128.*x12*x2zs + 3./32.*x2z + *x12s - 9./128.*x2z*x12c + 3./128.*x12s*x2zc - 19./128.*x12s* + x2zs + 3./128.*x12c*x2zs - 1./128.*x2zq + 9./128.*x2zc - 3./ + 64.*x2zs ) ZZ11c = ZZ11c + rs1wz(7)*PZs**(-1)*vvc*GtM2*Xps*ys*Xp*cst**(-1)* + vdt * ( 1./64. - 1./64.*O - 1./64.*x12 ) ZZ11c = ZZ11c + rs1wz(7)*PZs**(-1)*vvc*GtM2*Xps*ys*cst**(-1)*vdt + * ( - 1./128. + 5./64.*O*x12 + 3./64.*O*x2z - 1./128.*O + 1./ + 64.*Os + 3./64.*x12*x2z - 7./128.*x12 - 7./128.*x2z + 1./16.* + x12s ) ZZ11c = ZZ11c + rs1wz(7)*PZs**(-1)*vvc*GtM2*ys*Xp*cst**(-1)*vdt + * ( - 1./64. - 9./64.*O*x12*x2z - 13./128.*O*x12 + 1./64.*O* + x2z - 1./64.*O*x12s - 3./64.*O*x2zs + 3./128.*O + 1./128.*Os* + x12 - 1./32.*Os*x2z - 1./128.*Os + 15./128.*x12*x2z - 7./128. + *x12*x2zs + 13./128.*x12 - 7./64.*x2z*x12s + 5./128.*x2z - 1./ + 16.*x12s - 3./128.*x12c + 9./128.*x2zs ) ZZ11c = ZZ11c + rs1wz(7)*PZs**(-1)*vvc*GtM2*ys*cst**(-1)*vdt * ( + 25./128.*O*x12*x2z + 7./128.*O*x12*x2zs + 1./64.*O*x12 - 1./ + 16.*O*x2z + 1./32.*O*x12s - 1./128.*O*x12c + 1./64.*O*x2zc - + 1./128.*O*x2zs - 1./64.*Os*x12*x2z - 3./128.*Os*x12 + 1./64.* + Os*x2z + 1./128.*Os*x12s + 1./64.*Os*x2zs + 1./128.*Oc*x12 - + 17./64.*x12*x2z - 1./128.*x12*x12c + 1./32.*x12*x2zc - 7./128. + *x12*x2zs + 17./128.*x2z*x12s + 1./64.*x2z*x12c + 3./64.*x2z + + 7./128.*x12s*x2zs - 3./64.*x12s + 7./128.*x12c - 5./128.* + x2zc - 9./128.*x2zs ) ZZ11c = ZZ11c + rs1wz(10)*XX*PZs**(-1)*vvc*GtM2*ys*cst**(-1)*vdt + * ( 1./64.*O*x12*x2zs - 1./64.*O*x2zc - 1./64.*Os*x12*x2zs + 1./ + 64.*x12*x2zq - 1./16.*x12*x2zc + 1./32.*x12s*x2zc - 3./64.* + x12s*x2zs + 1./64.*x12c*x2zs - 1./64.*x2zq + 1./64.*x2zc ) ZZ11c = ZZ11c + rs1wz(10)*PZs**(-1)*Xpi*vvc*GtM2*ys*cst**(-1)*vdt + * ( 1./32.*O*x12*x2z - 1./128.*O*x12*x2zc + 5./64.*O*x12*x2zs + + 1./32.*O*x2z*x12s - 1./128.*O*x2z*x12c - 1./64.*O*x12s* + x2zs + 1./64.*O*x2zc - 7./128.*O*x2zs - 5./128.*Os*x12*x2z + + 1./128.*Os*x12*x2zs + 1./128.*Os*x2z*x12s + 1./128.*Os*x2zs + + 1./128.*Oc*x12*x2z - 1./128.*x12*x2z*x12c - 1./128.*x12* + x2zq + 11./128.*x12*x2zc - 29./128.*x12*x2zs - 3./32.*x2z* + x12s + 9./128.*x2z*x12c - 3./128.*x12s*x2zc + 19./128.*x12s* + x2zs - 3./128.*x12c*x2zs + 1./128.*x2zq - 9./128.*x2zc + 3./ + 64.*x2zs ) ZZ11c = ZZ11c + rs1wz(10)*PZs**(-1)*vvc*GtM2*Xps*ys*Xp*cst**(-1)* + vdt * ( - 1./64. + 1./64.*O + 1./64.*x12 ) ZZ11c = ZZ11c + rs1wz(10)*PZs**(-1)*vvc*GtM2*Xps*ys*cst**(-1)*vdt + * ( 1./128. - 5./64.*O*x12 - 3./64.*O*x2z + 1./128.*O - 1./64.* + Os - 3./64.*x12*x2z + 7./128.*x12 + 7./128.*x2z - 1./16.*x12s + ) ZZ11c = ZZ11c + rs1wz(10)*PZs**(-1)*vvc*GtM2*ys*Xp*cst**(-1)*vdt + * ( 1./64. + 9./64.*O*x12*x2z + 13./128.*O*x12 - 1./64.*O*x2z + + 1./64.*O*x12s + 3./64.*O*x2zs - 3./128.*O - 1./128.*Os*x12 + + 1./32.*Os*x2z + 1./128.*Os - 15./128.*x12*x2z + 7./128.* + x12*x2zs - 13./128.*x12 + 7./64.*x2z*x12s - 5./128.*x2z + 1./ + 16.*x12s + 3./128.*x12c - 9./128.*x2zs ) ZZ11c = ZZ11c + rs1wz(10)*PZs**(-1)*vvc*GtM2*ys*cst**(-1)*vdt + * ( - 25./128.*O*x12*x2z - 7./128.*O*x12*x2zs - 1./64.*O*x12 + + 1./16.*O*x2z - 1./32.*O*x12s + 1./128.*O*x12c - 1./64.*O* + x2zc + 1./128.*O*x2zs + 1./64.*Os*x12*x2z + 3./128.*Os*x12 - + 1./64.*Os*x2z - 1./128.*Os*x12s - 1./64.*Os*x2zs - 1./128.*Oc + *x12 + 17./64.*x12*x2z + 1./128.*x12*x12c - 1./32.*x12*x2zc + + 7./128.*x12*x2zs - 17./128.*x2z*x12s - 1./64.*x2z*x12c - 3. + /64.*x2z - 7./128.*x12s*x2zs + 3./64.*x12s - 7./128.*x12c + 5. + /128.*x2zc + 9./128.*x2zs ) ZZ11c = ZZ11c + rs1wz(11)*PZs**(-1)*Xpi*vvc*GtM2*ys*cst**(-1)*vdt + * ( 1./16.*O*x12*x2z + 1./16.*O*x2z*x12s + 1./16.*O*x12c + 1./ + 32.*Os*x12s + 1./32.*x12*x12c + 1./16.*x2z*x12c + 1./32.*x12s + *x2zs + 1./32.*x2zs ) ZZ11c = ZZ11c + rs1wz(11)*PZs**(-1)*vvc*GtM2*Xps*ys*Xp*cst**(-1)* + vdt * ( 1./16. ) ZZ11c = ZZ11c + rs1wz(11)*PZs**(-1)*vvc*GtM2*Xps*ys*cst**(-1)*vdt + * ( - 1./16. - 1./8.*x12 - 1./8.*x2z ) ZZ11c = ZZ11c + rs1wz(11)*PZs**(-1)*vvc*GtM2*ys*Xp*cst**(-1)*vdt + * ( 1./32. + 1./8.*O*x12 + 3./16.*x12*x2z + 1./8.*x2z + 3./16.* + x12s + 1./16.*x2zs ) ZZ11c = ZZ11c + rs1wz(11)*PZs**(-1)*vvc*GtM2*ys*cst**(-1)*vdt + * ( - 1./8.*O*x12*x2z - 1./16.*O*x12 - 1./8.*O*x12s - 1./16.* + x12*x2zs - 3./16.*x2z*x12s - 1./16.*x2z - 1./8.*x12c - 1./16. + *x2zs ) ZZ11c = ZZ11c + rs1wz(12)*XX*PZs**(-1)*vvc*GtM2*ys*cst**(-1)*vdt + * ( 1./16.*O*x2z*x12s + 1./16.*O*x12c + 1./16.*x12*x12c + 1./16. + *x12*x2zs + 1./16.*x2z*x12s + 1./8.*x2z*x12c + 1./16.*x12s* + x2zs ) ZZ11c = ZZ11c + rs1wz(12)*PZs**(-1)*Xpi*vvc*GtM2*ys*cst**(-1)*vdt + * ( - 1./16.*O*x2z*x12s + 1./8.*O*x12s - 1./16.*O*x12c - 1./32. + *Os*x12s + 3./16.*x12*x2z - 1./32.*x12*x12c + 1./16.*x12*x2zs + + 3./16.*x2z*x12s - 1./16.*x2z*x12c - 1./32.*x12s*x2zs + 1./ + 16.*x12s + 1./8.*x12c + 1./32.*x2zs ) ZZ11c = ZZ11c + rs1wz(12)*PZs**(-1)*vvc*GtM2*Xps*ys*cst**(-1)*vdt + * ( - 3./32. + 1./16.*O + 1./16.*x12 ) ZZ11c = ZZ11c + rs1wz(12)*PZs**(-1)*vvc*GtM2*ys*Xp*cst**(-1)*vdt + * ( 1./16. - 3./32.*O*x12 - 1./16.*O*x2z - 1./32.*O - 1./32.* + x12*x2z + 3./16.*x12 + 5./32.*x2z - 3./32.*x12s ) ZZ11c = ZZ11c + rs1wz(12)*PZs**(-1)*vvc*GtM2*ys*cst**(-1)*vdt + * ( 3./32.*O*x12*x2z - 1./32.*O*x12 + 1./32.*O*x2z + 1./32.*O* + x12s + 1./32.*Os*x12 - 11./32.*x12*x2z - 1./8.*x12 - 3./32.* + x2z - 5./32.*x12s - 1./16.*x2zs ) ZZ11c = ZZ11c + rs1wz(13)*XX*PZs**(-1)*vvc*GtM2*ys*cst**(-1)*vdt + * ( 1./32.*O*x12*x2zs + 1./16.*O*x2z*x12s + 1./32.*O*x12c + 1./ + 32.*x12*x12c - 1./32.*x12*x2zc + 1./16.*x12*x2zs + 1./32.*x2z + *x12s + 1./32.*x2z*x12c - 1./32.*x12s*x2zs + 1./32.*x2zc ) ZZ11c = ZZ11c + rs1wz(13)*PZs**(-1)*Xpi*vvc*GtM2*ys*cst**(-1)*vdt + * ( 5./64.*O*x12*x2z + 1./16.*O*x12s - 1./64.*O*x2zs - 1./64.* + Os*x12*x2z + 1./8.*x12*x2z + 1./64.*x12*x2zc - 1./8.*x12*x2zs + - 3./64.*x2z*x12s + 1./64.*x2z*x12c + 1./32.*x12s*x2zs + 1./ + 32.*x12s + 1./16.*x12c - 1./64.*x2zc + 7./64.*x2zs ) ZZ11c = ZZ11c + rs1wz(13)*PZs**(-1)*vvc*GtM2*Xps*ys*cst**(-1)*vdt + * ( - 1./32. ) ZZ11c = ZZ11c + rs1wz(13)*PZs**(-1)*vvc*GtM2*ys*Xp*cst**(-1)*vdt + * ( 1./32. + 1./32.*O*x12 - 1./32.*O*x2z - 1./16.*x12*x2z + 1./ + 16.*x12 + 3./32.*x2z + 1./32.*x12s ) ZZ11c = ZZ11c + rs1wz(13)*PZs**(-1)*vvc*GtM2*ys*cst**(-1)*vdt + * ( - 1./16.*O*x12*x2z - 1./32.*O*x12 + 1./64.*O*x2z - 1./16.* + O*x12s + 1./32.*O*x2zs - 1./64.*x12*x2z + 1./16.*x12*x2zs - 1. + /16.*x12 - 7./64.*x2z - 1./16.*x12s - 1./16.*x12c - 5./64.* + x2zs ) ZZ11c = ZZ11c + rs1wz(14)*XX*PZs**(-1)*vvc*GtM2*ys*cst**(-1)*vdt + * ( - 1./32.*O*x12*x2zs - 1./32.*O*x2z*x12s + 1./32.*x12*x2zc + - 1./32.*x12*x2zs + 1./32.*x2z*x12c + 1./16.*x12s*x2zs - 1./ + 32.*x2zc ) ZZ11c = ZZ11c + rs1wz(14)*PZs**(-1)*Xpi*vvc*GtM2*ys*cst**(-1)*vdt + * ( - 5./64.*O*x12*x2z - 1./32.*O*x12s + 1./64.*O*x2zs + 1./64. + *Os*x12*x2z - 1./16.*x12*x2z - 1./64.*x12*x2zc + 3./16.*x12* + x2zs + 13./64.*x2z*x12s - 1./64.*x2z*x12c - 1./32.*x12s*x2zs + + 1./32.*x12c + 1./64.*x2zc - 7./64.*x2zs ) ZZ11c = ZZ11c + rs1wz(14)*PZs**(-1)*vvc*GtM2*Xps*ys*Xp*cst**(-1)* + vdt * ( 1./32. ) ZZ11c = ZZ11c + rs1wz(14)*PZs**(-1)*vvc*GtM2*Xps*ys*cst**(-1)*vdt + * ( 1./64. - 1./32.*O - 5./32.*x12 - 1./16.*x2z ) ZZ11c = ZZ11c + rs1wz(14)*PZs**(-1)*vvc*GtM2*ys*Xp*cst**(-1)*vdt + * ( - 3./64. - 1./64.*O*x12 + 1./16.*O*x2z + 1./64.*O + 17./64. + *x12*x2z + 1./8.*x12 - 3./64.*x2z + 9./64.*x12s + 1./32.*x2zs + ) ZZ11c = ZZ11c + rs1wz(14)*PZs**(-1)*vvc*GtM2*ys*cst**(-1)*vdt + * ( 3./64.*O*x12*x2z + 3./64.*O*x12 - 1./32.*O*x2z + 1./64.*O* + x12s - 1./32.*O*x2zs - 1./64.*Os*x12 - 1./4.*x12*x2z - 1./8.* + x12*x2zs + 1./32.*x12 - 5./32.*x2z*x12s + 1./8.*x2z - 9./64.* + x12s - 1./32.*x12c + 3./64.*x2zs ) ZZ21c = + + rs1wz(1)*XX*PZs**(-1)*vvc*GtM2*ys*cst**(-1)*vdt * ( 3./8.*O* + x12*x2zs + 3./4.*O*x2z*x12s + 3./8.*O*x12c + 3./8.*x12*x12c + - 3./8.*x12*x2zc + 3./4.*x12*x2zs + 3./8.*x2z*x12s + 3./8.* + x2z*x12c - 3./8.*x12s*x2zs + 3./8.*x2zc ) ZZ21c = ZZ21c + rs1wz(1)*PZs**(-1)*Xpi*vvc*GtM2*ys*cst**(-1)*vdt + * ( 15./16.*O*x12*x2z + 9./8.*O*x12s - 3./16.*O*x2zs - 3./16.* + Os*x12*x2z - 3./16.*Os*x12s + 15./8.*x12*x2z + 3./16.*x12* + x12c + 3./16.*x12*x2zc - 3./2.*x12*x2zs - 15./16.*x2z*x12s + + 9./16.*x2z*x12c + 9./16.*x12s*x2zs + 3./8.*x12s + 3./8.*x12c + - 3./16.*x2zc + 3./2.*x2zs ) ZZ21c = ZZ21c + rs1wz(1)*PZs**(-1)*vvc*GtM2*Xps*ys*Xp*cst**(-1)* + vdt * ( 1./8. ) ZZ21c = ZZ21c + rs1wz(1)*PZs**(-1)*vvc*GtM2*Xps*ys*cst**(-1)*vdt + * ( - 5./8. + 1./4.*O - 1./4.*x2z ) ZZ21c = ZZ21c + rs1wz(1)*PZs**(-1)*vvc*GtM2*ys*Xp*cst**(-1)*vdt + * ( 13./16. + 1./2.*O*x12 - 3./8.*O*x2z - 1./4.*O + 11./8.*x2z + + 5./8.*x12s + 1./8.*x2zs ) ZZ21c = ZZ21c + rs1wz(1)*PZs**(-1)*vvc*GtM2*ys*cst**(-1)*vdt * ( + - 7./8.*O*x12*x2z - 5./8.*O*x12 + 7./16.*O*x2z - O*x12s + 1./ + 8.*O*x2zs + 1./4.*Os*x12 + 5./16.*x12*x2z + 1./4.*x12*x2zs - + 9./8.*x12 - x2z*x12s - 31./16.*x2z + 1./2.*x12s - 5./4.*x12c + - 15./16.*x2zs ) ZZ21c = ZZ21c + rs1wz(4)*XX*PZs**(-1)*vvc*GtM2*ys*cst**(-1)*vdt + * ( - 3./16.*O*x12*x2zs - 3./16.*O*x2z*x12c - 3./16.*O*x12s* + x2zs - 3./32.*Os*x2z*x12s - 3./32.*x12*x2z*x12c - 3./32.*x12s + *x2zc - 3./16.*x12c*x2zs - 3./32.*x2zc ) ZZ21c = ZZ21c + rs1wz(4)*PZs**(-1)*Xpi*vvc*GtM2*ys*cst**(-1)*vdt + * ( - 3./8.*O*x12*x2z + 9./64.*O*x12*x12c - 3./16.*O*x12*x2zs + - 3./8.*O*x2z*x12s + 9./32.*O*x2z*x12c + 9./64.*O*x12s*x2zs + - 3./16.*O*x12c + 3./64.*O*x2zs + 3./32.*Os*x12*x2z + 9./64. + *Os*x2z*x12s - 3./32.*Os*x12s + 9./64.*Os*x12c + 3./64.*Oc* + x12s + 9./64.*x12*x2z*x12c - 3./32.*x12*x12c - 3./32.*x12* + x2zc + 9./64.*x12*x2zs - 15./32.*x2z*x12c + 3./64.*x12s*x12c + + 3./64.*x12s*x2zc - 15./32.*x12s*x2zs + 9./64.*x12c*x2zs - + 3./64.*x2zc - 9./32.*x2zs ) ZZ21c = ZZ21c + rs1wz(4)*PZs**(-1)*vvc*GtM2*Xps*ys*Xp*cst**(-1)* + vdt * ( - 1./32. + 1./32.*O + 1./32.*x12 ) ZZ21c = ZZ21c + rs1wz(4)*PZs**(-1)*vvc*GtM2*Xps*ys*cst**(-1)*vdt + * ( 7./64. - 1./32.*O*x12 - 1./16.*O*x2z - 1./16.*O - 1./16.* + x12*x2z - 1./32.*x12 + 1./8.*x2z - 1./32.*x12s ) ZZ21c = ZZ21c + rs1wz(4)*PZs**(-1)*vvc*GtM2*ys*Xp*cst**(-1)*vdt + * ( - 3./32. - 1./32.*O*x12*x2z - 11./32.*O*x12 + 1./8.*O*x2z + + 5./16.*O*x12s + 1./32.*O*x2zs + 3./64.*O + 5./32.*Os*x12 + + 9./64.*x12 - 1./32.*x2z*x12s - 23./64.*x2z - 11./32.*x12s + + 5./32.*x12c - 5./32.*x2zs ) ZZ21c = ZZ21c + rs1wz(4)*PZs**(-1)*vvc*GtM2*ys*cst**(-1)*vdt * ( + 23./32.*O*x12*x2z + 1./16.*O*x12*x2zs + 3./16.*O*x12 - 7./32. + *O*x2z*x12s - 3./32.*O*x2z + 3./16.*O*x12s - 9./32.*O*x12c - + 1./16.*O*x2zs - 5./32.*Os*x12*x2z - 3./32.*Os*x12 - 9./64.*Os + *x12s - 9./32.*x12*x2z - 9./64.*x12*x12c + 1./32.*x12*x2zc + + 1./8.*x12*x2zs + 23./32.*x2z*x12s - 1./16.*x2z*x12c + 9./32.* + x2z + 7./64.*x12s*x2zs + 9./32.*x12c + 1./16.*x2zc + 25./64.* + x2zs ) ZZ21c = ZZ21c + rs1wz(7)*XX*PZs**(-1)*vvc*GtM2*ys*cst**(-1)*vdt + * ( - 3./64.*O*x12*x2zs + 3./64.*O*x2zc + 3./64.*Os*x12*x2zs + - 3./64.*x12*x2zq + 3./16.*x12*x2zc - 3./32.*x12s*x2zc + 9./ + 64.*x12s*x2zs - 3./64.*x12c*x2zs + 3./64.*x2zq - 3./64.*x2zc + ) ZZ21c = ZZ21c + rs1wz(7)*PZs**(-1)*Xpi*vvc*GtM2*ys*cst**(-1)*vdt + * ( - 3./32.*O*x12*x2z + 3./128.*O*x12*x2zc - 15./64.*O*x12* + x2zs - 3./32.*O*x2z*x12s + 3./128.*O*x2z*x12c + 3./64.*O*x12s + *x2zs - 3./64.*O*x2zc + 21./128.*O*x2zs + 15./128.*Os*x12*x2z + - 3./128.*Os*x12*x2zs - 3./128.*Os*x2z*x12s - 3./128.*Os* + x2zs - 3./128.*Oc*x12*x2z + 3./128.*x12*x2z*x12c + 3./128.* + x12*x2zq - 33./128.*x12*x2zc + 87./128.*x12*x2zs + 9./32.*x2z + *x12s - 27./128.*x2z*x12c + 9./128.*x12s*x2zc - 57./128.*x12s + *x2zs + 9./128.*x12c*x2zs - 3./128.*x2zq + 27./128.*x2zc - 9./ + 64.*x2zs ) ZZ21c = ZZ21c + rs1wz(7)*PZs**(-1)*vvc*GtM2*Xps*ys*Xp*cst**(-1)* + vdt * ( 1./64. - 1./64.*O - 1./64.*x12 ) ZZ21c = ZZ21c + rs1wz(7)*PZs**(-1)*vvc*GtM2*Xps*ys*cst**(-1)*vdt + * ( - 5./128. + 5./64.*O*x12 + 3./64.*O*x2z + 1./128.*O + 1./ + 64.*Os + 3./64.*x12*x2z - 5./128.*x12 - 9./128.*x2z + 1./16.* + x12s ) ZZ21c = ZZ21c + rs1wz(7)*PZs**(-1)*vvc*GtM2*ys*Xp*cst**(-1)*vdt + * ( - 3./64. - 11./64.*O*x12*x2z - 39./128.*O*x12 - 1./64.*O* + x2z + 5./64.*O*x12s - 3./64.*O*x2zs + 9./128.*O + 7./128.*Os* + x12 - 1./32.*Os*x2z - 3./128.*Os + 17./128.*x12*x2z - 9./128. + *x12*x2zs + 39./128.*x12 - 9./64.*x2z*x12s + 19./128.*x2z - 1. + /4.*x12s + 3./128.*x12c + 15./128.*x2zs ) ZZ21c = ZZ21c + rs1wz(7)*PZs**(-1)*vvc*GtM2*ys*cst**(-1)*vdt * ( + 75./128.*O*x12*x2z + 9./128.*O*x12*x2zs + 3./64.*O*x12 - 3./ + 32.*O*x2z*x12s - 3./16.*O*x2z + 3./32.*O*x12s - 7./128.*O* + x12c + 1./64.*O*x2zc + 1./128.*O*x2zs - 5./64.*Os*x12*x2z - 9. + /128.*Os*x12 + 3./64.*Os*x2z + 1./128.*Os*x12s + 1./64.*Os* + x2zs + 3./128.*Oc*x12 - 51./64.*x12*x2z - 5./128.*x12*x12c + + 1./16.*x12*x2zc - 9./128.*x12*x2zs + 59./128.*x2z*x12s - 1./ + 64.*x2z*x12c + 9./64.*x2z + 11./128.*x12s*x2zs - 9./64.*x12s + + 21./128.*x12c - 11./128.*x2zc - 29./128.*x2zs ) ZZ21c = ZZ21c + rs1wz(10)*XX*PZs**(-1)*vvc*GtM2*ys*cst**(-1)*vdt + * ( 3./64.*O*x12*x2zs - 3./64.*O*x2zc - 3./64.*Os*x12*x2zs + 3./ + 64.*x12*x2zq - 3./16.*x12*x2zc + 3./32.*x12s*x2zc - 9./64.* + x12s*x2zs + 3./64.*x12c*x2zs - 3./64.*x2zq + 3./64.*x2zc ) ZZ21c = ZZ21c + rs1wz(10)*PZs**(-1)*Xpi*vvc*GtM2*ys*cst**(-1)*vdt + * ( 3./32.*O*x12*x2z - 3./128.*O*x12*x2zc + 15./64.*O*x12*x2zs + + 3./32.*O*x2z*x12s - 3./128.*O*x2z*x12c - 3./64.*O*x12s* + x2zs + 3./64.*O*x2zc - 21./128.*O*x2zs - 15./128.*Os*x12*x2z + + 3./128.*Os*x12*x2zs + 3./128.*Os*x2z*x12s + 3./128.*Os* + x2zs + 3./128.*Oc*x12*x2z - 3./128.*x12*x2z*x12c - 3./128.* + x12*x2zq + 33./128.*x12*x2zc - 87./128.*x12*x2zs - 9./32.*x2z + *x12s + 27./128.*x2z*x12c - 9./128.*x12s*x2zc + 57./128.*x12s + *x2zs - 9./128.*x12c*x2zs + 3./128.*x2zq - 27./128.*x2zc + 9./ + 64.*x2zs ) ZZ21c = ZZ21c + rs1wz(10)*PZs**(-1)*vvc*GtM2*Xps*ys*Xp*cst**(-1)* + vdt * ( - 1./64. + 1./64.*O + 1./64.*x12 ) ZZ21c = ZZ21c + rs1wz(10)*PZs**(-1)*vvc*GtM2*Xps*ys*cst**(-1)*vdt + * ( 5./128. - 5./64.*O*x12 - 3./64.*O*x2z - 1./128.*O - 1./64.* + Os - 3./64.*x12*x2z + 5./128.*x12 + 9./128.*x2z - 1./16.*x12s + ) ZZ21c = ZZ21c + rs1wz(10)*PZs**(-1)*vvc*GtM2*ys*Xp*cst**(-1)*vdt + * ( 3./64. + 11./64.*O*x12*x2z + 39./128.*O*x12 + 1./64.*O*x2z + - 5./64.*O*x12s + 3./64.*O*x2zs - 9./128.*O - 7./128.*Os*x12 + + 1./32.*Os*x2z + 3./128.*Os - 17./128.*x12*x2z + 9./128.* + x12*x2zs - 39./128.*x12 + 9./64.*x2z*x12s - 19./128.*x2z + 1./ + 4.*x12s - 3./128.*x12c - 15./128.*x2zs ) ZZ21c = ZZ21c + rs1wz(10)*PZs**(-1)*vvc*GtM2*ys*cst**(-1)*vdt + * ( - 75./128.*O*x12*x2z - 9./128.*O*x12*x2zs - 3./64.*O*x12 + + 3./32.*O*x2z*x12s + 3./16.*O*x2z - 3./32.*O*x12s + 7./128. + *O*x12c - 1./64.*O*x2zc - 1./128.*O*x2zs + 5./64.*Os*x12*x2z + + 9./128.*Os*x12 - 3./64.*Os*x2z - 1./128.*Os*x12s - 1./64.* + Os*x2zs - 3./128.*Oc*x12 + 51./64.*x12*x2z + 5./128.*x12*x12c + - 1./16.*x12*x2zc + 9./128.*x12*x2zs - 59./128.*x2z*x12s + 1. + /64.*x2z*x12c - 9./64.*x2z - 11./128.*x12s*x2zs + 9./64.*x12s + - 21./128.*x12c + 11./128.*x2zc + 29./128.*x2zs ) ZZ21c = ZZ21c + rs1wz(11)*PZs**(-1)*Xpi*vvc*GtM2*ys*cst**(-1)*vdt + * ( 3./16.*O*x12*x2z + 3./16.*O*x2z*x12s + 3./16.*O*x12c + 3./ + 32.*Os*x12s + 3./32.*x12*x12c + 3./16.*x2z*x12c + 3./32.*x12s + *x2zs + 3./32.*x2zs ) ZZ21c = ZZ21c + rs1wz(11)*PZs**(-1)*vvc*GtM2*Xps*ys*Xp*cst**(-1)* + vdt * ( 1./16. ) ZZ21c = ZZ21c + rs1wz(11)*PZs**(-1)*vvc*GtM2*Xps*ys*cst**(-1)*vdt + * ( - 1./8. - 1./8.*x12 - 1./8.*x2z ) ZZ21c = ZZ21c + rs1wz(11)*PZs**(-1)*vvc*GtM2*ys*Xp*cst**(-1)*vdt + * ( 3./32. + 5./16.*O*x12 + 1./4.*x12*x2z - 1./16.*x12 + 1./4.* + x2z + 3./8.*x12s + 1./16.*x2zs ) ZZ21c = ZZ21c + rs1wz(11)*PZs**(-1)*vvc*GtM2*ys*cst**(-1)*vdt + * ( - 5./16.*O*x12*x2z - 3./16.*O*x12 - 5./16.*O*x12s + 1./16. + *x12*x2z - 1./8.*x12*x2zs - 7./16.*x2z*x12s - 3./16.*x2z - 5./ + 16.*x12c - 1./8.*x2zs ) ZZ21c = ZZ21c + rs1wz(12)*XX*PZs**(-1)*vvc*GtM2*ys*cst**(-1)*vdt + * ( 3./16.*O*x2z*x12s + 3./16.*O*x12c + 3./16.*x12*x12c + 3./16. + *x12*x2zs + 3./16.*x2z*x12s + 3./8.*x2z*x12c + 3./16.*x12s* + x2zs ) ZZ21c = ZZ21c + rs1wz(12)*PZs**(-1)*Xpi*vvc*GtM2*ys*cst**(-1)*vdt + * ( - 3./16.*O*x2z*x12s + 3./8.*O*x12s - 3./16.*O*x12c - 3./32. + *Os*x12s + 9./16.*x12*x2z - 3./32.*x12*x12c + 3./16.*x12*x2zs + + 9./16.*x2z*x12s - 3./16.*x2z*x12c - 3./32.*x12s*x2zs + 3./ + 16.*x12s + 3./8.*x12c + 3./32.*x2zs ) ZZ21c = ZZ21c + rs1wz(12)*PZs**(-1)*vvc*GtM2*Xps*ys*cst**(-1)*vdt + * ( - 5./32. + 1./16.*O + 1./16.*x12 ) ZZ21c = ZZ21c + rs1wz(12)*PZs**(-1)*vvc*GtM2*ys*Xp*cst**(-1)*vdt + * ( 1./8. - 5./32.*O*x12 - 1./16.*O*x2z - 1./32.*O + 1./32.*x12 + *x2z + 1./2.*x12 + 9./32.*x2z - 5./32.*x12s ) ZZ21c = ZZ21c + rs1wz(12)*PZs**(-1)*vvc*GtM2*ys*cst**(-1)*vdt + * ( 5./32.*O*x12*x2z - 1./32.*O*x12 + 1./32.*O*x2z - 1./32.*O* + x12s + 1./32.*Os*x12 - 29./32.*x12*x2z - 1./16.*x12*x2zs - 3./ + 8.*x12 - 1./8.*x2z*x12s - 7./32.*x2z - 13./32.*x12s - 1./16.* + x12c - 1./8.*x2zs ) ZZ21c = ZZ21c + rs1wz(13)*XX*PZs**(-1)*vvc*GtM2*ys*cst**(-1)*vdt + * ( 3./32.*O*x12*x2zs + 3./16.*O*x2z*x12s + 3./32.*O*x12c + 3./ + 32.*x12*x12c - 3./32.*x12*x2zc + 3./16.*x12*x2zs + 3./32.*x2z + *x12s + 3./32.*x2z*x12c - 3./32.*x12s*x2zs + 3./32.*x2zc ) ZZ21c = ZZ21c + rs1wz(13)*PZs**(-1)*Xpi*vvc*GtM2*ys*cst**(-1)*vdt + * ( 15./64.*O*x12*x2z + 3./16.*O*x12s - 3./64.*O*x2zs - 3./64.* + Os*x12*x2z + 3./8.*x12*x2z + 3./64.*x12*x2zc - 3./8.*x12*x2zs + - 9./64.*x2z*x12s + 3./64.*x2z*x12c + 3./32.*x12s*x2zs + 3./ + 32.*x12s + 3./16.*x12c - 3./64.*x2zc + 21./64.*x2zs ) ZZ21c = ZZ21c + rs1wz(13)*PZs**(-1)*vvc*GtM2*Xps*ys*cst**(-1)*vdt + * ( - 1./16. ) ZZ21c = ZZ21c + rs1wz(13)*PZs**(-1)*vvc*GtM2*ys*Xp*cst**(-1)*vdt + * ( 1./8. + 3./16.*O*x12 - 1./32.*O*x2z - 1./32.*O - 3./32.*x12 + *x2z + 3./16.*x2z + 3./16.*x12s ) ZZ21c = ZZ21c + rs1wz(13)*PZs**(-1)*vvc*GtM2*ys*cst**(-1)*vdt + * ( - 9./32.*O*x12*x2z - 1./8.*O*x12 + 5./64.*O*x2z - 7./32.*O + *x12s + 1./32.*O*x2zs + 1./32.*Os*x12 + 7./64.*x12*x2z + 1./8. + *x12*x2zs - 3./16.*x12 - 1./8.*x2z*x12s - 23./64.*x2z - 3./32. + *x12s - 1./4.*x12c - 11./64.*x2zs ) ZZ21c = ZZ21c + rs1wz(14)*XX*PZs**(-1)*vvc*GtM2*ys*cst**(-1)*vdt + * ( - 3./32.*O*x12*x2zs - 3./32.*O*x2z*x12s + 3./32.*x12*x2zc + - 3./32.*x12*x2zs + 3./32.*x2z*x12c + 3./16.*x12s*x2zs - 3./ + 32.*x2zc ) ZZ21c = ZZ21c + rs1wz(14)*PZs**(-1)*Xpi*vvc*GtM2*ys*cst**(-1)*vdt + * ( - 15./64.*O*x12*x2z - 3./32.*O*x12s + 3./64.*O*x2zs + 3./ + 64.*Os*x12*x2z - 3./16.*x12*x2z - 3./64.*x12*x2zc + 9./16.* + x12*x2zs + 39./64.*x2z*x12s - 3./64.*x2z*x12c - 3./32.*x12s* + x2zs + 3./32.*x12c + 3./64.*x2zc - 21./64.*x2zs ) ZZ21c = ZZ21c + rs1wz(14)*PZs**(-1)*vvc*GtM2*Xps*ys*Xp*cst**(-1)* + vdt * ( 1./32. ) ZZ21c = ZZ21c + rs1wz(14)*PZs**(-1)*vvc*GtM2*Xps*ys*cst**(-1)*vdt + * ( 3./64. - 1./32.*O - 9./32.*x12 - 1./16.*x2z ) ZZ21c = ZZ21c + rs1wz(14)*PZs**(-1)*vvc*GtM2*ys*Xp*cst**(-1)*vdt + * ( - 9./64. - 11./64.*O*x12 + 1./16.*O*x2z + 3./64.*O + 35./ + 64.*x12*x2z + 3./8.*x12 - 9./64.*x2z + 15./64.*x12s + 1./32.* + x2zs ) ZZ21c = ZZ21c + rs1wz(14)*PZs**(-1)*vvc*GtM2*ys*cst**(-1)*vdt + * ( 17./64.*O*x12*x2z + 9./64.*O*x12 - 3./32.*O*x2z + 7./64.*O* + x12s - 1./32.*O*x2zs - 3./64.*Os*x12 - 3./4.*x12*x2z - 5./16. + *x12*x2zs + 3./32.*x12 - 11./32.*x2z*x12s + 3./8.*x2z - 27./ + 64.*x12s - 1./32.*x12c + 9./64.*x2zs ) ZZ31c = + + rs1wz(1)*PZs**(-1)*Xpi*vvc*GtM2*ys*cst**(-1)*vdt * ( 1./16.*O + *x12*x2z - 1./8.*O*x12*x2zs - 1./4.*O*x2z*x12s + 1./8.*O*x12s + - 1./8.*O*x12c - 1./16.*O*x2zs - 1./16.*Os*x12*x2z - 1./16.* + Os*x12s + 1./8.*x12*x2z - 1./16.*x12*x12c - 1./16.*x12*x2zc + + 1./4.*x12*x2zs + 5./16.*x2z*x12s - 3./16.*x2z*x12c - 3./16. + *x12s*x2zs + 1./8.*x12c + 1./16.*x2zc + 1./8.*x2zs ) ZZ31c = ZZ31c + rs1wz(1)*PZs**(-1)*vvc*GtM2*Xps*ys*Xp*cst**(-1)* + vdt * ( 1./8. ) ZZ31c = ZZ31c + rs1wz(1)*PZs**(-1)*vvc*GtM2*Xps*ys*cst**(-1)*vdt + * ( - 3./8. + 1./4.*O - 1./4.*x2z ) ZZ31c = ZZ31c + rs1wz(1)*PZs**(-1)*vvc*GtM2*ys*Xp*cst**(-1)*vdt + * ( 3./16. - 1./4.*O*x12 - 3./8.*O*x2z - 1./8.*O + 3./8.*x12 + + 3./4.*x2z - 1./8.*x12s + 1./8.*x2zs ) ZZ31c = ZZ31c + rs1wz(1)*PZs**(-1)*vvc*GtM2*ys*cst**(-1)*vdt * ( + 3./8.*O*x12*x2z - 1./8.*O*x12 + 3./16.*O*x2z + 1./4.*O*x12s + + 1./8.*O*x2zs + 1./8.*Os*x12 - 11./16.*x12*x2z + 1./8.*x12* + x2zs - 1./8.*x12 + 1./4.*x2z*x12s - 5./16.*x2z - 1./4.*x12s + + 1./8.*x12c - 7./16.*x2zs ) ZZ31c = ZZ31c + rs1wz(4)*PZs**(-1)*Xpi*vvc*GtM2*ys*cst**(-1)*vdt + * ( 3./64.*O*x12*x12c + 3./32.*O*x2z*x12c + 3./64.*O*x12s*x2zs + + 1./64.*O*x2zs + 1./32.*Os*x12*x2z + 3./64.*Os*x2z*x12s + 3. + /64.*Os*x12c + 1./64.*Oc*x12s + 3./64.*x12*x2z*x12c - 1./32.* + x12*x2zc - 1./64.*x12*x2zs - 1./32.*x2z*x12c + 1./64.*x12s* + x12c + 1./64.*x12s*x2zc - 1./16.*x12s*x2zs + 3./64.*x12c*x2zs + - 1./64.*x2zc ) ZZ31c = ZZ31c + rs1wz(4)*PZs**(-1)*vvc*GtM2*Xps*ys*Xp*cst**(-1)* + vdt * ( - 1./32. + 1./32.*O + 1./32.*x12 ) ZZ31c = ZZ31c + rs1wz(4)*PZs**(-1)*vvc*GtM2*Xps*ys*cst**(-1)*vdt + * ( 1./64. - 3./32.*O*x12 - 1./16.*O*x2z - 1./32.*O - 1./16.* + x12*x2z + 1./16.*x12 + 3./32.*x2z - 3./32.*x12s ) ZZ31c = ZZ31c + rs1wz(4)*PZs**(-1)*vvc*GtM2*ys*Xp*cst**(-1)*vdt + * ( 5./32.*O*x12*x2z + 1./16.*O*x2z + 3./16.*O*x12s + 1./32.*O* + x2zs + 1./64.*O + 1./16.*Os*x12 - 5./32.*x12*x2z + 1./32.*x12 + *x2zs - 1./64.*x12 + 5./32.*x2z*x12s - 3./64.*x2z - 1./16.* + x12s + 1./8.*x12c - 3./32.*x2zs ) ZZ31c = ZZ31c + rs1wz(4)*PZs**(-1)*vvc*GtM2*ys*cst**(-1)*vdt * ( + - 1./16.*O*x12*x2zs - 7./32.*O*x2z*x12s - 1./32.*O*x2z - 5./ + 32.*O*x12c - 1./32.*O*x2zs - 1./16.*Os*x12*x2z - 1./32.*Os* + x12 - 5./64.*Os*x12s + 1./32.*x12*x2z - 5./64.*x12*x12c + 1./ + 8.*x12*x2zs + 1./8.*x2z*x12s - 5./32.*x2z*x12c - 5./64.*x12s* + x2zs + 1./32.*x12c + 1./32.*x2zc + 3./64.*x2zs ) ZZ31c = ZZ31c + rs1wz(7)*PZs**(-1)*Xpi*vvc*GtM2*ys*cst**(-1)*vdt + * ( - 1./32.*O*x12*x12c - 3./128.*O*x12*x2zc - 1./64.*O*x12* + x2zs - 1./64.*O*x2z*x12s - 11./128.*O*x2z*x12c - 5./64.*O* + x12s*x2zs + 1./128.*O*x2zs + 1./128.*Os*x12*x2z - 3./128.*Os* + x12*x2zs - 5./128.*Os*x2z*x12s - 1./64.*Os*x12c - 1./128.*Os* + x2zs - 1./128.*Oc*x12*x2z - 7./128.*x12*x2z*x12c - 1./128.* + x12*x2zq + 7./128.*x12*x2zc - 1./128.*x12*x2zs + 5./128.*x2z* + x12c - 1./64.*x12s*x12c - 5./128.*x12s*x2zc + 11./128.*x12s* + x2zs - 9./128.*x12c*x2zs + 1./128.*x2zq - 1./128.*x2zc ) ZZ31c = ZZ31c + rs1wz(7)*PZs**(-1)*vvc*GtM2*Xps*ys*Xp*cst**(-1)* + vdt * ( 1./64. - 1./64.*O - 1./64.*x12 ) ZZ31c = ZZ31c + rs1wz(7)*PZs**(-1)*vvc*GtM2*Xps*ys*cst**(-1)*vdt + * ( 1./128. + 7./64.*O*x12 + 3./64.*O*x2z - 1./128.*O + 1./64.* + Os + 3./64.*x12*x2z - 11./128.*x12 - 7./128.*x2z + 3./32.* + x12s ) ZZ31c = ZZ31c + rs1wz(7)*PZs**(-1)*vvc*GtM2*ys*Xp*cst**(-1)*vdt + * ( - 15./64.*O*x12*x2z - 3./128.*O*x12 + 1./64.*O*x2z - 11./ + 64.*O*x12s - 3./64.*O*x2zs + 1./128.*O - 3./128.*Os*x12 - 1./ + 32.*Os*x2z - 1./128.*Os + 29./128.*x12*x2z - 7./128.*x12*x2zs + - 1./128.*x12 - 13./64.*x2z*x12s - 3./128.*x2z + 7./64.*x12s + - 19./128.*x12c + 9./128.*x2zs ) ZZ31c = ZZ31c + rs1wz(7)*PZs**(-1)*vvc*GtM2*ys*cst**(-1)*vdt * ( + 5./128.*O*x12*x2z + 19./128.*O*x12*x2zs + 1./4.*O*x2z*x12s - + 1./64.*O*x2z + 1./64.*O*x12s + 15./128.*O*x12c + 1./64.*O* + x2zc - 1./128.*O*x2zs + 3./64.*Os*x12*x2z - 1./128.*Os*x12 + + 1./64.*Os*x2z + 5./128.*Os*x12s + 1./64.*Os*x2zs + 1./128.*Oc + *x12 + 1./64.*x12*x2z + 11./128.*x12*x12c + 1./32.*x12*x2zc + - 25./128.*x12*x2zs - 25./128.*x2z*x12s + 13./64.*x2z*x12c + + 19./128.*x12s*x2zs - 5./128.*x12c - 5./128.*x2zc + 3./128. + *x2zs ) ZZ31c = ZZ31c + rs1wz(10)*PZs**(-1)*Xpi*vvc*GtM2*ys*cst**(-1)*vdt + * ( 1./32.*O*x12*x12c + 3./128.*O*x12*x2zc + 1./64.*O*x12*x2zs + + 1./64.*O*x2z*x12s + 11./128.*O*x2z*x12c + 5./64.*O*x12s* + x2zs - 1./128.*O*x2zs - 1./128.*Os*x12*x2z + 3./128.*Os*x12* + x2zs + 5./128.*Os*x2z*x12s + 1./64.*Os*x12c + 1./128.*Os*x2zs + + 1./128.*Oc*x12*x2z + 7./128.*x12*x2z*x12c + 1./128.*x12* + x2zq - 7./128.*x12*x2zc + 1./128.*x12*x2zs - 5./128.*x2z*x12c + + 1./64.*x12s*x12c + 5./128.*x12s*x2zc - 11./128.*x12s*x2zs + + 9./128.*x12c*x2zs - 1./128.*x2zq + 1./128.*x2zc ) ZZ31c = ZZ31c + rs1wz(10)*PZs**(-1)*vvc*GtM2*Xps*ys*Xp*cst**(-1)* + vdt * ( - 1./64. + 1./64.*O + 1./64.*x12 ) ZZ31c = ZZ31c + rs1wz(10)*PZs**(-1)*vvc*GtM2*Xps*ys*cst**(-1)*vdt + * ( - 1./128. - 7./64.*O*x12 - 3./64.*O*x2z + 1./128.*O - 1./ + 64.*Os - 3./64.*x12*x2z + 11./128.*x12 + 7./128.*x2z - 3./32. + *x12s ) ZZ31c = ZZ31c + rs1wz(10)*PZs**(-1)*vvc*GtM2*ys*Xp*cst**(-1)*vdt + * ( 15./64.*O*x12*x2z + 3./128.*O*x12 - 1./64.*O*x2z + 11./64.* + O*x12s + 3./64.*O*x2zs - 1./128.*O + 3./128.*Os*x12 + 1./32.* + Os*x2z + 1./128.*Os - 29./128.*x12*x2z + 7./128.*x12*x2zs + 1. + /128.*x12 + 13./64.*x2z*x12s + 3./128.*x2z - 7./64.*x12s + 19. + /128.*x12c - 9./128.*x2zs ) ZZ31c = ZZ31c + rs1wz(10)*PZs**(-1)*vvc*GtM2*ys*cst**(-1)*vdt + * ( - 5./128.*O*x12*x2z - 19./128.*O*x12*x2zs - 1./4.*O*x2z* + x12s + 1./64.*O*x2z - 1./64.*O*x12s - 15./128.*O*x12c - 1./64. + *O*x2zc + 1./128.*O*x2zs - 3./64.*Os*x12*x2z + 1./128.*Os*x12 + - 1./64.*Os*x2z - 5./128.*Os*x12s - 1./64.*Os*x2zs - 1./128. + *Oc*x12 - 1./64.*x12*x2z - 11./128.*x12*x12c - 1./32.*x12* + x2zc + 25./128.*x12*x2zs + 25./128.*x2z*x12s - 13./64.*x2z* + x12c - 19./128.*x12s*x2zs + 5./128.*x12c + 5./128.*x2zc - 3./ + 128.*x2zs ) ZZ31c = ZZ31c + rs1wz(11)*PZs**(-1)*Xpi*vvc*GtM2*ys*cst**(-1)*vdt + * ( 1./16.*O*x12*x2z + 1./16.*O*x2z*x12s + 1./16.*O*x12c + 1./ + 32.*Os*x12s + 1./32.*x12*x12c + 1./16.*x2z*x12c + 1./32.*x12s + *x2zs + 1./32.*x2zs ) ZZ31c = ZZ31c + rs1wz(11)*PZs**(-1)*vvc*GtM2*Xps*ys*Xp*cst**(-1)* + vdt * ( 1./16. ) ZZ31c = ZZ31c + rs1wz(11)*PZs**(-1)*vvc*GtM2*Xps*ys*cst**(-1)*vdt + * ( - 1./16. - 1./8.*x12 - 1./8.*x2z ) ZZ31c = ZZ31c + rs1wz(11)*PZs**(-1)*vvc*GtM2*ys*Xp*cst**(-1)*vdt + * ( 1./32. + 1./8.*O*x12 + 3./16.*x12*x2z + 1./8.*x2z + 3./16.* + x12s + 1./16.*x2zs ) ZZ31c = ZZ31c + rs1wz(11)*PZs**(-1)*vvc*GtM2*ys*cst**(-1)*vdt + * ( - 1./8.*O*x12*x2z - 1./16.*O*x12 - 1./8.*O*x12s - 1./16.* + x12*x2zs - 3./16.*x2z*x12s - 1./16.*x2z - 1./8.*x12c - 1./16. + *x2zs ) ZZ31c = ZZ31c + rs1wz(12)*PZs**(-1)*Xpi*vvc*GtM2*ys*cst**(-1)*vdt + * ( - 1./16.*O*x2z*x12s + 1./16.*O*x12s - 1./16.*O*x12c - 1./ + 32.*Os*x12s + 1./16.*x12*x2z - 1./32.*x12*x12c + 1./16.*x12* + x2zs + 1./8.*x2z*x12s - 1./16.*x2z*x12c - 1./32.*x12s*x2zs + + 1./16.*x12c + 1./32.*x2zs ) ZZ31c = ZZ31c + rs1wz(12)*PZs**(-1)*vvc*GtM2*Xps*ys*cst**(-1)*vdt + * ( - 3./32. + 1./16.*O + 1./16.*x12 ) ZZ31c = ZZ31c + rs1wz(12)*PZs**(-1)*vvc*GtM2*ys*Xp*cst**(-1)*vdt + * ( 1./16. - 3./32.*O*x12 - 1./16.*O*x2z - 1./32.*O - 1./32.* + x12*x2z + 1./8.*x12 + 5./32.*x2z - 3./32.*x12s ) ZZ31c = ZZ31c + rs1wz(12)*PZs**(-1)*vvc*GtM2*ys*cst**(-1)*vdt + * ( 3./32.*O*x12*x2z - 1./32.*O*x12 + 1./32.*O*x2z + 3./32.*O* + x12s + 1./32.*Os*x12 - 7./32.*x12*x2z - 1./16.*x12 + 1./16.* + x2z*x12s - 3./32.*x2z - 3./32.*x12s + 1./16.*x12c - 1./16.* + x2zs ) ZZ31c = ZZ31c + rs1wz(13)*PZs**(-1)*Xpi*vvc*GtM2*ys*cst**(-1)*vdt + * ( 1./64.*O*x12*x2z - 1./32.*O*x12*x2zs - 1./16.*O*x2z*x12s - + 1./32.*O*x12c - 1./64.*O*x2zs - 1./64.*Os*x12*x2z - 1./32.* + x12*x12c - 1./64.*x12*x2zc + 1./16.*x12*x2zs + 7./64.*x2z* + x12s - 5./64.*x2z*x12c - 1./16.*x12s*x2zs + 1./16.*x12c + 1./ + 64.*x2zc + 1./64.*x2zs ) ZZ31c = ZZ31c + rs1wz(13)*PZs**(-1)*vvc*GtM2*Xps*ys*cst**(-1)*vdt + * ( - 1./32. ) ZZ31c = ZZ31c + rs1wz(13)*PZs**(-1)*vvc*GtM2*ys*Xp*cst**(-1)*vdt + * ( - 1./32.*O*x12 - 1./32.*O*x2z - 1./16.*x12*x2z + 1./8.*x12 + + 3./32.*x2z - 1./32.*x12s ) ZZ31c = ZZ31c + rs1wz(13)*PZs**(-1)*vvc*GtM2*ys*cst**(-1)*vdt + * ( 1./16.*O*x12*x2z + 1./64.*O*x2z + 1./16.*O*x12s + 1./32.*O* + x2zs - 11./64.*x12*x2z + 1./16.*x12*x2zs + 1./8.*x2z*x12s - 1. + /64.*x2z - 5./32.*x12s + 1./16.*x12c - 5./64.*x2zs ) ZZ31c = ZZ31c + rs1wz(14)*PZs**(-1)*Xpi*vvc*GtM2*ys*cst**(-1)*vdt + * ( - 1./64.*O*x12*x2z + 1./32.*O*x12*x2zs + 1./16.*O*x2z*x12s + + 1./32.*O*x12c + 1./64.*O*x2zs + 1./64.*Os*x12*x2z + 1./32. + *x12*x12c + 1./64.*x12*x2zc + 1./64.*x2z*x12s + 5./64.*x2z* + x12c + 1./16.*x12s*x2zs - 1./64.*x2zc - 1./64.*x2zs ) ZZ31c = ZZ31c + rs1wz(14)*PZs**(-1)*vvc*GtM2*Xps*ys*Xp*cst**(-1)* + vdt * ( 1./32. ) ZZ31c = ZZ31c + rs1wz(14)*PZs**(-1)*vvc*GtM2*Xps*ys*cst**(-1)*vdt + * ( 1./64. - 1./32.*O - 5./32.*x12 - 1./16.*x2z ) ZZ31c = ZZ31c + rs1wz(14)*PZs**(-1)*vvc*GtM2*ys*Xp*cst**(-1)*vdt + * ( - 1./64. + 3./64.*O*x12 + 1./16.*O*x2z + 1./64.*O + 17./64. + *x12*x2z + 1./32.*x12 - 3./64.*x2z + 13./64.*x12s + 1./32.* + x2zs ) ZZ31c = ZZ31c + rs1wz(14)*PZs**(-1)*vvc*GtM2*ys*cst**(-1)*vdt + * ( - 5./64.*O*x12*x2z + 1./64.*O*x12 - 1./32.*O*x2z - 5./64.* + O*x12s - 1./32.*O*x2zs - 1./64.*Os*x12 - 1./32.*x12*x2z - 1./ + 8.*x12*x2zs - 1./4.*x2z*x12s + 1./32.*x2z - 1./64.*x12s - 1./ + 8.*x12c + 3./64.*x2zs ) ZZ41c = + + rs1wz(1)*XX*PZs**(-1)*vvc*GtM2*ys*cst**(-1)*vdt * ( - 1./8.* + O*x12*x2z - 1./8.*O*x2zs - 1./8.*Os*x12*x2z - 1./8.*Os*x12s + + 1./8.*x12*x12c + 1./8.*x12*x2zc - 1./4.*x12*x2zs - 1./8.* + x2z*x12s + 3./8.*x2z*x12c + 3./8.*x12s*x2zs - 1./8.*x2zc ) ZZ41c = ZZ41c + rs1wz(1)*PZs**(-1)*Xpi*vvc*GtM2*ys*cst**(-1)*vdt + * ( - 1./8.*O*x12 - 1./4.*O*x2z - 1./8.*Os*x12 - 5./8.*x12*x2z + + 5./8.*x12*x2zs + 5./4.*x2z*x12s - 1./8.*x12s + 5./8.*x12c + - 1./2.*x2zs ) ZZ41c = ZZ41c + rs1wz(1)*PZs**(-1)*vvc*GtM2*Xps*ys*cst**(-1)*vdt + * ( 1./4. - 1./2.*x12 ) ZZ41c = ZZ41c + rs1wz(1)*PZs**(-1)*vvc*GtM2*ys*Xp*cst**(-1)*vdt + * ( - 1./4. - 1./8.*O + x12*x2z + 1./8.*x12 - 5./8.*x2z + x12s + ) ZZ41c = ZZ41c + rs1wz(1)*PZs**(-1)*vvc*GtM2*ys*cst**(-1)*vdt * ( + 1./8.*O*x12 + 1./4.*O*x2z + 1./8.*O + 1./8.*Os*x12 - 3./8.* + x12*x2z - 5./8.*x12*x2zs + 3./8.*x12 - 5./4.*x2z*x12s + 5./8. + *x2z - 7./8.*x12s - 5./8.*x12c + 1./2.*x2zs ) ZZ41c = ZZ41c + rs1wz(4)*XX*PZs**(-1)*vvc*GtM2*ys*cst**(-1)*vdt + * ( 3./32.*O*x12*x12c + 1./16.*O*x12*x2zs + 1./16.*O*x2z*x12s + + 3./16.*O*x2z*x12c + 3./32.*O*x12s*x2zs + 1./32.*O*x2zs + 1. + /16.*Os*x12*x2z + 3./32.*Os*x2z*x12s + 3./32.*Os*x12c + 1./32. + *Oc*x12s + 3./32.*x12*x2z*x12c + 1./32.*x12*x2zs + 1./32.* + x12s*x12c + 1./32.*x12s*x2zc + 3./32.*x12c*x2zs + 1./32.*x2zc + ) ZZ41c = ZZ41c + rs1wz(4)*PZs**(-1)*Xpi*vvc*GtM2*ys*cst**(-1)*vdt + * ( 5./32.*O*x12*x2z + 1./8.*O*x12*x2zs + 7./16.*O*x2z*x12s + 1. + /16.*O*x2z + 1./16.*O*x12s + 5./16.*O*x12c + 1./32.*O*x2zs + + 3./32.*Os*x12*x2z + 1./16.*Os*x12 + 5./32.*Os*x12s + 1./16.* + x12*x2z + 5./32.*x12*x12c + 1./32.*x12*x2zc - 1./32.*x2z*x12s + + 11./32.*x2z*x12c + 7./32.*x12s*x2zs + 1./32.*x2zc + 1./8.* + x2zs ) ZZ41c = ZZ41c + rs1wz(4)*PZs**(-1)*vvc*GtM2*Xps*ys*Xp*cst**(-1)* + vdt * ( 1./16. ) ZZ41c = ZZ41c + rs1wz(4)*PZs**(-1)*vvc*GtM2*Xps*ys*cst**(-1)*vdt + * ( - 1./8. - 3./16.*O*x12 - 1./32.*O - 1./16.*x12*x2z + 1./32. + *x12 - 5./32.*x2z - 3./16.*x12s ) ZZ41c = ZZ41c + rs1wz(4)*PZs**(-1)*vvc*GtM2*ys*Xp*cst**(-1)*vdt + * ( 1./16. + 5./16.*O*x12*x2z + 9./32.*O*x12 + 1./16.*O*x2z + 3. + /8.*O*x12s + 1./16.*O + 3./32.*Os*x12 + 1./32.*x12*x2z + 3./ + 32.*x12*x2zs + 3./8.*x2z*x12s + 5./16.*x2z + 5./32.*x12s + 9./ + 32.*x12c + 1./8.*x2zs ) ZZ41c = ZZ41c + rs1wz(4)*PZs**(-1)*vvc*GtM2*ys*cst**(-1)*vdt * ( + - 15./32.*O*x12*x2z - 1./8.*O*x12*x2zs - 3./32.*O*x12 - 7./ + 16.*O*x2z*x12s - 1./8.*O*x2z - 7./16.*O*x12s - 5./16.*O*x12c + - 1./32.*O*x2zs - 1./32.*O - 3./32.*Os*x12*x2z - 5./32.*Os* + x12 - 5./32.*Os*x12s - 1./32.*x12*x2z - 5./32.*x12*x12c - 1./ + 32.*x12*x2zc - 3./32.*x12*x2zs - 1./32.*x12 - 11./32.*x2z* + x12s - 11./32.*x2z*x12c - 5./32.*x2z - 7./32.*x12s*x2zs + 1./ + 32.*x12s - 9./32.*x12c - 1./32.*x2zc - 1./4.*x2zs ) ZZ41c = ZZ41c + rs1wz(7)*XX*PZs**(-1)*vvc*GtM2*ys*cst**(-1)*vdt + * ( - 1./32.*O*x12*x2z + 1./64.*O*x12*x2zc - 1./16.*O*x12*x2zs + - 1./32.*O*x2z*x12s + 1./64.*O*x2z*x12c + 1./32.*O*x12s*x2zs + - 1./32.*O*x2zc + 3./64.*O*x2zs + 3./64.*Os*x12*x2z - 1./64. + *Os*x12*x2zs - 1./64.*Os*x2z*x12s - 1./64.*Os*x2zs - 1./64.* + Oc*x12*x2z + 1./64.*x12*x2z*x12c + 1./64.*x12*x2zq - 7./64.* + x12*x2zc + 9./64.*x12*x2zs + 3./32.*x2z*x12s - 5./64.*x2z* + x12c + 3./64.*x12s*x2zc - 11./64.*x12s*x2zs + 3./64.*x12c* + x2zs - 1./64.*x2zq + 3./64.*x2zc - 1./32.*x2zs ) ZZ41c = ZZ41c + rs1wz(7)*PZs**(-1)*Xpi*vvc*GtM2*ys*cst**(-1)*vdt + * ( - 17./64.*O*x12*x2z + 5./64.*O*x12*x2zs - 1./32.*O*x12 + 1. + /8.*O*x2z*x12s + 3./32.*O*x2z - 1./16.*O*x12s + 3./64.*O*x12c + - 5./64.*O*x2zs + 1./32.*Os*x12*x2z + 3./64.*Os*x12 - 1./32. + *Os*x2z - 1./64.*Oc*x12 + 11./32.*x12*x2z + 1./32.*x12*x12c + + 1./32.*x12*x2zc - 17./64.*x12*x2zs - 21./64.*x2z*x12s + 3./ + 32.*x2z*x12c - 1./16.*x2z + 3./32.*x12s*x2zs + 3./32.*x12s - + 7./64.*x12c - 3./64.*x2zc + 1./8.*x2zs ) ZZ41c = ZZ41c + rs1wz(7)*PZs**(-1)*vvc*GtM2*Xps*ys*cst**(-1)*vdt + * ( - 1./32. + 1./64.*O + 1./64.*x12 + 1./64.*x2z ) ZZ41c = ZZ41c + rs1wz(7)*PZs**(-1)*vvc*GtM2*ys*Xp*cst**(-1)*vdt + * ( 1./16.*O*x12*x2z - 13./64.*O*x12 - 1./16.*O*x2z + 3./32.*O* + x12s + 1./32.*O + 3./64.*Os*x12 - 1./64.*Os - 11./64.*x12*x2z + + 1./64.*x12*x2zs + 3./16.*x12 + 1./16.*x2z*x12s + 3./32.* + x2z - 3./16.*x12s + 3./64.*x12c - 3./64.*x2zs ) ZZ41c = ZZ41c + rs1wz(7)*PZs**(-1)*vvc*GtM2*ys*cst**(-1)*vdt * ( + 1./32. + 13./64.*O*x12*x2z - 5./64.*O*x12*x2zs + 15./64.*O* + x12 - 1./8.*O*x2z*x12s - 1./32.*O*x2z - 1./32.*O*x12s - 3./64. + *O*x12c + 5./64.*O*x2zs - 3./64.*O - 1./32.*Os*x12*x2z - 3./ + 32.*Os*x12 + 1./32.*Os*x2z + 1./64.*Os + 1./64.*Oc*x12 - 11./ + 64.*x12*x2z - 1./32.*x12*x12c - 1./32.*x12*x2zc + 1./4.*x12* + x2zs - 13./64.*x12 + 17./64.*x2z*x12s - 3./32.*x2z*x12c - 3./ + 64.*x2z - 3./32.*x12s*x2zs + 3./32.*x12s + 1./16.*x12c + 3./ + 64.*x2zc - 5./64.*x2zs ) ZZ41c = ZZ41c + rs1wz(8)*XX*PZs**(-1)*vvc*GtM2*ys*cst**(-1)*vdt + * ( - 1./8.*O*x12*x2z - 1./8.*O*x2z*x12s - 1./8.*O*x12c - 1./ + 16.*Os*x12s - 1./16.*x12*x12c - 1./8.*x2z*x12c - 1./16.*x12s* + x2zs - 1./16.*x2zs ) ZZ41c = ZZ41c + rs1wz(8)*PZs**(-1)*Xpi*vvc*GtM2*ys*cst**(-1)*vdt + * ( - 5./16.*O*x12*x2z - 1./8.*O*x12 - 1./8.*O*x2z*x12s - 3./ + 16.*O*x12s - 1./8.*O*x12c - 1./16.*Os*x12s + 1./16.*x12*x2z + - 1./16.*x12*x12c - 1./16.*x12*x2zs - 1./4.*x2z*x12s - 1./8. + *x2z*x12c - 1./8.*x2z - 1./16.*x12s*x2zs - 3./16.*x12c - 1./8. + *x2zs ) ZZ41c = ZZ41c + rs1wz(8)*PZs**(-1)*vvc*GtM2*Xps*ys*Xp*cst**(-1)* + vdt * ( - 1./16. ) ZZ41c = ZZ41c + rs1wz(8)*PZs**(-1)*vvc*GtM2*Xps*ys*cst**(-1)*vdt + * ( 3./16. + 3./16.*O*x12 + 1./16.*x12*x2z - 1./16.*x12 + 1./8. + *x2z + 3./16.*x12s ) ZZ41c = ZZ41c + rs1wz(8)*PZs**(-1)*vvc*GtM2*ys*Xp*cst**(-1)*vdt + * ( - 3./16. - 3./16.*O*x12*x2z - 1./2.*O*x12 - 3./16.*O*x12s + - 1./16.*x12*x2z - 1./16.*x12*x2zs + 1./8.*x12 - 1./4.*x2z* + x12s - 3./8.*x2z - 3./8.*x12s - 3./16.*x12c - 1./16.*x2zs ) ZZ41c = ZZ41c + rs1wz(8)*PZs**(-1)*vvc*GtM2*ys*cst**(-1)*vdt * ( + 1./16. + 1./2.*O*x12*x2z + 7./16.*O*x12 + 1./8.*O*x2z*x12s + + 3./8.*O*x12s + 1./8.*O*x12c + 1./16.*Os*x12s - 1./16.*x12*x2z + + 1./16.*x12*x12c + 1./8.*x12*x2zs - 1./16.*x12 + 1./2.*x2z* + x12s + 1./8.*x2z*x12c + 3./8.*x2z + 1./16.*x12s*x2zs + 3./16. + *x12s + 3./8.*x12c + 3./16.*x2zs ) ZZ41c = ZZ41c + rs1wz(9)*XX*PZs**(-1)*vvc*GtM2*ys*cst**(-1)*vdt + * ( 1./8.*O*x12*x2z + 1./8.*O*x12s + 1./8.*x12*x2z - 1./8.*x12* + x2zs - 1./4.*x2z*x12s - 1./8.*x12c + 1./8.*x2zs ) ZZ41c = ZZ41c + rs1wz(9)*PZs**(-1)*Xpi*vvc*GtM2*ys*cst**(-1)*vdt + * ( 1./8.*O*x12*x2z + 1./8.*O*x12 + 1./8.*O*x12s - 1./4.*x12* + x2z - 1./8.*x12*x2zs + 1./8.*x12 - 1./4.*x2z*x12s + 1./4.*x2z + - 3./8.*x12s - 1./8.*x12c + 1./8.*x2zs ) ZZ41c = ZZ41c + rs1wz(9)*PZs**(-1)*vvc*GtM2*Xps*ys*cst**(-1)*vdt + * ( - 1./8. + 1./4.*x12 ) ZZ41c = ZZ41c + rs1wz(9)*PZs**(-1)*vvc*GtM2*ys*Xp*cst**(-1)*vdt + * ( 1./4. + 1./8.*O*x12 - 3./8.*x12*x2z - 3./8.*x12 + 1./4.*x2z + - 3./8.*x12s ) ZZ41c = ZZ41c + rs1wz(9)*PZs**(-1)*vvc*GtM2*ys*cst**(-1)*vdt * ( + - 1./8. - 1./8.*O*x12*x2z - 1./4.*O*x12 - 1./8.*O*x12s + 5./ + 8.*x12*x2z + 1./8.*x12*x2zs + 1./4.*x2z*x12s - 1./2.*x2z + 3./ + 4.*x12s + 1./8.*x12c - 1./8.*x2zs ) ZZ41c = ZZ41c + rs1wz(10)*XX*PZs**(-1)*vvc*GtM2*ys*cst**(-1)*vdt + * ( - 1./64.*O*x12*x2zc + 1./16.*O*x12*x2zs + 1./32.*O*x2z* + x12s - 1./64.*O*x2z*x12c - 1./32.*O*x12s*x2zs + 1./32.*O*x2zc + - 1./64.*O*x2zs - 1./64.*Os*x12*x2z + 1./64.*Os*x12*x2zs + 1. + /64.*Os*x2z*x12s + 1./64.*Os*x2zs + 1./64.*Oc*x12*x2z - 1./64. + *x12*x2z*x12c - 1./64.*x12*x2zq + 5./64.*x12*x2zc - 1./64.* + x12*x2zs + 3./64.*x2z*x12c - 3./64.*x12s*x2zc + 7./64.*x12s* + x2zs - 3./64.*x12c*x2zs + 1./64.*x2zq - 1./64.*x2zc ) ZZ41c = ZZ41c + rs1wz(10)*PZs**(-1)*Xpi*vvc*GtM2*ys*cst**(-1)*vdt + * ( 9./64.*O*x12*x2z - 5./64.*O*x12*x2zs - 1./8.*O*x2z*x12s - 1. + /32.*O*x2z + 1./32.*O*x12s - 3./64.*O*x12c + 7./64.*O*x2zs - + 1./64.*Os*x12 + 1./32.*Os*x2z + 1./64.*Oc*x12 - 1./32.*x12* + x2z - 1./32.*x12*x12c - 1./16.*x12*x2zc + 21./64.*x12*x2zs + + 19./64.*x2z*x12s - 1./8.*x2z*x12c - 5./32.*x12s*x2zs + 3./64. + *x12c + 5./64.*x2zc - 1./16.*x2zs ) ZZ41c = ZZ41c + rs1wz(10)*PZs**(-1)*vvc*GtM2*Xps*ys*Xp*cst**(-1)* + vdt * ( 1./32. ) ZZ41c = ZZ41c + rs1wz(10)*PZs**(-1)*vvc*GtM2*Xps*ys*cst**(-1)*vdt + * ( 3./32.*O*x12 - 3./64.*O + 1./32.*x12*x2z - 13./64.*x12 - 7./ + 64.*x2z + 3./32.*x12s ) ZZ41c = ZZ41c + rs1wz(10)*PZs**(-1)*vvc*GtM2*ys*Xp*cst**(-1)*vdt + * ( - 1./32. - 5./32.*O*x12*x2z - 1./64.*O*x12 + 1./8.*O*x2z + - 1./8.*O*x12s + 1./32.*O - 1./64.*Os*x12 + 1./64.*Os + 27./ + 64.*x12*x2z - 5./64.*x12*x2zs + 3./16.*x12 - 3./16.*x2z*x12s + + 1./32.*x2z + 3./32.*x12s - 7./64.*x12c + 9./64.*x2zs ) ZZ41c = ZZ41c + rs1wz(10)*PZs**(-1)*vvc*GtM2*ys*cst**(-1)*vdt + * ( 1./64.*O*x12*x2z + 5./64.*O*x12*x2zs - 5./64.*O*x12 + 1./8. + *O*x2z*x12s - 3./32.*O*x2z + 3./32.*O*x12s + 3./64.*O*x12c - + 7./64.*O*x2zs + 1./64.*O + 1./32.*Os*x12 - 1./32.*Os*x2z - 1./ + 64.*Os - 1./64.*Oc*x12 - 27./64.*x12*x2z + 1./32.*x12*x12c + + 1./16.*x12*x2zc - 1./4.*x12*x2zs + 1./64.*x12 - 7./64.*x2z* + x12s + 1./8.*x2z*x12c + 5./64.*x2z + 5./32.*x12s*x2zs - 3./16. + *x12s + 1./16.*x12c - 5./64.*x2zc - 5./64.*x2zs ) ZZ41c = ZZ41c + rs1wz(11)*XX*PZs**(-1)*vvc*GtM2*ys*cst**(-1)*vdt + * ( 1./8.*O*x12*x2z + 1./8.*O*x2z*x12s + 1./8.*O*x12c + 1./16.* + Os*x12s + 1./16.*x12*x12c + 1./8.*x2z*x12c + 1./16.*x12s*x2zs + + 1./16.*x2zs ) ZZ41c = ZZ41c + rs1wz(11)*PZs**(-1)*Xpi*vvc*GtM2*ys*cst**(-1)*vdt + * ( 3./16.*O*x12*x2z + 1./8.*O*x12 + 3./16.*O*x12s - 1./16.*x12 + *x2z + 1./16.*x12*x2zs + 1./4.*x2z*x12s + 1./8.*x2z + 3./16.* + x12c + 1./16.*x2zs ) ZZ41c = ZZ41c + rs1wz(11)*PZs**(-1)*vvc*GtM2*Xps*ys*cst**(-1)*vdt + * ( - 1./16. ) ZZ41c = ZZ41c + rs1wz(11)*PZs**(-1)*vvc*GtM2*ys*Xp*cst**(-1)*vdt + * ( 1./8. + 3./16.*O*x12 + 1./16.*x12*x2z - 1./16.*x12 + 1./8.* + x2z + 3./16.*x12s ) ZZ41c = ZZ41c + rs1wz(11)*PZs**(-1)*vvc*GtM2*ys*cst**(-1)*vdt + * ( - 1./16. - 3./16.*O*x12*x2z - 5./16.*O*x12 - 3./16.*O*x12s + - 1./16.*x12*x2zs + 1./16.*x12 - 1./4.*x2z*x12s - 1./4.*x2z + - 3./16.*x12s - 3./16.*x12c - 1./16.*x2zs ) ZZ41c = ZZ41c + rs1wz(12)*XX*PZs**(-1)*vvc*GtM2*ys*cst**(-1)*vdt + * ( - 1./8.*O*x12*x2z - 1./8.*O*x2z*x12s - 1./8.*O*x12c - 1./ + 16.*Os*x12s - 1./16.*x12*x12c - 1./8.*x2z*x12c - 1./16.*x12s* + x2zs - 1./16.*x2zs ) ZZ41c = ZZ41c + rs1wz(12)*PZs**(-1)*Xpi*vvc*GtM2*ys*cst**(-1)*vdt + * ( - 3./16.*O*x12*x2z - 1./8.*O*x12 - 3./16.*O*x12s + 1./16.* + x12*x2z - 1./16.*x12*x2zs - 1./4.*x2z*x12s - 1./8.*x2z - 3./ + 16.*x12c - 1./16.*x2zs ) ZZ41c = ZZ41c + rs1wz(12)*PZs**(-1)*vvc*GtM2*Xps*ys*cst**(-1)*vdt + * ( 1./16. ) ZZ41c = ZZ41c + rs1wz(12)*PZs**(-1)*vvc*GtM2*ys*Xp*cst**(-1)*vdt + * ( - 1./8. - 3./16.*O*x12 - 1./16.*x12*x2z + 1./16.*x12 - 1./ + 8.*x2z - 3./16.*x12s ) ZZ41c = ZZ41c + rs1wz(12)*PZs**(-1)*vvc*GtM2*ys*cst**(-1)*vdt + * ( 1./16. + 3./16.*O*x12*x2z + 5./16.*O*x12 + 3./16.*O*x12s + + 1./16.*x12*x2zs - 1./16.*x12 + 1./4.*x2z*x12s + 1./4.*x2z + 3. + /16.*x12s + 3./16.*x12c + 1./16.*x2zs ) ZZ41c = ZZ41c + rs1wz(13)*XX*PZs**(-1)*vvc*GtM2*ys*cst**(-1)*vdt + * ( 1./32.*O*x12*x2z - 1./32.*O*x2zs - 1./32.*Os*x12*x2z + 1./ + 32.*x12*x2zc - 1./8.*x12*x2zs - 3./32.*x2z*x12s + 1./32.*x2z* + x12c + 1./16.*x12s*x2zs - 1./32.*x2zc + 1./32.*x2zs ) ZZ41c = ZZ41c + rs1wz(13)*PZs**(-1)*Xpi*vvc*GtM2*ys*cst**(-1)*vdt + * ( 3./32.*O*x12*x2z + 1./32.*O*x12 - 1./16.*O*x2z + 1./32.*O* + x12s - 1./32.*Os*x12 - 5./16.*x12*x2z + 1./16.*x12*x2zs + 1./ + 8.*x2z*x12s + 1./16.*x2z - 3./32.*x12s + 1./16.*x12c - 3./32. + *x2zs ) ZZ41c = ZZ41c + rs1wz(13)*PZs**(-1)*vvc*GtM2*Xps*ys*cst**(-1)*vdt + * ( 1./32. ) ZZ41c = ZZ41c + rs1wz(13)*PZs**(-1)*vvc*GtM2*ys*Xp*cst**(-1)*vdt + * ( 3./32.*O*x12 - 1./32.*O + 1./32.*x12*x2z - 3./16.*x12 - 3./ + 32.*x2z + 3./32.*x12s ) ZZ41c = ZZ41c + rs1wz(13)*PZs**(-1)*vvc*GtM2*ys*cst**(-1)*vdt + * ( - 1./32. - 3./32.*O*x12*x2z - 1./8.*O*x12 + 1./16.*O*x2z + - 1./32.*O*x12s + 1./32.*O + 1./32.*Os*x12 + 9./32.*x12*x2z + - 1./16.*x12*x2zs + 3./16.*x12 - 1./8.*x2z*x12s + 1./32.*x2z + - 1./16.*x12c + 3./32.*x2zs ) ZZ41c = ZZ41c + rs1wz(14)*XX*PZs**(-1)*vvc*GtM2*ys*cst**(-1)*vdt + * ( - 1./32.*O*x12*x2z + 1./32.*O*x2zs + 1./32.*Os*x12*x2z - 1. + /32.*x12*x2zc + 1./8.*x12*x2zs + 3./32.*x2z*x12s - 1./32.*x2z + *x12c - 1./16.*x12s*x2zs + 1./32.*x2zc - 1./32.*x2zs ) ZZ41c = ZZ41c + rs1wz(14)*PZs**(-1)*Xpi*vvc*GtM2*ys*cst**(-1)*vdt + * ( - 3./32.*O*x12*x2z - 1./32.*O*x12 + 1./16.*O*x2z - 1./32.* + O*x12s + 1./32.*Os*x12 + 5./16.*x12*x2z - 1./16.*x12*x2zs - 1. + /8.*x2z*x12s - 1./16.*x2z + 3./32.*x12s - 1./16.*x12c + 3./32. + *x2zs ) ZZ41c = ZZ41c + rs1wz(14)*PZs**(-1)*vvc*GtM2*Xps*ys*cst**(-1)*vdt + * ( - 1./32. ) ZZ41c = ZZ41c + rs1wz(14)*PZs**(-1)*vvc*GtM2*ys*Xp*cst**(-1)*vdt + * ( - 3./32.*O*x12 + 1./32.*O - 1./32.*x12*x2z + 3./16.*x12 + + 3./32.*x2z - 3./32.*x12s ) ZZ41c = ZZ41c + rs1wz(14)*PZs**(-1)*vvc*GtM2*ys*cst**(-1)*vdt + * ( 1./32. + 3./32.*O*x12*x2z + 1./8.*O*x12 - 1./16.*O*x2z + 1./ + 32.*O*x12s - 1./32.*O - 1./32.*Os*x12 - 9./32.*x12*x2z + 1./ + 16.*x12*x2zs - 3./16.*x12 + 1./8.*x2z*x12s - 1./32.*x2z + 1./ + 16.*x12c - 3./32.*x2zs ) ZZ12c = 0 ZZ22c = 0 ZZ32c = 0 ZZ42c = 0 * .end Time = 254.81 sec Generated terms = 0 ZZ10q Terms in output = 0 Bytes used = 2 Time = 254.84 sec Generated terms = 0 ZZ20q Terms in output = 0 Bytes used = 2 Time = 254.86 sec Generated terms = 0 ZZ30q Terms in output = 0 Bytes used = 2 Time = 254.89 sec Generated terms = 0 ZZ40q Terms in output = 0 Bytes used = 2 Time = 254.92 sec Generated terms = 0 ZZ11q Terms in output = 0 Bytes used = 2 Time = 254.94 sec Generated terms = 0 ZZ21q Terms in output = 0 Bytes used = 2 Time = 254.96 sec Generated terms = 0 ZZ31q Terms in output = 0 Bytes used = 2 Time = 254.98 sec Generated terms = 0 ZZ41q Terms in output = 0 Bytes used = 2 Time = 254.99 sec Generated terms = 0 ZZ12q Terms in output = 0 Bytes used = 2 Time = 254.99 sec Generated terms = 0 ZZ22q Terms in output = 0 Bytes used = 2 Time = 254.99 sec Generated terms = 0 ZZ32q Terms in output = 0 Bytes used = 2 Time = 254.99 sec Generated terms = 0 ZZ42q Terms in output = 0 Bytes used = 2 ZZ10q = 0 ZZ20q = 0 ZZ30q = 0 ZZ40q = 0 ZZ11q = 0 ZZ21q = 0 ZZ31q = 0 ZZ41q = 0 ZZ12q = 0 ZZ22q = 0 ZZ32q = 0 ZZ42q = 0 GIAMPIERO job terminated at 2-DEC-1999 16:07:23.88 Accounting information: Buffered I/O count: 939 Peak working set size: 7344 Direct I/O count: 2398 Peak page file size: 100560 Page faults: 604 Mounted volumes: 0 Charged CPU time: 0 00:04:15.61 Elapsed time: 0 00:04:44.52