$ 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,dv; * s n; s zi; s I0; s PZ; s XX; s PZs; s Com; s gexp; s GT,T; s selv; s Xpi; 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 tau,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,selu,seluu; s O,Os,Oc,Oq,Op,Om; s fws,fwt,fwsC,fwtC; s um,dm,ums,dms,QmS,QpS; s omx1,x12,x2z,tx; 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],[tau+X+x1],[x1-x2],[1-x1]: 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; s Xpc,Xps,Xpis,yc,ys,omx1s,omx1c,omx1q,x12s,x12c,x2zq,x2zc,x2zs,txs; * 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 kf,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_A.sav wwww_'compo'; *save wrl$grp04:[giampiero]outputampgz_A.sav wwww_'compo'; *save wrl$grp04:[giampiero]outputampzz_A.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'; *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 denk^-1= -1/tM; id denkb^-1= 0; * id e_(kb,a1?,a2?,a3?)= e_(pp,a1,a2,a3)-e_(qp,a1,a2,a3)+e_(Qm,a1,a2,a3)- e_(k,a1,a2,a3); id kb(mu?)= pp(mu)-qp(mu)+Qm(mu)-k(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 Qp.qp= 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 t= tau*y*s; al 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; * ratio,tM,t,ums; ratio,uM,u,dms; * id ums*tM^-2= aux; id ums= 0; id aux= ums*tM^-2; id dms= 0; * .store * g wwww_'compo'= www_'compo'; *nwrite statistics; * id kp= y*s * ( - 1 - X + x2 - z ); al u= y*s * ( - 1 - tau - 2*X - z ) + ums + dms; al up= y*s * ( - tau - X - x1 ) + 2*ums + dms; al tp= y*s * ( tau + X + x1 - x2 + z ) - ums; al zp= y*s * ( 1 - x1 ) + ums + dms; * 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 k(mu?)= kf(mu); *id qp(mu?)= qpf(mu); *id e_(k,mu?,nu?,al?)= kf(ab1)*e_(ab1,mu,nu,al); *id e_(qp,mu?,nu?,al?)= qpf(ab2)*e_(ab2,mu,nu,al); * id ums*tM^-2= aux; id ums= 0; id aux= ums*tM^-2; id dms= 0; * .store * #endprocedure * #procedure integration(compo) * * Integration starts * id kf(mu?)*kf(nu?)*int= I_uu_21*pp(mu)*pp(nu)+I_uu_22*Qm(mu)*Qm(nu)+ I_uu_23*(pp(mu)*Qm(nu)+pp(nu)*Qm(mu))+ I_uu_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 kf(mu?)*qpf(nu?)*int= I_un_21*pp(mu)*pp(nu)+I_un_22*Qm(mu)*Qm(nu)+ I_un_23*pp(mu)*Qm(nu)+I_un_24*pp(nu)*Qm(mu)+ I_un_25*d_(mu,nu); id kf(mu?)*int= I_u_11*pp(mu)+I_u_12*Qm(mu); id qpf(mu?)*int= I_n_11*pp(mu)+I_n_12*Qm(mu); id int= I0; * .sort * id I_u_11 = + I0*ums*Xp^-2*y^-1*s^-1 * ( 2 ) + I0*ums*Xp^-1*y^-1*s^-1 * ( - 1 ) + I0*dms*Xp^-2*y^-1*s^-1 * ( 2 ) + I0*dms*Xp^-1*y^-1*s^-1 * ( - 2 ) + I0*Xp^-2 * ( 2 - 2*tau - 2*x1 ) + I0*Xp^-1 * ( - 3 + tau + 2*x1 ) + I0 * ( 1 ); al I_n_11 = + I0*Xp^-2 * ( 2*x2 - 2*z ) + I0*Xp^-1 * ( - 1 - 2*x2 + z ) + I0 * ( 1 ); al I_u_12 = + I0*ums*Xp^-1*y^-1*s^-1 * ( - 1 ) + I0*dms*Xp^-1*y^-1*s^-1 * ( - 1 ) + I0*Xp^-1 * ( - 1 + tau + x1 ) + 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*tM^-2= aux; id ums= 0; id aux= ums*tM^-2; id dms= 0; * .sort * id I_uu_21 = + I0*ums*Xp^-4*y^-1*s^-1 * ( 12 - 12*tau - 12*x1 ) + I0*ums*Xp^-3*y^-1*s^-1 * ( - 24 + 12*tau + 18*x1 ) + I0*ums*Xp^-2*y^-1*s^-1 * ( 16 - 2*tau - 6*x1 ) + I0*ums*Xp^-1*y^-1*s^-1 * ( - 4 ) + I0*dms*Xp^-4*y^-1*s^-1 * ( 12 - 12*tau - 12*x1 ) + I0*dms*Xp^-3*y^-1*s^-1 * ( - 30 + 18*tau + 24*x1 ) + I0*dms*Xp^-2*y^-1*s^-1 * ( 24 - 6*tau - 12*x1 ) + I0*dms*Xp^-1*y^-1*s^-1 * ( - 6 ) + I0*Xp^-4 * ( 6 + 12*tau*x1 - 12*tau + 6*tau^2 - 12*x1 + 6*x1^2 ) + I0*Xp^-3 * ( - 18 - 18*tau*x1 + 24*tau - 6*tau^2 + 30*x1 - 12*x1^ 2 ) + I0*Xp^-2 * ( 19 + 6*tau*x1 - 14*tau + tau^2 - 24*x1 + 6*x1^2 ) + I0*Xp^-1 * ( - 8 + 2*tau + 6*x1 ) + 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_un_21 = + I0*ums*Xp^-4*y^-1*s^-1 * ( 6*x2 - 6*z ) + I0*ums*Xp^-3*y^-1*s^-1 * ( - 3 - 9*x2 + 6*z ) + I0*ums*Xp^-2*y^-1*s^-1 * ( 3 + 3*x2 - z ) + I0*dms*Xp^-4*y^-1*s^-1 * ( 6*x2 - 6*z ) + I0*dms*Xp^-3*y^-1*s^-1 * ( - 3 - 12*x2 + 9*z ) + I0*dms*Xp^-2*y^-1*s^-1 * ( 6 + 6*x2 - 3*z ) + I0*dms*Xp^-1*y^-1*s^-1 * ( - 3 ) + I0*Xp^-4 * ( - 6*tau*x2 + 6*tau*z - 6*x1*x2 + 6*x1*z + 6*x2 - 6*z ) + I0*Xp^-3 * ( - 3 + 9*tau*x2 - 6*tau*z + 3*tau + 12*x1*x2 - 9*x1*z + 3*x1 - 15*x2 + 12*z ) + I0*Xp^-2 * ( 7 - 3*tau*x2 + tau*z - 4*tau - 6*x1*x2 + 3*x1*z - 5*x 1 + 11*x2 - 7*z ) + I0*Xp^-1 * ( - 5 + tau + 2*x1 - 2*x2 + z ) + I0 * ( 1 ); * ratio,X,Xp,one; id one= 1; al one^-1= 1; * id ums*tM^-2= aux; id ums= 0; id aux= ums*tM^-2; id dms= 0; * .sort * id I_uu_22 = + I0*ums*Xp^-2*y^-1*s^-1 * ( 2 - 2*tau - 2*x1 ) + I0*ums*Xp^-1*y^-1*s^-1 * ( - 2 ) + I0*dms*Xp^-2*y^-1*s^-1 * ( 2 - 2*tau - 2*x1 ) + I0*dms*Xp^-1*y^-1*s^-1 * ( - 2 ) + I0*Xp^-2 * ( 1 + 2*tau*x1 - 2*tau + tau^2 - 2*x1 + x1^2 ) + I0*Xp^-1 * ( - 2 + 2*tau + 2*x1 ) + 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_un_22 = + I0*ums*Xp^-2*y^-1*s^-1 * ( x2 - z ) + I0*ums*Xp^-1*y^-1*s^-1 * ( - 1 ) + I0*dms*Xp^-2*y^-1*s^-1 * ( x2 - z ) + I0*dms*Xp^-1*y^-1*s^-1 * ( - 1 ) + I0*Xp^-2 * ( - tau*x2 + tau*z - x1*x2 + x1*z + x2 - z ) + I0*Xp^-1 * ( - 1 + tau + x1 - x2 + z ) + I0 * ( 1 ); * ratio,X,Xp,one; id one= 1; al one^-1= 1; * id ums*tM^-2= aux; id ums= 0; id aux= ums*tM^-2; id dms= 0; * .sort * id I_uu_23 = + I0*ums*Xp^-3*y^-1*s^-1 * ( - 6 + 6*tau + 6*x1 ) + I0*ums*Xp^-2*y^-1*s^-1 * ( 8 - 2*tau - 4*x1 ) + I0*ums*Xp^-1*y^-1*s^-1 * ( - 3 ) + I0*dms*Xp^-3*y^-1*s^-1 * ( - 6 + 6*tau + 6*x1 ) + I0*dms*Xp^-2*y^-1*s^-1 * ( 10 - 4*tau - 6*x1 ) + I0*dms*Xp^-1*y^-1*s^-1 * ( - 4 ) + I0*Xp^-3 * ( - 3 - 6*tau*x1 + 6*tau - 3*tau^2 + 6*x1 - 3*x1^2 ) + I0*Xp^-2 * ( 7 + 4*tau*x1 - 8*tau + tau^2 - 10*x1 + 3*x1^2 ) + I0*Xp^-1 * ( - 5 + 2*tau + 4*x1 ) + 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_un_23 = + I0*ums*Xp^-3*y^-1*s^-1 * ( - 3*x2 + 3*z ) + I0*ums*Xp^-2*y^-1*s^-1 * ( 5/2 + 3/2*x2 - z ) + I0*ums*Xp^-1*y^-1*s^-1 * ( - 1/2 ) + I0*dms*Xp^-3*y^-1*s^-1 * ( - 3*x2 + 3*z ) + I0*dms*Xp^-2*y^-1*s^-1 * ( 5/2 + 3*x2 - 5/2*z ) + I0*dms*Xp^-1*y^-1*s^-1 * ( - 5/2 ) + I0*Xp^-3 * ( 3*tau*x2 - 3*tau*z + 3*x1*x2 - 3*x1*z - 3*x2 + 3*z ) + I0*Xp^-2 * ( 5/2 - 3/2*tau*x2 + tau*z - 5/2*tau - 3*x1*x2 + 5/2*x1 *z - 5/2*x1 + 9/2*x2 - 4*z ) + I0*Xp^-1 * ( - 7/2 + tau + 2*x1 - x2 + z ) + I0 * ( 1 ); ratio,X,Xp,one; id one= 1; al one^-1= 1; * id ums*tM^-2= aux; id ums= 0; id aux= ums*tM^-2; id dms= 0; * .sort * id I_uu_24 = + I0*ums*Xp^-2 * ( - 1 + tau + x1 ) + I0*ums*Xp^-1 * ( 1 - 1/2*x1 ) + I0*ums * ( - 1/2 ) + I0*dms*Xp^-2 * ( - 1 + tau + x1 ) + I0*dms*Xp^-1 * ( 3/2 - 1/2*tau - x1 ) + I0*dms * ( - 1/2 ) + I0*Xp^-2*y*s * ( - 1/2 - tau*x1 + tau - 1/2*tau^2 + x1 - 1/2*x1^2 ) + I0*Xp^-1*y*s * ( 1 + 1/2*tau*x1 - tau - 3/2*x1 + 1/2*x1^2 ) + I0*y*s * ( - 1/2 + 1/2*x1 ); al 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 ); al I_un_24 = + I0*ums*Xp^-3*y^-1*s^-1 * ( - 3*x2 + 3*z ) + I0*ums*Xp^-2*y^-1*s^-1 * ( 3/2 + 5/2*x2 - z ) + I0*ums*Xp^-1*y^-1*s^-1 * ( - 1/2 ) + I0*dms*Xp^-3*y^-1*s^-1 * ( - 3*x2 + 3*z ) + I0*dms*Xp^-2*y^-1*s^-1 * ( 3/2 + 3*x2 - 3/2*z ) + I0*dms*Xp^-1*y^-1*s^-1 * ( - 3/2 ) + I0*Xp^-3 * ( 3*tau*x2 - 3*tau*z + 3*x1*x2 - 3*x1*z - 3*x2 + 3*z ) + I0*Xp^-2 * ( 3/2 - 5/2*tau*x2 + tau*z - 3/2*tau - 3*x1*x2 + 3/2*x1 *z - 3/2*x1 + 11/2*x2 - 4*z ) + I0*Xp^-1 * ( - 5/2 + tau + x1 - 2*x2 + z ) + I0 * ( 1 ); * ratio,X,Xp,one; id one= 1; al one^-1= 1; * id ums*tM^-2= aux; id ums= 0; id aux= ums*tM^-2; id dms= 0; * .sort * id I_un_25 = + I0*ums*Xp^-2 * ( - 1/2*x2 + 1/2*z ) + I0*ums*Xp^-1 * ( 1/4 + 1/4*x2 ) + I0*ums * ( 1/4 ) + I0*dms*Xp^-2 * ( - 1/2*x2 + 1/2*z ) + I0*dms*Xp^-1 * ( 1/4 + 1/2*x2 - 1/4*z ) + I0*dms * ( - 1/4 ) + I0*Xp^-2*y*s * ( 1/2*tau*x2 - 1/2*tau*z + 1/2*x1*x2 - 1/2*x1*z - 1 /2 *x2 + 1/2*z ) + I0*Xp^-1*y*s * ( 1/4 - 1/4*tau*x2 - 1/4*tau - 1/2*x1*x2 + 1/4*x1*z - 1/4*x1 + 3/4*x2 - 1/2*z ) + I0*y*s * ( - 1/4 ); * ratio,X,Xp,one; id one= 1; al one^-1= 1; * id ums*tM^-2= aux; id ums= 0; id aux= ums*tM^-2; id dms= 0; * id tM^-1= 1/(y*s)/tuM; * ratio,tuM,tau,aux; id aux= ums/(y*s); * id ums*tuM^-2= aux; id ums= 0; id aux= ums*tuM^-2; id dms= 0; * 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_A.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 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 rs^-2= -1/(X*y*s); id pp.pp= 0; al qp.qp= 0; al Qm.Qm= QmS; al k.k= -ums; 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 t= tau*y*s; al 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; * ratio,tuM,tau,aux; id aux= ums/(y*s); * id ums*tuM^-2= aux; id ums= 0; id aux= ums*tuM^-2; id dms= 0; * id kp= y*s * ( - 1 - X + x2 - z ); al u= y*s * ( - 1 - tau - 2*X - z ) + ums + dms; al up= y*s * ( - tau - X - x1 ) + 2*ums + dms; al tp= y*s * ( tau + X + x1 - x2 + z ) - ums; al zp= y*s * ( 1 - x1 ) + ums + dms; * id ums*tuM^-2= aux; id ums= 0; id aux= ums*tuM^-2; id dms= 0; * ratio,X,Xp,one; id one= 1; al one^-1= 1; * *id kf(dv?)= k.dv; *al qpf(dv)= qp.dv; *id kf(mu?)*kf(mu?)= -ums; *al qpf(mu?)*qpf(mu?)= 0; *al kf(mu?)*qpf(mu?)= 1/2*(ums-zm); * id k(mu?)= kf(mu); id qp(mu?)= qpf(mu); id e_(k,mu?,nu?,al?)= kf(ab1)*e_(ab1,mu,nu,al); id 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 t= tau*y*s; al 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; * ratio,tuM,tau,aux; id aux= ums/(y*s); * id ums*tuM^-2= aux; id ums= 0; id aux= ums*tuM^-2; id dms= 0; * id kp= y*s * ( - 1 - X + x2 - z ); al u= y*s * ( - 1 - tau - 2*X - z ) + ums + dms; al up= y*s * ( - tau - X - x1 ) + 2*ums + dms; al tp= y*s * ( tau + X + x1 - x2 + z ) - ums; al zp= y*s * ( 1 - x1 ) + ums + dms; * id ums*tuM^-2= aux; id ums= 0; id aux= ums*tuM^-2; id dms= 0; * 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))*selu*s; g GG21= (-1/2*Wd_gg-6*X/Xp^2*Wpp_gg/(y*s))*selu*s; g GG12= (-1/2*Wd_gg-2*X/Xp^2*Wpp_gg/(y*s))*seluu*s; g GG22= (-1/2*Wd_gg-6*X/Xp^2*Wpp_gg/(y*s))*seluu*s; * id tuM^-2*seluu= 1; id seluu= 0; * id tuM^-2*selu= 0; id tuM^-1*selu= 1; id selu= 0; * id tuM^-2*sel0= 0; id tuM^-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 tau= [tau+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 [tau+X+x1]= tx; al zX^-1= zXi; id Xpi^2= Xpi-aux; id aux= XX; * id Xp^3= Xpc; 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 tx^2= txs; 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(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,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, * tx,txs,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,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, * tx,txs,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,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, * tx,txs,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_A.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; al k.k= -ums; 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 t= tau*y*s; al 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; * ratio,tuM,tau,aux; id aux= ums/(y*s); * id ums*tuM^-2= aux; id ums= 0; id aux= ums*tuM^-2; id dms= 0; * id kp= y*s * ( - 1 - X + x2 - z ); al u= y*s * ( - 1 - tau - 2*X - z ) + ums + dms; al up= y*s * ( - tau - X - x1 ) + 2*ums + dms; al tp= y*s * ( tau + X + x1 - x2 + z ) - ums; al zp= y*s * ( 1 - x1 ) + ums + dms; * id ums*tuM^-2= aux; id ums= 0; id aux= ums*tuM^-2; id dms= 0; * ratio,X,Xp,one; id one= 1; al one^-1= 1; * *id kf(dv?)= k.dv; *al qpf(dv)= qp.dv; *id kf(mu?)*kf(mu?)= -ums; *al qpf(mu?)*qpf(mu?)= 0; *al kf(mu?)*qpf(mu?)= 1/2*(ums-zm); * id k(mu?)= kf(mu); id qp(mu?)= qpf(mu); id e_(k,mu?,nu?,al?)= kf(ab1)*e_(ab1,mu,nu,al); id 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; 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 t= tau*y*s; al 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; * ratio,tuM,tau,aux; id aux= ums/(y*s); * id ums*tuM^-2= aux; id ums= 0; id aux= ums*tuM^-2; id dms= 0; * id kp= y*s * ( - 1 - X + x2 - z ); al u= y*s * ( - 1 - tau - 2*X - z ) + ums + dms; al up= y*s * ( - tau - X - x1 ) + 2*ums + dms; al tp= y*s * ( tau + X + x1 - x2 + z ) - ums; al zp= y*s * ( 1 - x1 ) + ums + dms; * id ums*tuM^-2= aux; id ums= 0; id aux= ums*tuM^-2; id dms= 0; * 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))*selu*s^2; g GZ21= (-1/2*Wd_gz-6*X/Xp^2*Wpp_gz/(y*s))*selu*s^2; g GZ31= (We_gz/(y*s)/Xp)*selu*s^2; g GZ12= (-1/2*Wd_gz-2*X/Xp^2*Wpp_gz/(y*s))*seluu*s^2; g GZ22= (-1/2*Wd_gz-6*X/Xp^2*Wpp_gz/(y*s))*seluu*s^2; g GZ32= (We_gz/(y*s)/Xp)*seluu*s^2; * id tuM^-2*seluu= 1; id seluu= 0; * id tuM^-2*selu= 0; id tuM^-1*selu= 1; id selu= 0; * id tuM^-2*sel0= 0; id tuM^-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 tau= [tau+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 [tau+X+x1]= tx; 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 tx^2= txs; 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,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,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,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; * #endprocedure * #procedure totalzz(dummy) * * Now the full stuff * load wrl$grp04:[giampiero]outputampzz_A.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= -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)*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 kf(dv?)= k.dv; *al qpf(dv?)= qp.dv; *id kf(mu?)*kf(mu?)= -ums; *al qpf(mu?)*qpf(mu?)= 0; *al kf(mu?)*qpf(mu?)= 1/2*(ums-zm); *id kf(mu?)*kf(nu?)*e_(mu?,nu?,a1?,a2?)= 0; * id rs^-1= -1/(X*y*s); id pp.pp= 0; al qp.qp= 0; al Qm.Qm= QmS; al k.k= -ums; 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 t= tau*y*s; al 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; * ratio,tuM,tau,aux; id aux= ums/(y*s); * id ums*tuM^-2= aux; id ums= 0; id aux= ums*tuM^-2; id dms= 0; * id kp= y*s * ( - 1 - X + x2 - z ); al u= y*s * ( - 1 - tau - 2*X - z ) + ums + dms; al up= y*s * ( - tau - X - x1 ) + 2*ums + dms; al tp= y*s * ( tau + X + x1 - x2 + z ) - ums; al zp= y*s * ( 1 - x1 ) + ums + dms; * id ums*tuM^-2= aux; id ums= 0; id aux= ums*tuM^-2; id dms= 0; * ratio,X,Xp,one; id one= 1; al one^-1= 1; * id k(mu?)= kf(mu); id qp(mu?)= qpf(mu); id e_(k,mu?,nu?,al?)= kf(ab1)*e_(ab1,mu,nu,al); id 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; 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 t= tau*y*s; al 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; * ratio,tuM,tau,aux; id aux= ums/(y*s); * id ums*tuM^-2= aux; id ums= 0; id aux= ums*tuM^-2; id dms= 0; * id kp= y*s * ( - 1 - X + x2 - z ); al u= y*s * ( - 1 - tau - 2*X - z ) + ums + dms; al up= y*s * ( - tau - X - x1 ) + 2*ums + dms; al tp= y*s * ( tau + X + x1 - x2 + z ) - ums; al zp= y*s * ( 1 - x1 ) + ums + dms; * id ums*tuM^-2= aux; id ums= 0; id aux= ums*tuM^-2; id dms= 0; * 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)*selu*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)*selu*s^3; g ZZ31= (We_zz/(y*s)/Xp)*selu*s^3; g ZZ41= (-2/Xp*Wqq_zz/(y*s)-2*X/Xp^2*Wpq_zz/(y*s))*selu*s^3; *g W5_zz_u= (-Wqq_zz/(y*s)/X-2/Xp*Wpq_zz/(y*s))*selu*s^3; g ZZ12= (-1/2*Wd_zz-2*X/Xp^2*Wpp_zz/(y*s)-Wpq_zz/(y*s)/Xp)*seluu*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)*seluu*s^3; g ZZ32= (We_zz/(y*s)/Xp)*seluu*s^3; g ZZ42= (-2/Xp*Wqq_zz/(y*s)-2*X/Xp^2*Wpq_zz/(y*s))*seluu*s^3; *g W5_zz_uu= (-Wqq_zz/(y*s)/X-2/Xp*Wpq_zz/(y*s))*seluu*s^3; * id tuM^-2*seluu= 1; id seluu= 0; * id tuM^-2*selu= 0; id tuM^-1*selu= 1; id selu= 0; * id tuM^-2*sel0= 0; id tuM^-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 tau= [tau+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 [tau+X+x1]= tx; al zX^-1= zXi; id Xpi^2= Xpi-aux; id aux= XX; * id Xp^3= Xpc; 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 tx^2= txs; 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 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,Xpc,Xpi,Xp is, 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,Xpc,Xpi,Xp is, 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,Xpc,Xpi,Xp is, 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} wwww_gg loaded Time = 2.91 sec Generated terms = 11199 T_gg Terms left = 4834 Bytes used = 219484 Time = 5.99 sec Generated terms = 21915 T_gg Terms left = 10192 Bytes used = 458062 Time = 9.33 sec Generated terms = 32579 T_gg Terms left = 15436 Bytes used = 681280 Time = 12.33 sec Generated terms = 43185 T_gg Terms left = 20739 Bytes used = 916822 Time = 15.58 sec Generated terms = 53787 T_gg Terms left = 26040 Bytes used = 1144494 Time = 18.59 sec Generated terms = 63827 T_gg Terms left = 31060 Bytes used = 1358730 Time = 21.63 sec Generated terms = 74215 T_gg Terms left = 36090 Bytes used = 1577196 Time = 24.68 sec Generated terms = 84473 T_gg Terms left = 41219 Bytes used = 1801920 Time = 27.23 sec Generated terms = 95170 T_gg Terms left = 46568 Bytes used = 2071620 Time = 27.67 sec T_gg Terms active = 38284 Bytes used = 1719552 Time = 28.08 sec Generated terms = 95170 T_gg Terms in output = 33018 Bytes used = 1455270 #call contractgg{dummy} Time = 29.86 sec Generated terms = 10397 Wd_gg Terms left = 621 Bytes used = 23014 Time = 31.11 sec Generated terms = 20801 Wd_gg Terms left = 1236 Bytes used = 46034 Time = 32.44 sec Generated terms = 30659 Wd_gg Terms left = 2079 Bytes used = 77542 Time = 33.88 sec Generated terms = 39160 Wd_gg Terms left = 2658 Bytes used = 98614 Time = 35.52 sec Generated terms = 46477 Wd_gg Terms left = 2688 Bytes used = 99782 Time = 37.13 sec Generated terms = 54031 Wd_gg Terms left = 2756 Bytes used = 102548 Time = 38.53 sec Generated terms = 60147 Wd_gg Terms left = 3156 Bytes used = 117122 Time = 38.54 sec Generated terms = 60147 Wd_gg Terms in output = 2867 Bytes used = 105654 Time = 39.83 sec Generated terms = 9024 Wpp_gg Terms left = 501 Bytes used = 18950 Time = 40.87 sec Generated terms = 17449 Wpp_gg Terms left = 1336 Bytes used = 46318 Time = 41.91 sec Generated terms = 26283 Wpp_gg Terms left = 2090 Bytes used = 70918 Time = 43.13 sec Generated terms = 34501 Wpp_gg Terms left = 2704 Bytes used = 91272 Time = 44.23 sec Generated terms = 42619 Wpp_gg Terms left = 3902 Bytes used = 128158 Time = 45.35 sec Generated terms = 50821 Wpp_gg Terms left = 5081 Bytes used = 165776 Time = 46.79 sec Generated terms = 58611 Wpp_gg Terms left = 5581 Bytes used = 181828 Time = 48.28 sec Generated terms = 66307 Wpp_gg Terms left = 5723 Bytes used = 186062 Time = 49.73 sec Generated terms = 73948 Wpp_gg Terms left = 5865 Bytes used = 190056 Time = 51.18 sec Generated terms = 81707 Wpp_gg Terms left = 6178 Bytes used = 201388 Time = 52.87 sec Generated terms = 89607 Wpp_gg Terms left = 6726 Bytes used = 221562 Time = 53.94 sec Generated terms = 95518 Wpp_gg Terms left = 7632 Bytes used = 251164 Time = 53.98 sec Generated terms = 95518 Wpp_gg Terms in output = 5722 Bytes used = 187494 Time = 54.12 sec Generated terms = 2867 Wd_gg Terms in output = 2867 Bytes used = 105654 Time = 54.43 sec Generated terms = 5722 Wpp_gg Terms in output = 5722 Bytes used = 187494 Time = 54.59 sec Generated terms = 2867 Wd_gg Terms in output = 2867 Bytes used = 105654 Time = 54.87 sec Generated terms = 5722 Wpp_gg Terms in output = 5722 Bytes used = 187494 Time = 55.03 sec Generated terms = 2867 Wd_gg Terms in output = 2867 Bytes used = 105654 Time = 55.32 sec Generated terms = 5722 Wpp_gg Terms in output = 5722 Bytes used = 187494 Time = 55.48 sec Generated terms = 2867 Wd_gg Terms in output = 2867 Bytes used = 105654 Time = 55.76 sec Generated terms = 5722 Wpp_gg Terms in output = 5722 Bytes used = 187494 Time = 55.93 sec Generated terms = 2867 Wd_gg Terms in output = 2867 Bytes used = 105654 Time = 56.22 sec Generated terms = 5722 Wpp_gg Terms in output = 5722 Bytes used = 187494 Time = 56.64 sec Generated terms = 3430 Wd_gg Terms in output = 2858 Bytes used = 106036 Time = 57.43 sec Generated terms = 7380 Wpp_gg Terms in output = 5688 Bytes used = 182432 Time = 61.22 sec Generated terms = 11184 GG10 Terms left = 443 Bytes used = 12284 Time = 65.16 sec Generated terms = 22114 GG10 Terms left = 809 Bytes used = 22568 Time = 68.92 sec Generated terms = 32802 GG10 Terms left = 1106 Bytes used = 30876 Time = 72.65 sec Generated terms = 42635 GG10 Terms left = 1427 Bytes used = 40004 Time = 76.37 sec Generated terms = 52592 GG10 Terms left = 2019 Bytes used = 56780 Time = 80.09 sec Generated terms = 62855 GG10 Terms left = 2551 Bytes used = 71898 Time = 83.80 sec Generated terms = 72504 GG10 Terms left = 2824 Bytes used = 79612 Time = 87.24 sec Generated terms = 81954 GG10 Terms left = 3274 Bytes used = 92060 Time = 90.18 sec Generated terms = 91587 GG10 Terms left = 3650 Bytes used = 103228 Time = 93.82 sec Generated terms = 102626 GG10 Terms left = 3903 Bytes used = 111466 Time = 97.67 sec Generated terms = 112942 GG10 Terms left = 4184 Bytes used = 119998 Time = 101.45 sec Generated terms = 123133 GG10 Terms left = 4475 Bytes used = 128330 Time = 104.84 sec Generated terms = 132855 GG10 Terms left = 4609 Bytes used = 132278 Time = 108.39 sec Generated terms = 142940 GG10 Terms left = 4894 Bytes used = 140310 Time = 111.91 sec Generated terms = 152520 GG10 Terms left = 5226 Bytes used = 149976 Time = 115.52 sec Generated terms = 161789 GG10 Terms left = 5648 Bytes used = 162600 Time = 119.32 sec Generated terms = 171127 GG10 Terms left = 5984 Bytes used = 172330 Time = 123.09 sec Generated terms = 180559 GG10 Terms left = 6308 Bytes used = 182132 Time = 126.89 sec Generated terms = 190321 GG10 Terms left = 6699 Bytes used = 193498 Time = 130.72 sec Generated terms = 200728 GG10 Terms left = 6938 Bytes used = 200684 Time = 134.77 sec Generated terms = 211071 GG10 Terms left = 7263 Bytes used = 210438 Time = 138.85 sec Generated terms = 221453 GG10 Terms left = 7694 Bytes used = 224048 Time = 142.65 sec Generated terms = 230752 GG10 Terms left = 8068 Bytes used = 234566 Time = 146.48 sec Generated terms = 240900 GG10 Terms left = 8525 Bytes used = 247694 Time = 150.30 sec Generated terms = 251168 GG10 Terms left = 8871 Bytes used = 258356 Time = 154.31 sec Generated terms = 261064 GG10 Terms left = 9273 Bytes used = 270918 Time = 158.36 sec Generated terms = 271201 GG10 Terms left = 9610 Bytes used = 281884 Time = 162.35 sec Generated terms = 281102 GG10 Terms left = 10238 Bytes used = 300796 Time = 166.11 sec Generated terms = 290295 GG10 Terms left = 10687 Bytes used = 313782 Time = 169.92 sec Generated terms = 299761 GG10 Terms left = 11041 Bytes used = 323964 Time = 173.38 sec Generated terms = 309420 GG10 Terms left = 11322 Bytes used = 332136 Time = 176.81 sec Generated terms = 319165 GG10 Terms left = 11451 Bytes used = 336036 Time = 180.32 sec Generated terms = 329534 GG10 Terms left = 11675 Bytes used = 343048 Time = 183.85 sec Generated terms = 339209 GG10 Terms left = 11927 Bytes used = 350922 Time = 187.39 sec Generated terms = 348325 GG10 Terms left = 12293 Bytes used = 362514 Time = 191.21 sec Generated terms = 357322 GG10 Terms left = 12677 Bytes used = 373798 Time = 194.98 sec Generated terms = 366754 GG10 Terms left = 12977 Bytes used = 382580 Time = 198.76 sec Generated terms = 375741 GG10 Terms left = 13420 Bytes used = 395576 Time = 202.52 sec Generated terms = 385110 GG10 Terms left = 13814 Bytes used = 407202 Time = 206.05 sec Generated terms = 393917 GG10 Terms left = 14156 Bytes used = 417286 Time = 209.58 sec Generated terms = 402725 GG10 Terms left = 14554 Bytes used = 428748 Time = 213.12 sec Generated terms = 411668 GG10 Terms left = 14913 Bytes used = 438930 Time = 216.74 sec Generated terms = 420832 GG10 Terms left = 15211 Bytes used = 447976 Time = 220.52 sec Generated terms = 429947 GG10 Terms left = 15533 Bytes used = 458046 Time = 224.29 sec Generated terms = 439421 GG10 Terms left = 15881 Bytes used = 468420 Time = 228.04 sec Generated terms = 448491 GG10 Terms left = 16303 Bytes used = 480872 Time = 231.82 sec Generated terms = 457680 GG10 Terms left = 16666 Bytes used = 491692 Time = 235.45 sec Generated terms = 467877 GG10 Terms left = 16973 Bytes used = 501192 Time = 239.12 sec Generated terms = 477500 GG10 Terms left = 17246 Bytes used = 509434 Time = 242.83 sec Generated terms = 487208 GG10 Terms left = 17569 Bytes used = 519030 Time = 246.47 sec Generated terms = 496700 GG10 Terms left = 17914 Bytes used = 528886 Time = 250.28 sec Generated terms = 506468 GG10 Terms left = 18162 Bytes used = 536012 Time = 253.94 sec Generated terms = 515986 GG10 Terms left = 18607 Bytes used = 549108 Time = 257.48 sec Generated terms = 525049 GG10 Terms left = 18868 Bytes used = 557052 Time = 261.24 sec Generated terms = 535228 GG10 Terms left = 19103 Bytes used = 564168 Time = 264.99 sec Generated terms = 545260 GG10 Terms left = 19323 Bytes used = 570966 Time = 268.59 sec Generated terms = 555199 GG10 Terms left = 19636 Bytes used = 580660 Time = 272.13 sec Generated terms = 565100 GG10 Terms left = 19982 Bytes used = 591108 Time = 275.65 sec Generated terms = 574257 GG10 Terms left = 20198 Bytes used = 597410 Time = 279.40 sec Generated terms = 583437 GG10 Terms left = 20636 Bytes used = 610050 Time = 283.22 sec Generated terms = 592748 GG10 Terms left = 21069 Bytes used = 622522 Time = 287.00 sec Generated terms = 602248 GG10 Terms left = 21425 Bytes used = 632816 Time = 290.78 sec Generated terms = 611362 GG10 Terms left = 21873 Bytes used = 645482 Time = 294.57 sec Generated terms = 620918 GG10 Terms left = 22187 Bytes used = 654112 Time = 298.13 sec Generated terms = 629874 GG10 Terms left = 22632 Bytes used = 667200 Time = 301.65 sec Generated terms = 638787 GG10 Terms left = 23056 Bytes used = 679192 Time = 305.22 sec Generated terms = 647640 GG10 Terms left = 23406 Bytes used = 689268 Time = 308.80 sec Generated terms = 656912 GG10 Terms left = 23796 Bytes used = 700912 Time = 312.60 sec Generated terms = 666085 GG10 Terms left = 24222 Bytes used = 713324 Time = 316.40 sec Generated terms = 675481 GG10 Terms left = 24662 Bytes used = 726298 Time = 320.20 sec Generated terms = 684865 GG10 Terms left = 25081 Bytes used = 738742 Time = 323.99 sec Generated terms = 694017 GG10 Terms left = 25574 Bytes used = 752890 Time = 327.78 sec Generated terms = 703598 GG10 Terms left = 25894 Bytes used = 761740 Time = 331.38 sec Generated terms = 712590 GG10 Terms left = 26253 Bytes used = 772676 Time = 334.92 sec Generated terms = 721339 GG10 Terms left = 26636 Bytes used = 783856 Time = 338.45 sec Generated terms = 730287 GG10 Terms left = 27006 Bytes used = 794496 Time = 341.92 sec Generated terms = 739347 GG10 Terms left = 27369 Bytes used = 804994 Time = 345.41 sec Generated terms = 748359 GG10 Terms left = 27669 Bytes used = 813648 Time = 349.04 sec Generated terms = 757655 GG10 Terms left = 27957 Bytes used = 822138 Time = 352.22 sec Generated terms = 767207 GG10 Terms left = 28240 Bytes used = 831134 Time = 355.29 sec Generated terms = 776009 GG10 Terms left = 28590 Bytes used = 841146 Time = 358.34 sec Generated terms = 785215 GG10 Terms left = 28979 Bytes used = 852516 Time = 361.44 sec Generated terms = 794071 GG10 Terms left = 29228 Bytes used = 860356 Time = 364.53 sec Generated terms = 802737 GG10 Terms left = 29607 Bytes used = 871742 Time = 367.63 sec Generated terms = 811578 GG10 Terms left = 29984 Bytes used = 883032 Time = 370.67 sec Generated terms = 820746 GG10 Terms left = 30411 Bytes used = 895476 Time = 373.75 sec Generated terms = 829486 GG10 Terms left = 30727 Bytes used = 904590 Time = 376.87 sec Generated terms = 838227 GG10 Terms left = 31151 Bytes used = 916542 Time = 379.97 sec Generated terms = 847223 GG10 Terms left = 31489 Bytes used = 926116 Time = 382.40 sec Generated terms = 854436 GG10 Terms left = 31675 Bytes used = 931220 Time = 382.59 sec Generated terms = 854436 GG10 Terms in output = 4241 Bytes used = 126478 Time = 386.23 sec Generated terms = 11184 GG20 Terms left = 443 Bytes used = 12284 Time = 390.17 sec Generated terms = 22114 GG20 Terms left = 809 Bytes used = 22568 Time = 393.96 sec Generated terms = 32802 GG20 Terms left = 1106 Bytes used = 30876 Time = 397.72 sec Generated terms = 42635 GG20 Terms left = 1427 Bytes used = 40004 Time = 401.43 sec Generated terms = 52592 GG20 Terms left = 2019 Bytes used = 56780 Time = 405.17 sec Generated terms = 62855 GG20 Terms left = 2551 Bytes used = 71898 Time = 408.84 sec Generated terms = 72504 GG20 Terms left = 2824 Bytes used = 79612 Time = 412.29 sec Generated terms = 81954 GG20 Terms left = 3274 Bytes used = 92060 Time = 415.22 sec Generated terms = 91587 GG20 Terms left = 3650 Bytes used = 103228 Time = 418.88 sec Generated terms = 102626 GG20 Terms left = 3903 Bytes used = 111466 Time = 422.72 sec Generated terms = 112942 GG20 Terms left = 4184 Bytes used = 119998 Time = 426.51 sec Generated terms = 123133 GG20 Terms left = 4475 Bytes used = 128330 Time = 429.88 sec Generated terms = 132855 GG20 Terms left = 4609 Bytes used = 132278 Time = 433.43 sec Generated terms = 142940 GG20 Terms left = 4894 Bytes used = 140310 Time = 436.95 sec Generated terms = 152520 GG20 Terms left = 5226 Bytes used = 149976 Time = 440.59 sec Generated terms = 161789 GG20 Terms left = 5648 Bytes used = 162600 Time = 444.37 sec Generated terms = 171127 GG20 Terms left = 5984 Bytes used = 172330 Time = 448.13 sec Generated terms = 180559 GG20 Terms left = 6308 Bytes used = 182132 Time = 451.88 sec Generated terms = 190321 GG20 Terms left = 6699 Bytes used = 193498 Time = 455.71 sec Generated terms = 200728 GG20 Terms left = 6938 Bytes used = 200684 Time = 459.77 sec Generated terms = 211071 GG20 Terms left = 7263 Bytes used = 210438 Time = 463.87 sec Generated terms = 221453 GG20 Terms left = 7694 Bytes used = 224048 Time = 467.66 sec Generated terms = 230752 GG20 Terms left = 8068 Bytes used = 234566 Time = 471.49 sec Generated terms = 240900 GG20 Terms left = 8525 Bytes used = 247694 Time = 475.27 sec Generated terms = 251168 GG20 Terms left = 8871 Bytes used = 258356 Time = 479.30 sec Generated terms = 261064 GG20 Terms left = 9273 Bytes used = 270918 Time = 483.37 sec Generated terms = 271201 GG20 Terms left = 9610 Bytes used = 281884 Time = 487.37 sec Generated terms = 281102 GG20 Terms left = 10238 Bytes used = 300796 Time = 491.16 sec Generated terms = 290295 GG20 Terms left = 10687 Bytes used = 313782 Time = 494.97 sec Generated terms = 299761 GG20 Terms left = 11041 Bytes used = 323964 Time = 498.42 sec Generated terms = 309420 GG20 Terms left = 11322 Bytes used = 332136 Time = 501.88 sec Generated terms = 319165 GG20 Terms left = 11451 Bytes used = 336036 Time = 505.41 sec Generated terms = 329534 GG20 Terms left = 11675 Bytes used = 343048 Time = 508.95 sec Generated terms = 339209 GG20 Terms left = 11927 Bytes used = 350922 Time = 512.58 sec Generated terms = 348325 GG20 Terms left = 12293 Bytes used = 362514 Time = 516.32 sec Generated terms = 357322 GG20 Terms left = 12677 Bytes used = 373798 Time = 520.11 sec Generated terms = 366754 GG20 Terms left = 12977 Bytes used = 382580 Time = 523.88 sec Generated terms = 375741 GG20 Terms left = 13420 Bytes used = 395576 Time = 527.62 sec Generated terms = 385110 GG20 Terms left = 13814 Bytes used = 407202 Time = 531.14 sec Generated terms = 393917 GG20 Terms left = 14156 Bytes used = 417286 Time = 534.69 sec Generated terms = 402725 GG20 Terms left = 14554 Bytes used = 428748 Time = 538.22 sec Generated terms = 411668 GG20 Terms left = 14913 Bytes used = 438930 Time = 541.84 sec Generated terms = 420832 GG20 Terms left = 15211 Bytes used = 447976 Time = 545.62 sec Generated terms = 429947 GG20 Terms left = 15533 Bytes used = 458046 Time = 549.39 sec Generated terms = 439421 GG20 Terms left = 15881 Bytes used = 468420 Time = 553.14 sec Generated terms = 448491 GG20 Terms left = 16303 Bytes used = 480872 Time = 556.92 sec Generated terms = 457680 GG20 Terms left = 16666 Bytes used = 491692 Time = 560.49 sec Generated terms = 467877 GG20 Terms left = 16973 Bytes used = 501192 Time = 564.11 sec Generated terms = 477500 GG20 Terms left = 17246 Bytes used = 509434 Time = 567.87 sec Generated terms = 487208 GG20 Terms left = 17569 Bytes used = 519030 Time = 571.53 sec Generated terms = 496700 GG20 Terms left = 17914 Bytes used = 528886 Time = 575.36 sec Generated terms = 506468 GG20 Terms left = 18162 Bytes used = 536012 Time = 579.02 sec Generated terms = 515986 GG20 Terms left = 18607 Bytes used = 549108 Time = 582.56 sec Generated terms = 525049 GG20 Terms left = 18868 Bytes used = 557052 Time = 586.33 sec Generated terms = 535228 GG20 Terms left = 19103 Bytes used = 564168 Time = 590.10 sec Generated terms = 545260 GG20 Terms left = 19323 Bytes used = 570966 Time = 593.69 sec Generated terms = 555199 GG20 Terms left = 19636 Bytes used = 580660 Time = 597.26 sec Generated terms = 565100 GG20 Terms left = 19982 Bytes used = 591108 Time = 600.79 sec Generated terms = 574257 GG20 Terms left = 20198 Bytes used = 597410 Time = 604.54 sec Generated terms = 583437 GG20 Terms left = 20636 Bytes used = 610050 Time = 608.37 sec Generated terms = 592748 GG20 Terms left = 21069 Bytes used = 622522 Time = 612.16 sec Generated terms = 602248 GG20 Terms left = 21425 Bytes used = 632816 Time = 615.93 sec Generated terms = 611362 GG20 Terms left = 21873 Bytes used = 645482 Time = 619.71 sec Generated terms = 620918 GG20 Terms left = 22187 Bytes used = 654112 Time = 623.28 sec Generated terms = 629874 GG20 Terms left = 22632 Bytes used = 667200 Time = 626.81 sec Generated terms = 638787 GG20 Terms left = 23056 Bytes used = 679192 Time = 630.37 sec Generated terms = 647640 GG20 Terms left = 23406 Bytes used = 689268 Time = 633.95 sec Generated terms = 656912 GG20 Terms left = 23796 Bytes used = 700912 Time = 637.71 sec Generated terms = 666085 GG20 Terms left = 24222 Bytes used = 713324 Time = 641.49 sec Generated terms = 675481 GG20 Terms left = 24662 Bytes used = 726298 Time = 645.28 sec Generated terms = 684865 GG20 Terms left = 25081 Bytes used = 738742 Time = 649.08 sec Generated terms = 694017 GG20 Terms left = 25574 Bytes used = 752890 Time = 652.86 sec Generated terms = 703598 GG20 Terms left = 25894 Bytes used = 761740 Time = 656.44 sec Generated terms = 712590 GG20 Terms left = 26253 Bytes used = 772676 Time = 659.99 sec Generated terms = 721339 GG20 Terms left = 26636 Bytes used = 783856 Time = 663.52 sec Generated terms = 730287 GG20 Terms left = 27006 Bytes used = 794496 Time = 667.02 sec Generated terms = 739347 GG20 Terms left = 27369 Bytes used = 804994 Time = 670.55 sec Generated terms = 748359 GG20 Terms left = 27669 Bytes used = 813648 Time = 674.11 sec Generated terms = 757655 GG20 Terms left = 27957 Bytes used = 822138 Time = 677.33 sec Generated terms = 767207 GG20 Terms left = 28240 Bytes used = 831134 Time = 680.40 sec Generated terms = 776009 GG20 Terms left = 28590 Bytes used = 841146 Time = 683.47 sec Generated terms = 785215 GG20 Terms left = 28979 Bytes used = 852516 Time = 686.57 sec Generated terms = 794071 GG20 Terms left = 29228 Bytes used = 860356 Time = 689.69 sec Generated terms = 802737 GG20 Terms left = 29607 Bytes used = 871742 Time = 692.80 sec Generated terms = 811578 GG20 Terms left = 29984 Bytes used = 883032 Time = 695.83 sec Generated terms = 820746 GG20 Terms left = 30411 Bytes used = 895476 Time = 698.92 sec Generated terms = 829486 GG20 Terms left = 30727 Bytes used = 904590 Time = 702.04 sec Generated terms = 838227 GG20 Terms left = 31151 Bytes used = 916542 Time = 705.13 sec Generated terms = 847223 GG20 Terms left = 31489 Bytes used = 926116 Time = 707.56 sec Generated terms = 854436 GG20 Terms left = 31675 Bytes used = 931220 Time = 707.78 sec Generated terms = 854436 GG20 Terms in output = 4283 Bytes used = 127692 Time = 712.00 sec Generated terms = 20505 GG11 Terms left = 233 Bytes used = 7054 Time = 712.41 sec Generated terms = 24575 GG11 Terms left = 286 Bytes used = 8654 Time = 712.42 sec Generated terms = 24575 GG11 Terms in output = 213 Bytes used = 6566 Time = 716.62 sec Generated terms = 20505 GG21 Terms left = 245 Bytes used = 7370 Time = 717.03 sec Generated terms = 24575 GG21 Terms left = 298 Bytes used = 8970 Time = 717.03 sec Generated terms = 24575 GG21 Terms in output = 225 Bytes used = 6858 Time = 717.65 sec Generated terms = 13152 GG12 Terms in output = 9 Bytes used = 322 Time = 718.28 sec Generated terms = 13152 GG22 Terms in output = 9 Bytes used = 322 Time = 718.47 sec Generated terms = 121 GG10s Terms in output = 121 Bytes used = 2562 Time = 718.60 sec Generated terms = 121 GG20s Terms in output = 121 Bytes used = 2562 Time = 718.61 sec Generated terms = 42 GG11s Terms in output = 42 Bytes used = 1036 Time = 718.62 sec Generated terms = 44 GG21s Terms in output = 44 Bytes used = 1064 Time = 718.63 sec Generated terms = 9 GG12s Terms in output = 9 Bytes used = 348 Time = 718.63 sec Generated terms = 9 GG22s Terms in output = 9 Bytes used = 348 GG10s = + + XX*rl3*vvc*GtM2*ys * ( 4./3.*O*x12*tx - 4./3.*O*x2z*tx - 4./3. + *O*x2z - 4./3.*O*txs - 4./3.*Os*x12 + 4./3.*Os*x2z + 4./3.*Os + *tx - 4./3.*Oc - 4./3.*x12*txs + 4./3.*x2z*tx ) GG10s = GG10s + XX*vvs*GtM2*PwsM2*y*zXi * ( - 8./9.*O*x12*tx - 4. + /9.*O*x12 + 4./9.*O*tx - 4./9.*O*txs + 8./9.*Os*x12 - 4./9.* + Os + 4./9.*x12*tx + 4./9.*x12*txs ) GG10s = GG10s + XX*vvs*GtM2*PwsM2*y * ( - 4./3.*O*tx - 4./9.*O + + 20./9.*Os + 4./9.*tx ) GG10s = GG10s + XX*vvq*GtM2*yc * ( - 2*O*x2z*txs - 2*x12*x2z*txs + + 2*x2z*txs ) GG10s = GG10s + Xpi*rl3*vvc*GtM2*ys * ( - 8./3.*O*tx - 4./3.*O + + 4./3.*Os - 4./3.*x12*tx + 4./3.*tx ) GG10s = GG10s + Xpi*vvs*GtM2*PwsM2*y*zXi * ( - 4./9.*O*tx - 4./9. + *O + 4./9.*x12*tx + 4./9.*tx ) GG10s = GG10s + Xpi*vvq*GtM2*yc * ( - O*x2z*tx - 3*O*txs - 3*x12 + *txs + x2z*tx + 2*txs ) GG10s = GG10s + rl1*vvs*y * ( 4./3.*O - 4./3.*Os ) GG10s = GG10s + rl2*vvc*Xp*ys * ( 1 + O*x12 - O*x2z - 4*O + 3*Os + - 2*x12*tx - x12 + x2z + tx ) GG10s = GG10s + rl2*vvc*Xps*ys * ( - 1 + O + x12 ) GG10s = GG10s + rl2*vvc*ys * ( - O*x12*tx - O*x2z*tx + 2*O*x2z + + 2*O*tx + O*txs - Os*x2z - Os*tx + x12*tx + x12*txs - x2z* + tx - x2z ) GG10s = GG10s + rl3*vvc*GtM2*Xp*ys * ( 2./3. - 2./3.*O - 2./3.* + x12 ) GG10s = GG10s + rl3*vvc*GtM2*ys * ( 2./3.*O*x2z + 8./3.*O*tx + 2* + O - 4./3.*Os + 2*x12*tx + 2./3.*x12 - 2./3.*x2z - 4./3.*tx ) GG10s = GG10s + vvs*GsM2*PwtM2*y*Xp * ( - O + Os ) GG10s = GG10s + vvs*GsM2*PwtM2*y * ( O*tx ) GG10s = GG10s + vvs*GtM2*PwsM2*y*Xp*zXi * ( 2./9. - 2./9.*O + 2./ + 9.*x12 ) GG10s = GG10s + vvs*GtM2*PwsM2*y*zXi * ( 2./9.*O*x12 + 2./9.*O*tx + + 4./9.*O + 2./9.*Os - 2./3.*x12*tx - 4./9.*x12 - 4./9.*tx ) GG10s = GG10s + vvs*GtM2*PwsM2*y * ( - 2./9. + 2./9.*O ) GG10s = GG10s + vvq*GtM2*Xp*yc * ( 1 + O*x12 - O*x2z - 3*O*tx - 3 + *O + 2*Os - 4*x12*tx - x12 - x2z*tx + x2z + 3*tx + txs ) GG10s = GG10s + vvq*GtM2*Xps*yc * ( - 1 + O + x12 ) GG10s = GG10s + vvq*GtM2*yc * ( O*x12*tx + 2*O*x2z*tx + 2*O*x2z + + 2*O*tx + 3*O*txs - Os*x2z + 2*x12*x2z*tx + x12*tx + 3*x12* + txs - 3*x2z*tx - x2z*txs - x2z + tx*x12s + tx*x2zs - tx - 2* + txs ) GG20s = + + XX*rl3*vvc*GtM2*ys * ( 4*O*x12*tx - 4*O*x2z*tx - 4*O*x2z - 4* + O*txs - 4*Os*x12 + 4*Os*x2z + 4*Os*tx - 4*Oc - 4*x12*txs + 4* + x2z*tx ) GG20s = GG20s + XX*vvs*GtM2*PwsM2*y*zXi * ( - 8./3.*O*x12*tx - 4. + /3.*O*x12 + 4./3.*O*tx - 4./3.*O*txs + 8./3.*Os*x12 - 4./3.* + Os + 4./3.*x12*tx + 4./3.*x12*txs ) GG20s = GG20s + XX*vvs*GtM2*PwsM2*y * ( - 4*O*tx - 4./3.*O + 20./ + 3.*Os + 4./3.*tx ) GG20s = GG20s + XX*vvq*GtM2*yc * ( - 6*O*x2z*txs - 6*x12*x2z*txs + + 6*x2z*txs ) GG20s = GG20s + Xpi*rl3*vvc*GtM2*ys * ( - 8*O*tx - 4*O + 4*Os - + 4*x12*tx + 4*tx ) GG20s = GG20s + Xpi*vvs*GtM2*PwsM2*y*zXi * ( - 4./3.*O*tx - 4./3. + *O + 4./3.*x12*tx + 4./3.*tx ) GG20s = GG20s + Xpi*vvq*GtM2*yc * ( - 3*O*x2z*tx - 9*O*txs - 9* + x12*txs + 3*x2z*tx + 6*txs ) GG20s = GG20s + rl1*vvs*y * ( 4./3.*O - 4./3.*Os ) GG20s = GG20s + rl2*vvc*Xp*ys * ( 1 + O*x12 - O*x2z - 4*O + 3*Os + - 2*x12*tx - x12 + x2z + tx ) GG20s = GG20s + rl2*vvc*Xps*ys * ( - 1 + O + x12 ) GG20s = GG20s + rl2*vvc*ys * ( - O*x12*tx - O*x2z*tx + 2*O*x2z + + 2*O*tx + O*txs - Os*x2z - Os*tx + x12*tx + x12*txs - x2z* + tx - x2z ) GG20s = GG20s + rl3*vvc*GtM2*Xp*ys * ( 2./3. - 2./3.*O - 2./3.* + x12 ) GG20s = GG20s + rl3*vvc*GtM2*ys * ( 2./3.*O*x2z + 8*O*tx + 14./3. + *O - 4*Os + 14./3.*x12*tx + 2./3.*x12 - 2./3.*x2z - 4*tx ) GG20s = GG20s + vvs*GsM2*PwtM2*y*Xp * ( - O + Os ) GG20s = GG20s + vvs*GsM2*PwtM2*y * ( O*tx ) GG20s = GG20s + vvs*GtM2*PwsM2*y*Xp*zXi * ( 2./9. - 2./9.*O + 2./ + 9.*x12 ) GG20s = GG20s + vvs*GtM2*PwsM2*y*zXi * ( 2./9.*O*x12 + 10./9.*O* + tx + 4./3.*O + 2./9.*Os - 14./9.*x12*tx - 4./9.*x12 - 4./3.* + tx ) GG20s = GG20s + vvs*GtM2*PwsM2*y * ( - 2./9. + 2./9.*O ) GG20s = GG20s + vvq*GtM2*Xp*yc * ( 1 + O*x12 - O*x2z - 6*O*tx - 3 + *O + 2*Os - 6*x12*tx - x12 - x2z*tx + x2z + 5*tx + txs ) GG20s = GG20s + vvq*GtM2*Xps*yc * ( - 1 + O + x12 ) GG20s = GG20s + vvq*GtM2*yc * ( O*x12*tx + 4*O*x2z*tx + 2*O*x2z + + 5*O*tx + 9*O*txs - Os*x2z + 2*x12*x2z*tx + 3*x12*tx + 9* + x12*txs - 5*x2z*tx - x2z*txs - x2z + tx*x12s + tx*x2zs - 3*tx + - 6*txs ) GG11s = + + XX*rl3*vvc*GtM2*ys * ( 4./3.*Os*x2z + 4./3.*Oc*x12 - 4./3.*Oc + *x2z + 4./3.*Oq ) GG11s = GG11s + XX*vvs*GtM2*PwsM2*y*zXi * ( 4./9.*Os*x12 - 8./9.* + Oc*x12 + 4./9.*Oc ) GG11s = GG11s + XX*vvs*GtM2*PwsM2*y * ( 4./9.*Os - 28./9.*Oc ) GG11s = GG11s + Xpi*rl3*vvc*GtM2*ys * ( 4./3.*O*x2z + 4./3.*Os* + x12 - 4./3.*Os*x2z + 4./3.*Os ) GG11s = GG11s + Xpi*vvs*GtM2*PwsM2*y*zXi * ( 4./9.*O*x12 - 8./9.* + Os*x12 + 8./9.*Os ) GG11s = GG11s + Xpi*vvs*GtM2*PwsM2*y * ( 4./9.*O - 20./9.*Os ) GG11s = GG11s + rl1*vvs*y * ( - 4./3.*Os + 4./3.*Oc ) GG11s = GG11s + rl3*vvc*GtM2*Xp*ys * ( 2./3. + 4./3.*O*x12 - 4./3. + *O + 4./3.*Os ) GG11s = GG11s + rl3*vvc*GtM2*ys * ( - 2./3.*O*x12 + 2./3.*O*x2z + - 4./3.*O - 4./3.*Os*x12 - 2./3.*Os - 2./3.*x2z ) GG11s = GG11s + vvs*GtM2*PwsM2*y*Xp*zXi * ( 2./9. - 4./9.*O*x12 + + 4./9.*Os ) GG11s = GG11s + vvs*GtM2*PwsM2*y*zXi * ( 4./9.*O*x12 - 2./3.*O + + 4./9.*Os*x12 - 4./9.*Os - 4./9.*Oc - 2./9.*x12 ) GG11s = GG11s + vvs*GtM2*PwsM2*y * ( - 2./9. + 2./3.*O + 16./9.* + Os ) GG21s = + + XX*rl3*vvc*GtM2*ys * ( 4*Os*x2z + 4*Oc*x12 - 4*Oc*x2z + 4*Oq + ) GG21s = GG21s + XX*vvs*GtM2*PwsM2*y*zXi * ( 4./3.*Os*x12 - 8./3.* + Oc*x12 + 4./3.*Oc ) GG21s = GG21s + XX*vvs*GtM2*PwsM2*y * ( 4./3.*Os - 28./3.*Oc ) GG21s = GG21s + Xpi*rl3*vvc*GtM2*ys * ( 4*O*x2z + 4*Os*x12 - 4*Os + *x2z + 4*Os ) GG21s = GG21s + Xpi*vvs*GtM2*PwsM2*y*zXi * ( 4./3.*O*x12 - 8./3.* + Os*x12 + 8./3.*Os ) GG21s = GG21s + Xpi*vvs*GtM2*PwsM2*y * ( 4./3.*O - 20./3.*Os ) GG21s = GG21s + rl1*vvs*y * ( - 4./3.*Os + 4./3.*Oc ) GG21s = GG21s + rl3*vvc*GtM2*Xp*ys * ( 2./3. + 4./3.*O*x12 + 4./3. + *O - 4./3.*Os ) GG21s = GG21s + rl3*vvc*GtM2*ys * ( - 2./3.*O*x12 - 2*O*x2z - 4* + O - 4*Os*x12 + 8./3.*Os*x2z - 2./3.*Os - 2./3.*x2z ) GG21s = GG21s + vvs*GtM2*PwsM2*y*Xp*zXi * ( 2./9. - 4./9.*O*x12 + + 8./9.*O + 4./9.*Os ) GG21s = GG21s + vvs*GtM2*PwsM2*y*zXi * ( - 4./9.*O*x12 - 14./9.* + O + 20./9.*Os*x12 - 20./9.*Os - 4./9.*Oc - 2./9.*x12 ) GG21s = GG21s + vvs*GtM2*PwsM2*y * ( - 2./9. - 2./9.*O + 56./9.* + Os ) GG12s = + + XX*vvs*ums*GtM2*PwsM2*s**(-1) * ( - 8./3.*Oc ) GG12s = GG12s + XX*vvs*GtM2*PwsM2*y * ( 8./9.*Oq ) GG12s = GG12s + Xpi*vvs*ums*GtM2*PwsM2*s**(-1) * ( - 16./9.*Os ) GG12s = GG12s + Xpi*vvs*GtM2*PwsM2*y * ( 8./9.*Oc ) GG12s = GG12s + vvs*ums*GtM2*PwsM2*s**(-1) * ( 4./9.*O + 16./9.* + Os ) GG12s = GG12s + vvs*GtM2*PwsM2*y*Xp * ( 4./9.*Os ) GG12s = GG12s + vvs*GtM2*PwsM2*y * ( - 4./9.*Os - 8./9.*Oc ) GG22s = + + XX*vvs*ums*GtM2*PwsM2*s**(-1) * ( - 8*Oc ) GG22s = GG22s + XX*vvs*GtM2*PwsM2*y * ( 8./3.*Oq ) GG22s = GG22s + Xpi*vvs*ums*GtM2*PwsM2*s**(-1) * ( - 16./3.*Os ) GG22s = GG22s + Xpi*vvs*GtM2*PwsM2*y * ( 8./3.*Oc ) GG22s = GG22s + vvs*ums*GtM2*PwsM2*s**(-1) * ( 4./9.*O + 16./3.* + Os ) GG22s = GG22s + vvs*GtM2*PwsM2*y*Xp * ( 4./9.*Os ) GG22s = GG22s + vvs*GtM2*PwsM2*y * ( - 4./9.*Os - 8./3.*Oc ) Time = 718.77 sec Generated terms = 974 GG10c Terms in output = 974 Bytes used = 19444 Time = 718.92 sec Generated terms = 977 GG20c Terms in output = 977 Bytes used = 19490 Time = 718.94 sec Generated terms = 171 GG11c Terms in output = 171 Bytes used = 3820 Time = 718.95 sec Generated terms = 181 GG21c Terms in output = 181 Bytes used = 3960 Time = 718.96 sec Generated terms = 0 GG12c Terms in output = 0 Bytes used = 2 Time = 718.96 sec Generated terms = 0 GG22c Terms in output = 0 Bytes used = 2 GG10c = + + rs1wg(1)*XX*vvc*GtM2*ys * ( 8./3.*O*x12*tx - 8./3.*O*x2z*tx + - 8./3.*O*x2z - 8./3.*O*txs - 8./3.*Os*x12 + 8./3.*Os*x2z + + 8./3.*Os*tx - 8./3.*Oc - 8./3.*x12*txs + 8./3.*x2z*tx ) GG10c = GG10c + rs1wg(1)*Xpi*vvc*GtM2*ys * ( - 8*O*tx - 8./3.*O + + 16./3.*Os - 8./3.*x12*tx + 8./3.*tx ) GG10c = GG10c + rs1wg(1)*vvc*GtM2*Xp*ys * ( 4./3. - 4./3.*O - 4./ + 3.*x12 ) GG10c = GG10c + rs1wg(1)*vvc*GtM2*ys * ( 4./3.*O*x2z + 28./3.*O* + tx + 4*O - 16./3.*Os + 4*x12*tx + 4./3.*x12 - 4./3.*x2z - 8./ + 3.*tx ) GG10c = GG10c + rs1wg(4)*XX*vvc*GtM2*ys * ( 2./3.*O*x2z*txs - 2./ + 3.*O*tx*x2zs + 4./3.*O*x2zs + 2./3.*x12*x2z*txs - 2./3.*tx* + x2zs ) GG10c = GG10c + rs1wg(4)*Xpi*vvc*GtM2*ys * ( - 2./3.*O*x12*x2z + + 8./3.*O*x2z + 2./3.*O*txs - 2./3.*Os*x2z + 2./3.*x12*x2z* + tx + 2./3.*x12*txs - 4./3.*x2z*tx ) GG10c = GG10c + rs1wg(4)*vvc*GtM2*Xp*ys * ( - O*x12 + O*tx + 5./ + 3.*O - 2./3.*Os + x12*tx + 2./3.*x12 - tx - 1./3.*x12s ) GG10c = GG10c + rs1wg(4)*vvc*GtM2*ys * ( 1./3.*O*x12*x2z + 1./3.* + O*x12*tx + 2./3.*O*x12 + 1./3.*O*x2z*tx - 3*O*x2z - 2./3.*O* + tx - O*txs - 4./3.*O + 2./3.*Os*x2z + 2./3.*Os - 2./3.*x12* + x2z*tx - 2./3.*x12*x2z - 2./3.*x12*tx - x12*txs + 5./3.*x2z* + tx + 1./3.*tx*x12s + 2./3.*tx ) GG10c = GG10c + rs1wg(7)*XX*vvc*GtM2*ys * ( - 1./3.*O*x2z*txs - + 1./3.*O*tx*x2zs - 1./3.*x12*x2z*txs + 1./3.*tx*x2zs ) GG10c = GG10c + rs1wg(7)*Xpi*vvc*GtM2*ys * ( - 1./3.*O*x12*x2z + - 1./3.*O*x2z*tx - 1./3.*Os*x2z - 1./3.*x12*x2z*tx + 1./3.* + x2z*tx ) GG10c = GG10c + rs1wg(7)*vvc*GtM2*Xp*ys * ( - 1./6.*Os - 1./3.* + x12 + 1./6.*x12s ) GG10c = GG10c + rs1wg(7)*vvc*GtM2*ys * ( 1./3.*O*x12*x2z - 1./3.* + O*x12*tx + 1./3.*O*x2z*tx + 1./6.*O*x12s + 1./3.*Os*x12 + 1./ + 3.*Os*x2z - 1./6.*Os*tx + 1./6.*Oc + 1./3.*x12*x2z*tx + 1./3. + *x12*x2z - 1./3.*x2z*tx - 1./6.*tx*x12s ) GG10c = GG10c + rs1wg(8)*Xpi*vvc*GtM2*ys * ( 2./3.*O*x2z*tx - 4./ + 3.*O*x2z - 2./3.*O*txs - 2./3.*x12*txs + 2./3.*x2z*tx ) GG10c = GG10c + rs1wg(8)*vvc*GtM2*Xp*ys * ( O*x12 - O*tx - 5./3.* + O + Os - x12*tx + tx ) GG10c = GG10c + rs1wg(8)*vvc*GtM2*ys * ( 1./3.*O*x12*tx - 2./3.*O + *x12 - O*x2z*tx + 5./3.*O*x2z + 2./3.*O*tx + O*txs + 4./3.*O + - 1./3.*Os*x2z + 1./3.*Os*tx - 2./3.*Os + 2./3.*x12*tx + x12 + *txs - x2z*tx - 2./3.*tx ) GG10c = GG10c + rs1wg(9)*Xpi*vvc*GtM2*ys * ( 8./3.*O*tx - 8./3.* + Os ) GG10c = GG10c + rs1wg(9)*vvc*GtM2*ys * ( - 4*O*tx + 8./3.*Os ) GG10c = GG10c + rs1wg(10)*XX*vvc*GtM2*ys * ( 1./3.*O*x2z*txs + 1./ + 3.*O*tx*x2zs + 1./3.*x12*x2z*txs - 1./3.*tx*x2zs ) GG10c = GG10c + rs1wg(10)*Xpi*vvc*GtM2*ys * ( 1./3.*O*x12*x2z + 2. + /3.*O*x2z*tx + 1./3.*O*txs + 1./3.*Os*x2z + 1./3.*x12*x2z*tx + + 1./3.*x12*txs - 2./3.*x2z*tx ) GG10c = GG10c + rs1wg(10)*vvc*GtM2*Xp*ys * ( 1./2.*O*x12 + 1./2.* + O*tx - 1./6.*O + 2./3.*Os + 1./2.*x12*tx + 1./3.*x12 - 1./2.* + tx - 1./6.*x12s ) GG10c = GG10c + rs1wg(10)*vvc*GtM2*ys * ( - 1./3.*O*x12*x2z + 1./ + 6.*O*x12*tx - 1./3.*O*x12 - 5./6.*O*x2z*tx + 1./6.*O*x2z - 1./ + 3.*O*tx - 1./6.*O*x12s - 1./2.*O*txs - 1./3.*Os*x12 - 1./2.* + Os*x2z - 1./3.*Os - 1./6.*Oc - 1./3.*x12*x2z*tx - 1./3.*x12* + x2z - 1./3.*x12*tx - 1./2.*x12*txs + 5./6.*x2z*tx + 1./6.*tx* + x12s + 1./3.*tx ) GG10c = GG10c + rs1wg(11)*vvc*GtM2*Xp*ys * ( 2./3. - 2./3.*O - 2./ + 3.*x12 ) GG10c = GG10c + rs1wg(11)*vvc*GtM2*ys * ( 2./3.*O*x12 + 2./3.*O* + x2z - 2./3.*O*tx + 2./3.*Os + 2./3.*x12*tx - 2./3.*x2z ) GG10c = GG10c + rs1wg(12)*XX*vvc*GtM2*ys * ( 4./3.*O*x12*tx + 4./ + 3.*O*x2z*tx - 4./3.*O*x2z - 4./3.*O*txs - 4./3.*Os*x12 - 4./3. + *Os*x2z + 4./3.*Os*tx - 4./3.*Oc - 4./3.*x12*txs + 4./3.*x2z* + tx ) GG10c = GG10c + rs1wg(12)*Xpi*vvc*GtM2*ys * ( - 4./3.*O*tx - 4./ + 3.*O - 4./3.*x12*tx + 4./3.*tx ) GG10c = GG10c + rs1wg(12)*vvc*GtM2*ys * ( 4./3.*O*tx + 2*O + 4./3. + *x12*tx + 2./3.*x12 - 4./3.*tx ) GG10c = GG10c + rs1wg(13)*XX*vvc*GtM2*ys * ( 2./3.*O*x12*tx - 2./ + 3.*O*x2z*tx - 2./3.*O*x2z - 2./3.*O*txs - 2./3.*Os*x12 + 2./3. + *Os*x2z + 2./3.*Os*tx - 2./3.*Oc - 2./3.*x12*txs + 2./3.*x2z* + tx ) GG10c = GG10c + rs1wg(13)*Xpi*vvc*GtM2*ys * ( - 2./3.*O*tx - 2./ + 3.*O - 2./3.*x12*tx + 2./3.*tx ) GG10c = GG10c + rs1wg(13)*vvc*GtM2*ys * ( O*x12 + 2./3.*O*tx - 1./ + 3.*O + Os + 2./3.*x12*tx + 1./3.*x12 - 2./3.*tx ) GG10c = GG10c + rs1wg(14)*XX*vvc*GtM2*ys * ( 4./3.*O*x2z*tx - 4./ + 3.*Os*x2z ) GG10c = GG10c + rs1wg(14)*Xpi*vvc*GtM2*ys * ( 4./3.*O*tx - 4./3.* + Os ) GG10c = GG10c + rs1wg(14)*vvc*GtM2*Xp*ys * ( 1./3. - 1./3.*O - 1./ + 3.*x12 ) GG10c = GG10c + rs1wg(14)*vvc*GtM2*ys * ( - 2./3.*O*x12 + 1./3.* + O*x2z - O*tx + 2./3.*Os + 1./3.*x12*tx - 1./3.*x2z ) GG10c = GG10c + rs2wg(1)*XX*vvq*GtM2*yc * ( - 8*O*x2z*txs - 8* + x12*x2z*txs + 8*x2z*txs ) GG10c = GG10c + rs2wg(1)*Xpi*vvq*GtM2*yc * ( - 6*O*x2z*tx - 14*O + *txs - 14*x12*txs + 6*x2z*tx + 8*txs ) GG10c = GG10c + rs2wg(1)*vvq*GtM2*Xp*yc * ( 4 + 4*O*x12 - 4*O*x2z + - 18*O*tx - 12*O + 8*Os - 18*x12*tx - 4*x12 - 4*x2z*tx + 4* + x2z + 14*tx + 4*txs ) GG10c = GG10c + rs2wg(1)*vvq*GtM2*Xps*yc * ( - 4 + 4*O + 4*x12 ) GG10c = GG10c + rs2wg(1)*vvq*GtM2*yc * ( 6*O*x12*tx + 12*O*x2z*tx + + 8*O*x2z + 10*O*tx + 14*O*txs - 4*Os*x2z + 2*Os*tx + 8*x12* + x2z*tx + 6*x12*tx + 14*x12*txs - 14*x2z*tx - 4*x2z*txs - 4* + x2z + 4*tx*x12s + 4*tx*x2zs - 6*tx - 8*txs ) GG10c = GG10c + rs2wg(4)*XX*vvq*GtM2*yc * ( O*x12*tx*x2zs - O*tx* + x2zc - O*tx*x2zs + 2*O*x2zc + O*x2zs*txs + Os*tx*x2zs - Os* + x2zc + x12*tx*x2zs + x12*x2zs*txs + tx*x2zc - x2zc - 2*x2zs* + txs ) GG10c = GG10c + rs2wg(4)*Xpi*vvq*GtM2*yc * ( 3./2.*O*x12*x2z*tx + - 2*O*x12*x2zs - 2*O*x2z*tx + 7./2.*O*x2z*txs - 5./2.*O*tx* + x2zs + 13./2.*O*x2zs + 5./2.*Os*x2z*tx - 7./2.*Os*x2zs + 2* + x12*x2z*tx + 7./2.*x12*x2z*txs - x12*tx*x2zs + 2*x12*x2zs - + x2z*tx*x12s - 4*x2z*txs + 3./2.*tx*x2zs - 3*x2zs ) GG10c = GG10c + rs2wg(4)*vvq*GtM2*Xp*yc * ( - 1 - 25./4.*O*x12* + x2z + 1./2.*O*x12*tx - 7./4.*O*x12 - 7./4.*O*x2z*tx + 45./4.* + O*x2z - 5./4.*O*tx - 3./4.*O*x12s + 4*O*txs + 5./2.*O - 1./2. + *Os*x12 - 25./4.*Os*x2z + 11./4.*Os*tx - 7./4.*Os + 1./4.*Oc + - 3./4.*x12*x2z*tx + 6*x12*x2z + 11./4.*x12*tx + 4*x12*txs + + 2*x12 - 1./4.*x2z*tx - x2z*x12s - 5*x2z - 9./4.*tx*x12s - + 1./2.*tx - x12s - 3*txs ) GG10c = GG10c + rs2wg(4)*vvq*GtM2*Xps*yc * ( 2 + 5*O*x12 - O*tx + - 5*O + 3*Os - x12*tx - 4*x12 + tx + 2*x12s ) GG10c = GG10c + rs2wg(4)*vvq*GtM2*yc * ( - 5./2.*O*x12*x2z*tx + + 15./4.*O*x12*x2z - 1./2.*O*x12*tx + 2*O*x12*x2zs + 1./2.*O* + x12*txs + 15./4.*O*x2z*tx - 17./4.*O*x2z*txs - 7*O*x2z + 1./4. + *O*tx*x12s + 13./4.*O*tx*x2zs + O*tx - 33./4.*O*x2zs - 5./2.* + O*txs - 1./4.*Os*x12*x2z + 1./2.*Os*x12*tx - 7./2.*Os*x2z*tx + + 17./4.*Os*x2z - 3./2.*Os*tx + 17./4.*Os*x2zs + 1./4.*Os* + txs - 1./4.*Oc*x2z + 1./4.*Oc*tx - 11./4.*x12*x2z*tx - 17./4. + *x12*x2z*txs - 4*x12*x2z + x12*tx*x2zs - x12*tx - 2*x12*x2zs + - 5./2.*x12*txs + x2z*tx*x12s + x2z*x12s + 5*x2z*txs + 3*x2z + + tx*x12s - 7./4.*tx*x2zs + 1./4.*x12s*txs + 4*x2zs + 2*txs + ) GG10c = GG10c + rs2wg(7)*XX*vvq*GtM2*yc * ( - O*x12*x2z*txs + O* + x2zc - O*x2zs*txs - 1./2.*Os*x2z*txs - 1./2.*Os*x2zc + x12*tx + *x2zs - x12*x2zs*txs - 1./2.*x2z*x12s*txs - 1./2.*x2zc + x2zs + *txs ) GG10c = GG10c + rs2wg(7)*Xpi*vvq*GtM2*yc * ( - 5./4.*O*x12*x2z* + tx - O*x12*x2zs - 5./4.*O*x2z*txs - 1./4.*O*tx*x2zs + 9./4.*O + *x2zs - 1./4.*Os*x2z*tx - 5./4.*Os*x2zs + x12*x2z*tx - 5./4.* + x12*x2z*txs + x12*x2zs - x2z*tx*x12s + x2z*txs + 1./4.*tx* + x2zs - x2zs ) GG10c = GG10c + rs2wg(7)*vvq*GtM2*Xp*yc * ( - 9./8.*O*x12*x2z + + 1./4.*O*x12*tx - 3./8.*O*x12 - 1./8.*O*x2z*tx + 9./8.*O*x2z + - 3./8.*O*tx + 1./8.*O*x12s - 1./2.*O*txs + 1./4.*O + 3./4.* + Os*x12 - 5./8.*Os*x2z + 1./8.*Os*tx - 7./8.*Os + 5./8.*Oc - 1. + /8.*x12*x2z*tx + x12*x2z - 3./8.*x12*tx - 1./2.*x12*txs + 1./ + 8.*x2z*tx - 1./2.*x2z*x12s - 1./2.*x2z + 1./8.*tx*x12s + 1./4. + *tx + 1./2.*txs ) GG10c = GG10c + rs2wg(7)*vvq*GtM2*yc * ( O*x12*x2z*tx + 11./8.*O* + x12*x2z + 1./4.*O*x12*tx + O*x12*x2zs - 1./4.*O*x12*txs + 5./ + 8.*O*x2z*tx + 13./8.*O*x2z*txs - 3./2.*O*x2z - 1./8.*O*tx* + x12s + 1./8.*O*tx*x2zs - 17./8.*O*x2zs + 1./4.*O*txs - 5./8.* + Os*x12*x2z - 1./4.*Os*x12*tx + 13./8.*Os*x2z + 1./4.*Os*tx + + 9./8.*Os*x2zs - 1./8.*Os*txs - 5./8.*Oc*x2z - 1./8.*Oc*tx - 5. + /8.*x12*x2z*tx + 13./8.*x12*x2z*txs - x12*x2z - x12*x2zs + 1./ + 4.*x12*txs + x2z*tx*x12s - 1./2.*x2z*tx + 1./2.*x2z*x12s - 3./ + 2.*x2z*txs + 1./2.*x2z - 1./8.*tx*x2zs - 1./8.*x12s*txs + + x2zs ) GG10c = GG10c + rs2wg(8)*Xpi*vvq*GtM2*yc * ( - O*x12*x2z*tx + O* + x2z*tx - O*x2z*txs + O*tx*x2zs - 2*O*x2zs - Os*x2z*tx + Os* + x2zs - x12*x2z*tx - x12*x2z*txs + 2*x2z*txs - tx*x2zs + x2zs + ) GG10c = GG10c + rs2wg(8)*vvq*GtM2*Xp*yc * ( 1 + 5./2.*O*x12*x2z + - 2*O*x12*tx + 3./2.*O*x12 + 3./2.*O*x2z*tx - 11./2.*O*x2z + + 3./2.*O*tx + 1./2.*O*x12s - 3*O*txs - 2*O + Os*x12 + 7./2. + *Os*x2z - 5./2.*Os*tx + 1./2.*Os + 1./2.*Oc + 1./2.*x12*x2z* + tx - 2*x12*x2z - 1./2.*x12*tx - 3*x12*txs - 2*x12 + 1./2.*x2z + *tx + 2*x2z + 1./2.*tx*x12s + x12s + 2*txs ) GG10c = GG10c + rs2wg(8)*vvq*GtM2*Xps*yc * ( - 1 - 3*O*x12 + O* + tx + 3*O - 2*Os + x12*tx + 2*x12 - tx - x12s ) GG10c = GG10c + rs2wg(8)*vvq*GtM2*yc * ( O*x12*x2z*tx - 3./2.*O* + x12*x2z + O*x12*txs - 5./2.*O*x2z*tx + 3./2.*O*x2z*txs + 4*O* + x2z + 1./2.*O*tx*x12s - 3./2.*O*tx*x2zs - O*tx + 5./2.*O*x2zs + + 2*O*txs - 1./2.*Os*x12*x2z + Os*x12*tx + Os*x2z*tx - 3./2. + *Os*x2z + Os*tx - 3./2.*Os*x2zs + 1./2.*Os*txs - 1./2.*Oc*x2z + + 1./2.*Oc*tx - 1./2.*x12*x2z*tx + 3./2.*x12*x2z*txs + 2*x12 + *x2z + x12*tx + 2*x12*txs + x2z*tx - 2*x2z*txs - 2*x2z - tx* + x12s + 1./2.*tx*x2zs + 1./2.*x12s*txs - x2zs - 2*txs ) GG10c = GG10c + rs2wg(9)*Xpi*vvq*GtM2*yc * ( 2*O*x2z*tx + 2*O*txs + + 2*x12*txs - 2*x2z*tx ) GG10c = GG10c + rs2wg(9)*vvq*GtM2*Xp*yc * ( 6*O*tx + 2*x12*tx - 2 + *tx ) GG10c = GG10c + rs2wg(9)*vvq*GtM2*yc * ( - 2*O*x12*tx - 4*O*x2z* + tx - 2*O*tx - 2*O*txs - 2*Os*tx - 2*x12*tx - 2*x12*txs + 2* + x2z*tx + 2*tx ) GG10c = GG10c + rs2wg(10)*XX*vvq*GtM2*yc * ( O*x12*x2z*txs - O* + x2zc + O*x2zs*txs + 1./2.*Os*x2z*txs + 1./2.*Os*x2zc - x12*tx + *x2zs + x12*x2zs*txs + 1./2.*x2z*x12s*txs + 1./2.*x2zc - x2zs + *txs ) GG10c = GG10c + rs2wg(10)*Xpi*vvq*GtM2*yc * ( 5./4.*O*x12*x2z*tx + + O*x12*x2zs + O*x12*txs + 9./4.*O*x2z*txs + 1./4.*O*tx*x2zs + - 13./4.*O*x2zs + 1./4.*Os*x2z*tx + 7./4.*Os*x2zs + 1./2.*Os + *txs - 2*x12*x2z*tx + 9./4.*x12*x2z*txs - x12*x2zs + x2z*tx* + x12s - 2*x2z*txs - 1./4.*tx*x2zs + 1./2.*x12s*txs + 3./2.* + x2zs ) GG10c = GG10c + rs2wg(10)*vvq*GtM2*Xp*yc * ( 1./2. + 19./8.*O*x12 + *x2z + 7./4.*O*x12*tx + 9./8.*O*x12 + 7./8.*O*x2z*tx - 31./8. + *O*x2z + 1./8.*O*tx + 1./8.*O*x12s + 2*O*txs - 5./4.*O - 1./4. + *Os*x12 + 19./8.*Os*x2z + 5./8.*Os*tx + 9./8.*Os - 3./8.*Oc + + 3./8.*x12*x2z*tx - 2*x12*x2z - 7./8.*x12*tx + 2*x12*txs - + x12 - 7./8.*x2z*tx + 1./2.*x2z*x12s + 3./2.*x2z + 9./8.*tx* + x12s - 1./4.*tx + 1./2.*x12s - 3./2.*txs ) GG10c = GG10c + rs2wg(10)*vvq*GtM2*Xps*yc * ( - 1./2. - 3./2.*O* + x12 - 1./2.*O*tx + 3./2.*O - Os - 1./2.*x12*tx + x12 + 1./2.* + tx - 1./2.*x12s ) GG10c = GG10c + rs2wg(10)*vvq*GtM2*yc * ( - 3./2.*O*x12*x2z*tx + - 17./8.*O*x12*x2z - 5./4.*O*x12*tx - O*x12*x2zs - 5./4.*O* + x12*txs - 3./8.*O*x2z*tx - 23./8.*O*x2z*txs + 7./2.*O*x2z - 1. + /8.*O*tx*x12s - 3./8.*O*tx*x2zs + 27./8.*O*x2zs - 5./4.*O*txs + + 3./8.*Os*x12*x2z - 1./4.*Os*x12*tx - 1./2.*Os*x2z*tx - 19./ + 8.*Os*x2z - 1./4.*Os*tx - 15./8.*Os*x2zs - 5./8.*Os*txs + 3./ + 8.*Oc*x2z - 1./8.*Oc*tx + 15./8.*x12*x2z*tx - 23./8.*x12*x2z* + txs + 2*x12*x2z + x12*tx + x12*x2zs - 5./4.*x12*txs - x2z*tx* + x12s + 1./2.*x2z*tx - 1./2.*x2z*x12s + 5./2.*x2z*txs - 3./2.* + x2z - tx*x12s + 3./8.*tx*x2zs - 5./8.*x12s*txs - 3./2.*x2zs + + txs ) GG10c = GG10c + rs2wg(11)*vvq*GtM2*Xp*yc * ( - 5./2.*O*x12 - 3*O + *x2z + 1./2.*O*tx - 1./2.*O + 1./2.*Os - x12*x2z - 7./2.*x12* + tx + x12 - 2*x2z*tx + 3*x2z + 3./2.*tx - x12s + 2*txs ) GG10c = GG10c + rs2wg(11)*vvq*GtM2*Xps*yc * ( - 2 + 2*O + 2*x12 + ) GG10c = GG10c + rs2wg(11)*vvq*GtM2*yc * ( O*x12*x2z + 3./2.*O*x12 + *tx - 1./2.*O*x2z*tx + 1./2.*O*x2z + O*x2zs - 1./2.*O*txs - 1. + /2.*Os*x2z + 1./2.*Os*tx + 3*x12*x2z*tx - x12*x2z - 1./2.*x12 + *txs - 3./2.*x2z*tx - 2*x2z*txs + tx*x12s + 2*tx*x2zs - x2zs + ) GG10c = GG10c + rs2wg(12)*XX*vvq*GtM2*yc * ( - 2*O*x2z*txs + 2*O + *tx*x2zs - 2*x12*x2z*txs + 4*x2z*txs - 2*tx*x2zs ) GG10c = GG10c + rs2wg(12)*Xpi*vvq*GtM2*yc * ( 3*O*x2z*tx - 5*O* + txs + 2*x12*x2z*tx - 5*x12*txs - x2z*tx + 4*txs ) GG10c = GG10c + rs2wg(12)*vvq*GtM2*Xp*yc * ( 2 + 7./2.*O*x12 + O* + x2z - 5./2.*O*tx - 9./2.*O + 5./2.*Os + x12*x2z - 5./2.*x12* + tx - 3*x12 - x2z + 5./2.*tx + x12s ) GG10c = GG10c + rs2wg(12)*vvq*GtM2*yc * ( - O*x12*x2z + 3./2.*O* + x12*tx - 3./2.*O*x2z*tx + 5./2.*O*x2z + O*tx - O*x2zs + 9./2. + *O*txs - 1./2.*Os*x2z + 1./2.*Os*tx - x12*x2z*tx + x12*x2z + + x12*tx + 9./2.*x12*txs - 1./2.*x2z*tx - 2*x2z + tx*x12s - tx + + x2zs - 4*txs ) GG10c = GG10c + rs2wg(13)*XX*vvq*GtM2*yc * ( - 2*O*x2z*txs - 2* + x12*x2z*txs + 2*x2z*txs ) GG10c = GG10c + rs2wg(13)*Xpi*vvq*GtM2*yc * ( - 1./2.*O*x2z*tx + - 5./2.*O*txs - 5./2.*x12*txs + 1./2.*x2z*tx + 2*txs ) GG10c = GG10c + rs2wg(13)*vvq*GtM2*Xp*yc * ( - 5./4.*O*x12 - 1./ + 2.*O*x2z - 3./4.*O*tx + 3./4.*O - 3./4.*Os - 1./2.*x12*x2z - + 3./4.*x12*tx + 1./2.*x12 + 1./2.*x2z + 3./4.*tx - 1./2.*x12s + ) GG10c = GG10c + rs2wg(13)*vvq*GtM2*yc * ( 1./2.*O*x12*x2z + 9./4. + *O*x12*tx + 5./4.*O*x2z*tx + 1./4.*O*x2z - 1./2.*O*tx + 1./2. + *O*x2zs + 7./4.*O*txs - 1./4.*Os*x2z + 3./4.*Os*tx + 3./2.* + x12*x2z*tx - 1./2.*x12*x2z - 1./2.*x12*tx + 7./4.*x12*txs - 3. + /4.*x2z*tx + 3./2.*tx*x12s - 1./2.*tx - 1./2.*x2zs - 2*txs ) GG10c = GG10c + rs2wg(14)*XX*vvq*GtM2*yc * ( O*x2z*txs + O*tx* + x2zs + x12*x2z*txs - tx*x2zs ) GG10c = GG10c + rs2wg(14)*Xpi*vvq*GtM2*yc * ( 3*O*x2z*tx + O*txs + + x12*x2z*tx + x12*txs - 2*x2z*tx ) GG10c = GG10c + rs2wg(14)*vvq*GtM2*Xp*yc * ( 3./4.*O*x12 + 1./2.* + O*x2z + 3./4.*O*tx + 3./4.*O - 3./4.*Os + 1./2.*x12*x2z - 1./ + 4.*x12*tx - 1./2.*x12 - x2z*tx - 1./2.*x2z + 1./4.*tx + 1./2. + *x12s + txs ) GG10c = GG10c + rs2wg(14)*vvq*GtM2*yc * ( - 1./2.*O*x12*x2z - 3./ + 4.*O*x12*tx - 9./4.*O*x2z*tx - 3./4.*O*x2z - 2*O*tx - 1./2.*O + *x2zs - 3./4.*O*txs + 3./4.*Os*x2z - 1./4.*Os*tx - 1./2.*x12* + x2z*tx + 1./2.*x12*x2z - x12*tx - 3./4.*x12*txs + 3./4.*x2z* + tx - x2z*txs - 1./2.*tx*x12s + tx*x2zs + tx + 1./2.*x2zs ) GG10c = GG10c + rt1wg(1)*vvc*GsM2*Xp*ys * ( 2 + 2*O*x12 - 2*O*x2z + - 8*O + 6*Os - 4*x12*tx - 2*x12 + 2*x2z + 2*tx ) GG10c = GG10c + rt1wg(1)*vvc*GsM2*Xps*ys * ( - 2 + 2*O + 2*x12 ) GG10c = GG10c + rt1wg(1)*vvc*GsM2*ys * ( - 2*O*x12*tx - 2*O*x2z* + tx + 4*O*x2z + 2*O*tx + 2*O*txs - 2*Os*x2z - 2*Os*tx + 2*x12* + tx + 2*x12*txs - 2*x2z*tx - 2*x2z ) GG10c = GG10c + rt1wg(4)*vvc*GsM2*Xp*ys * ( - 1./2.*O*x12*x2z - + O*x12*tx + 1./2.*O*x12 + 3./2.*O*x2z - 1./2.*O*x12s - 1./2.* + Os*x2z - 1./2.*Os + 1./2.*Oc + x12*x2z + x12*tx - x2z - tx* + x12s ) GG10c = GG10c + rt1wg(4)*vvc*GsM2*Xps*ys * ( 1./2. + O*x12 - O + + 1./2.*Os - x12 + 1./2.*x12s ) GG10c = GG10c + rt1wg(4)*vvc*GsM2*ys * ( - 1./2.*O*x12*x2z*tx - + 1./2.*O*x12*x2z + O*x12*txs + 1./2.*O*tx*x12s - 1./2.*O*x2zs + - 1./2.*Os*x12*x2z + Os*x12*tx - 1./2.*Os*x2z*tx + 1./2.*Os* + x2z + 1./2.*Os*txs - 1./2.*Oc*x2z + 1./2.*Oc*tx - x12*x2z*tx + + 1./2.*x12s*txs + 1./2.*x2zs ) GG10c = GG10c + rt1wg(7)*vvc*GsM2*Xp*ys * ( 1./2.*O*x12*x2z + 1./ + 2.*O*x12*tx - 1./4.*O*x12 - O*x2z - 1./4.*O*tx + 1./4.*O + 1./ + 2.*Os*x12 + 1./2.*Os*x2z - 3./4.*Os + 1./2.*Oc - 1./2.*x12* + x2z - 3./4.*x12*tx + 1./2.*x2z + 1./2.*tx*x12s + 1./4.*tx ) GG10c = GG10c + rt1wg(7)*vvc*GsM2*Xps*ys * ( - 1./4. - 1./2.*O* + x12 + 1./2.*O - 1./4.*Os + 1./2.*x12 - 1./4.*x12s ) GG10c = GG10c + rt1wg(7)*vvc*GsM2*ys * ( 1./4.*O*x12*tx - 1./2.*O + *x12*txs + 1./4.*O*x2z*tx - 1./4.*O*x2z + 1./2.*O*x2zs + 1./4. + *O*txs - 1./2.*Os*x12*x2z + 3./4.*Os*x2z + 1./4.*Os*tx - 1./4. + *Os*x2zs - 1./4.*Os*txs - 1./2.*Oc*x2z + 1./2.*x12*x2z*tx + 1. + /4.*x12*txs - 1./4.*x2z*tx - 1./4.*x12s*txs - 1./4.*x2zs ) GG10c = GG10c + rt1wg(8)*vvc*GsM2*Xp*ys * ( - 1./2.*O*x12 + 1./2. + *O*tx + 1./2.*O - 1./2.*Os + 1./2.*x12*tx - 1./2.*tx ) GG10c = GG10c + rt1wg(8)*vvc*GsM2*ys * ( - 1./2.*O*x12*tx + 1./2. + *O*x2z*tx - 1./2.*O*x2z - 1./2.*O*txs + 1./2.*Os*x2z - 1./2.* + Os*tx - 1./2.*x12*txs + 1./2.*x2z*tx ) GG10c = GG10c + rt1wg(9)*vvc*GsM2*ys * ( 2*O*tx ) GG10c = GG10c + rt1wg(10)*vvc*GsM2*Xp*ys * ( - 1./2.*O*x12*x2z + - 1./2.*O*x12*tx + O*x2z - 1./2.*Os*x12 - 1./2.*Os*x2z + 1./ + 2.*Os - 1./2.*Oc + 1./2.*x12*x2z + 1./2.*x12*tx - 1./2.*x2z + - 1./2.*tx*x12s ) GG10c = GG10c + rt1wg(10)*vvc*GsM2*Xps*ys * ( 1./4. + 1./2.*O*x12 + - 1./2.*O + 1./4.*Os - 1./2.*x12 + 1./4.*x12s ) GG10c = GG10c + rt1wg(10)*vvc*GsM2*ys * ( 1./2.*O*x12*txs - 1./2. + *O*x2zs + 1./2.*Os*x12*x2z - 1./2.*Os*x2z + 1./4.*Os*x2zs + 1. + /4.*Os*txs + 1./2.*Oc*x2z - 1./2.*x12*x2z*tx + 1./4.*x12s*txs + + 1./4.*x2zs ) GG10c = GG10c + rt1wg(11)*vvc*GsM2*Xp*ys * ( - O*x12 - O*x2z - O + + Os - 2*x12*tx + x2z + tx ) GG10c = GG10c + rt1wg(11)*vvc*GsM2*Xps*ys * ( - 1 + O + x12 ) GG10c = GG10c + rt1wg(11)*vvc*GsM2*ys * ( O*x12*tx - O*x2z*tx + O + *x2z + O*txs - Os*x2z + Os*tx + x12*txs - x2z*tx ) GG10c = GG10c + rt1wg(12)*vvc*GsM2*Xp*ys * ( 1 + O*x12 - 2*O + Os + - x12 ) GG10c = GG10c + rt1wg(12)*vvc*GsM2*ys * ( - O*x12*tx + O*tx + Os + *x2z - Os*tx + x12*tx - x2z ) GG10c = GG10c + rt1wg(13)*vvc*GsM2*Xp*ys * ( 1./2. - 1./2.*O - 1./ + 2.*x12 ) GG10c = GG10c + rt1wg(13)*vvc*GsM2*ys * ( 3./2.*O*x2z - 1./2.*O* + tx - Os*x2z + 1./2.*x12*tx - 1./2.*x2z ) GG10c = GG10c + rt1wg(14)*vvc*GsM2*Xp*ys * ( - 1./2.*O*x2z + O + - Os - x12*tx + 1./2.*x2z + 1./2.*tx ) GG10c = GG10c + rt1wg(14)*vvc*GsM2*Xps*ys * ( - 1./2. + 1./2.*O + + 1./2.*x12 ) GG10c = GG10c + rt1wg(14)*vvc*GsM2*ys * ( - 1./2.*O*x2z*tx - O* + x2z + 1./2.*O*txs + Os*x2z + 1./2.*x12*txs - 1./2.*x2z*tx ) GG20c = + + rs1wg(1)*XX*vvc*GtM2*ys * ( 8*O*x12*tx - 8*O*x2z*tx - 8*O*x2z + - 8*O*txs - 8*Os*x12 + 8*Os*x2z + 8*Os*tx - 8*Oc - 8*x12*txs + + 8*x2z*tx ) GG20c = GG20c + rs1wg(1)*Xpi*vvc*GtM2*ys * ( - 24*O*tx - 8*O + + 16*Os - 8*x12*tx + 8*tx ) GG20c = GG20c + rs1wg(1)*vvc*GtM2*Xp*ys * ( 4./3. - 4./3.*O - 4./ + 3.*x12 ) GG20c = GG20c + rs1wg(1)*vvc*GtM2*ys * ( 4./3.*O*x2z + 76./3.*O* + tx + 28./3.*O - 16*Os + 28./3.*x12*tx + 4./3.*x12 - 4./3.*x2z + - 8*tx ) GG20c = GG20c + rs1wg(4)*XX*vvc*GtM2*ys * ( 2*O*x2z*txs - 2*O*tx* + x2zs + 4*O*x2zs + 2*x12*x2z*txs - 2*tx*x2zs ) GG20c = GG20c + rs1wg(4)*Xpi*vvc*GtM2*ys * ( - 2*O*x12*x2z + 8*O + *x2z + 2*O*txs - 2*Os*x2z + 2*x12*x2z*tx + 2*x12*txs - 4*x2z* + tx ) GG20c = GG20c + rs1wg(4)*vvc*GtM2*Xp*ys * ( - 7./3.*O*x12 + 7./3. + *O*tx + 13./3.*O - 2*Os + 7./3.*x12*tx + 2./3.*x12 - 7./3.*tx + - 1./3.*x12s ) GG20c = GG20c + rs1wg(4)*vvc*GtM2*ys * ( 5./3.*O*x12*x2z + 1./3.* + O*x12*tx + 2*O*x12 + 1./3.*O*x2z*tx - 25./3.*O*x2z - 2*O*tx + - 7./3.*O*txs - 4*O + 2*Os*x2z + 2*Os - 2*x12*x2z*tx - 2./3. + *x12*x2z - 2*x12*tx - 7./3.*x12*txs + 13./3.*x2z*tx + 1./3.* + tx*x12s + 2*tx ) GG20c = GG20c + rs1wg(7)*XX*vvc*GtM2*ys * ( - O*x2z*txs - O*tx* + x2zs - x12*x2z*txs + tx*x2zs ) GG20c = GG20c + rs1wg(7)*Xpi*vvc*GtM2*ys * ( - O*x12*x2z - O*x2z + *tx - Os*x2z - x12*x2z*tx + x2z*tx ) GG20c = GG20c + rs1wg(7)*vvc*GtM2*Xp*ys * ( - 1./6.*Os - 1./3.* + x12 + 1./6.*x12s ) GG20c = GG20c + rs1wg(7)*vvc*GtM2*ys * ( O*x12*x2z - 1./3.*O*x12* + tx + O*x2z*tx + 1./6.*O*x12s + 1./3.*Os*x12 + Os*x2z - 1./6.* + Os*tx + 1./6.*Oc + x12*x2z*tx + 1./3.*x12*x2z - x2z*tx - 1./6. + *tx*x12s ) GG20c = GG20c + rs1wg(8)*Xpi*vvc*GtM2*ys * ( 2*O*x2z*tx - 4*O*x2z + - 2*O*txs - 2*x12*txs + 2*x2z*tx ) GG20c = GG20c + rs1wg(8)*vvc*GtM2*Xp*ys * ( 7./3.*O*x12 - 7./3.*O + *tx - 13./3.*O + 7./3.*Os - 7./3.*x12*tx + 7./3.*tx ) GG20c = GG20c + rs1wg(8)*vvc*GtM2*ys * ( 1./3.*O*x12*tx - 2*O*x12 + - 7./3.*O*x2z*tx + 13./3.*O*x2z + 2*O*tx + 7./3.*O*txs + 4*O + - 1./3.*Os*x2z + 1./3.*Os*tx - 2*Os + 2*x12*tx + 7./3.*x12* + txs - 7./3.*x2z*tx - 2*tx ) GG20c = GG20c + rs1wg(9)*Xpi*vvc*GtM2*ys * ( 8*O*tx - 8*Os ) GG20c = GG20c + rs1wg(9)*vvc*GtM2*ys * ( - 28./3.*O*tx + 8*Os ) GG20c = GG20c + rs1wg(10)*XX*vvc*GtM2*ys * ( O*x2z*txs + O*tx* + x2zs + x12*x2z*txs - tx*x2zs ) GG20c = GG20c + rs1wg(10)*Xpi*vvc*GtM2*ys * ( O*x12*x2z + 2*O*x2z + *tx + O*txs + Os*x2z + x12*x2z*tx + x12*txs - 2*x2z*tx ) GG20c = GG20c + rs1wg(10)*vvc*GtM2*Xp*ys * ( 7./6.*O*x12 + 7./6.* + O*tx - 1./6.*O + 4./3.*Os + 7./6.*x12*tx + 1./3.*x12 - 7./6.* + tx - 1./6.*x12s ) GG20c = GG20c + rs1wg(10)*vvc*GtM2*ys * ( - O*x12*x2z + 1./6.*O* + x12*tx - O*x12 - 13./6.*O*x2z*tx + 1./6.*O*x2z - O*tx - 1./6. + *O*x12s - 7./6.*O*txs - 1./3.*Os*x12 - 7./6.*Os*x2z - Os - 1./ + 6.*Oc - x12*x2z*tx - 1./3.*x12*x2z - x12*tx - 7./6.*x12*txs + + 13./6.*x2z*tx + 1./6.*tx*x12s + tx ) GG20c = GG20c + rs1wg(11)*vvc*GtM2*Xp*ys * ( 2./3. - 2./3.*O - 2./ + 3.*x12 ) GG20c = GG20c + rs1wg(11)*vvc*GtM2*ys * ( 2./3.*O*x12 + 2./3.*O* + x2z - 2./3.*O*tx + 2./3.*Os + 2./3.*x12*tx - 2./3.*x2z ) GG20c = GG20c + rs1wg(12)*XX*vvc*GtM2*ys * ( 4*O*x12*tx + 4*O*x2z + *tx - 4*O*x2z - 4*O*txs - 4*Os*x12 - 4*Os*x2z + 4*Os*tx - 4* + Oc - 4*x12*txs + 4*x2z*tx ) GG20c = GG20c + rs1wg(12)*Xpi*vvc*GtM2*ys * ( - 4*O*tx - 4*O - 4 + *x12*tx + 4*tx ) GG20c = GG20c + rs1wg(12)*vvc*GtM2*ys * ( 4*O*tx + 14./3.*O + 4* + x12*tx + 2./3.*x12 - 4*tx ) GG20c = GG20c + rs1wg(13)*XX*vvc*GtM2*ys * ( 2*O*x12*tx - 2*O*x2z + *tx - 2*O*x2z - 2*O*txs - 2*Os*x12 + 2*Os*x2z + 2*Os*tx - 2* + Oc - 2*x12*txs + 2*x2z*tx ) GG20c = GG20c + rs1wg(13)*Xpi*vvc*GtM2*ys * ( - 2*O*tx - 2*O - 2 + *x12*tx + 2*tx ) GG20c = GG20c + rs1wg(13)*vvc*GtM2*ys * ( O*x12 + 2*O*tx + O + Os + + 2*x12*tx + 1./3.*x12 - 2*tx ) GG20c = GG20c + rs1wg(14)*XX*vvc*GtM2*ys * ( 4*O*x2z*tx - 4*Os* + x2z ) GG20c = GG20c + rs1wg(14)*Xpi*vvc*GtM2*ys * ( 4*O*tx - 4*Os ) GG20c = GG20c + rs1wg(14)*vvc*GtM2*Xp*ys * ( 1./3. - 1./3.*O - 1./ + 3.*x12 ) GG20c = GG20c + rs1wg(14)*vvc*GtM2*ys * ( - 2./3.*O*x12 + 1./3.* + O*x2z - 11./3.*O*tx + 10./3.*Os + 1./3.*x12*tx - 1./3.*x2z ) GG20c = GG20c + rs2wg(1)*XX*vvq*GtM2*yc * ( - 24*O*x2z*txs - 24* + x12*x2z*txs + 24*x2z*txs ) GG20c = GG20c + rs2wg(1)*Xpi*vvq*GtM2*yc * ( - 18*O*x2z*tx - 42* + O*txs - 42*x12*txs + 18*x2z*tx + 24*txs ) GG20c = GG20c + rs2wg(1)*vvq*GtM2*Xp*yc * ( 4 + 4*O*x12 - 4*O*x2z + - 38*O*tx - 12*O + 8*Os - 30*x12*tx - 4*x12 - 4*x2z*tx + 4* + x2z + 26*tx + 4*txs ) GG20c = GG20c + rs2wg(1)*vvq*GtM2*Xps*yc * ( - 4 + 4*O + 4*x12 ) GG20c = GG20c + rs2wg(1)*vvq*GtM2*yc * ( 6*O*x12*tx + 24*O*x2z*tx + + 8*O*x2z + 30*O*tx + 42*O*txs - 4*Os*x2z + 2*Os*tx + 8*x12* + x2z*tx + 18*x12*tx + 42*x12*txs - 26*x2z*tx - 4*x2z*txs - 4* + x2z + 4*tx*x12s + 4*tx*x2zs - 18*tx - 24*txs ) GG20c = GG20c + rs2wg(4)*XX*vvq*GtM2*yc * ( 3*O*x12*tx*x2zs - 3*O + *tx*x2zc - 3*O*tx*x2zs + 6*O*x2zc + 3*O*x2zs*txs + 3*Os*tx* + x2zs - 3*Os*x2zc + 3*x12*tx*x2zs + 3*x12*x2zs*txs + 3*tx*x2zc + - 3*x2zc - 6*x2zs*txs ) GG20c = GG20c + rs2wg(4)*Xpi*vvq*GtM2*yc * ( 9./2.*O*x12*x2z*tx + - 6*O*x12*x2zs - 6*O*x2z*tx + 21./2.*O*x2z*txs - 15./2.*O*tx + *x2zs + 39./2.*O*x2zs + 15./2.*Os*x2z*tx - 21./2.*Os*x2zs + 6 + *x12*x2z*tx + 21./2.*x12*x2z*txs - 3*x12*tx*x2zs + 6*x12*x2zs + - 3*x2z*tx*x12s - 12*x2z*txs + 9./2.*tx*x2zs - 9*x2zs ) GG20c = GG20c + rs2wg(4)*vvq*GtM2*Xp*yc * ( - 3 - 61./4.*O*x12* + x2z + 3./2.*O*x12*tx - 27./4.*O*x12 - 15./4.*O*x2z*tx + 101./ + 4.*O*x2z - 9./4.*O*tx - 3./4.*O*x12s + 9*O*txs + 15./2.*O - 1. + /2.*Os*x12 - 57./4.*Os*x2z + 23./4.*Os*tx - 19./4.*Os + 1./4. + *Oc - 7./4.*x12*x2z*tx + 14*x12*x2z + 23./4.*x12*tx + 9*x12* + txs + 6*x12 - 1./4.*x2z*tx - 3*x2z*x12s - 11*x2z - 17./4.*tx* + x12s - 3./2.*tx - 3*x12s - 7*txs ) GG20c = GG20c + rs2wg(4)*vvq*GtM2*Xps*yc * ( 4 + 10*O*x12 - 2*O* + tx - 10*O + 6*Os - 2*x12*tx - 8*x12 + 2*tx + 4*x12s ) GG20c = GG20c + rs2wg(4)*vvq*GtM2*yc * ( - 11./2.*O*x12*x2z*tx + + 51./4.*O*x12*x2z - 3./2.*O*x12*tx + 6*O*x12*x2zs + 1./2.*O + *x12*txs + 39./4.*O*x2z*tx - 45./4.*O*x2z*txs - 21*O*x2z + 1./ + 4.*O*tx*x12s + 33./4.*O*tx*x2zs + 3*O*tx - 85./4.*O*x2zs - 15. + /2.*O*txs - 1./4.*Os*x12*x2z + 1./2.*Os*x12*tx - 17./2.*Os* + x2z*tx + 49./4.*Os*x2z - 9./2.*Os*tx + 45./4.*Os*x2zs + 1./4. + *Os*txs - 1./4.*Oc*x2z + 1./4.*Oc*tx - 23./4.*x12*x2z*tx - 45. + /4.*x12*x2z*txs - 12*x12*x2z + 3*x12*tx*x2zs - 3*x12*tx - 6* + x12*x2zs - 15./2.*x12*txs + 3*x2z*tx*x12s + 3*x2z*x12s + 13* + x2z*txs + 9*x2z + 3*tx*x12s - 19./4.*tx*x2zs + 1./4.*x12s*txs + + 10*x2zs + 6*txs ) GG20c = GG20c + rs2wg(7)*XX*vvq*GtM2*yc * ( - 3*O*x12*x2z*txs + + 3*O*x2zc - 3*O*x2zs*txs - 3./2.*Os*x2z*txs - 3./2.*Os*x2zc + + 3*x12*tx*x2zs - 3*x12*x2zs*txs - 3./2.*x2z*x12s*txs - 3./2.* + x2zc + 3*x2zs*txs ) GG20c = GG20c + rs2wg(7)*Xpi*vvq*GtM2*yc * ( - 15./4.*O*x12*x2z* + tx - 3*O*x12*x2zs - 15./4.*O*x2z*txs - 3./4.*O*tx*x2zs + 27./ + 4.*O*x2zs - 3./4.*Os*x2z*tx - 15./4.*Os*x2zs + 3*x12*x2z*tx + - 15./4.*x12*x2z*txs + 3*x12*x2zs - 3*x2z*tx*x12s + 3*x2z* + txs + 3./4.*tx*x2zs - 3*x2zs ) GG20c = GG20c + rs2wg(7)*vvq*GtM2*Xp*yc * ( - 29./8.*O*x12*x2z + + 1./4.*O*x12*tx - 3./8.*O*x12 - 5./8.*O*x2z*tx + 29./8.*O* + x2z - 3./8.*O*tx + 1./8.*O*x12s - 1./2.*O*txs + 1./4.*O + 3./ + 4.*Os*x12 - 17./8.*Os*x2z + 1./8.*Os*tx - 7./8.*Os + 5./8.*Oc + - 5./8.*x12*x2z*tx + 3*x12*x2z - 3./8.*x12*tx - 1./2.*x12* + txs + 5./8.*x2z*tx - 3./2.*x2z*x12s - 3./2.*x2z + 1./8.*tx* + x12s + 1./4.*tx + 1./2.*txs ) GG20c = GG20c + rs2wg(7)*vvq*GtM2*yc * ( 7./2.*O*x12*x2z*tx + 31./ + 8.*O*x12*x2z + 1./4.*O*x12*tx + 3*O*x12*x2zs - 1./4.*O*x12* + txs + 9./8.*O*x2z*tx + 33./8.*O*x2z*txs - 4*O*x2z - 1./8.*O* + tx*x12s + 5./8.*O*tx*x2zs - 53./8.*O*x2zs + 1./4.*O*txs - 5./ + 8.*Os*x12*x2z - 1./4.*Os*x12*tx + 1./2.*Os*x2z*tx + 25./8.*Os + *x2z + 1./4.*Os*tx + 29./8.*Os*x2zs - 1./8.*Os*txs - 5./8.*Oc + *x2z - 1./8.*Oc*tx - 17./8.*x12*x2z*tx + 33./8.*x12*x2z*txs + - 3*x12*x2z - 3*x12*x2zs + 1./4.*x12*txs + 3*x2z*tx*x12s - + x2z*tx + 3./2.*x2z*x12s - 7./2.*x2z*txs + 3./2.*x2z - 5./8.* + tx*x2zs - 1./8.*x12s*txs + 3*x2zs ) GG20c = GG20c + rs2wg(8)*Xpi*vvq*GtM2*yc * ( - 3*O*x12*x2z*tx + + 3*O*x2z*tx - 3*O*x2z*txs + 3*O*tx*x2zs - 6*O*x2zs - 3*Os*x2z* + tx + 3*Os*x2zs - 3*x12*x2z*tx - 3*x12*x2z*txs + 6*x2z*txs - 3 + *tx*x2zs + 3*x2zs ) GG20c = GG20c + rs2wg(8)*vvq*GtM2*Xp*yc * ( 3 + 13./2.*O*x12*x2z + - 3*O*x12*tx + 13./2.*O*x12 + 9./2.*O*x2z*tx - 29./2.*O*x2z + + 5./2.*O*tx + 1./2.*O*x12s - 8*O*txs - 7*O + Os*x12 + 17./2. + *Os*x2z - 11./2.*Os*tx + 7./2.*Os + 1./2.*Oc + 5./2.*x12*x2z* + tx - 6*x12*x2z - 7./2.*x12*tx - 8*x12*txs - 6*x12 - 1./2.*x2z + *tx + 6*x2z + 5./2.*tx*x12s + tx + 3*x12s + 6*txs ) GG20c = GG20c + rs2wg(8)*vvq*GtM2*Xps*yc * ( - 3 - 8*O*x12 + 2*O + *tx + 8*O - 5*Os + 2*x12*tx + 6*x12 - 2*tx - 3*x12s ) GG20c = GG20c + rs2wg(8)*vvq*GtM2*yc * ( 3*O*x12*x2z*tx - 11./2.* + O*x12*x2z + O*x12*tx + O*x12*txs - 15./2.*O*x2z*tx + 7./2.*O* + x2z*txs + 13*O*x2z + 1./2.*O*tx*x12s - 7./2.*O*tx*x2zs - 3*O* + tx + 13./2.*O*x2zs + 7*O*txs - 1./2.*Os*x12*x2z + Os*x12*tx + + 3*Os*x2z*tx - 13./2.*Os*x2z + 4*Os*tx - 7./2.*Os*x2zs + 1./ + 2.*Os*txs - 1./2.*Oc*x2z + 1./2.*Oc*tx - 1./2.*x12*x2z*tx + 7. + /2.*x12*x2z*txs + 6*x12*x2z + 3*x12*tx + 7*x12*txs + 2*x2z*tx + - 6*x2z*txs - 6*x2z - 3*tx*x12s + 5./2.*tx*x2zs + 1./2.*x12s + *txs - 3*x2zs - 6*txs ) GG20c = GG20c + rs2wg(9)*Xpi*vvq*GtM2*yc * ( 6*O*x2z*tx + 6*O*txs + + 6*x12*txs - 6*x2z*tx ) GG20c = GG20c + rs2wg(9)*vvq*GtM2*Xp*yc * ( 14*O*tx + 6*x12*tx - + 6*tx ) GG20c = GG20c + rs2wg(9)*vvq*GtM2*yc * ( - 2*O*x12*tx - 8*O*x2z* + tx - 10*O*tx - 6*O*txs - 2*Os*tx - 6*x12*tx - 6*x12*txs + 6* + x2z*tx + 6*tx ) GG20c = GG20c + rs2wg(10)*XX*vvq*GtM2*yc * ( 3*O*x12*x2z*txs - 3* + O*x2zc + 3*O*x2zs*txs + 3./2.*Os*x2z*txs + 3./2.*Os*x2zc - 3* + x12*tx*x2zs + 3*x12*x2zs*txs + 3./2.*x2z*x12s*txs + 3./2.* + x2zc - 3*x2zs*txs ) GG20c = GG20c + rs2wg(10)*Xpi*vvq*GtM2*yc * ( 15./4.*O*x12*x2z*tx + + 3*O*x12*x2zs + 3*O*x12*txs + 27./4.*O*x2z*txs + 3./4.*O*tx + *x2zs - 39./4.*O*x2zs + 3./4.*Os*x2z*tx + 21./4.*Os*x2zs + 3./ + 2.*Os*txs - 6*x12*x2z*tx + 27./4.*x12*x2z*txs - 3*x12*x2zs + + 3*x2z*tx*x12s - 6*x2z*txs - 3./4.*tx*x2zs + 3./2.*x12s*txs + + 9./2.*x2zs ) GG20c = GG20c + rs2wg(10)*vvq*GtM2*Xp*yc * ( 3./2. + 55./8.*O*x12 + *x2z + 17./4.*O*x12*tx + 29./8.*O*x12 + 15./8.*O*x2z*tx - 87./ + 8.*O*x2z + 5./8.*O*tx + 1./8.*O*x12s + 9./2.*O*txs - 15./4.*O + - 1./4.*Os*x12 + 51./8.*Os*x2z + 9./8.*Os*tx + 21./8.*Os - 3. + /8.*Oc + 7./8.*x12*x2z*tx - 6*x12*x2z - 19./8.*x12*tx + 9./2. + *x12*txs - 3*x12 - 15./8.*x2z*tx + 3./2.*x2z*x12s + 9./2.*x2z + + 25./8.*tx*x12s - 3./4.*tx + 3./2.*x12s - 7./2.*txs ) GG20c = GG20c + rs2wg(10)*vvq*GtM2*Xps*yc * ( - 3./2. - 4*O*x12 + - O*tx + 4*O - 5./2.*Os - x12*tx + 3*x12 + tx - 3./2.*x12s ) GG20c = GG20c + rs2wg(10)*vvq*GtM2*yc * ( - 4*O*x12*x2z*tx - 53./ + 8.*O*x12*x2z - 15./4.*O*x12*tx - 3*O*x12*x2zs - 13./4.*O*x12* + txs - 11./8.*O*x2z*tx - 59./8.*O*x2z*txs + 21./2.*O*x2z - 1./ + 8.*O*tx*x12s - 7./8.*O*tx*x2zs + 79./8.*O*x2zs - 15./4.*O*txs + + 3./8.*Os*x12*x2z - 1./4.*Os*x12*tx - Os*x2z*tx - 51./8.*Os + *x2z - 3./4.*Os*tx - 43./8.*Os*x2zs - 13./8.*Os*txs + 3./8.* + Oc*x2z - 1./8.*Oc*tx + 43./8.*x12*x2z*tx - 59./8.*x12*x2z*txs + + 6*x12*x2z + 3*x12*tx + 3*x12*x2zs - 15./4.*x12*txs - 3*x2z + *tx*x12s + 3./2.*x2z*tx - 3./2.*x2z*x12s + 13./2.*x2z*txs - 9. + /2.*x2z - 3*tx*x12s + 7./8.*tx*x2zs - 13./8.*x12s*txs - 9./2. + *x2zs + 3*txs ) GG20c = GG20c + rs2wg(11)*vvq*GtM2*Xp*yc * ( - 5./2.*O*x12 - 3*O + *x2z + 1./2.*O*tx - 1./2.*O + 1./2.*Os - x12*x2z - 7./2.*x12* + tx + x12 - 2*x2z*tx + 3*x2z + 3./2.*tx - x12s + 2*txs ) GG20c = GG20c + rs2wg(11)*vvq*GtM2*Xps*yc * ( - 2 + 2*O + 2*x12 + ) GG20c = GG20c + rs2wg(11)*vvq*GtM2*yc * ( O*x12*x2z + 3./2.*O*x12 + *tx - 1./2.*O*x2z*tx + 1./2.*O*x2z + O*x2zs - 1./2.*O*txs - 1. + /2.*Os*x2z + 1./2.*Os*tx + 3*x12*x2z*tx - x12*x2z - 1./2.*x12 + *txs - 3./2.*x2z*tx - 2*x2z*txs + tx*x12s + 2*tx*x2zs - x2zs + ) GG20c = GG20c + rs2wg(12)*XX*vvq*GtM2*yc * ( - 6*O*x2z*txs + 6*O + *tx*x2zs - 6*x12*x2z*txs + 12*x2z*txs - 6*tx*x2zs ) GG20c = GG20c + rs2wg(12)*Xpi*vvq*GtM2*yc * ( 9*O*x2z*tx - 15*O* + txs + 6*x12*x2z*tx - 15*x12*txs - 3*x2z*tx + 12*txs ) GG20c = GG20c + rs2wg(12)*vvq*GtM2*Xp*yc * ( 2 + 7./2.*O*x12 + O* + x2z - 9./2.*O*tx - 9./2.*O + 5./2.*Os + x12*x2z - 9./2.*x12* + tx - 3*x12 - x2z + 9./2.*tx + x12s ) GG20c = GG20c + rs2wg(12)*vvq*GtM2*yc * ( - O*x12*x2z + 3./2.*O* + x12*tx - 15./2.*O*x2z*tx + 5./2.*O*x2z + 3*O*tx - O*x2zs + 29. + /2.*O*txs - 1./2.*Os*x2z + 1./2.*Os*tx - 5*x12*x2z*tx + x12* + x2z + 3*x12*tx + 29./2.*x12*txs + 3./2.*x2z*tx - 2*x2z + tx* + x12s - 3*tx + x2zs - 12*txs ) GG20c = GG20c + rs2wg(13)*XX*vvq*GtM2*yc * ( - 6*O*x2z*txs - 6* + x12*x2z*txs + 6*x2z*txs ) GG20c = GG20c + rs2wg(13)*Xpi*vvq*GtM2*yc * ( - 3./2.*O*x2z*tx + - 15./2.*O*txs - 15./2.*x12*txs + 3./2.*x2z*tx + 6*txs ) GG20c = GG20c + rs2wg(13)*vvq*GtM2*Xp*yc * ( - 5./4.*O*x12 - 1./ + 2.*O*x2z - 7./4.*O*tx + 3./4.*O - 3./4.*Os - 1./2.*x12*x2z - + 7./4.*x12*tx + 1./2.*x12 + 1./2.*x2z + 7./4.*tx - 1./2.*x12s + ) GG20c = GG20c + rs2wg(13)*vvq*GtM2*yc * ( 1./2.*O*x12*x2z + 9./4. + *O*x12*tx + 9./4.*O*x2z*tx + 1./4.*O*x2z + 1./2.*O*tx + 1./2. + *O*x2zs + 27./4.*O*txs - 1./4.*Os*x2z + 3./4.*Os*tx + 3./2.* + x12*x2z*tx - 1./2.*x12*x2z + 1./2.*x12*tx + 27./4.*x12*txs - + 7./4.*x2z*tx + 3./2.*tx*x12s - 3./2.*tx - 1./2.*x2zs - 6*txs + ) GG20c = GG20c + rs2wg(14)*XX*vvq*GtM2*yc * ( 3*O*x2z*txs + 3*O*tx + *x2zs + 3*x12*x2z*txs - 3*tx*x2zs ) GG20c = GG20c + rs2wg(14)*Xpi*vvq*GtM2*yc * ( 9*O*x2z*tx + 3*O* + txs + 3*x12*x2z*tx + 3*x12*txs - 6*x2z*tx ) GG20c = GG20c + rs2wg(14)*vvq*GtM2*Xp*yc * ( 3./4.*O*x12 + 1./2.* + O*x2z + 19./4.*O*tx + 3./4.*O - 3./4.*Os + 1./2.*x12*x2z + 7./ + 4.*x12*tx - 1./2.*x12 - x2z*tx - 1./2.*x2z - 7./4.*tx + 1./2. + *x12s + txs ) GG20c = GG20c + rs2wg(14)*vvq*GtM2*yc * ( - 1./2.*O*x12*x2z - 3./ + 4.*O*x12*tx - 33./4.*O*x2z*tx - 3./4.*O*x2z - 6*O*tx - 1./2.* + O*x2zs - 11./4.*O*txs + 3./4.*Os*x2z - 1./4.*Os*tx - 5./2.* + x12*x2z*tx + 1./2.*x12*x2z - 3*x12*tx - 11./4.*x12*txs + 19./ + 4.*x2z*tx - x2z*txs - 1./2.*tx*x12s + tx*x2zs + 3*tx + 1./2.* + x2zs ) GG20c = GG20c + rt1wg(1)*vvc*GsM2*Xp*ys * ( 2 + 2*O*x12 - 2*O*x2z + - 8*O + 6*Os - 4*x12*tx - 2*x12 + 2*x2z + 2*tx ) GG20c = GG20c + rt1wg(1)*vvc*GsM2*Xps*ys * ( - 2 + 2*O + 2*x12 ) GG20c = GG20c + rt1wg(1)*vvc*GsM2*ys * ( - 2*O*x12*tx - 2*O*x2z* + tx + 4*O*x2z + 2*O*tx + 2*O*txs - 2*Os*x2z - 2*Os*tx + 2*x12* + tx + 2*x12*txs - 2*x2z*tx - 2*x2z ) GG20c = GG20c + rt1wg(4)*vvc*GsM2*Xp*ys * ( - 1./2.*O*x12*x2z - + O*x12*tx + 1./2.*O*x12 + 3./2.*O*x2z - 1./2.*O*x12s - 1./2.* + Os*x2z - 1./2.*Os + 1./2.*Oc + x12*x2z + x12*tx - x2z - tx* + x12s ) GG20c = GG20c + rt1wg(4)*vvc*GsM2*Xps*ys * ( 1./2. + O*x12 - O + + 1./2.*Os - x12 + 1./2.*x12s ) GG20c = GG20c + rt1wg(4)*vvc*GsM2*ys * ( - 1./2.*O*x12*x2z*tx - + 1./2.*O*x12*x2z + O*x12*txs + 1./2.*O*tx*x12s - 1./2.*O*x2zs + - 1./2.*Os*x12*x2z + Os*x12*tx - 1./2.*Os*x2z*tx + 1./2.*Os* + x2z + 1./2.*Os*txs - 1./2.*Oc*x2z + 1./2.*Oc*tx - x12*x2z*tx + + 1./2.*x12s*txs + 1./2.*x2zs ) GG20c = GG20c + rt1wg(7)*vvc*GsM2*Xp*ys * ( 1./2.*O*x12*x2z + 1./ + 2.*O*x12*tx - 1./4.*O*x12 - O*x2z - 1./4.*O*tx + 1./4.*O + 1./ + 2.*Os*x12 + 1./2.*Os*x2z - 3./4.*Os + 1./2.*Oc - 1./2.*x12* + x2z - 3./4.*x12*tx + 1./2.*x2z + 1./2.*tx*x12s + 1./4.*tx ) GG20c = GG20c + rt1wg(7)*vvc*GsM2*Xps*ys * ( - 1./4. - 1./2.*O* + x12 + 1./2.*O - 1./4.*Os + 1./2.*x12 - 1./4.*x12s ) GG20c = GG20c + rt1wg(7)*vvc*GsM2*ys * ( 1./4.*O*x12*tx - 1./2.*O + *x12*txs + 1./4.*O*x2z*tx - 1./4.*O*x2z + 1./2.*O*x2zs + 1./4. + *O*txs - 1./2.*Os*x12*x2z + 3./4.*Os*x2z + 1./4.*Os*tx - 1./4. + *Os*x2zs - 1./4.*Os*txs - 1./2.*Oc*x2z + 1./2.*x12*x2z*tx + 1. + /4.*x12*txs - 1./4.*x2z*tx - 1./4.*x12s*txs - 1./4.*x2zs ) GG20c = GG20c + rt1wg(8)*vvc*GsM2*Xp*ys * ( - 1./2.*O*x12 + 1./2. + *O*tx + 1./2.*O - 1./2.*Os + 1./2.*x12*tx - 1./2.*tx ) GG20c = GG20c + rt1wg(8)*vvc*GsM2*ys * ( - 1./2.*O*x12*tx + 1./2. + *O*x2z*tx - 1./2.*O*x2z - 1./2.*O*txs + 1./2.*Os*x2z - 1./2.* + Os*tx - 1./2.*x12*txs + 1./2.*x2z*tx ) GG20c = GG20c + rt1wg(9)*vvc*GsM2*ys * ( 2*O*tx ) GG20c = GG20c + rt1wg(10)*vvc*GsM2*Xp*ys * ( - 1./2.*O*x12*x2z + - 1./2.*O*x12*tx + O*x2z - 1./2.*Os*x12 - 1./2.*Os*x2z + 1./ + 2.*Os - 1./2.*Oc + 1./2.*x12*x2z + 1./2.*x12*tx - 1./2.*x2z + - 1./2.*tx*x12s ) GG20c = GG20c + rt1wg(10)*vvc*GsM2*Xps*ys * ( 1./4. + 1./2.*O*x12 + - 1./2.*O + 1./4.*Os - 1./2.*x12 + 1./4.*x12s ) GG20c = GG20c + rt1wg(10)*vvc*GsM2*ys * ( 1./2.*O*x12*txs - 1./2. + *O*x2zs + 1./2.*Os*x12*x2z - 1./2.*Os*x2z + 1./4.*Os*x2zs + 1. + /4.*Os*txs + 1./2.*Oc*x2z - 1./2.*x12*x2z*tx + 1./4.*x12s*txs + + 1./4.*x2zs ) GG20c = GG20c + rt1wg(11)*vvc*GsM2*Xp*ys * ( - O*x12 - O*x2z - O + + Os - 2*x12*tx + x2z + tx ) GG20c = GG20c + rt1wg(11)*vvc*GsM2*Xps*ys * ( - 1 + O + x12 ) GG20c = GG20c + rt1wg(11)*vvc*GsM2*ys * ( O*x12*tx - O*x2z*tx + O + *x2z + O*txs - Os*x2z + Os*tx + x12*txs - x2z*tx ) GG20c = GG20c + rt1wg(12)*vvc*GsM2*Xp*ys * ( 1 + O*x12 - 2*O + Os + - x12 ) GG20c = GG20c + rt1wg(12)*vvc*GsM2*ys * ( - O*x12*tx + O*tx + Os + *x2z - Os*tx + x12*tx - x2z ) GG20c = GG20c + rt1wg(13)*vvc*GsM2*Xp*ys * ( 1./2. - 1./2.*O - 1./ + 2.*x12 ) GG20c = GG20c + rt1wg(13)*vvc*GsM2*ys * ( 3./2.*O*x2z - 1./2.*O* + tx - Os*x2z + 1./2.*x12*tx - 1./2.*x2z ) GG20c = GG20c + rt1wg(14)*vvc*GsM2*Xp*ys * ( - 1./2.*O*x2z + O + - Os - x12*tx + 1./2.*x2z + 1./2.*tx ) GG20c = GG20c + rt1wg(14)*vvc*GsM2*Xps*ys * ( - 1./2. + 1./2.*O + + 1./2.*x12 ) GG20c = GG20c + rt1wg(14)*vvc*GsM2*ys * ( - 1./2.*O*x2z*tx - O* + x2z + 1./2.*O*txs + Os*x2z + 1./2.*x12*txs - 1./2.*x2z*tx ) GG11c = + + rs1wg(1)*XX*vvc*GtM2*ys * ( 8./3.*Os*x2z + 8./3.*Oc*x12 - 8./ + 3.*Oc*x2z + 8./3.*Oq ) GG11c = GG11c + rs1wg(1)*Xpi*vvc*GtM2*ys * ( 8./3.*O*x2z + 8./3.* + Os*x12 - 8./3.*Os*x2z + 8./3.*Os - 8./3.*Oc ) GG11c = GG11c + rs1wg(1)*vvc*GtM2*Xp*ys * ( 4./3. + 8./3.*O*x12 + - 8./3.*O ) GG11c = GG11c + rs1wg(1)*vvc*GtM2*ys * ( - 4./3.*O*x12 + 4./3.*O + *x2z - 8./3.*O - 8./3.*Os*x12 + 4./3.*Os + 8./3.*Oc - 4./3.* + x2z ) GG11c = GG11c + rs1wg(4)*XX*vvc*GtM2*ys * ( - 4./3.*Os*x2zs ) GG11c = GG11c + rs1wg(4)*Xpi*vvc*GtM2*ys * ( - 2./3.*O*x2zs + 2./ + 3.*Os*x12*x2z - 8./3.*Os*x2z - 2./3.*Os*x2zs + 2./3.*Oc*x2z ) GG11c = GG11c + rs1wg(4)*vvc*GtM2*Xp*ys * ( - 2./3.*O*x12*x2z - + 1./3.*O*x12 - 1./3.*O*x2z - 2./3.*O + 2./3.*Os*x12 - 4./3.*Os + *x2z - 5./3.*Os + 2./3.*Oc - 2./3.*x2z ) GG11c = GG11c + rs1wg(4)*vvc*GtM2*Xps*ys * ( 1./3. + 2./3.*O*x12 + + 2./3.*Os ) GG11c = GG11c + rs1wg(4)*vvc*GtM2*ys * ( 1./3.*O*x12*x2z + 4./3.* + O*x2z + 1./3.*O*x2zs - 2./3.*Os*x12*x2z - 2./3.*Os*x12 + 11./ + 3.*Os*x2z + 2./3.*Os*x2zs + 4./3.*Os - 2./3.*Oc*x2z - 2./3.* + Oc + 1./3.*x2zs ) GG11c = GG11c + rs1wg(7)*Xpi*vvc*GtM2*ys * ( 1./3.*O*x2zs + 1./3. + *Os*x12*x2z - 1./3.*Os*x2zs + 1./3.*Oc*x2z ) GG11c = GG11c + rs1wg(7)*vvc*GtM2*Xp*ys * ( 1./3.*O*x12*x2z + 1./ + 3.*O*x12 - 1./3.*O*x2z + 2./3.*Os*x12 + 1./3.*Os*x2z - 1./3.* + Os + 2./3.*Oc + 1./3.*x2z ) GG11c = GG11c + rs1wg(7)*vvc*GtM2*Xps*ys * ( - 1./6. - 1./3.*O* + x12 + 1./3.*O - 1./3.*Os ) GG11c = GG11c + rs1wg(7)*vvc*GtM2*ys * ( - 1./3.*O*x12*x2z - 1./ + 3.*O*x2z - 2./3.*Os*x12*x2z + 1./3.*Os*x2z - 1./6.*Os*x12s + + 1./6.*Os*x2zs - 1./3.*Oc*x12 - 2./3.*Oc*x2z - 1./6.*Oq - 1./6. + *x2zs ) GG11c = GG11c + rs1wg(8)*Xpi*vvc*GtM2*ys * ( 4./3.*Os*x2z ) GG11c = GG11c + rs1wg(8)*vvc*GtM2*Xp*ys * ( 2./3.*O*x2z + 2./3.*O + - 2./3.*Os*x12 + 2./3.*Os*x2z + 4./3.*Os - 2./3.*Oc ) GG11c = GG11c + rs1wg(8)*vvc*GtM2*Xps*ys * ( - 2./3.*O ) GG11c = GG11c + rs1wg(8)*vvc*GtM2*ys * ( - 2./3.*O*x2z + 2./3.* + Os*x12 - 2*Os*x2z - 4./3.*Os + 2./3.*Oc ) GG11c = GG11c + rs1wg(9)*Xpi*vvc*GtM2*ys * ( 8./3.*Oc ) GG11c = GG11c + rs1wg(9)*vvc*GtM2*Xp*ys * ( 8./3.*Os ) GG11c = GG11c + rs1wg(9)*vvc*GtM2*ys * ( - 8./3.*Os - 8./3.*Oc ) GG11c = GG11c + rs1wg(10)*Xpi*vvc*GtM2*ys * ( - 1./3.*O*x2zs - 1. + /3.*Os*x12*x2z + 1./3.*Os*x2zs - 1./3.*Oc*x2z ) GG11c = GG11c + rs1wg(10)*vvc*GtM2*Xp*ys * ( - 1./3.*O*x12*x2z + - 1./3.*O*x12 - 1./3.*O - Os*x12 + 1./3.*Os - Oc - 1./3.*x2z + ) GG11c = GG11c + rs1wg(10)*vvc*GtM2*Xps*ys * ( 1./6. + 1./3.*O*x12 + + 1./3.*Os ) GG11c = GG11c + rs1wg(10)*vvc*GtM2*ys * ( 1./3.*O*x12*x2z + 2./3. + *O*x2z + 2./3.*Os*x12*x2z + 1./3.*Os*x12 - 2./3.*Os*x2z + 1./ + 6.*Os*x12s - 1./6.*Os*x2zs + 1./3.*Oc*x12 + 2./3.*Oc*x2z + 1./ + 3.*Oc + 1./6.*Oq + 1./6.*x2zs ) GG11c = GG11c + rs1wg(11)*vvc*GtM2*Xp*ys * ( - 2./3.*O + 4./3.* + Os ) GG11c = GG11c + rs1wg(11)*vvc*GtM2*ys * ( 2./3.*O*x2z - 2./3.*Os* + x12 - 2./3.*Os*x2z - 2./3.*Oc ) GG11c = GG11c + rs1wg(12)*XX*vvc*GtM2*ys * ( 4./3.*Os*x2z + 4./3. + *Oc*x12 + 4./3.*Oc*x2z + 4./3.*Oq ) GG11c = GG11c + rs1wg(12)*Xpi*vvc*GtM2*ys * ( 4./3.*O*x2z + 4./3. + *Os*x12 + 4./3.*Os*x2z + 4./3.*Os + 4./3.*Oc ) GG11c = GG11c + rs1wg(12)*vvc*GtM2*Xp*ys * ( 2./3. + 4./3.*O*x12 + + 4./3.*Os ) GG11c = GG11c + rs1wg(12)*vvc*GtM2*ys * ( - 2./3.*O*x12 - 2./3.* + O*x2z - 4./3.*O - 4./3.*Os*x12 - 4./3.*Os*x2z - 2*Os - 4./3.* + Oc - 2./3.*x2z ) GG11c = GG11c + rs1wg(13)*XX*vvc*GtM2*ys * ( 2./3.*Os*x2z + 2./3. + *Oc*x12 - 2./3.*Oc*x2z + 2./3.*Oq ) GG11c = GG11c + rs1wg(13)*Xpi*vvc*GtM2*ys * ( 2./3.*O*x2z + 2./3. + *Os*x12 - 2./3.*Os*x2z + 2./3.*Os + 2./3.*Oc ) GG11c = GG11c + rs1wg(13)*vvc*GtM2*Xp*ys * ( 1./3. + 2./3.*O*x12 + - 1./3.*O + 2./3.*Os ) GG11c = GG11c + rs1wg(13)*vvc*GtM2*ys * ( - 1./3.*O*x12 - 2./3.* + O - 5./3.*Os*x12 + 1./3.*Os*x2z + 1./3.*Os - 5./3.*Oc - 1./3. + *x2z ) GG11c = GG11c + rs1wg(14)*XX*vvc*GtM2*ys * ( 4./3.*Oc*x2z ) GG11c = GG11c + rs1wg(14)*Xpi*vvc*GtM2*ys * ( 4./3.*Os*x2z + 4./3. + *Oc ) GG11c = GG11c + rs1wg(14)*vvc*GtM2*Xp*ys * ( 2./3.*Os ) GG11c = GG11c + rs1wg(14)*vvc*GtM2*ys * ( 2./3.*Os*x12 - 4./3.*Os + *x2z - 4./3.*Os - 2./3.*Oc ) GG21c = + + rs1wg(1)*XX*vvc*GtM2*ys * ( 8*Os*x2z + 8*Oc*x12 - 8*Oc*x2z + + 8*Oq ) GG21c = GG21c + rs1wg(1)*Xpi*vvc*GtM2*ys * ( 8*O*x2z + 8*Os*x12 + - 8*Os*x2z + 8*Os - 8*Oc ) GG21c = GG21c + rs1wg(1)*vvc*GtM2*Xp*ys * ( 4./3. + 8./3.*O*x12 + + 8./3.*O - 32./3.*Os ) GG21c = GG21c + rs1wg(1)*vvc*GtM2*ys * ( - 4./3.*O*x12 - 4*O*x2z + - 8*O - 8*Os*x12 + 16./3.*Os*x2z + 20./3.*Os + 8*Oc - 4./3.* + x2z ) GG21c = GG21c + rs1wg(4)*XX*vvc*GtM2*ys * ( - 4*Os*x2zs ) GG21c = GG21c + rs1wg(4)*Xpi*vvc*GtM2*ys * ( - 2*O*x2zs + 2*Os* + x12*x2z - 8*Os*x2z - 2*Os*x2zs + 2*Oc*x2z ) GG21c = GG21c + rs1wg(4)*vvc*GtM2*Xp*ys * ( - 2./3.*O*x12*x2z - + 1./3.*O*x12 - 3*O*x2z - 2*O + 2*Os*x12 - 8./3.*Os*x2z - 13./3. + *Os + 2*Oc - 2./3.*x2z ) GG21c = GG21c + rs1wg(4)*vvc*GtM2*Xps*ys * ( 1./3. + 2./3.*O*x12 + + 4./3.*O + 2./3.*Os ) GG21c = GG21c + rs1wg(4)*vvc*GtM2*ys * ( 1./3.*O*x12*x2z + 4*O* + x2z + 5./3.*O*x2zs - 2*Os*x12*x2z - 2*Os*x12 + 31./3.*Os*x2z + + 2*Os*x2zs + 4*Os - 2*Oc*x2z - 2*Oc + 1./3.*x2zs ) GG21c = GG21c + rs1wg(7)*Xpi*vvc*GtM2*ys * ( O*x2zs + Os*x12*x2z + - Os*x2zs + Oc*x2z ) GG21c = GG21c + rs1wg(7)*vvc*GtM2*Xp*ys * ( 1./3.*O*x12*x2z + 1./ + 3.*O*x12 + 1./3.*O*x2z + 2./3.*Os*x12 + 1./3.*Os*x2z - 1./3.* + Os + 2./3.*Oc + 1./3.*x2z ) GG21c = GG21c + rs1wg(7)*vvc*GtM2*Xps*ys * ( - 1./6. - 1./3.*O* + x12 + 1./3.*O - 1./3.*Os ) GG21c = GG21c + rs1wg(7)*vvc*GtM2*ys * ( - 1./3.*O*x12*x2z - O* + x2z - 2./3.*O*x2zs - 4./3.*Os*x12*x2z + 1./3.*Os*x2z - 1./6.* + Os*x12s + 5./6.*Os*x2zs - 1./3.*Oc*x12 - 4./3.*Oc*x2z - 1./6. + *Oq - 1./6.*x2zs ) GG21c = GG21c + rs1wg(8)*Xpi*vvc*GtM2*ys * ( 4*Os*x2z ) GG21c = GG21c + rs1wg(8)*vvc*GtM2*Xp*ys * ( 2*O*x2z + 2*O - 2*Os* + x12 + 2*Os*x2z + 4*Os - 2*Oc ) GG21c = GG21c + rs1wg(8)*vvc*GtM2*Xps*ys * ( - 2*O ) GG21c = GG21c + rs1wg(8)*vvc*GtM2*ys * ( - 2*O*x2z + 2*Os*x12 - + 6*Os*x2z - 4*Os + 2*Oc ) GG21c = GG21c + rs1wg(9)*Xpi*vvc*GtM2*ys * ( 8*Oc ) GG21c = GG21c + rs1wg(9)*vvc*GtM2*Xp*ys * ( 8*Os ) GG21c = GG21c + rs1wg(9)*vvc*GtM2*ys * ( - 8*Os - 8*Oc ) GG21c = GG21c + rs1wg(10)*Xpi*vvc*GtM2*ys * ( - O*x2zs - Os*x12* + x2z + Os*x2zs - Oc*x2z ) GG21c = GG21c + rs1wg(10)*vvc*GtM2*Xp*ys * ( - 1./3.*O*x12*x2z + - 1./3.*O*x12 - 4./3.*O*x2z - O - 5./3.*Os*x12 + 2./3.*Os* + x2z + 1./3.*Os - 5./3.*Oc - 1./3.*x2z ) GG21c = GG21c + rs1wg(10)*vvc*GtM2*Xps*ys * ( 1./6. + 1./3.*O*x12 + + 2./3.*O + 1./3.*Os ) GG21c = GG21c + rs1wg(10)*vvc*GtM2*ys * ( 1./3.*O*x12*x2z + 2*O* + x2z + 2./3.*O*x2zs + 4./3.*Os*x12*x2z + Os*x12 - 4./3.*Os*x2z + + 1./6.*Os*x12s - 5./6.*Os*x2zs + 1./3.*Oc*x12 + 4./3.*Oc* + x2z + Oc + 1./6.*Oq + 1./6.*x2zs ) GG21c = GG21c + rs1wg(11)*vvc*GtM2*Xp*ys * ( - 2./3.*O + 4./3.* + Os ) GG21c = GG21c + rs1wg(11)*vvc*GtM2*ys * ( 2./3.*O*x2z - 2./3.*Os* + x12 - 2./3.*Os*x2z - 2./3.*Oc ) GG21c = GG21c + rs1wg(12)*XX*vvc*GtM2*ys * ( 4*Os*x2z + 4*Oc*x12 + + 4*Oc*x2z + 4*Oq ) GG21c = GG21c + rs1wg(12)*Xpi*vvc*GtM2*ys * ( 4*O*x2z + 4*Os*x12 + + 4*Os*x2z + 4*Os + 4*Oc ) GG21c = GG21c + rs1wg(12)*vvc*GtM2*Xp*ys * ( 2./3. + 4./3.*O*x12 + + 8./3.*O + 4./3.*Os ) GG21c = GG21c + rs1wg(12)*vvc*GtM2*ys * ( - 2./3.*O*x12 - 10./3. + *O*x2z - 4*O - 4*Os*x12 - 4*Os*x2z - 14./3.*Os - 4*Oc - 2./3. + *x2z ) GG21c = GG21c + rs1wg(13)*XX*vvc*GtM2*ys * ( 2*Os*x2z + 2*Oc*x12 + - 2*Oc*x2z + 2*Oq ) GG21c = GG21c + rs1wg(13)*Xpi*vvc*GtM2*ys * ( 2*O*x2z + 2*Os*x12 + - 2*Os*x2z + 2*Os + 2*Oc ) GG21c = GG21c + rs1wg(13)*vvc*GtM2*Xp*ys * ( 1./3. + 2./3.*O*x12 + + O + 2./3.*Os ) GG21c = GG21c + rs1wg(13)*vvc*GtM2*ys * ( - 1./3.*O*x12 - 4./3.* + O*x2z - 2*O - 3*Os*x12 + 5./3.*Os*x2z - Os - 3*Oc - 1./3.*x2z + ) GG21c = GG21c + rs1wg(14)*XX*vvc*GtM2*ys * ( 4*Oc*x2z ) GG21c = GG21c + rs1wg(14)*Xpi*vvc*GtM2*ys * ( 4*Os*x2z + 4*Oc ) GG21c = GG21c + rs1wg(14)*vvc*GtM2*Xp*ys * ( 10./3.*Os ) GG21c = GG21c + rs1wg(14)*vvc*GtM2*ys * ( 2./3.*Os*x12 - 4*Os*x2z + - 4*Os - 10./3.*Oc ) GG12c = 0 GG22c = 0 *---------------------------------------------------------------- *#call wtensor{gz} *#call totalgz{dummy} *#call contractgz{dummy} *---------------------------------------------------------------- *#call wtensor{zz} *#call totalzz{dummy} *#call contractzz{dummy} * .end Time = 719.25 sec Generated terms = 3146 GG10q Terms in output = 3146 Bytes used = 61374 Time = 719.49 sec Generated terms = 3185 GG20q Terms in output = 3185 Bytes used = 62030 Time = 719.50 sec Generated terms = 0 GG11q Terms in output = 0 Bytes used = 2 Time = 719.51 sec Generated terms = 0 GG21q Terms in output = 0 Bytes used = 2 Time = 719.51 sec Generated terms = 0 GG12q Terms in output = 0 Bytes used = 2 Time = 719.51 sec Generated terms = 0 GG22q Terms in output = 0 Bytes used = 2 GG10q = + + rwwg(1,1)*XX*vvq*yc * ( - 8*O*x2z*txs - 8*x12*x2z*txs + 8* + x2z*txs ) GG10q = GG10q + rwwg(1,1)*Xpi*vvq*yc * ( - 8*O*x2z*tx - 16*O*txs + - 16*x12*txs + 8*x2z*tx + 8*txs ) GG10q = GG10q + rwwg(1,1)*vvq*Xp*yc * ( 4 + 4*O*x12 - 4*O*x2z - + 28*O*tx - 12*O + 8*Os - 20*x12*tx - 4*x12 - 4*x2z*tx + 4*x2z + + 16*tx + 4*txs ) GG10q = GG10q + rwwg(1,1)*vvq*Xps*yc * ( - 4 + 4*O + 4*x12 ) GG10q = GG10q + rwwg(1,1)*vvq*yc * ( 8*O*x12*tx + 16*O*x2z*tx + 8 + *O*x2z + 16*O*tx + 16*O*txs - 4*Os*x2z + 4*Os*tx + 8*x12*x2z* + tx + 8*x12*tx + 16*x12*txs - 16*x2z*tx - 4*x2z*txs - 4*x2z + + 4*tx*x12s + 4*tx*x2zs - 8*tx - 8*txs ) GG10q = GG10q + rwwg(2,2)*XX*vvq*yc * ( 2*x2z*txs - 2*tx*x2zs ) GG10q = GG10q + rwwg(2,2)*Xpi*vvq*yc * ( 2*O*x2z*tx - 2*O*txs + 2 + *x12*x2z*tx - 2*x12*txs - 2*x2z*tx + 2*txs ) GG10q = GG10q + rwwg(2,2)*vvq*Xp*yc * ( 1 - O*x2z - 2*O + Os - 2* + x12*tx - x12 - x2z*tx + x2z + tx + txs ) GG10q = GG10q + rwwg(2,2)*vvq*Xps*yc * ( - 1 + O + x12 ) GG10q = GG10q + rwwg(2,2)*vvq*yc * ( O*x12*tx - O*x2z*tx + O*x2z + + O*txs + x12*txs + x2z*tx - x2z*txs - x2z + tx*x12s + tx* + x2zs - 2*txs ) GG10q = GG10q + rwwg(2,3)*XX*vvq*yc * ( - 4*x2z*txs + 4*tx*x2zs + ) GG10q = GG10q + rwwg(2,3)*Xpi*vvq*yc * ( - 4*O*x2z*tx + 4*O*txs + - 4*x12*x2z*tx + 4*x12*txs + 4*x2z*tx - 4*txs ) GG10q = GG10q + rwwg(2,3)*vvq*Xp*yc * ( - 2 - 6*O*x12 - 4*O*x2z + + 2*O*tx + 4*O - 2*Os - 2*x12*x2z - 2*x12*tx + 4*x12 - 2*x2z + *tx + 4*x2z - 2*x12s + 2*txs ) GG10q = GG10q + rwwg(2,3)*vvq*Xps*yc * ( - 2 + 2*O + 2*x12 ) GG10q = GG10q + rwwg(2,3)*vvq*yc * ( 2*O*x12*x2z + 2*O*x2z*tx - 2 + *O*x2z + 2*O*x2zs - 4*O*txs + 6*x12*x2z*tx - 2*x12*x2z - 4* + x12*txs - 4*x2z*tx - 2*x2z*txs + 2*x2z + 2*tx*x2zs - 2*x2zs + + 4*txs ) GG10q = GG10q + rwwg(3,3)*XX*vvq*yc * ( 2*x2z*txs - 2*tx*x2zs ) GG10q = GG10q + rwwg(3,3)*Xpi*vvq*yc * ( 2*O*x2z*tx - 2*O*txs + 2 + *x12*x2z*tx - 2*x12*txs - 2*x2z*tx + 2*txs ) GG10q = GG10q + rwwg(3,3)*vvq*Xp*yc * ( 1 + 2*O*x12 - 3*O*x2z + 2 + *O*tx - 2*O + Os - 2*x12*x2z - 3*x12 - x2z*tx + 3*x2z - tx + + 2*x12s + txs ) GG10q = GG10q + rwwg(3,3)*vvq*Xps*yc * ( - 1 + O + x12 ) GG10q = GG10q + rwwg(3,3)*vvq*yc * ( 2*O*x12*x2z - O*x12*tx - 5*O + *x2z*tx + O*x2z + 2*O*x2zs + 3*O*txs - 2*x12*x2z*tx + 2*x12* + x2z + 3*x12*txs + 3*x2z*tx - x2z*txs - x2z - tx*x12s + tx* + x2zs - 2*x2zs - 2*txs ) GG10q = GG10q + rwwg(4,1)*XX*vvq*yc * ( 2*O*x12*tx*x2zs - 2*O*tx* + x2zc - 2*O*tx*x2zs + 4*O*x2zc + 2*O*x2zs*txs + 2*Os*tx*x2zs + - 2*Os*x2zc + 2*x12*tx*x2zs + 2*x12*x2zs*txs + 2*tx*x2zc - 2 + *x2zc - 4*x2zs*txs ) GG10q = GG10q + rwwg(4,1)*Xpi*vvq*yc * ( 4*O*x12*x2z*tx - 4*O*x12 + *x2zs - 4*O*x2z*tx + 8*O*x2z*txs - 6*O*tx*x2zs + 14*O*x2zs + + 6*Os*x2z*tx - 8*Os*x2zs + 4*x12*x2z*tx + 8*x12*x2z*txs - 2* + x12*tx*x2zs + 4*x12*x2zs - 2*x2z*tx*x12s - 8*x2z*txs + 2*tx* + x2zs - 6*x2zs ) GG10q = GG10q + rwwg(4,1)*vvq*Xp*yc * ( - 2 - 14*O*x12*x2z + 4*O + *x12*tx - 4*O*x12 - 4*O*x2z*tx + 26*O*x2z - 2*O*tx - 2*O*x12s + + 10*O*txs + 6*O - 2*Os*x12 - 16*Os*x2z + 8*Os*tx - 4*Os + + 12*x12*x2z + 6*x12*tx + 10*x12*txs + 4*x12 - 4*x2z*tx - 2*x2z + *x12s - 10*x2z - 4*tx*x12s - 2*tx - 2*x12s - 6*txs ) GG10q = GG10q + rwwg(4,1)*vvq*Xps*yc * ( 4 + 12*O*x12 - 4*O*tx - + 12*O + 8*Os - 4*x12*tx - 8*x12 + 4*tx + 4*x12s ) GG10q = GG10q + rwwg(4,1)*vvq*yc * ( - 6*O*x12*x2z*tx + 8*O*x12* + x2z - 2*O*x12*tx + 4*O*x12*x2zs + 8*O*x2z*tx - 10*O*x2z*txs + - 16*O*x2z + 8*O*tx*x2zs + 2*O*tx - 18*O*x2zs - 6*O*txs - 8* + Os*x2z*tx + 10*Os*x2z - 4*Os*tx + 10*Os*x2zs - 6*x12*x2z*tx + - 10*x12*x2z*txs - 8*x12*x2z + 2*x12*tx*x2zs - 2*x12*tx - 4* + x12*x2zs - 6*x12*txs + 2*x2z*tx*x12s + 2*x2z*tx + 2*x2z*x12s + + 10*x2z*txs + 6*x2z + 2*tx*x12s - 2*tx*x2zs + 8*x2zs + 4* + txs ) GG10q = GG10q + rwwg(4,4)*XX*vvq*yc * ( - 1./2.*O*x12*x2zc + 1./ + 2.*O*tx*x2zc - 1./2.*O*x2zq - 1./2.*x12*tx*x2zc - 1./2.*tx* + x2zq + 1./2.*x2zq + 1./2.*x2zc*txs ) GG10q = GG10q + rwwg(4,4)*Xpi*vvq*yc * ( 1./2.*O*x12*x2zc - 3./2. + *O*x12*x2zs + 1./2.*O*tx*x2zc + 3./2.*O*tx*x2zs + 1./2.*O* + x12s*x2zs - 5./2.*O*x2zc - 1./2.*O*x2zs*txs + 1./2.*Os*x12* + x2zs - 1./2.*Os*tx*x2zs + 1./2.*Os*x2zc + 1./2.*x12*tx*x2zc + - 3./2.*x12*tx*x2zs - x12*x2zc - 1./2.*x12*x2zs*txs + 1./2.* + tx*x12s*x2zs - 3./2.*tx*x2zc + 2*x2zc + 3./2.*x2zs*txs ) GG10q = GG10q + rwwg(4,4)*vvq*Xp*yc * ( 5./2.*O*x12*x2zs - 1./2.* + O*x12 + 3*O*x2z*tx + 3./2.*O*x2z*x12s - 3./2.*O*x2z*txs - 7./ + 2.*O*x2z + 3./2.*O*tx*x2zs + 1./2.*O*tx + 1./2.*O*x12s - 13./ + 2.*O*x2zs - 1./2.*O*txs + 3./2.*Os*x12*x2z + 1./2.*Os*x12 - 3. + /2.*Os*x2z*tx + 3./2.*Os*x2z - 1./2.*Os*tx + 2*Os*x2zs - 2* + x12*x2z*tx - 3./2.*x12*x2z*txs - 3*x12*x2z + 3./2.*x12*tx* + x2zs - 1./2.*x12*tx - 4*x12*x2zs - 1./2.*x12*txs + 3./2.*x2z* + tx*x12s - 1./2.*x2z*tx + x2z*x12s + 5./2.*x2z*txs + 2*x2z + 1. + /2.*tx*x12s - 5./2.*tx*x2zs + 1./2.*x12s*x2zs + 9./2.*x2zs + + 1./2.*txs ) GG10q = GG10q + rwwg(4,4)*vvq*Xps*yc * ( - 1./2. - 4*O*x12*x2z + - O*x2z*tx + 6*O*x2z - O*tx - O*x12s + O*txs + O - Os*x12 - + 5./2.*Os*x2z + Os*tx - 1./2.*Os - x12*x2z*tx + 5*x12*x2z + + x12*tx + x12*txs + x12 + x2z*tx - 3./2.*x2z*x12s - 7./2.*x2z + - tx*x12s - 1./2.*x12s - txs ) GG10q = GG10q + rwwg(4,4)*vvq*yc * ( 3./2.*O*x12*x2z + 2*O*x12* + Xpc - 1./2.*O*x12*x2zc - 3./2.*O*x2z*tx - O*x2z*x12s + O*x2z* + txs - 1./2.*O*tx*x2zc - 3*O*tx*x2zs - 2*O*Xpc - 1./2.*O*x12s* + x2zs + 3*O*x2zc + 1./2.*O*x2zs*txs + 9./2.*O*x2zs - Os*x12* + x2z - 1./2.*Os*x12*x2zs + Os*x2z*tx + 1./2.*Os*tx*x2zs + Os* + Xpc - 1./2.*Os*x2zc - 3./2.*Os*x2zs + 3./2.*x12*x2z*tx + x12* + x2z*txs - 1./2.*x12*tx*x2zc + x12*tx*x2zs - 2*x12*Xpc + x12* + x2zc + 1./2.*x12*x2zs*txs + 3*x12*x2zs - x2z*tx*x12s - 3./2.* + x2z*txs - 1./2.*tx*x12s*x2zs + 2*tx*x2zc + 3./2.*tx*x2zs + + Xpc*x12s + Xpc - 1./2.*x12s*x2zs - 5./2.*x2zc - 2*x2zs*txs - + 3*x2zs ) GG10q = GG10q + rwwg(4,12)*XX*vvq*yc * ( - O*tx*x2zs + O*x2zc + + x12*tx*x2zs + 2*tx*x2zc - x2zc - 2*x2zs*txs ) GG10q = GG10q + rwwg(4,12)*Xpi*vvq*yc * ( - O*x12*x2zs - 2*O*x2z + *tx + 2*O*x2z*txs - 2*O*tx*x2zs + 4*O*x2zs + Os*x2z*tx - Os* + x2zs + 2*x12*x2z*tx + 2*x12*x2z*txs - 2*x12*tx*x2zs + 2*x12* + x2zs - x2z*tx*x12s - 4*x2z*txs + 4*tx*x2zs - 3*x2zs ) GG10q = GG10q + rwwg(4,12)*vvq*Xp*yc * ( - 1 - 4*O*x12*x2z - O* + x12 - 3*O*x2z*tx + 8*O*x2z - 2*O*tx - O*x12s + 3*O*txs + 2*O + - Os*x12 - 3*Os*x2z + 2*Os*tx - Os - 3*x12*x2z*tx + 6*x12* + x2z + 2*x12*tx + 3*x12*txs + 2*x12 + 3*x2z*tx - x2z*x12s - 5* + x2z - 2*tx*x12s - x12s - 3*txs ) GG10q = GG10q + rwwg(4,12)*vvq*Xps*yc * ( 2 + 4*O*x12 - 4*O + 2* + Os - 4*x12 + 2*x12s ) GG10q = GG10q + rwwg(4,12)*vvq*yc * ( 2*O*x12*x2z + O*x12*x2zs + + 5*O*x2z*tx - 2*O*x2z*txs - 5*O*x2z + 2*O*tx*x2zs + O*tx - 5*O + *x2zs - 2*O*txs - Os*x2z*tx + 2*Os*x2z - Os*tx + Os*x2zs - + x12*x2z*tx - 2*x12*x2z*txs - 4*x12*x2z + 2*x12*tx*x2zs - x12* + tx - 2*x12*x2zs - 2*x12*txs + x2z*tx*x12s - 2*x2z*tx + x2z* + x12s + 5*x2z*txs + 3*x2z + tx*x12s - 5*tx*x2zs + 4*x2zs + 2* + txs ) GG10q = GG10q + rwwg(5,5)*XX*vvq*yc * ( 1./2.*x2z*txs - 1./2.*tx* + x2zs ) GG10q = GG10q + rwwg(5,5)*Xpi*vvq*yc * ( 1./2.*x12*x2z*tx - x2z* + tx + 1./2.*txs ) GG10q = GG10q + rwwg(5,5)*vvq*Xp*yc * ( - 1./4. + 1./4.*O*x2z + + 1./4.*Os + 1./2.*x12*tx + 1./4.*x12 - 1./4.*x2z*tx - 1./4.* + x2z - 1./4.*tx + 1./4.*txs ) GG10q = GG10q + rwwg(5,5)*vvq*Xps*yc * ( 1./4. - 1./4.*O - 1./4.* + x12 ) GG10q = GG10q + rwwg(5,5)*vvq*yc * ( 1./4.*O*x12*tx + 1./4.*O*x2z + *tx - 1./4.*O*x2z - 1./4.*O*txs - x12*tx - 1./4.*x12*txs + 3./ + 4.*x2z*tx - 1./4.*x2z*txs + 1./4.*x2z + 1./4.*tx*x12s + 1./4. + *tx*x2zs + 1./2.*tx - 1./2.*txs ) GG10q = GG10q + rwwg(5,6)*XX*vvq*yc * ( - O*x2z*txs + O*tx*x2zs + - x12*x2z*txs + x2z*txs ) GG10q = GG10q + rwwg(5,6)*Xpi*vvq*yc * ( 2*O*x2z*tx - O*txs - x12 + *txs + txs ) GG10q = GG10q + rwwg(5,6)*vvq*Xp*yc * ( - 1./2. - 1./2.*O*x12 - + O*x2z + 1./2.*O*tx + O - 1./2.*Os - 1./2.*x12*x2z - 1./2.*x12 + *tx + x12 + 1./2.*x2z*tx + x2z - 1./2.*x12s - 1./2.*txs ) GG10q = GG10q + rwwg(5,6)*vvq*Xps*yc * ( - 1./2. + 1./2.*O + 1./ + 2.*x12 ) GG10q = GG10q + rwwg(5,6)*vvq*yc * ( 1./2.*O*x12*x2z + O*x12*tx + - 3./2.*O*x2z*tx - 3./2.*O*x2z - O*tx + 1./2.*O*x2zs + O*txs + + Os*x2z + 1./2.*x12*x2z*tx - 1./2.*x12*x2z - x12*tx + x12* + txs + 1./2.*x2z*txs + 1./2.*x2z + tx*x12s - 1./2.*tx*x2zs - 1. + /2.*x2zs - txs ) GG10q = GG10q + rwwg(6,6)*XX*vvq*yc * ( - O*x2z*txs - O*tx*x2zs + - x12*x2z*txs + 1./2.*x2z*txs + 1./2.*tx*x2zs ) GG10q = GG10q + rwwg(6,6)*Xpi*vvq*yc * ( - 2*O*x2z*tx - O*txs - + 1./2.*x12*x2z*tx - x12*txs + x2z*tx + 1./2.*txs ) GG10q = GG10q + rwwg(6,6)*vvq*Xp*yc * ( - 1./4. - 3./2.*O*x12 + + 3./4.*O*x2z - 1./2.*O*tx + O - 3./4.*Os + 1./2.*x12*x2z + 3./ + 4.*x12 - 1./4.*x2z*tx - 3./4.*x2z + 1./4.*tx - 1./2.*x12s + 1. + /4.*txs ) GG10q = GG10q + rwwg(6,6)*vvq*Xps*yc * ( 1./4. - 1./4.*O - 1./4.* + x12 ) GG10q = GG10q + rwwg(6,6)*vvq*yc * ( 3./2.*O*x12*x2z + 3./4.*O* + x12*tx + 5./4.*O*x2z*tx - 5./4.*O*x2z + O*tx - 1./2.*O*x2zs + + 5./4.*O*txs + Os*x2z - 1./2.*x12*x2z*tx - 1./2.*x12*x2z + + 5./4.*x12*txs - 3./4.*x2z*tx - 1./4.*x2z*txs + 1./4.*x2z + 3./ + 4.*tx*x12s + 1./4.*tx*x2zs - 1./2.*tx + 1./2.*x2zs - 1./2.* + txs ) GG10q = GG10q + rwwg(7,1)*XX*vvq*yc * ( - 2*O*x12*x2z*txs + 2*O* + x2zc - 2*O*x2zs*txs - Os*x2z*txs - Os*x2zc + 2*x12*tx*x2zs - + 2*x12*x2zs*txs - x2z*x12s*txs - x2zc + 2*x2zs*txs ) GG10q = GG10q + rwwg(7,1)*Xpi*vvq*yc * ( - 3*O*x12*x2z*tx - 2*O* + x12*x2zs - 3*O*x2z*txs - O*tx*x2zs + 5*O*x2zs - Os*x2z*tx - 3 + *Os*x2zs + 2*x12*x2z*tx - 3*x12*x2z*txs + 2*x12*x2zs - 2*x2z* + tx*x12s + 2*x2z*txs + tx*x2zs - 2*x2zs ) GG10q = GG10q + rwwg(7,1)*vvq*Xp*yc * ( - 3*O*x12*x2z - O*x2z*tx + + 3*O*x2z - O*txs + Os*x12 - 2*Os*x2z - Os + Oc - x12*x2z*tx + + 2*x12*x2z - x12*txs + x2z*tx - x2z*x12s - x2z + txs ) GG10q = GG10q + rwwg(7,1)*vvq*yc * ( 3*O*x12*x2z*tx + 3*O*x12*x2z + + 2*O*x12*x2zs + O*x2z*tx + 4*O*x2z*txs - 3*O*x2z + O*tx* + x2zs - 5*O*x2zs - Os*x12*x2z + Os*x2z*tx + 3*Os*x2z + 3*Os* + x2zs - Oc*x2z - x12*x2z*tx + 4*x12*x2z*txs - 2*x12*x2z - 2* + x12*x2zs + 2*x2z*tx*x12s - x2z*tx + x2z*x12s - 3*x2z*txs + + x2z - tx*x2zs + 2*x2zs ) GG10q = GG10q + rwwg(7,4)*XX*vvq*yc * ( - 1./4.*O*x12*x2zc + 1./ + 2.*O*x12*x2zs*txs + 1./4.*O*tx*x12s*x2zs - 1./4.*O*tx*x2zq - + 1./4.*O*tx*x2zc + 1./4.*O*x2zq + 1./4.*O*x2zc*txs + 1./2.*Os* + x12*tx*x2zs - 1./4.*Os*x12*x2zc - 1./4.*Os*x2zq + 1./4.*Os* + x2zc + 1./4.*Os*x2zs*txs + 1./4.*Oc*tx*x2zs - 1./4.*Oc*x2zc + - 1./4.*x12*tx*x2zc + 1./4.*x12*x2zc*txs + 1./4.*tx*x2zq + 1. + /4.*x12s*x2zs*txs - 1./2.*x2zc*txs ) GG10q = GG10q + rwwg(7,4)*Xpi*vvq*yc * ( 1./2.*O*x12*x2z*txs + 1./ + 2.*O*x12*tx*x2zs - 1./4.*O*x12*x2zc - 1./2.*O*x12*x2zs + 1./4. + *O*x2z*tx*x12s - 1./2.*O*tx*x2zc - 1./2.*O*tx*x2zs + 1./4.*O* + x12s*x2zs + 1./2.*O*x2zc + 3./4.*O*x2zs*txs + 1./2.*Os*x12* + x2z*tx - 1./4.*Os*x12*x2zs + 1./4.*Os*x2z*txs + 1./4.*Os*tx* + x2zs - 1./2.*Os*x2zc + 1./2.*Os*x2zs + 1./4.*Oc*x2z*tx - 1./2. + *Oc*x2zs - 1./4.*x12*tx*x2zc - 1./2.*x12*tx*x2zs + 3./4.*x12* + x2zs*txs + 1./4.*x2z*x12s*txs + 1./4.*tx*x12s*x2zs + 1./2.*tx + *x2zc - x2zs*txs ) GG10q = GG10q + rwwg(7,4)*vvq*Xp*yc * ( O*x12*x2z*tx - 1./2.*O* + x12*x2z + 1./4.*O*x12*tx - 3./8.*O*x12*x2zs - 1./2.*O*x12*txs + - 1./2.*O*x2z*tx + 1./2.*O*x2z*x12s + 3./4.*O*x2z*txs - 3./8. + *O*tx*x12s - 3./8.*O*tx*x2zs + 1./8.*O*x12s - 1./8.*O*x12c + + 3./8.*O*x2zs + 1./4.*O*txs + 1./4.*Os*x12*x2z - 3./8.*Os*x12* + tx + 1./2.*Os*x2z*tx + 1./4.*Os*x2z + 1./8.*Os*tx - 1./8.*Os* + x12s - 3./8.*Os*x2zs - 1./4.*Os*txs + 1./8.*Oc*x12 - 1./4.*Oc + *x2z - 1./8.*Oc*tx - 1./8.*Oc + 1./8.*Oq - 1./2.*x12*x2z*tx + + 3./4.*x12*x2z*txs - 3./8.*x12*tx*x2zs + 1./4.*x12*txs + 1./ + 2.*x2z*tx*x12s - 3./4.*x2z*txs + 1./8.*tx*x12s - 1./8.*tx* + x12c + 3./8.*tx*x2zs - 1./4.*x12s*txs ) GG10q = GG10q + rwwg(7,4)*vvq*yc * ( - 3./4.*O*x12*x2z*tx - 1./2. + *O*x12*x2z*txs + 1./4.*O*x12*x2z - 5./8.*O*x12*tx*x2zs + 1./4. + *O*x12*x2zc + O*x12*x2zs - 3./8.*O*x2z*tx*x12s + 1./4.*O*x2z* + tx - 3./8.*O*x2z*x12s - 3./4.*O*x2z*txs + 1./8.*O*tx*x12c + 5. + /8.*O*tx*x2zc + O*tx*x2zs - 1./4.*O*x12s*x2zs + 3./8.*O*x12s* + txs - 5./8.*O*x2zc - 7./8.*O*x2zs*txs - 1./4.*O*x2zs - 3./4.* + Os*x12*x2z*tx + 1./4.*Os*x12*x2zs + 3./8.*Os*x12*txs - 3./8.* + Os*x2z*tx - 1./8.*Os*x2z*x12s - 1./4.*Os*x2z*txs - 1./4.*Os* + x2z + 3./8.*Os*tx*x12s - 3./8.*Os*tx*x2zs + 5./8.*Os*x2zc - 1. + /4.*Os*x2zs - 1./4.*Oc*x12*x2z + 3./8.*Oc*x12*tx - 3./8.*Oc* + x2z*tx + 3./8.*Oc*x2z + 1./2.*Oc*x2zs + 1./8.*Oc*txs - 1./8.* + Oq*x2z + 1./8.*Oq*tx + 1./4.*x12*x2z*tx - 3./4.*x12*x2z*txs + + 1./4.*x12*tx*x2zc + x12*tx*x2zs - 7./8.*x12*x2zs*txs - 3./ + 8.*x2z*tx*x12s - 1./4.*x2z*x12s*txs + 1./2.*x2z*txs - 1./4.* + tx*x12s*x2zs - 5./8.*tx*x2zc - 1./4.*tx*x2zs + 1./8.*x12c*txs + + 5./4.*x2zs*txs ) GG10q = GG10q + rwwg(7,7)*XX*vvq*yc * ( - 1./4.*O*x12*x2zs*txs + + 1./4.*O*x2zq - 1./8.*O*x2zc*txs - 1./8.*Os*x12*x2zc - 1./8. + *Os*x2zq + 1./8.*Os*x2zc - 1./8.*Os*x2zs*txs - 1./8.*Oc*x2zc + + 1./4.*x12*tx*x2zc - 1./8.*x12*x2zc*txs - 1./8.*x12s*x2zs* + txs - 1./8.*x2zq + 1./8.*x2zc*txs ) GG10q = GG10q + rwwg(7,7)*Xpi*vvq*yc * ( - 1./4.*O*x12*tx*x2zs + - 1./4.*O*x12*x2zc + 1./2.*O*x2zc - 1./8.*O*x2zs*txs - 1./8. + *Os*x12*x2zs - 1./4.*Os*x2zc + 1./8.*Os*x2zs - 1./8.*Oc*x2zs + + 1./4.*x12*tx*x2zs + 1./4.*x12*x2zc - 1./8.*x12*x2zs*txs - + 1./4.*tx*x12s*x2zs - 1./4.*x2zc + 1./8.*x2zs*txs ) GG10q = GG10q + rwwg(7,7)*vvq*Xp*yc * ( - O*x12*x2z - 1./2.*O* + x12*tx - 1./4.*O*x12*x2zs + 1./4.*O*x12*txs + 1./4.*O*x2z* + x12s + 3./4.*O*x2z + 1./2.*O*tx*x12s + 1./4.*O*x2zs - 1./4.*O + *txs + 1./2.*Os*x12*x2z + 1./4.*Os*x12*tx - 1./4.*Os*x12 - 3./ + 4.*Os*x2z + 1./8.*Os*x12s - 1./8.*Os*x2zs + 1./8.*Os*txs + 1./ + 8.*Os + 1./4.*Oc*x12 + 1./4.*Oc*x2z - 1./4.*Oc + 1./8.*Oq + 1. + /2.*x12*x2z + 1./4.*x12*tx + 1./4.*x12*x2zs - 1./4.*x12*txs + - 1./4.*x2z*x12s - 1./4.*x2z - 1./2.*tx*x12s + 1./4.*tx*x12c + - 1./8.*x12s*x2zs + 1./8.*x12s*txs - 1./8.*x2zs + 1./8.*txs + ) GG10q = GG10q + rwwg(7,7)*vvq*Xps*yc * ( 1./8. + 3./4.*O*x12 - 3./ + 8.*O*x12s - 3./8.*O - 3./8.*Os*x12 + 3./8.*Os - 1./8.*Oc - 3./ + 8.*x12 + 3./8.*x12s - 1./8.*x12c ) GG10q = GG10q + rwwg(7,7)*vvq*yc * ( 1./4.*O*x12*x2z*tx - 1./4.*O + *x12*x2z*txs + 1./4.*O*x12*tx*x2zs + 1./4.*O*x12*x2zc + 1./2. + *O*x12*x2zs + 1./4.*O*x12*txs + 1./4.*O*x2z*txs - 3./8.*O* + x12s*txs - 1./2.*O*x2zc + 1./8.*O*x2zs*txs - 5./8.*O*x2zs + 1. + /4.*Os*x12*x2z - 3./8.*Os*x12*txs - 1./8.*Os*x2z*x12s - 1./8. + *Os*x2z*txs - 1./8.*Os*x2z + 1./4.*Os*x2zc + 3./8.*Os*x2zs + + 1./8.*Os*txs - 1./4.*Oc*x12*x2z + 1./4.*Oc*x2z - 1./8.*Oc*txs + - 1./8.*Oq*x2z - 1./4.*x12*x2z*tx + 1./4.*x12*x2z*txs - 1./4. + *x12*tx*x2zs - 1./4.*x12*x2zc + 1./8.*x12*x2zs*txs - 3./8.* + x12*x2zs + 1./4.*x2z*tx*x12s - 1./8.*x2z*x12s*txs - 1./8.*x2z + *txs + 1./4.*tx*x12s*x2zs + 1./8.*x12s*x2zs + 1./8.*x12s*txs + - 1./8.*x12c*txs + 1./4.*x2zc - 1./8.*x2zs*txs + 1./4.*x2zs + ) GG10q = GG10q + rwwg(7,11)*vvq*Xp*yc * ( 1./4.*O*x12*x2z - 1./2.* + O*x12*tx + 1./4.*O*x12 + 1./4.*O*x2z*tx - 1./4.*O*x2z + 1./4. + *O*tx - 1./4.*O*x12s - 1./2.*O*txs + 1./4.*Os*x2z - 1./4.*Os* + tx - 1./4.*Os + 1./4.*Oc + 1./4.*x12*x2z*tx + 1./4.*x12*tx - + 1./2.*x12*txs - 1./4.*x2z*tx - 1./4.*tx*x12s + 1./2.*txs ) GG10q = GG10q + rwwg(7,11)*vvq*yc * ( - 1./4.*O*x12*x2z + 1./2.* + O*x12*txs - 1./4.*O*x2z*tx + 1./4.*O*x2z*txs + 1./4.*O*tx* + x12s - 1./4.*O*tx*x2zs + 1./4.*O*x2zs - 1./4.*Os*x12*x2z + 1./ + 2.*Os*x12*tx + 1./4.*Os*x2z - 1./4.*Os*x2zs + 1./4.*Os*txs - + 1./4.*Oc*x2z + 1./4.*Oc*tx - 1./4.*x12*x2z*tx + 1./4.*x12*x2z + *txs - 1./2.*x2z*txs + 1./4.*tx*x2zs + 1./4.*x12s*txs ) GG10q = GG10q + rwwg(7,12)*XX*vvq*yc * ( - O*x12*x2z*txs + 1./2. + *O*x12*tx*x2zs + 1./2.*O*tx*x2zc + 1./2.*O*x2zc - 1./2.*O* + x2zs*txs - 1./2.*Os*x2z*txs + 1./2.*Os*tx*x2zs + x12*tx*x2zs + - 1./2.*x12*x2zs*txs - 1./2.*x2z*x12s*txs - 1./2.*tx*x2zc - + 1./2.*x2zc + x2zs*txs ) GG10q = GG10q + rwwg(7,12)*Xpi*vvq*yc * ( - O*x12*x2z*tx - 1./2. + *O*x12*x2zs - O*x2z*txs + 1./2.*O*tx*x2zs + 3./2.*O*x2zs - 1./ + 2.*Os*x2zs + x12*x2z*tx - x12*x2z*txs + 1./2.*x12*tx*x2zs + + x12*x2zs - x2z*tx*x12s + x2z*txs - 1./2.*tx*x2zs - x2zs ) GG10q = GG10q + rwwg(7,12)*vvq*Xp*yc * ( - O*x12*x2z + O*x2z - 1. + /2.*Os*x2z + x12*x2z - 1./2.*x2z*x12s - 1./2.*x2z ) GG10q = GG10q + rwwg(7,12)*vvq*yc * ( O*x12*x2z*tx + O*x12*x2z + + 1./2.*O*x12*x2zs + O*x2z*txs - O*x2z - 1./2.*O*tx*x2zs - 3./2. + *O*x2zs + 1./2.*Os*x2z + 1./2.*Os*x2zs - x12*x2z*tx + x12*x2z + *txs - x12*x2z - 1./2.*x12*tx*x2zs - x12*x2zs + x2z*tx*x12s + + 1./2.*x2z*x12s - x2z*txs + 1./2.*x2z + 1./2.*tx*x2zs + + x2zs ) GG10q = GG10q + rwwg(7,13)*XX*vvq*yc * ( - 1./2.*O*x12*x2z*txs + + 1./2.*O*x2zc - 1./2.*O*x2zs*txs - 1./4.*Os*x2z*txs - 1./4. + *Os*x2zc + 1./2.*x12*tx*x2zs - 1./2.*x12*x2zs*txs - 1./4.*x2z + *x12s*txs - 1./4.*x2zc + 1./2.*x2zs*txs ) GG10q = GG10q + rwwg(7,13)*Xpi*vvq*yc * ( - 1./2.*O*x12*x2z*tx + - 1./2.*O*x12*x2zs - 1./2.*O*x2z*txs + O*x2zs - 1./2.*Os* + x2zs + 1./2.*x12*x2z*tx - 1./2.*x12*x2z*txs + 1./2.*x12*x2zs + - 1./2.*x2z*tx*x12s + 1./2.*x2z*txs - 1./2.*x2zs ) GG10q = GG10q + rwwg(7,13)*vvq*Xp*yc * ( - 1./2.*O*x12*x2z + 1./ + 2.*O*x2z - 1./4.*Os*x2z + 1./2.*x12*x2z - 1./4.*x2z*x12s - 1./ + 4.*x2z ) GG10q = GG10q + rwwg(7,13)*vvq*yc * ( 1./2.*O*x12*x2z*tx + 1./2.* + O*x12*x2z + 1./2.*O*x12*x2zs + 1./2.*O*x2z*txs - 1./2.*O*x2z + - O*x2zs + 1./4.*Os*x2z + 1./2.*Os*x2zs - 1./2.*x12*x2z*tx + + 1./2.*x12*x2z*txs - 1./2.*x12*x2z - 1./2.*x12*x2zs + 1./2. + *x2z*tx*x12s + 1./4.*x2z*x12s - 1./2.*x2z*txs + 1./4.*x2z + 1. + /2.*x2zs ) GG10q = GG10q + rwwg(7,14)*XX*vvq*yc * ( 1./4.*O*x12*tx*x2zs + 1./ + 4.*O*tx*x2zc - 1./4.*O*x2zc + 1./4.*O*x2zs*txs + 1./4.*Os*tx* + x2zs + 1./4.*Os*x2zc + 1./4.*x12*x2zs*txs - 1./4.*tx*x2zc ) GG10q = GG10q + rwwg(7,14)*Xpi*vvq*yc * ( 1./4.*O*x12*x2z*tx + 1./ + 4.*O*x12*x2zs + 1./4.*O*x2z*txs + 1./2.*O*tx*x2zs - 1./2.*O* + x2zs + 1./4.*Os*x2z*tx + 1./2.*Os*x2zs + 1./4.*x12*x2z*txs + + 1./4.*x12*tx*x2zs - 1./2.*tx*x2zs ) GG10q = GG10q + rwwg(7,14)*vvq*Xp*yc * ( - 1./4.*O*x12*x2z - 1./ + 2.*O*x12*tx + 1./4.*O*x2z*tx + 3./4.*O*x2z - 1./4.*O*txs - 1./ + 4.*Os*x12 - 1./4.*Os*x2z + 1./4.*Os - 1./4.*Oc + 1./4.*x12* + x2z*tx + 1./2.*x12*x2z + 1./2.*x12*tx - 1./4.*x12*txs - 1./4. + *x2z*tx - 1./2.*x2z - 1./2.*tx*x12s + 1./4.*txs ) GG10q = GG10q + rwwg(7,14)*vvq*Xps*yc * ( 1./4. + 1./2.*O*x12 - 1. + /2.*O + 1./4.*Os - 1./2.*x12 + 1./4.*x12s ) GG10q = GG10q + rwwg(7,14)*vvq*yc * ( - 1./4.*O*x12*x2z*tx - 1./ + 4.*O*x12*x2z - 1./4.*O*x12*x2zs + 1./2.*O*x12*txs - 1./4.*O* + x2z*tx + 1./4.*O*x2z - 1./2.*O*tx*x2zs + 1./4.*Os*x12*x2z - 1. + /4.*Os*x2z*tx - 1./2.*Os*x2z - 1./4.*Os*x2zs + 1./4.*Os*txs + + 1./4.*Oc*x2z - 3./4.*x12*x2z*tx - 1./4.*x12*tx*x2zs + 1./4. + *x2z*tx - 1./4.*x2z*txs + 1./2.*tx*x2zs + 1./4.*x12s*txs + 1./ + 4.*x2zs ) GG10q = GG10q + rwwg(8,1)*Xpi*vvq*yc * ( - 2*O*x12*x2z*tx + 2*O* + x2z*tx - 2*O*x2z*txs + 2*O*tx*x2zs - 4*O*x2zs - 2*Os*x2z*tx + + 2*Os*x2zs - 2*x12*x2z*tx - 2*x12*x2z*txs + 4*x2z*txs - 2* + tx*x2zs + 2*x2zs ) GG10q = GG10q + rwwg(8,1)*vvq*Xp*yc * ( 2 + 5*O*x12*x2z - 6*O*x12 + *tx + 5*O*x12 + 5*O*x2z*tx - 13*O*x2z + O*tx + O*x12s - 8*O* + txs - 6*O + 2*Os*x12 + 9*Os*x2z - 7*Os*tx + 3*Os + Oc + x12* + x2z*tx - 4*x12*x2z - 3*x12*tx - 8*x12*txs - 4*x12 + 3*x2z*tx + + 4*x2z + tx*x12s + 2*tx + 2*x12s + 4*txs ) GG10q = GG10q + rwwg(8,1)*vvq*Xps*yc * ( - 2 - 8*O*x12 + 4*O*tx + + 8*O - 6*Os + 4*x12*tx + 4*x12 - 4*tx - 2*x12s ) GG10q = GG10q + rwwg(8,1)*vvq*yc * ( 2*O*x12*x2z*tx - 3*O*x12*x2z + + 2*O*x12*tx + 2*O*x12*txs - 7*O*x2z*tx + 3*O*x2z*txs + 10*O + *x2z + O*tx*x12s - 3*O*tx*x2zs - 2*O*tx + 5*O*x2zs + 6*O*txs + - Os*x12*x2z + 2*Os*x12*tx + 2*Os*x2z*tx - 5*Os*x2z + 4*Os* + tx - 3*Os*x2zs + Os*txs - Oc*x2z + Oc*tx - x12*x2z*tx + 3*x12 + *x2z*txs + 4*x12*x2z + 2*x12*tx + 6*x12*txs - 4*x2z*txs - 4* + x2z - 2*tx*x12s + tx*x2zs + x12s*txs - 2*x2zs - 4*txs ) GG10q = GG10q + rwwg(8,4)*Xpi*vvq*yc * ( O*x12*x2zs - O*tx*x2zs + + O*x2zc + x12*tx*x2zs + tx*x2zc - x2zc - x2zs*txs ) GG10q = GG10q + rwwg(8,4)*vvq*Xp*yc * ( - O*x12*x2z*tx + 3*O*x12 + *x2z - 3./2.*O*x12*x2zs + O*x12*txs + O*x12 - 4*O*x2z*tx - 2* + O*x2z*x12s + 3./2.*O*x2z*txs + 4*O*x2z - 1./2.*O*tx*x12s - 3./ + 2.*O*tx*x2zs - O*tx - 1./2.*O*x12s - 1./2.*O*x12c + 13./2.*O* + x2zs + 1./2.*O*txs - 5./2.*Os*x12*x2z + 1./2.*Os*x12*tx - 1./ + 2.*Os*x12 + Os*x2z*tx - 1./2.*Os*x2z + 1./2.*Os*tx - Os*x12s + - 3./2.*Os*x2zs + 1./2.*Os*txs - 1./2.*Oc*x12 - 1./2.*Oc*x2z + + 1./2.*Oc*tx + 3*x12*x2z*tx + 3./2.*x12*x2z*txs + 3*x12*x2z + - 3./2.*x12*tx*x2zs + x12*tx + 3*x12*x2zs + 1./2.*x12*txs - + 2*x2z*tx*x12s + x2z*tx - 7./2.*x2z*txs - 3*x2z - 1./2.*tx* + x12s - 1./2.*tx*x12c + 7./2.*tx*x2zs + 1./2.*x12s*txs - 5* + x2zs - txs ) GG10q = GG10q + rwwg(8,4)*vvq*Xps*yc * ( 1 + 5*O*x12*x2z - 2*O* + x12 + 2*O*x2z*tx - 9*O*x2z + 2*O*tx + 7./2.*O*x12s - 2*O*txs + - 3./2.*O + 7./2.*Os*x12 + 7./2.*Os*x2z - 2*Os*tx + 1./2.*Oc + + 2*x12*x2z*tx - 7*x12*x2z - 2*x12*tx - 2*x12*txs - 3./2.* + x12 - 2*x2z*tx + 3./2.*x2z*x12s + 11./2.*x2z + 2*tx*x12s + 1./ + 2.*x12c + 2*txs ) GG10q = GG10q + rwwg(8,4)*vvq*yc * ( - 2*O*x12*x2z - 4*O*x12*Xpc + - O*x12*x2zs + 2*O*x2z*tx + 1./2.*O*x2z*x12s - 1./2.*O*x2z* + txs + 2*O*tx*x2zs + 4*O*Xpc - 3./2.*O*x2zc - 7./2.*O*x2zs + 1. + /2.*Os*x12*x2z - 1./2.*Os*x2z*tx - 2*Os*Xpc + 1./2.*Os*x2zs + - 2*x12*x2z*tx - 1./2.*x12*x2z*txs - x12*tx*x2zs + 4*x12*Xpc + - 3./2.*x12*x2zs + 1./2.*x2z*tx*x12s + 2*x2z*txs - 3./2.*tx* + x2zc - 2*tx*x2zs - 2*Xpc*x12s - 2*Xpc + 3./2.*x2zc + 3./2.* + x2zs*txs + 3*x2zs ) GG10q = GG10q + rwwg(8,7)*Xpi*vvq*yc * ( - 1./2.*O*x12*x2z*txs + + 1./4.*O*x12*x2zs - 1./4.*O*x2z*tx*x12s + 1./4.*O*tx*x2zc + + 1./4.*O*tx*x2zs - 1./4.*O*x2zc - 1./4.*O*x2zs*txs - 1./2.* + Os*x12*x2z*tx + 1./4.*Os*x12*x2zs - 1./4.*Os*x2z*txs + 1./4.* + Os*x2zc - 1./4.*Os*x2zs - 1./4.*Oc*x2z*tx + 1./4.*Oc*x2zs + 1. + /4.*x12*tx*x2zs - 1./4.*x12*x2zs*txs - 1./4.*x2z*x12s*txs - 1. + /4.*tx*x2zc + 1./2.*x2zs*txs ) GG10q = GG10q + rwwg(8,7)*vvq*Xp*yc * ( - 1./2.*O*x12*x2z*tx + 3. + /4.*O*x12*tx + 3./8.*O*x12*x2zs - 1./2.*O*x12*txs - 1./4.*O* + x12 - 1./4.*O*x2z*x12s - 3./4.*O*x2z*txs + 1./4.*O*x2z - 3./8. + *O*tx*x12s + 3./8.*O*tx*x2zs - 1./4.*O*tx + 3./8.*O*x12s - 1./ + 8.*O*x12c - 3./8.*O*x2zs + 3./4.*O*txs + 1./4.*Os*x12*x2z - 3. + /8.*Os*x12*tx - 1./4.*Os*x2z*tx - 3./4.*Os*x2z + 3./8.*Os*tx + - 1./8.*Os*x12s + 3./8.*Os*x2zs - 1./4.*Os*txs + 1./4.*Os + + 1./8.*Oc*x12 + 1./2.*Oc*x2z - 1./8.*Oc*tx - 3./8.*Oc + 1./8.* + Oq - 3./4.*x12*x2z*txs + 3./8.*x12*tx*x2zs - 1./4.*x12*tx + 3. + /4.*x12*txs - 1./4.*x2z*tx*x12s + 1./4.*x2z*tx + 3./4.*x2z* + txs + 3./8.*tx*x12s - 1./8.*tx*x12c - 3./8.*tx*x2zs - 1./4.* + x12s*txs - 1./2.*txs ) GG10q = GG10q + rwwg(8,7)*vvq*yc * ( 1./4.*O*x12*x2z*tx + O*x12* + x2z*txs - 1./8.*O*x12*tx*x2zs - 1./2.*O*x12*x2zs - 1./2.*O* + x12*txs + 3./8.*O*x2z*tx*x12s + 1./8.*O*x2z*x12s - 1./4.*O*tx + *x12s + 1./8.*O*tx*x12c - 3./8.*O*tx*x2zc - 1./4.*O*tx*x2zs + + 3./8.*O*x12s*txs + 3./8.*O*x2zc + 3./8.*O*x2zs*txs + 3./4. + *Os*x12*x2z*tx + 1./4.*Os*x12*x2z - 1./2.*Os*x12*tx - 1./2.* + Os*x12*x2zs + 3./8.*Os*x12*txs + 1./8.*Os*x2z*tx - 1./8.*Os* + x2z*x12s + 1./2.*Os*x2z*txs + 3./8.*Os*tx*x12s - 1./8.*Os*tx* + x2zs - 3./8.*Os*x2zc + 1./2.*Os*x2zs - 1./4.*Os*txs - 1./4.* + Oc*x12*x2z + 3./8.*Oc*x12*tx + 3./8.*Oc*x2z*tx + 1./8.*Oc*x2z + - 1./4.*Oc*tx - 1./2.*Oc*x2zs + 1./8.*Oc*txs - 1./8.*Oq*x2z + + 1./8.*Oq*tx - 1./2.*x12*tx*x2zs + 3./8.*x12*x2zs*txs + 1./ + 8.*x2z*tx*x12s + 1./2.*x2z*x12s*txs + 3./8.*tx*x2zc - 1./4.* + x12s*txs + 1./8.*x12c*txs - 3./4.*x2zs*txs ) GG10q = GG10q + rwwg(8,8)*vvq*Xp*yc * ( - O*x12 + 2*O*x2z*tx - 3 + *O*x2z + O*tx + O*x12s - O*x2zs - O*txs + Os*x12 + Os*x2z - + Os*tx - 2*x12*x2z - x12*tx - x12*txs - x2z*tx + x2z*txs + 2* + x2z + tx*x12s - tx*x2zs + x2zs + txs ) GG10q = GG10q + rwwg(8,8)*vvq*Xps*yc * ( - 1 - O*x12*x2z - O*x12 + - O*x2z*tx + 3*O*x2z - O*tx - O*x12s + O*txs + 2*O - Os*x12 + - Os*x2z + Os*tx - Os - x12*x2z*tx + 2*x12*x2z + x12*tx + + x12*txs + 2*x12 + x2z*tx - 2*x2z - tx*x12s - x12s - txs ) GG10q = GG10q + rwwg(8,8)*vvq*yc * ( O*x12*x2z + 2*O*x12*Xpc - O* + x2z*tx - 2*O*Xpc + O*x2zs + Os*Xpc + x12*x2z*tx - 2*x12*Xpc + - x2z*txs + tx*x2zs + Xpc*x12s + Xpc - x2zs ) GG10q = GG10q + rwwg(8,11)*vvq*Xp*yc * ( - O*x12*x2z + O*x12 - O + *x2z*tx + 3*O*x2z - O*tx - O*x12s + O*txs - Os*x12 - Os*x2z + + Os*tx - x12*x2z*tx + 2*x12*x2z + x12*tx + x12*txs + x2z*tx + - 2*x2z - tx*x12s - txs ) GG10q = GG10q + rwwg(8,11)*vvq*Xps*yc * ( 1 + 2*O*x12 - 2*O + Os + - 2*x12 + x12s ) GG10q = GG10q + rwwg(8,11)*vvq*yc * ( - O*x12*x2z + O*x2z*tx - O + *x2zs - x12*x2z*tx + x2z*txs - tx*x2zs + x2zs ) GG10q = GG10q + rwwg(8,12)*Xpi*vvq*yc * ( O*x2z*tx - O*x2zs - x12 + *x2z*tx + 2*x2z*txs - 2*tx*x2zs + x2zs ) GG10q = GG10q + rwwg(8,12)*vvq*Xp*yc * ( 1 + 2*O*x12*x2z + O*x12 + + 3*O*x2z*tx - 6*O*x2z + 2*O*tx + O*x12s - 3*O*txs - 2*O + + Os*x12 + 2*Os*x2z - 2*Os*tx + Os + 3*x12*x2z*tx - 4*x12*x2z + - 2*x12*tx - 3*x12*txs - 2*x12 - 3*x2z*tx + 4*x2z + 2*tx* + x12s + x12s + 3*txs ) GG10q = GG10q + rwwg(8,12)*vvq*Xps*yc * ( - 2 - 4*O*x12 + 4*O - + 2*Os + 4*x12 - 2*x12s ) GG10q = GG10q + rwwg(8,12)*vvq*yc * ( - 4*O*x2z*tx + 3*O*x2z - O + *tx + 2*O*x2zs + 2*O*txs - Os*x2z + Os*tx + 2*x12*x2z + x12* + tx + 2*x12*txs + 2*x2z*tx - 3*x2z*txs - 2*x2z - tx*x12s + 3* + tx*x2zs - 2*x2zs - 2*txs ) GG10q = GG10q + rwwg(8,13)*Xpi*vvq*yc * ( - 1./2.*O*x12*x2z*tx + + 1./2.*O*x2z*tx - 1./2.*O*x2z*txs + 1./2.*O*tx*x2zs - O* + x2zs - 1./2.*Os*x2z*tx + 1./2.*Os*x2zs - 1./2.*x12*x2z*tx - 1. + /2.*x12*x2z*txs + x2z*txs - 1./2.*tx*x2zs + 1./2.*x2zs ) GG10q = GG10q + rwwg(8,13)*vvq*Xp*yc * ( 1./2. + 5./4.*O*x12*x2z + - 1./2.*O*x12*tx + 5./4.*O*x12 + 3./4.*O*x2z*tx - 9./4.*O* + x2z + 3./4.*O*tx - 1./4.*O*x12s - 3./2.*O*txs - O + 5./4.*Os* + x2z - 3./4.*Os*tx + 1./4.*Os + 1./4.*Oc + 3./4.*x12*x2z*tx - + x12*x2z - 1./4.*x12*tx - 3./2.*x12*txs - x12 - 3./4.*x2z*tx + + x2z + 1./4.*tx*x12s + 1./2.*x12s + 3./2.*txs ) GG10q = GG10q + rwwg(8,13)*vvq*Xps*yc * ( - 1./2. - O*x12 + O - + 1./2.*Os + x12 - 1./2.*x12s ) GG10q = GG10q + rwwg(8,13)*vvq*yc * ( 1./2.*O*x12*x2z*tx - 5./4.* + O*x12*x2z + 1./2.*O*x12*txs - 5./4.*O*x2z*tx + 3./4.*O*x2z* + txs + 2*O*x2z + 1./4.*O*tx*x12s - 3./4.*O*tx*x2zs - 1./2.*O* + tx + 5./4.*O*x2zs + O*txs - 1./4.*Os*x12*x2z + 1./2.*Os*x12* + tx + 1./2.*Os*x2z*tx - 3./4.*Os*x2z + 1./2.*Os*tx - 3./4.*Os* + x2zs + 1./4.*Os*txs - 1./4.*Oc*x2z + 1./4.*Oc*tx - 1./4.*x12* + x2z*tx + 3./4.*x12*x2z*txs + x12*x2z + 1./2.*x12*tx + x12*txs + + 1./2.*x2z*tx - 3./2.*x2z*txs - x2z - 1./2.*tx*x12s + 3./4. + *tx*x2zs + 1./4.*x12s*txs - 1./2.*x2zs - txs ) GG10q = GG10q + rwwg(8,14)*Xpi*vvq*yc * ( 1./2.*O*x12*x2z*tx + 1./ + 2.*O*x2z*txs - 1./2.*O*tx*x2zs + 1./2.*O*x2zs + 1./2.*Os*x2z* + tx - 1./2.*Os*x2zs + 1./2.*x12*x2z*txs - 1./2.*tx*x2zs ) GG10q = GG10q + rwwg(8,14)*vvq*Xp*yc * ( - 3./4.*O*x12*x2z + O* + x12*tx - 3./4.*O*x12 - 1./4.*O*x2z*tx + 5./4.*O*x2z + 1./4.*O + *tx + 1./4.*O*x12s + O*txs + 1./2.*O - 5./4.*Os*x2z + 3./4.* + Os*tx - 1./4.*Os - 1./4.*Oc + 1./4.*x12*x2z*tx + 1./4.*x12*tx + + x12*txs - 3./4.*x2z*tx + 1./4.*tx*x12s - 1./2.*tx - 1./2.* + txs ) GG10q = GG10q + rwwg(8,14)*vvq*Xps*yc * ( 1./2.*O*x12 - 1./2.*O* + tx - 1./2.*O + 1./2.*Os - 1./2.*x12*tx + 1./2.*tx ) GG10q = GG10q + rwwg(8,14)*vvq*yc * ( - 1./2.*O*x12*x2z*tx + 3./ + 4.*O*x12*x2z - 1./2.*O*x12*tx - 1./2.*O*x12*txs + 1./4.*O*x2z + *tx - 3./4.*O*x2z*txs - O*x2z - 1./4.*O*tx*x12s + 3./4.*O*tx* + x2zs - 3./4.*O*x2zs - 1./2.*O*txs + 1./4.*Os*x12*x2z - 1./2.* + Os*x12*tx - 1./2.*Os*x2z*tx + 3./4.*Os*x2z - 1./2.*Os*tx + 3./ + 4.*Os*x2zs - 1./4.*Os*txs + 1./4.*Oc*x2z - 1./4.*Oc*tx - 1./4. + *x12*x2z*tx - 3./4.*x12*x2z*txs - 1./2.*x12*txs + x2z*tx + 1./ + 2.*x2z*txs + 1./4.*tx*x2zs - 1./4.*x12s*txs ) GG10q = GG10q + rwwg(9,1)*Xpi*vvq*yc * ( 4*O*x2z*tx + 4*O*txs + 4 + *x12*txs - 4*x2z*tx ) GG10q = GG10q + rwwg(9,1)*vvq*Xp*yc * ( 20*O*tx + 4*x12*tx - 4*tx + ) GG10q = GG10q + rwwg(9,1)*vvq*yc * ( - 4*O*x12*tx - 8*O*x2z*tx + - 12*O*tx - 4*O*txs - 4*Os*tx - 4*x12*tx - 4*x12*txs + 4*x2z + *tx + 4*tx ) GG10q = GG10q + rwwg(9,4)*Xpi*vvq*yc * ( - O*x12*x2z*tx - O*x2z* + txs + O*tx*x2zs - O*x2zs - Os*x2z*tx + Os*x2zs - x12*x2z*txs + + tx*x2zs ) GG10q = GG10q + rwwg(9,4)*vvq*Xp*yc * ( 3./2.*O*x12*x2z - 3*O*x12 + *tx + 1./2.*O*x12 + 1./2.*O*x2z*tx - 7./2.*O*x2z - 1./2.*O*tx + + 1./2.*O*x12s - 2*O*txs - O + Os*x12 + 7./2.*Os*x2z - 5./2. + *Os*tx + 1./2.*Os + 1./2.*Oc - 3./2.*x12*x2z*tx - 1./2.*x12* + tx - 2*x12*txs + 7./2.*x2z*tx - 1./2.*tx*x12s + tx ) GG10q = GG10q + rwwg(9,4)*vvq*Xps*yc * ( - 2*O*x12 + 2*O*tx + 2* + O - 2*Os + 2*x12*tx - 2*tx ) GG10q = GG10q + rwwg(9,4)*vvq*yc * ( O*x12*x2z*tx - 1./2.*O*x12* + x2z + O*x12*tx + O*x12*txs - 1./2.*O*x2z*tx + 3./2.*O*x2z*txs + + 2*O*x2z + 1./2.*O*tx*x12s - 3./2.*O*tx*x2zs + 3./2.*O*x2zs + + O*txs - 1./2.*Os*x12*x2z + Os*x12*tx + Os*x2z*tx - 3./2.* + Os*x2z + Os*tx - 3./2.*Os*x2zs + 1./2.*Os*txs - 1./2.*Oc*x2z + + 1./2.*Oc*tx + 1./2.*x12*x2z*tx + 3./2.*x12*x2z*txs + x12* + txs - 2*x2z*tx - 3./2.*tx*x2zs + 1./2.*x12s*txs ) GG10q = GG10q + rwwg(9,7)*Xpi*vvq*yc * ( 1./2.*O*x12*x2z*tx + 1./ + 2.*O*x2z*txs + 1./2.*O*tx*x2zs - 1./2.*O*x2zs + 1./2.*Os*x2z* + tx + 1./2.*Os*x2zs + 1./2.*x12*x2z*txs - 1./2.*tx*x2zs ) GG10q = GG10q + rwwg(9,7)*vvq*Xp*yc * ( 3./4.*O*x12*x2z + 1./2.*O + *x12*tx - 3./4.*O*x12 + 3./4.*O*x2z*tx - 3./4.*O*x2z - 3./4.* + O*tx + 1./4.*O*x12s + 1./2.*O + 1./2.*Os*x12 + 3./4.*Os*x2z + + 1./4.*Os*tx - 3./4.*Os + 1./4.*Oc + 3./4.*x12*x2z*tx - 3./ + 4.*x12*tx - 3./4.*x2z*tx + 1./4.*tx*x12s + 1./2.*tx ) GG10q = GG10q + rwwg(9,7)*vvq*yc * ( - O*x12*x2z*tx - 1./4.*O* + x12*x2z + 1./2.*O*x12*tx - 1./2.*O*x12*txs + 1./4.*O*x2z*tx + - 3./4.*O*x2z*txs - 1./4.*O*tx*x12s - 3./4.*O*tx*x2zs + 3./4. + *O*x2zs + 1./2.*O*txs - 1./4.*Os*x12*x2z - 1./2.*Os*x12*tx - + Os*x2z*tx + 1./4.*Os*x2z + 1./2.*Os*tx - 3./4.*Os*x2zs - 1./4. + *Os*txs - 1./4.*Oc*x2z - 1./4.*Oc*tx - 1./4.*x12*x2z*tx - 3./ + 4.*x12*x2z*txs + 1./2.*x12*txs + 3./4.*tx*x2zs - 1./4.*x12s* + txs ) GG10q = GG10q + rwwg(9,8)*vvq*Xp*yc * ( 2*O*x12*tx - 2*O*x12 - 2* + O*x2z*tx + 2*O*x2z + 2*O*tx + 2*O*txs + 2*O - 2*Os*x2z + 2*Os + *tx - 2*Os + 2*x12*tx + 2*x12*txs - 2*x2z*tx - 2*tx ) GG10q = GG10q + rwwg(9,8)*vvq*Xps*yc * ( 2*O*x12 - 2*O*tx - 2*O + + 2*Os - 2*x12*tx + 2*tx ) GG10q = GG10q + rwwg(9,8)*vvq*yc * ( - 2*O*x12*tx + 2*O*x2z*tx + - 2*O*x2z - 2*O*txs + 2*Os*x2z - 2*Os*tx - 2*x12*txs + 2*x2z + *tx ) GG10q = GG10q + rwwg(9,9)*vvq*Xp*yc * ( - 4*O*tx ) GG10q = GG10q + rwwg(9,9)*vvq*yc * ( 4*O*tx ) GG10q = GG10q + rwwg(9,11)*vvq*Xp*yc * ( O*x12 - O*tx - O + Os - + x12*tx + tx ) GG10q = GG10q + rwwg(9,11)*vvq*yc * ( O*x12*tx - O*x2z*tx + O*x2z + + O*txs - Os*x2z + Os*tx + x12*txs - x2z*tx ) GG10q = GG10q + rwwg(9,12)*Xpi*vvq*yc * ( - 2*O*x2z*tx + 2*O*txs + + 2*x12*txs - 2*x2z*tx ) GG10q = GG10q + rwwg(9,12)*vvq*Xp*yc * ( - O*x12 + 3*O*tx + O - + Os + 3*x12*tx - 3*tx ) GG10q = GG10q + rwwg(9,12)*vvq*yc * ( - O*x12*tx + 3*O*x2z*tx - + O*x2z - 2*O*tx - 3*O*txs + Os*x2z - Os*tx - 2*x12*tx - 3*x12* + txs + 3*x2z*tx + 2*tx ) GG10q = GG10q + rwwg(9,13)*Xpi*vvq*yc * ( O*x2z*tx + O*txs + x12* + txs - x2z*tx ) GG10q = GG10q + rwwg(9,13)*vvq*Xp*yc * ( 1./2.*O*x12 + 3./2.*O*tx + - 1./2.*O + 1./2.*Os + 3./2.*x12*tx - 3./2.*tx ) GG10q = GG10q + rwwg(9,13)*vvq*yc * ( - 1./2.*O*x12*tx - 3./2.*O + *x2z*tx + 1./2.*O*x2z - O*tx - 3./2.*O*txs - 1./2.*Os*x2z - 1. + /2.*Os*tx - x12*tx - 3./2.*x12*txs + 3./2.*x2z*tx + tx ) GG10q = GG10q + rwwg(9,14)*Xpi*vvq*yc * ( - 2*O*x2z*tx ) GG10q = GG10q + rwwg(9,14)*vvq*Xp*yc * ( - 1./2.*O*x12 - 5./2.*O + *tx + 1./2.*O - 1./2.*Os - 1./2.*x12*tx + 1./2.*tx ) GG10q = GG10q + rwwg(9,14)*vvq*yc * ( 1./2.*O*x12*tx + 5./2.*O* + x2z*tx - 1./2.*O*x2z + 2*O*tx + 1./2.*O*txs + 1./2.*Os*x2z + + 1./2.*Os*tx + 1./2.*x12*txs - 1./2.*x2z*tx ) GG10q = GG10q + rwwg(10,1)*XX*vvq*yc * ( 2*O*x12*x2z*txs - 2*O* + x2zc + 2*O*x2zs*txs + Os*x2z*txs + Os*x2zc - 2*x12*tx*x2zs + + 2*x12*x2zs*txs + x2z*x12s*txs + x2zc - 2*x2zs*txs ) GG10q = GG10q + rwwg(10,1)*Xpi*vvq*yc * ( 3*O*x12*x2z*tx + 2*O* + x12*x2zs + 2*O*x12*txs + 5*O*x2z*txs + O*tx*x2zs - 7*O*x2zs + + Os*x2z*tx + 4*Os*x2zs + Os*txs - 4*x12*x2z*tx + 5*x12*x2z* + txs - 2*x12*x2zs + 2*x2z*tx*x12s - 4*x2z*txs - tx*x2zs + x12s + *txs + 3*x2zs ) GG10q = GG10q + rwwg(10,1)*vvq*Xp*yc * ( 1 + 11./2.*O*x12*x2z + 5 + *O*x12*tx + 5./2.*O*x12 + 7./2.*O*x2z*tx - 19./2.*O*x2z + 1./ + 2.*O*tx + 1./2.*O*x12s + 5*O*txs - 3*O + 13./2.*Os*x2z + 5./2. + *Os*tx + 5./2.*Os - 1./2.*Oc + 3./2.*x12*x2z*tx - 4*x12*x2z + - 3./2.*x12*tx + 5*x12*txs - 2*x12 - 7./2.*x2z*tx + x2z*x12s + + 3*x2z + 5./2.*tx*x12s - tx + x12s - 3*txs ) GG10q = GG10q + rwwg(10,1)*vvq*Xps*yc * ( - 1 - 4*O*x12 - 2*O*tx + + 4*O - 3*Os - 2*x12*tx + 2*x12 + 2*tx - x12s ) GG10q = GG10q + rwwg(10,1)*vvq*yc * ( - 4*O*x12*x2z*tx - 9./2.*O + *x12*x2z - 3*O*x12*tx - 2*O*x12*x2zs - 3*O*x12*txs - 3./2.*O* + x2z*tx - 13./2.*O*x2z*txs + 8*O*x2z - 1./2.*O*tx*x12s - 3./2. + *O*tx*x2zs + 15./2.*O*x2zs - 3*O*txs + 1./2.*Os*x12*x2z - Os* + x12*tx - 2*Os*x2z*tx - 11./2.*Os*x2z - Os*tx - 9./2.*Os*x2zs + - 3./2.*Os*txs + 1./2.*Oc*x2z - 1./2.*Oc*tx + 7./2.*x12*x2z* + tx - 13./2.*x12*x2z*txs + 4*x12*x2z + 2*x12*tx + 2*x12*x2zs + - 3*x12*txs - 2*x2z*tx*x12s + 2*x2z*tx - x2z*x12s + 5*x2z* + txs - 3*x2z - 2*tx*x12s + 3./2.*tx*x2zs - 3./2.*x12s*txs - 3* + x2zs + 2*txs ) GG10q = GG10q + rwwg(10,4)*XX*vvq*yc * ( 1./4.*O*x12*x2zc - 1./2. + *O*x12*x2zs*txs - 1./4.*O*tx*x12s*x2zs + 1./4.*O*tx*x2zq + 1./ + 4.*O*tx*x2zc - 1./4.*O*x2zq - 1./4.*O*x2zc*txs - 1./2.*Os*x12 + *tx*x2zs + 1./4.*Os*x12*x2zc + 1./4.*Os*x2zq - 1./4.*Os*x2zc + - 1./4.*Os*x2zs*txs - 1./4.*Oc*tx*x2zs + 1./4.*Oc*x2zc + 1./ + 4.*x12*tx*x2zc - 1./4.*x12*x2zc*txs - 1./4.*tx*x2zq - 1./4.* + x12s*x2zs*txs + 1./2.*x2zc*txs ) GG10q = GG10q + rwwg(10,4)*Xpi*vvq*yc * ( - O*x12*x2z*txs - 1./2. + *O*x12*tx*x2zs + 1./4.*O*x12*x2zc + 3./4.*O*x12*x2zs - 1./2.* + O*x2z*tx*x12s + 3./4.*O*tx*x2zc + 3./4.*O*tx*x2zs - 1./4.*O* + x12s*x2zs - 3./4.*O*x2zc - O*x2zs*txs - Os*x12*x2z*tx + 1./2. + *Os*x12*x2zs - 1./2.*Os*x2z*txs - 1./4.*Os*tx*x2zs + 3./4.*Os + *x2zc - 3./4.*Os*x2zs - 1./2.*Oc*x2z*tx + 3./4.*Oc*x2zs + 1./ + 4.*x12*tx*x2zc + 3./4.*x12*tx*x2zs - x12*x2zs*txs - 1./2.*x2z + *x12s*txs - 1./4.*tx*x12s*x2zs - 3./4.*tx*x2zc + 3./2.*x2zs* + txs ) GG10q = GG10q + rwwg(10,4)*vvq*Xp*yc * ( - 3./2.*O*x12*x2z*tx + + 3./2.*O*x12*x2z - 1./2.*O*x12*tx + 3./4.*O*x12*x2zs - O*x12* + txs + 1./4.*O*x12 + 3./2.*O*x2z*tx - 3./4.*O*x2z*x12s - 2*O* + x2z*txs - 1./4.*O*x2z - 1./2.*O*tx*x12s + 5./4.*O*tx*x2zs + 1. + /4.*O*tx - 1./4.*O*x12s - 5./4.*O*x2zs - 1./2.*O*txs + 1./2.* + Os*x12*x2z - Os*x12*tx - 3./4.*Os*x2z*tx - Os*x2z - 1./4.*Os* + tx + 5./4.*Os*x2zs - 1./2.*Os*txs - 1./4.*Os + 5./4.*Oc*x2z + - 1./2.*Oc*tx + 1./4.*Oc + 3./2.*x12*x2z*tx - 2*x12*x2z*txs + + 3./4.*x12*tx*x2zs + 1./4.*x12*tx - 1./2.*x12*txs - 3./4.* + x2z*tx*x12s - 1./4.*x2z*tx + 5./2.*x2z*txs - 1./4.*tx*x12s - + 5./4.*tx*x2zs - 1./2.*x12s*txs + 1./2.*txs ) GG10q = GG10q + rwwg(10,4)*vvq*Xps*yc * ( - 1./2.*O*x12*x2z + O* + x12*tx - 1./2.*O*x12 - 1./2.*O*x2z*tx + 1./2.*O*x2z - 1./2.*O + *tx + 1./2.*O*x12s + O*txs - 1./2.*Os*x2z + 1./2.*Os*tx + 1./ + 2.*Os - 1./2.*Oc - 1./2.*x12*x2z*tx - 1./2.*x12*tx + x12*txs + + 1./2.*x2z*tx + 1./2.*tx*x12s - txs ) GG10q = GG10q + rwwg(10,4)*vvq*yc * ( O*x12*x2z*tx + 3./2.*O*x12* + x2z*txs - 3./4.*O*x12*x2z + 1./2.*O*x12*tx*x2zs - 1./4.*O*x12 + *x2zc - 3./2.*O*x12*x2zs + 1./2.*O*x12*txs + 3./4.*O*x2z*tx* + x12s - 3./4.*O*x2z*tx + 1./2.*O*x2z*x12s + 5./4.*O*x2z*txs + + 1./4.*O*tx*x12s - O*tx*x2zc - 7./4.*O*tx*x2zs + 1./4.*O*x12s* + x2zs + O*x2zc + 5./4.*O*x2zs*txs + 3./4.*O*x2zs + 3./2.*Os* + x12*x2z*tx - 1./4.*Os*x12*x2z + 1./2.*Os*x12*tx - 3./4.*Os* + x12*x2zs + 1./2.*Os*x2z*tx + 3./4.*Os*x2z*txs + 3./4.*Os*x2z + + 1./4.*Os*tx*x2zs - Os*x2zc + 1./4.*Os*x2zs + 1./4.*Os*txs + + 3./4.*Oc*x2z*tx - 3./4.*Oc*x2z + 1./4.*Oc*tx - Oc*x2zs - 3. + /4.*x12*x2z*tx + 5./4.*x12*x2z*txs - 1./4.*x12*tx*x2zc - 3./2. + *x12*tx*x2zs + 5./4.*x12*x2zs*txs + 1./2.*x2z*tx*x12s + 3./4. + *x2z*x12s*txs - 3./2.*x2z*txs + 1./4.*tx*x12s*x2zs + tx*x2zc + + 3./4.*tx*x2zs + 1./4.*x12s*txs - 2*x2zs*txs ) GG10q = GG10q + rwwg(10,7)*XX*vvq*yc * ( 1./2.*O*x12*x2zs*txs - 1. + /2.*O*x2zq + 1./4.*O*x2zc*txs + 1./4.*Os*x12*x2zc + 1./4.*Os* + x2zq - 1./4.*Os*x2zc + 1./4.*Os*x2zs*txs + 1./4.*Oc*x2zc - 1./ + 2.*x12*tx*x2zc + 1./4.*x12*x2zc*txs + 1./4.*x12s*x2zs*txs + 1. + /4.*x2zq - 1./4.*x2zc*txs ) GG10q = GG10q + rwwg(10,7)*Xpi*vvq*yc * ( 1./2.*O*x12*x2z*txs + 1. + /2.*O*x12*tx*x2zs + 1./2.*O*x12*x2zc - 3./2.*O*x2zc + 1./2.*O + *x2zs*txs + 1./2.*Os*x12*x2zs + 1./4.*Os*x2z*txs + 3./4.*Os* + x2zc - 1./2.*Os*x2zs + 1./2.*Oc*x2zs - x12*tx*x2zs - 1./2.* + x12*x2zc + 1./2.*x12*x2zs*txs + 1./4.*x2z*x12s*txs + 1./2.*tx + *x12s*x2zs + 3./4.*x2zc - 1./2.*x2zs*txs ) GG10q = GG10q + rwwg(10,7)*vvq*Xp*yc * ( 3./4.*O*x12*x2z*tx + 5./ + 4.*O*x12*x2z + 1./4.*O*x12*tx + 5./4.*O*x12*x2zs - 1./4.*O* + x12*txs - 1./4.*O*x2z*x12s + 3./8.*O*x2z*txs - 3./4.*O*x2z - + 1./2.*O*tx*x12s - 2*O*x2zs + 1./8.*O*txs - 1./8.*Os*x12*x2z + - 1./4.*Os*x12*tx + 1./8.*Os*x12 + 3./8.*Os*x2z - 1./8.*Os* + x12s + Os*x2zs - 1./8.*Os*txs - 1./4.*Oc*x12 + 1./8.*Oc*x2z + + 1./8.*Oc - 1./8.*Oq - 3./4.*x12*x2z*tx + 3./8.*x12*x2z*txs + - 3./4.*x12*x2z - 5./4.*x12*x2zs + 1./8.*x12*txs + 3./4.*x2z + *tx*x12s + 1./2.*x2z*x12s - 3./8.*x2z*txs + 1./4.*x2z + 1./4. + *tx*x12s - 1./4.*tx*x12c + 1./4.*x12s*x2zs - 1./8.*x12s*txs + + x2zs ) GG10q = GG10q + rwwg(10,7)*vvq*Xps*yc * ( - 3./4.*O*x12*x2z - 1./ + 2.*O*x12 + 3./4.*O*x2z + 3./8.*O*x12s + 1./8.*O + 3./8.*Os* + x12 - 3./8.*Os*x2z - 1./4.*Os + 1./8.*Oc + 3./4.*x12*x2z + 1./ + 8.*x12 - 3./8.*x2z*x12s - 3./8.*x2z - 1./4.*x12s + 1./8.*x12c + ) GG10q = GG10q + rwwg(10,7)*vvq*yc * ( - 3./4.*O*x12*x2z*tx - 1./ + 2.*O*x12*x2z*txs - 1./2.*O*x12*tx*x2zs - 1./2.*O*x12*x2zc - 5. + /4.*O*x12*x2zs - 3./8.*O*x2z*txs + 3./8.*O*x12s*txs + 7./4.*O + *x2zc - 5./8.*O*x2zs*txs + 13./8.*O*x2zs - 3./8.*Os*x12*x2z + - 1./2.*Os*x12*x2zs + 3./8.*Os*x12*txs + 1./8.*Os*x2z*x12s + - 1./4.*Os*x2z*txs + 1./4.*Os*x2z - 7./8.*Os*x2zc - 3./8.*Os + *x2zs + 1./4.*Oc*x12*x2z - 3./8.*Oc*x2z - 1./2.*Oc*x2zs + 1./ + 8.*Oc*txs + 1./8.*Oq*x2z + 1./2.*x12*x2z*tx - 3./8.*x12*x2z* + txs + 5./4.*x12*tx*x2zs + 1./2.*x12*x2zc - 5./8.*x12*x2zs*txs + + 9./8.*x12*x2zs - 3./4.*x2z*tx*x12s - 1./4.*x2z*x12s*txs + + 1./4.*x2z*txs - 1./2.*tx*x12s*x2zs - 1./4.*x12s*x2zs + 1./8.* + x12c*txs - 7./8.*x2zc + 5./8.*x2zs*txs - 3./4.*x2zs ) GG10q = GG10q + rwwg(10,8)*Xpi*vvq*yc * ( 1./2.*O*x12*x2z*txs - 1. + /4.*O*x12*x2zs + 1./4.*O*x2z*tx*x12s - 1./4.*O*tx*x2zc - 1./4. + *O*tx*x2zs + 1./4.*O*x2zc + 1./4.*O*x2zs*txs + 1./2.*Os*x12* + x2z*tx - 1./4.*Os*x12*x2zs + 1./4.*Os*x2z*txs - 1./4.*Os*x2zc + + 1./4.*Os*x2zs + 1./4.*Oc*x2z*tx - 1./4.*Oc*x2zs - 1./4.* + x12*tx*x2zs + 1./4.*x12*x2zs*txs + 1./4.*x2z*x12s*txs + 1./4. + *tx*x2zc - 1./2.*x2zs*txs ) GG10q = GG10q + rwwg(10,8)*vvq*Xp*yc * ( 1./2.*O*x12*x2z*tx - O* + x12*x2z + 1./4.*O*x12*tx - 3./8.*O*x12*x2zs + 3./2.*O*x12*txs + - 1./4.*O*x12 - O*x2z*tx + 1./4.*O*x2z*x12s + 5./4.*O*x2z* + txs + 1./4.*O*x2z + 7./8.*O*tx*x12s - 7./8.*O*tx*x2zs - 1./4. + *O*tx + 1./8.*O*x12s + 1./8.*O*x12c + 7./8.*O*x2zs + 1./4.*O* + txs - 3./4.*Os*x12*x2z + 11./8.*Os*x12*tx + 1./4.*Os*x2z*tx + + 3./4.*Os*x2z + 1./8.*Os*tx + 1./8.*Os*x12s - 7./8.*Os*x2zs + + 3./4.*Os*txs + 1./4.*Os - 1./8.*Oc*x12 - Oc*x2z + 5./8.*Oc + *tx - 1./8.*Oc - 1./8.*Oq - x12*x2z*tx + 5./4.*x12*x2z*txs - + 3./8.*x12*tx*x2zs - 1./4.*x12*tx + 1./4.*x12*txs + 1./4.*x2z* + tx*x12s + 1./4.*x2z*tx - 7./4.*x2z*txs + 1./8.*tx*x12s + 1./8. + *tx*x12c + 7./8.*tx*x2zs + 3./4.*x12s*txs - 1./2.*txs ) GG10q = GG10q + rwwg(10,8)*vvq*Xps*yc * ( 1./2.*O*x12*x2z - O*x12 + *tx + 1./2.*O*x12 + 1./2.*O*x2z*tx - 1./2.*O*x2z + 1./2.*O*tx + - 1./2.*O*x12s - O*txs + 1./2.*Os*x2z - 1./2.*Os*tx - 1./2.* + Os + 1./2.*Oc + 1./2.*x12*x2z*tx + 1./2.*x12*tx - x12*txs - 1. + /2.*x2z*tx - 1./2.*tx*x12s + txs ) GG10q = GG10q + rwwg(10,8)*vvq*yc * ( - 1./4.*O*x12*x2z*tx - O* + x12*x2z*txs + 1./2.*O*x12*x2z + 1./8.*O*x12*tx*x2zs + 1./2.*O + *x12*x2zs - 1./2.*O*x12*txs - 3./8.*O*x2z*tx*x12s + 1./2.*O* + x2z*tx - 1./8.*O*x2z*x12s - 1./2.*O*x2z*txs - 1./4.*O*tx*x12s + - 1./8.*O*tx*x12c + 3./8.*O*tx*x2zc + 3./4.*O*tx*x2zs - 3./8. + *O*x12s*txs - 3./8.*O*x2zc - 3./8.*O*x2zs*txs - 1./2.*O*x2zs + - 3./4.*Os*x12*x2z*tx + 1./4.*Os*x12*x2z - 1./2.*Os*x12*tx + + 1./2.*Os*x12*x2zs - 3./8.*Os*x12*txs - 1./8.*Os*x2z*tx + 1. + /8.*Os*x2z*x12s - 1./2.*Os*x2z*txs - 1./2.*Os*x2z - 3./8.*Os* + tx*x12s + 1./8.*Os*tx*x2zs + 3./8.*Os*x2zc - 1./4.*Os*txs + 1. + /4.*Oc*x12*x2z - 3./8.*Oc*x12*tx - 3./8.*Oc*x2z*tx + 3./8.*Oc + *x2z - 1./4.*Oc*tx + 1./2.*Oc*x2zs - 1./8.*Oc*txs + 1./8.*Oq* + x2z - 1./8.*Oq*tx + 1./2.*x12*x2z*tx - 1./2.*x12*x2z*txs + 1./ + 2.*x12*tx*x2zs - 3./8.*x12*x2zs*txs - 1./8.*x2z*tx*x12s - 1./ + 2.*x2z*x12s*txs + x2z*txs - 3./8.*tx*x2zc - 1./2.*tx*x2zs - 1. + /4.*x12s*txs ) GG10q = GG10q + rwwg(10,8)*vvq*yc * ( - 1./8.*x12c*txs + 3./4.* + x2zs*txs ) GG10q = GG10q + rwwg(10,9)*Xpi*vvq*yc * ( - 1./2.*O*x12*x2z*tx + - 1./2.*O*x2z*txs - 1./2.*O*tx*x2zs + 1./2.*O*x2zs - 1./2.* + Os*x2z*tx - 1./2.*Os*x2zs - 1./2.*x12*x2z*txs + 1./2.*tx*x2zs + ) GG10q = GG10q + rwwg(10,9)*vvq*Xp*yc * ( - 3./4.*O*x12*x2z - 3./ + 2.*O*x12*tx - 1./4.*O*x12 - 7./4.*O*x2z*tx + 7./4.*O*x2z - 1./ + 4.*O*tx - 1./4.*O*x12s - O*txs + 1./2.*O - 1./2.*Os*x12 - 7./ + 4.*Os*x2z - 5./4.*Os*tx - 1./4.*Os - 1./4.*Oc - 3./4.*x12*x2z + *tx - 1./4.*x12*tx - x12*txs + 7./4.*x2z*tx - 1./4.*tx*x12s + + 1./2.*tx ) GG10q = GG10q + rwwg(10,9)*vvq*Xps*yc * ( O*x12 + O*tx - O + Os + + x12*tx - tx ) GG10q = GG10q + rwwg(10,9)*vvq*yc * ( O*x12*x2z*tx + 1./4.*O*x12* + x2z + 1./2.*O*x12*tx + 1./2.*O*x12*txs + 3./4.*O*x2z*tx + 3./ + 4.*O*x2z*txs - O*x2z + 1./4.*O*tx*x12s + 3./4.*O*tx*x2zs - 3./ + 4.*O*x2zs + 1./2.*O*txs + 1./4.*Os*x12*x2z + 1./2.*Os*x12*tx + + Os*x2z*tx + 3./4.*Os*x2z + 1./2.*Os*tx + 3./4.*Os*x2zs + 1. + /4.*Os*txs + 1./4.*Oc*x2z + 1./4.*Oc*tx + 1./4.*x12*x2z*tx + + 3./4.*x12*x2z*txs + 1./2.*x12*txs - x2z*tx - 3./4.*tx*x2zs + + 1./4.*x12s*txs ) GG10q = GG10q + rwwg(10,10)*XX*vvq*yc * ( - 1./4.*O*x12*x2zs*txs + + 1./4.*O*x2zq - 1./8.*O*x2zc*txs - 1./8.*Os*x12*x2zc - 1./8. + *Os*x2zq + 1./8.*Os*x2zc - 1./8.*Os*x2zs*txs - 1./8.*Oc*x2zc + + 1./4.*x12*tx*x2zc - 1./8.*x12*x2zc*txs - 1./8.*x12s*x2zs* + txs - 1./8.*x2zq + 1./8.*x2zc*txs ) GG10q = GG10q + rwwg(10,10)*Xpi*vvq*yc * ( - 1./2.*O*x12*x2z*txs + - 1./4.*O*x12*tx*x2zs - 1./4.*O*x12*x2zc + O*x2zc - 3./8.*O* + x2zs*txs - 3./8.*Os*x12*x2zs - 1./4.*Os*x2z*txs - 1./2.*Os* + x2zc + 3./8.*Os*x2zs - 3./8.*Oc*x2zs + 3./4.*x12*tx*x2zs + 1./ + 4.*x12*x2zc - 3./8.*x12*x2zs*txs - 1./4.*x2z*x12s*txs - 1./4. + *tx*x12s*x2zs - 1./2.*x2zc + 3./8.*x2zs*txs ) GG10q = GG10q + rwwg(10,10)*vvq*Xp*yc * ( - 3./4.*O*x12*x2z*tx + - 3./4.*O*x12*x2z - 1./4.*O*x12*tx - O*x12*x2zs - 1./2.*O* + x12*txs - 5./8.*O*x2z*txs + O*x2z + 9./4.*O*x2zs - 1./8.*O* + txs - 5./8.*Os*x12*x2z - 1./8.*Os*x12 + 1./8.*Os*x2z - 9./8.* + Os*x2zs - 1./4.*Os*txs + 1./8.*Os - 5./8.*Oc*x2z - 1./8.*Oc + + 5./4.*x12*x2z*tx - 5./8.*x12*x2z*txs + 3./4.*x12*x2z + 1./ + 4.*x12*tx + x12*x2zs - 1./8.*x12*txs - 3./4.*x2z*tx*x12s - 1./ + 4.*x2z*x12s + 5./8.*x2z*txs - 1./2.*x2z - 1./4.*tx*x12s - 1./ + 8.*x12s*x2zs - 1./4.*x12s*txs - 9./8.*x2zs + 1./8.*txs ) GG10q = GG10q + rwwg(10,10)*vvq*Xps*yc * ( 1./8. + 5./4.*O*x12* + x2z + 1./2.*O*x12*tx + 1./4.*O*x12 - 7./4.*O*x2z + 1./4.*O* + txs - 1./4.*O + 1./4.*Os*x12 + 7./8.*Os*x2z - 1./8.*Os + 1./4. + *Oc - 5./4.*x12*x2z - 1./2.*x12*tx + 1./4.*x12*txs - 1./4.* + x12 + 3./8.*x2z*x12s + 7./8.*x2z + 1./2.*tx*x12s + 1./8.*x12s + - 1./4.*txs ) GG10q = GG10q + rwwg(10,10)*vvq*yc * ( 1./2.*O*x12*x2z*tx + 3./4. + *O*x12*x2z*txs + 1./4.*O*x12*tx*x2zs - 1./2.*O*x12*Xpc + 1./4. + *O*x12*x2zc + 3./4.*O*x12*x2zs + 1./4.*O*x12*txs + 3./8.*O* + x2z*txs + 1./2.*O*Xpc - 5./4.*O*x2zc + 1./2.*O*x2zs*txs - 3./ + 2.*O*x2zs + 3./8.*Os*x12*x2z + 1./2.*Os*x12*x2zs + 3./8.*Os* + x2z*txs - 3./8.*Os*x2z - 1./4.*Os*Xpc + 5./8.*Os*x2zc + 1./4. + *Os*x2zs + 1./8.*Os*txs + 3./8.*Oc*x2z + 1./2.*Oc*x2zs - 3./4. + *x12*x2z*tx + 3./8.*x12*x2z*txs - x12*tx*x2zs + 1./2.*x12*Xpc + - 1./4.*x12*x2zc + 1./2.*x12*x2zs*txs - 3./4.*x12*x2zs + 1./ + 2.*x2z*tx*x12s + 3./8.*x2z*x12s*txs - 3./8.*x2z*txs + 1./4.* + tx*x12s*x2zs - 1./4.*Xpc*x12s - 1./4.*Xpc + 1./8.*x12s*x2zs + + 1./8.*x12s*txs + 5./8.*x2zc - 1./2.*x2zs*txs + 3./4.*x2zs + ) GG10q = GG10q + rwwg(10,12)*XX*vvq*yc * ( O*x12*x2z*txs - 1./2.*O + *x12*tx*x2zs - 1./2.*O*tx*x2zc - 1./2.*O*x2zc + 1./2.*O*x2zs* + txs + 1./2.*Os*x2z*txs - 1./2.*Os*tx*x2zs - x12*tx*x2zs + 1./ + 2.*x12*x2zs*txs + 1./2.*x2z*x12s*txs + 1./2.*tx*x2zc + 1./2.* + x2zc - x2zs*txs ) GG10q = GG10q + rwwg(10,12)*Xpi*vvq*yc * ( 1./2.*O*x12*x2z*tx + 1. + /2.*O*x12*x2zs + O*x12*txs + 3./2.*O*x2z*txs - O*tx*x2zs - 2* + O*x2zs - 1./2.*Os*x2z*tx + 1./2.*Os*x2zs + 1./2.*Os*txs - 2* + x12*x2z*tx + 3./2.*x12*x2z*txs - 1./2.*x12*tx*x2zs - x12*x2zs + + x2z*tx*x12s - 2*x2z*txs + tx*x2zs + 1./2.*x12s*txs + 3./2. + *x2zs ) GG10q = GG10q + rwwg(10,12)*vvq*Xp*yc * ( 1./2. + 5./4.*O*x12*x2z + + 3./2.*O*x12*tx + 3./4.*O*x12 - 3./4.*O*x2z*tx - 9./4.*O* + x2z - 1./4.*O*tx + 1./4.*O*x12s + 3./2.*O*txs - O + 3./4.*Os* + x2z + 1./4.*Os*tx + 3./4.*Os - 1./4.*Oc - 3./4.*x12*x2z*tx - + 2*x12*x2z - 5./4.*x12*tx + 3./2.*x12*txs - x12 + 3./4.*x2z*tx + + 1./2.*x2z*x12s + 3./2.*x2z + 5./4.*tx*x12s + 1./2.*x12s - + 3./2.*txs ) GG10q = GG10q + rwwg(10,12)*vvq*Xps*yc * ( - 1./2. - O*x12 + O + - 1./2.*Os + x12 - 1./2.*x12s ) GG10q = GG10q + rwwg(10,12)*vvq*yc * ( - 1./2.*O*x12*x2z*tx - 5./ + 4.*O*x12*x2z - O*x12*tx - 1./2.*O*x12*x2zs - 3./2.*O*x12*txs + + 3./4.*O*x2z*tx - 7./4.*O*x2z*txs + 5./2.*O*x2z - 1./4.*O* + tx*x12s + 5./4.*O*tx*x2zs + 7./4.*O*x2zs - O*txs + 1./4.*Os* + x12*x2z - 1./2.*Os*x12*tx + 1./2.*Os*x2z*tx - 5./4.*Os*x2z - + 1./4.*Os*x2zs - 3./4.*Os*txs + 1./4.*Oc*x2z - 1./4.*Oc*tx + + 11./4.*x12*x2z*tx - 7./4.*x12*x2z*txs + 2*x12*x2z + 1./2.*x12 + *tx*x2zs + x12*tx + x12*x2zs - x12*txs - x2z*tx*x12s - 1./2.* + x2z*tx - 1./2.*x2z*x12s + 5./2.*x2z*txs - 3./2.*x2z - tx*x12s + - 5./4.*tx*x2zs - 3./4.*x12s*txs - 3./2.*x2zs + txs ) GG10q = GG10q + rwwg(10,13)*XX*vvq*yc * ( 1./2.*O*x12*x2z*txs - 1. + /2.*O*x2zc + 1./2.*O*x2zs*txs + 1./4.*Os*x2z*txs + 1./4.*Os* + x2zc - 1./2.*x12*tx*x2zs + 1./2.*x12*x2zs*txs + 1./4.*x2z* + x12s*txs + 1./4.*x2zc - 1./2.*x2zs*txs ) GG10q = GG10q + rwwg(10,13)*Xpi*vvq*yc * ( 1./2.*O*x12*x2z*tx + 1. + /2.*O*x12*x2zs + 1./2.*O*x12*txs + O*x2z*txs - 3./2.*O*x2zs + + 3./4.*Os*x2zs + 1./4.*Os*txs - x12*x2z*tx + x12*x2z*txs - + 1./2.*x12*x2zs + 1./2.*x2z*tx*x12s - x2z*txs + 1./4.*x12s*txs + + 3./4.*x2zs ) GG10q = GG10q + rwwg(10,13)*vvq*Xp*yc * ( 1./4. + 3./2.*O*x12*x2z + + O*x12*tx + 1./2.*O*x12 - 5./2.*O*x2z + 3./4.*O*txs - 1./2. + *O + 1./4.*Os*x12 + 5./4.*Os*x2z + 1./4.*Oc - 3./2.*x12*x2z + - x12*tx + 3./4.*x12*txs - 1./2.*x12 + 1./4.*x2z*x12s + 5./4. + *x2z + tx*x12s + 1./4.*x12s - 3./4.*txs ) GG10q = GG10q + rwwg(10,13)*vvq*Xps*yc * ( - 1./2. - O*x12 + O + - 1./2.*Os + x12 - 1./2.*x12s ) GG10q = GG10q + rwwg(10,13)*vvq*yc * ( - 1./2.*O*x12*x2z*tx - O* + x12*x2z - 1./2.*O*x12*tx - 1./2.*O*x12*x2zs - O*x12*txs - 5./ + 4.*O*x2z*txs + 3./2.*O*x2z + 2*O*x2zs - 1./2.*O*txs - 1./4.* + Os*x12*x2z - 1./2.*Os*x2z - Os*x2zs - 1./2.*Os*txs - 1./4.*Oc + *x2z + 3./2.*x12*x2z*tx - 5./4.*x12*x2z*txs + x12*x2z + 1./2. + *x12*tx + 1./2.*x12*x2zs - 1./2.*x12*txs - 1./2.*x2z*tx*x12s + - 1./4.*x2z*x12s + 5./4.*x2z*txs - 3./4.*x2z - 1./2.*tx*x12s + - 1./2.*x12s*txs - x2zs + 1./2.*txs ) GG10q = GG10q + rwwg(10,14)*XX*vvq*yc * ( - 1./4.*O*x12*tx*x2zs + - 1./4.*O*tx*x2zc + 1./4.*O*x2zc - 1./4.*O*x2zs*txs - 1./4.* + Os*tx*x2zs - 1./4.*Os*x2zc - 1./4.*x12*x2zs*txs + 1./4.*tx* + x2zc ) GG10q = GG10q + rwwg(10,14)*Xpi*vvq*yc * ( - 1./2.*O*x12*x2z*tx + - 1./4.*O*x12*x2zs - 1./2.*O*x2z*txs - 3./4.*O*tx*x2zs + 3./ + 4.*O*x2zs - 1./2.*Os*x2z*tx - 3./4.*Os*x2zs - 1./2.*x12*x2z* + txs - 1./4.*x12*tx*x2zs + 3./4.*tx*x2zs ) GG10q = GG10q + rwwg(10,14)*vvq*Xp*yc * ( - 1./2.*O*x12*x2z - 1./ + 4.*O*x12*tx - 1./4.*O*x12 - 3./4.*O*x2z*tx + 3./4.*O*x2z - 1./ + 4.*O*tx - 1./4.*O*txs + 1./4.*O - 3./4.*Os*x2z - 1./4.*Os*tx + - 1./4.*Os - 1./2.*x12*x2z*tx - 1./4.*x12*tx - 1./4.*x12*txs + + 3./4.*x2z*tx + 1./4.*tx ) GG10q = GG10q + rwwg(10,14)*vvq*Xps*yc * ( 1./4.*O*x12 + 1./4.*O* + tx - 1./4.*O + 1./4.*Os + 1./4.*x12*tx - 1./4.*tx ) GG10q = GG10q + rwwg(10,14)*vvq*yc * ( 1./2.*O*x12*x2z*tx + 1./2. + *O*x12*x2z + 1./4.*O*x12*tx + 1./4.*O*x12*x2zs + 3./4.*O*x2z* + tx + 1./2.*O*x2z*txs - 3./4.*O*x2z + 3./4.*O*tx*x2zs - 3./4.* + O*x2zs + 1./4.*O*txs + 1./2.*Os*x2z*tx + 3./4.*Os*x2z + 1./4. + *Os*tx + 3./4.*Os*x2zs + 1./2.*x12*x2z*tx + 1./2.*x12*x2z*txs + + 1./4.*x12*tx*x2zs + 1./4.*x12*txs - 3./4.*x2z*tx - 3./4.* + tx*x2zs ) GG10q = GG10q + rwwg(11,1)*vvq*Xp*yc * ( - 6*O*x12 - 6*O*x2z + 2 + *O*tx - 2*x12*x2z - 6*x12*tx + 2*x12 - 4*x2z*tx + 6*x2z + 2* + tx - 2*x12s + 4*txs ) GG10q = GG10q + rwwg(11,1)*vvq*Xps*yc * ( - 4 + 4*O + 4*x12 ) GG10q = GG10q + rwwg(11,1)*vvq*yc * ( 2*O*x12*x2z + 2*O*x12*tx + + 2*O*x2zs - 2*O*txs + 6*x12*x2z*tx - 2*x12*x2z - 2*x12*txs - 2 + *x2z*tx - 4*x2z*txs + 2*tx*x12s + 4*tx*x2zs - 2*x2zs ) GG10q = GG10q + rwwg(12,1)*XX*vvq*yc * ( - 4*O*x2z*txs + 4*O*tx* + x2zs - 4*x12*x2z*txs + 8*x2z*txs - 4*tx*x2zs ) GG10q = GG10q + rwwg(12,1)*Xpi*vvq*yc * ( 8*O*x2z*tx - 12*O*txs + + 4*x12*x2z*tx - 12*x12*txs + 8*txs ) GG10q = GG10q + rwwg(12,1)*vvq*Xp*yc * ( 4 + 8*O*x12 + 2*O*x2z - + 8*O*tx - 10*O + 6*Os + 2*x12*x2z - 8*x12*tx - 6*x12 - 2*x2z + + 8*tx + 2*x12s ) GG10q = GG10q + rwwg(12,1)*vvq*yc * ( - 2*O*x12*x2z + 4*O*x12*tx + - 6*O*x2z*tx + 6*O*x2z + 4*O*tx - 2*O*x2zs + 12*O*txs - 2*Os + *x2z + 2*Os*tx - 2*x12*x2z*tx + 2*x12*x2z + 4*x12*tx + 12*x12 + *txs - 4*x2z*tx - 4*x2z + 2*tx*x12s - 4*tx + 2*x2zs - 8*txs ) GG10q = GG10q + rwwg(13,1)*XX*vvq*yc * ( - 4*O*x2z*txs - 4*x12* + x2z*txs + 4*x2z*txs ) GG10q = GG10q + rwwg(13,1)*Xpi*vvq*yc * ( - 2*O*x2z*tx - 6*O*txs + - 6*x12*txs + 2*x2z*tx + 4*txs ) GG10q = GG10q + rwwg(13,1)*vvq*Xp*yc * ( - 3*O*x12 - O*x2z - 3*O + *tx + 2*O - 2*Os - x12*x2z - 3*x12*tx + x12 + x2z + 3*tx - + x12s ) GG10q = GG10q + rwwg(13,1)*vvq*yc * ( O*x12*x2z + 5*O*x12*tx + 4* + O*x2z*tx + O*x2zs + 5*O*txs + 2*Os*tx + 3*x12*x2z*tx - x12* + x2z + 5*x12*txs - 3*x2z*tx + 3*tx*x12s - 2*tx - x2zs - 4*txs + ) GG10q = GG10q + rwwg(13,4)*XX*vvq*yc * ( 1./2.*O*x12*tx*x2zs - 1./ + 2.*O*tx*x2zc - 1./2.*O*tx*x2zs + O*x2zc + 1./2.*O*x2zs*txs + + 1./2.*Os*tx*x2zs - 1./2.*Os*x2zc + 1./2.*x12*tx*x2zs + 1./2.* + x12*x2zs*txs + 1./2.*tx*x2zc - 1./2.*x2zc - x2zs*txs ) GG10q = GG10q + rwwg(13,4)*Xpi*vvq*yc * ( 1./2.*O*x12*x2z*tx - O* + x12*x2zs - O*x2z*tx + 3./2.*O*x2z*txs - O*tx*x2zs + 3*O*x2zs + + Os*x2z*tx - 3./2.*Os*x2zs + x12*x2z*tx + 3./2.*x12*x2z*txs + - 1./2.*x12*tx*x2zs + x12*x2zs - 1./2.*x2z*tx*x12s - 2*x2z* + txs + tx*x2zs - 3./2.*x2zs ) GG10q = GG10q + rwwg(13,4)*vvq*Xp*yc * ( - 1./2. - 9./4.*O*x12* + x2z + 1./2.*O*x12*tx - 5./4.*O*x12 - 3./4.*O*x2z*tx + 13./4.* + O*x2z - 3./4.*O*tx + 1./4.*O*x12s + 3./2.*O*txs + O - 7./4.* + Os*x2z + 3./4.*Os*tx - 1./4.*Os - 1./4.*Oc - 3./4.*x12*x2z*tx + + 2*x12*x2z + 1./4.*x12*tx + 3./2.*x12*txs + x12 + 3./4.*x2z + *tx - 1./2.*x2z*x12s - 3./2.*x2z - 1./4.*tx*x12s - 1./2.*x12s + - 3./2.*txs ) GG10q = GG10q + rwwg(13,4)*vvq*Xps*yc * ( 1./2. + O*x12 - O + 1./ + 2.*Os - x12 + 1./2.*x12s ) GG10q = GG10q + rwwg(13,4)*vvq*yc * ( - 1./2.*O*x12*x2z*tx + 9./ + 4.*O*x12*x2z + O*x12*x2zs - 1./2.*O*x12*txs + 7./4.*O*x2z*tx + - 7./4.*O*x2z*txs - 3*O*x2z - 1./4.*O*tx*x12s + 5./4.*O*tx* + x2zs + 1./2.*O*tx - 13./4.*O*x2zs - O*txs + 1./4.*Os*x12*x2z + - 1./2.*Os*x12*tx - Os*x2z*tx + 5./4.*Os*x2z - 1./2.*Os*tx + + 7./4.*Os*x2zs - 1./4.*Os*txs + 1./4.*Oc*x2z - 1./4.*Oc*tx + - 1./4.*x12*x2z*tx - 7./4.*x12*x2z*txs - 2*x12*x2z + 1./2.* + x12*tx*x2zs - 1./2.*x12*tx - x12*x2zs - x12*txs + 1./2.*x2z* + tx*x12s - 1./2.*x2z*tx + 1./2.*x2z*x12s + 5./2.*x2z*txs + 3./ + 2.*x2z + 1./2.*tx*x12s - 5./4.*tx*x2zs - 1./4.*x12s*txs + 3./ + 2.*x2zs + txs ) GG10q = GG10q + rwwg(13,11)*vvq*Xp*yc * ( - O*x12 - 1./2.*O*x2z + + 1./2.*O - 1./2.*Os - 1./2.*x12*x2z + 1./2.*x12 + 1./2.*x2z + - 1./2.*x12s ) GG10q = GG10q + rwwg(13,11)*vvq*yc * ( 3./2.*O*x12*x2z + 1./2.*O* + x2z*tx - 1./2.*O*x2z + 1./2.*O*x2zs - O*txs + 1./2.*Os*x2z - + 1./2.*Os*tx + 3./2.*x12*x2z*tx - 1./2.*x12*x2z - x12*txs + 1./ + 2.*tx*x12s - 1./2.*x2zs ) GG10q = GG10q + rwwg(13,12)*XX*vvq*yc * ( - O*x2z*txs + O*tx* + x2zs - x12*x2z*txs + 2*x2z*txs - tx*x2zs ) GG10q = GG10q + rwwg(13,12)*Xpi*vvq*yc * ( O*x2z*tx - 2*O*txs + + x12*x2z*tx - 2*x12*txs - x2z*tx + 2*txs ) GG10q = GG10q + rwwg(13,12)*vvq*yc * ( - O*x12*x2z + 2*O*x12*tx + - O*x2z*tx + O*x2z - O*tx + 2*O*txs - Os*x2z + Os*tx - x12* + x2z*tx - x12*tx + 2*x12*txs + x2z*tx + tx*x12s - 2*txs ) GG10q = GG10q + rwwg(14,1)*XX*vvq*yc * ( 2*O*x2z*txs + 2*O*tx* + x2zs + 2*x12*x2z*txs - 2*tx*x2zs ) GG10q = GG10q + rwwg(14,1)*Xpi*vvq*yc * ( 8*O*x2z*tx + 2*O*txs + + 2*x12*x2z*tx + 2*x12*txs - 4*x2z*tx ) GG10q = GG10q + rwwg(14,1)*vvq*Xp*yc * ( 2*O*x12 + O*x2z + 4*O*tx + + O - Os + x12*x2z - x12 - 2*x2z*tx - x2z + x12s + 2*txs ) GG10q = GG10q + rwwg(14,1)*vvq*yc * ( - O*x12*x2z - 2*O*x12*tx + - 7*O*x2z*tx - O*x2z - 6*O*tx - O*x2zs - 2*O*txs + Os*x2z - + Os*tx - x12*x2z*tx + x12*x2z - 2*x12*tx - 2*x12*txs + 2*x2z* + tx - 2*x2z*txs - tx*x12s + 2*tx*x2zs + 2*tx + x2zs ) GG10q = GG10q + rwwg(14,4)*XX*vvq*yc * ( - 1./2.*O*x12*tx*x2zs + + 1./2.*O*tx*x2zc - 1./2.*O*x2zc - 1./2.*O*x2zs*txs - 1./2.* + Os*tx*x2zs + 1./2.*Os*x2zc - 1./2.*x12*x2zs*txs + 1./2.*tx* + x2zc ) GG10q = GG10q + rwwg(14,4)*Xpi*vvq*yc * ( - O*x12*x2z*tx + 1./2. + *O*x12*x2zs - O*x2z*txs + 1./2.*O*tx*x2zs - 3./2.*O*x2zs - Os + *x2z*tx + 3./2.*Os*x2zs - x12*x2z*txs - 1./2.*x12*tx*x2zs + 3. + /2.*tx*x2zs ) GG10q = GG10q + rwwg(14,4)*vvq*Xp*yc * ( O*x12*x2z - 1./2.*O*x12* + tx + 1./2.*O*x12 - 1./2.*O*x2z*tx - 3./2.*O*x2z - 1./2.*O*tx + - 1./2.*O*txs - 1./2.*O + 3./2.*Os*x2z - 1./2.*Os*tx + 1./2. + *Os - x12*x2z*tx - 1./2.*x12*tx - 1./2.*x12*txs + 3./2.*x2z* + tx + 1./2.*tx ) GG10q = GG10q + rwwg(14,4)*vvq*Xps*yc * ( - 1./2.*O*x12 + 1./2.* + O*tx + 1./2.*O - 1./2.*Os + 1./2.*x12*tx - 1./2.*tx ) GG10q = GG10q + rwwg(14,4)*vvq*yc * ( O*x12*x2z*tx - O*x12*x2z + + 1./2.*O*x12*tx - 1./2.*O*x12*x2zs + 1./2.*O*x2z*tx + O*x2z* + txs + 3./2.*O*x2z - 1./2.*O*tx*x2zs + 3./2.*O*x2zs + 1./2.*O* + txs + Os*x2z*tx - 3./2.*Os*x2z + 1./2.*Os*tx - 3./2.*Os*x2zs + + x12*x2z*tx + x12*x2z*txs + 1./2.*x12*tx*x2zs + 1./2.*x12* + txs - 3./2.*x2z*tx - 3./2.*tx*x2zs ) GG10q = GG10q + rwwg(14,11)*vvq*Xp*yc * ( O*x12 - x2z*tx + txs ) GG10q = GG10q + rwwg(14,11)*vvq*yc * ( - O*x12*x2z - x2z*txs + + tx*x2zs ) GG10q = GG10q + rwwg(14,12)*XX*vvq*yc * ( O*x2z*txs - O*tx*x2zs + + x12*x2z*txs - tx*x2zs ) GG10q = GG10q + rwwg(14,12)*Xpi*vvq*yc * ( O*txs + x12*x2z*tx + + x12*txs - 2*x2z*tx ) GG10q = GG10q + rwwg(14,12)*vvq*Xp*yc * ( 1./2.*O*x2z + 1./2.*O + - 1./2.*Os + 1./2.*x12*x2z - 1./2.*x12 - 1./2.*x2z + 1./2.* + x12s ) GG10q = GG10q + rwwg(14,12)*vvq*yc * ( 1./2.*O*x12*x2z - O*x12*tx + + 1./2.*O*x2z*tx - 1./2.*O*x2z - O*tx - 1./2.*O*x2zs - O*txs + + 1./2.*Os*x2z - 1./2.*Os*tx - 1./2.*x12*x2z*tx + 1./2.*x12* + x2z - x12*tx - x12*txs + x2z*tx - 1./2.*tx*x12s + tx + 1./2.* + x2zs ) GG20q = + + rwwg(1,1)*XX*vvq*yc * ( - 24*O*x2z*txs - 24*x12*x2z*txs + 24 + *x2z*txs ) GG20q = GG20q + rwwg(1,1)*Xpi*vvq*yc * ( - 24*O*x2z*tx - 48*O* + txs - 48*x12*txs + 24*x2z*tx + 24*txs ) GG20q = GG20q + rwwg(1,1)*vvq*Xp*yc * ( 4 + 4*O*x12 - 4*O*x2z - + 60*O*tx - 12*O + 8*Os - 36*x12*tx - 4*x12 - 4*x2z*tx + 4*x2z + + 32*tx + 4*txs ) GG20q = GG20q + rwwg(1,1)*vvq*Xps*yc * ( - 4 + 4*O + 4*x12 ) GG20q = GG20q + rwwg(1,1)*vvq*yc * ( 8*O*x12*tx + 32*O*x2z*tx + 8 + *O*x2z + 48*O*tx + 48*O*txs - 4*Os*x2z + 4*Os*tx + 8*x12*x2z* + tx + 24*x12*tx + 48*x12*txs - 32*x2z*tx - 4*x2z*txs - 4*x2z + + 4*tx*x12s + 4*tx*x2zs - 24*tx - 24*txs ) GG20q = GG20q + rwwg(2,2)*XX*vvq*yc * ( 6*x2z*txs - 6*tx*x2zs ) GG20q = GG20q + rwwg(2,2)*Xpi*vvq*yc * ( 6*O*x2z*tx - 6*O*txs + 6 + *x12*x2z*tx - 6*x12*txs - 6*x2z*tx + 6*txs ) GG20q = GG20q + rwwg(2,2)*vvq*Xp*yc * ( 1 - O*x2z - 2*O + Os - 2* + x12*tx - x12 - x2z*tx + x2z + tx + txs ) GG20q = GG20q + rwwg(2,2)*vvq*Xps*yc * ( - 1 + O + x12 ) GG20q = GG20q + rwwg(2,2)*vvq*yc * ( O*x12*tx - 5*O*x2z*tx + O* + x2z + 5*O*txs - 4*x12*x2z*tx + 5*x12*txs + 5*x2z*tx - x2z*txs + - x2z + tx*x12s + tx*x2zs - 6*txs ) GG20q = GG20q + rwwg(2,3)*XX*vvq*yc * ( - 12*x2z*txs + 12*tx* + x2zs ) GG20q = GG20q + rwwg(2,3)*Xpi*vvq*yc * ( - 12*O*x2z*tx + 12*O* + txs - 12*x12*x2z*tx + 12*x12*txs + 12*x2z*tx - 12*txs ) GG20q = GG20q + rwwg(2,3)*vvq*Xp*yc * ( - 2 - 6*O*x12 - 4*O*x2z + + 2*O*tx + 4*O - 2*Os - 2*x12*x2z - 2*x12*tx + 4*x12 - 2*x2z + *tx + 4*x2z - 2*x12s + 2*txs ) GG20q = GG20q + rwwg(2,3)*vvq*Xps*yc * ( - 2 + 2*O + 2*x12 ) GG20q = GG20q + rwwg(2,3)*vvq*yc * ( 2*O*x12*x2z + 10*O*x2z*tx - + 2*O*x2z + 2*O*x2zs - 12*O*txs + 14*x12*x2z*tx - 2*x12*x2z - + 12*x12*txs - 12*x2z*tx - 2*x2z*txs + 2*x2z + 2*tx*x2zs - 2* + x2zs + 12*txs ) GG20q = GG20q + rwwg(3,3)*XX*vvq*yc * ( 6*x2z*txs - 6*tx*x2zs ) GG20q = GG20q + rwwg(3,3)*Xpi*vvq*yc * ( 6*O*x2z*tx - 6*O*txs + 6 + *x12*x2z*tx - 6*x12*txs - 6*x2z*tx + 6*txs ) GG20q = GG20q + rwwg(3,3)*vvq*Xp*yc * ( 1 + 2*O*x12 - 3*O*x2z + 2 + *O*tx - 2*O + Os - 2*x12*x2z - 3*x12 - x2z*tx + 3*x2z - tx + + 2*x12s + txs ) GG20q = GG20q + rwwg(3,3)*vvq*Xps*yc * ( - 1 + O + x12 ) GG20q = GG20q + rwwg(3,3)*vvq*yc * ( 2*O*x12*x2z - O*x12*tx - 9*O + *x2z*tx + O*x2z + 2*O*x2zs + 7*O*txs - 6*x12*x2z*tx + 2*x12* + x2z + 7*x12*txs + 7*x2z*tx - x2z*txs - x2z - tx*x12s + tx* + x2zs - 2*x2zs - 6*txs ) GG20q = GG20q + rwwg(4,1)*XX*vvq*yc * ( 6*O*x12*tx*x2zs - 6*O*tx* + x2zc - 6*O*tx*x2zs + 12*O*x2zc + 6*O*x2zs*txs + 6*Os*tx*x2zs + - 6*Os*x2zc + 6*x12*tx*x2zs + 6*x12*x2zs*txs + 6*tx*x2zc - 6 + *x2zc - 12*x2zs*txs ) GG20q = GG20q + rwwg(4,1)*Xpi*vvq*yc * ( 12*O*x12*x2z*tx - 12*O* + x12*x2zs - 12*O*x2z*tx + 24*O*x2z*txs - 18*O*tx*x2zs + 42*O* + x2zs + 18*Os*x2z*tx - 24*Os*x2zs + 12*x12*x2z*tx + 24*x12*x2z + *txs - 6*x12*tx*x2zs + 12*x12*x2zs - 6*x2z*tx*x12s - 24*x2z* + txs + 6*tx*x2zs - 18*x2zs ) GG20q = GG20q + rwwg(4,1)*vvq*Xp*yc * ( - 6 - 34*O*x12*x2z + 8*O + *x12*tx - 16*O*x12 - 8*O*x2z*tx + 58*O*x2z - 2*O*tx - 2*O* + x12s + 22*O*txs + 18*O - 2*Os*x12 - 36*Os*x2z + 16*Os*tx - 12 + *Os + 28*x12*x2z + 14*x12*tx + 22*x12*txs + 12*x12 - 8*x2z*tx + - 6*x2z*x12s - 22*x2z - 8*tx*x12s - 6*tx - 6*x12s - 14*txs ) GG20q = GG20q + rwwg(4,1)*vvq*Xps*yc * ( 8 + 24*O*x12 - 8*O*tx - + 24*O + 16*Os - 8*x12*tx - 16*x12 + 8*tx + 8*x12s ) GG20q = GG20q + rwwg(4,1)*vvq*yc * ( - 14*O*x12*x2z*tx + 28*O* + x12*x2z - 6*O*x12*tx + 12*O*x12*x2zs + 20*O*x2z*tx - 26*O*x2z + *txs - 48*O*x2z + 20*O*tx*x2zs + 6*O*tx - 46*O*x2zs - 18*O* + txs - 20*Os*x2z*tx + 30*Os*x2z - 12*Os*tx + 26*Os*x2zs - 14* + x12*x2z*tx - 26*x12*x2z*txs - 24*x12*x2z + 6*x12*tx*x2zs - 6* + x12*tx - 12*x12*x2zs - 18*x12*txs + 6*x2z*tx*x12s + 6*x2z*tx + + 6*x2z*x12s + 26*x2z*txs + 18*x2z + 6*tx*x12s - 6*tx*x2zs + + 20*x2zs + 12*txs ) GG20q = GG20q + rwwg(4,4)*XX*vvq*yc * ( - 3./2.*O*x12*x2zc + 3./ + 2.*O*tx*x2zc - 3./2.*O*x2zq - 3./2.*x12*tx*x2zc - 3./2.*tx* + x2zq + 3./2.*x2zq + 3./2.*x2zc*txs ) GG20q = GG20q + rwwg(4,4)*Xpi*vvq*yc * ( 3./2.*O*x12*x2zc - 9./2. + *O*x12*x2zs + 3./2.*O*tx*x2zc + 9./2.*O*tx*x2zs + 3./2.*O* + x12s*x2zs - 15./2.*O*x2zc - 3./2.*O*x2zs*txs + 3./2.*Os*x12* + x2zs - 3./2.*Os*tx*x2zs + 3./2.*Os*x2zc + 3./2.*x12*tx*x2zc + - 9./2.*x12*tx*x2zs - 3*x12*x2zc - 3./2.*x12*x2zs*txs + 3./2. + *tx*x12s*x2zs - 9./2.*tx*x2zc + 6*x2zc + 9./2.*x2zs*txs ) GG20q = GG20q + rwwg(4,4)*vvq*Xp*yc * ( 2*O*x12*x2z + 13./2.*O* + x12*x2zs - 3./2.*O*x12 + 7*O*x2z*tx + 7./2.*O*x2z*x12s - 7./2. + *O*x2z*txs - 21./2.*O*x2z + 7./2.*O*tx*x2zs + 3./2.*O*tx + 3./ + 2.*O*x12s - 31./2.*O*x2zs - 3./2.*O*txs + 7./2.*Os*x12*x2z + + 3./2.*Os*x12 - 7./2.*Os*x2z*tx + 9./2.*Os*x2z - 3./2.*Os*tx + + 5*Os*x2zs - 4*x12*x2z*tx - 7./2.*x12*x2z*txs - 9*x12*x2z + + 7./2.*x12*tx*x2zs - 3./2.*x12*tx - 10*x12*x2zs - 3./2.*x12 + *txs + 7./2.*x2z*tx*x12s - 3./2.*x2z*tx + 3*x2z*x12s + 11./2. + *x2z*txs + 6*x2z + 3./2.*tx*x12s - 11./2.*tx*x2zs + 3./2.* + x12s*x2zs + 21./2.*x2zs + 3./2.*txs ) GG20q = GG20q + rwwg(4,4)*vvq*Xps*yc * ( - 3./2. - 9*O*x12*x2z + - O*x12 - 2*O*x2z*tx + 13*O*x2z - 2*O*tx - 2*O*x12s + 2*O* + txs + 3*O - 2*Os*x12 - 11./2.*Os*x2z + 2*Os*tx - 3./2.*Os - 2 + *x12*x2z*tx + 11*x12*x2z + 2*x12*tx + 2*x12*txs + 3*x12 + 2* + x2z*tx - 7./2.*x2z*x12s - 15./2.*x2z - 2*tx*x12s - 3./2.*x12s + - 2*txs ) GG20q = GG20q + rwwg(4,4)*vvq*yc * ( 9./2.*O*x12*x2z + 4*O*x12* + Xpc - 3./2.*O*x12*x2zc - O*x12*x2zs - 9./2.*O*x2z*tx - 3*O* + x2z*x12s + 3*O*x2z*txs - 3./2.*O*tx*x2zc - 8*O*tx*x2zs - 4*O* + Xpc - 3./2.*O*x12s*x2zs + 8*O*x2zc + 3./2.*O*x2zs*txs + 27./2. + *O*x2zs - 3*Os*x12*x2z - 3./2.*Os*x12*x2zs + 3*Os*x2z*tx + 3./ + 2.*Os*tx*x2zs + 2*Os*Xpc - 3./2.*Os*x2zc - 9./2.*Os*x2zs + 9./ + 2.*x12*x2z*tx + 3*x12*x2z*txs - 3./2.*x12*tx*x2zc + 2*x12*tx* + x2zs - 4*x12*Xpc + 3*x12*x2zc + 3./2.*x12*x2zs*txs + 9*x12* + x2zs - 3*x2z*tx*x12s - 9./2.*x2z*txs - 3./2.*tx*x12s*x2zs + 5 + *tx*x2zc + 9./2.*tx*x2zs + 2*Xpc*x12s + 2*Xpc - 3./2.*x12s* + x2zs - 13./2.*x2zc - 5*x2zs*txs - 9*x2zs ) GG20q = GG20q + rwwg(4,12)*XX*vvq*yc * ( - 3*O*tx*x2zs + 3*O* + x2zc + 3*x12*tx*x2zs + 6*tx*x2zc - 3*x2zc - 6*x2zs*txs ) GG20q = GG20q + rwwg(4,12)*Xpi*vvq*yc * ( - 3*O*x12*x2zs - 6*O* + x2z*tx + 6*O*x2z*txs - 6*O*tx*x2zs + 12*O*x2zs + 3*Os*x2z*tx + - 3*Os*x2zs + 6*x12*x2z*tx + 6*x12*x2z*txs - 6*x12*tx*x2zs + + 6*x12*x2zs - 3*x2z*tx*x12s - 12*x2z*txs + 12*tx*x2zs - 9* + x2zs ) GG20q = GG20q + rwwg(4,12)*vvq*Xp*yc * ( - 3 - 10*O*x12*x2z - 5* + O*x12 - 7*O*x2z*tx + 18*O*x2z - 4*O*tx - O*x12s + 7*O*txs + 6 + *O - Os*x12 - 7*Os*x2z + 4*Os*tx - 3*Os - 7*x12*x2z*tx + 14* + x12*x2z + 4*x12*tx + 7*x12*txs + 6*x12 + 7*x2z*tx - 3*x2z* + x12s - 11*x2z - 4*tx*x12s - 3*x12s - 7*txs ) GG20q = GG20q + rwwg(4,12)*vvq*Xps*yc * ( 4 + 8*O*x12 - 8*O + 4* + Os - 8*x12 + 4*x12s ) GG20q = GG20q + rwwg(4,12)*vvq*yc * ( 8*O*x12*x2z + 3*O*x12*x2zs + + 13*O*x2z*tx - 6*O*x2z*txs - 15*O*x2z + 6*O*tx*x2zs + 3*O* + tx - 13*O*x2zs - 6*O*txs - 3*Os*x2z*tx + 6*Os*x2z - 3*Os*tx + + 3*Os*x2zs - x12*x2z*tx - 6*x12*x2z*txs - 12*x12*x2z + 6* + x12*tx*x2zs - 3*x12*tx - 6*x12*x2zs - 6*x12*txs + 3*x2z*tx* + x12s - 6*x2z*tx + 3*x2z*x12s + 13*x2z*txs + 9*x2z + 3*tx*x12s + - 13*tx*x2zs + 10*x2zs + 6*txs ) GG20q = GG20q + rwwg(5,5)*XX*vvq*yc * ( 3./2.*x2z*txs - 3./2.*tx* + x2zs ) GG20q = GG20q + rwwg(5,5)*Xpi*vvq*yc * ( 3./2.*x12*x2z*tx - 3*x2z + *tx + 3./2.*txs ) GG20q = GG20q + rwwg(5,5)*vvq*Xp*yc * ( - 1./4. + 1./4.*O*x2z + + 1./4.*Os + 3./2.*x12*tx + 1./4.*x12 - 1./4.*x2z*tx - 1./4.* + x2z - 5./4.*tx + 1./4.*txs ) GG20q = GG20q + rwwg(5,5)*vvq*Xps*yc * ( 1./4. - 1./4.*O - 1./4.* + x12 ) GG20q = GG20q + rwwg(5,5)*vvq*yc * ( 1./4.*O*x12*tx + 1./4.*O*x2z + *tx - 1./4.*O*x2z - 1./4.*O*txs - x12*x2z*tx - 2*x12*tx - 1./ + 4.*x12*txs + 11./4.*x2z*tx - 1./4.*x2z*txs + 1./4.*x2z + 1./4. + *tx*x12s + 1./4.*tx*x2zs + 3./2.*tx - 3./2.*txs ) GG20q = GG20q + rwwg(5,6)*XX*vvq*yc * ( - 3*O*x2z*txs + 3*O*tx* + x2zs - 3*x12*x2z*txs + 3*x2z*txs ) GG20q = GG20q + rwwg(5,6)*Xpi*vvq*yc * ( 6*O*x2z*tx - 3*O*txs - 3 + *x12*txs + 3*txs ) GG20q = GG20q + rwwg(5,6)*vvq*Xp*yc * ( - 1./2. - 1./2.*O*x12 - + O*x2z + 5./2.*O*tx + O - 1./2.*Os - 1./2.*x12*x2z - 1./2.*x12 + *tx + x12 + 1./2.*x2z*tx + x2z - 1./2.*x12s - 1./2.*txs ) GG20q = GG20q + rwwg(5,6)*vvq*Xps*yc * ( - 1./2. + 1./2.*O + 1./ + 2.*x12 ) GG20q = GG20q + rwwg(5,6)*vvq*yc * ( 1./2.*O*x12*x2z + O*x12*tx + - 11./2.*O*x2z*tx - 3./2.*O*x2z - 3*O*tx + 1./2.*O*x2zs + 3* + O*txs + Os*x2z + 1./2.*x12*x2z*tx - 1./2.*x12*x2z - x12*tx + + 3*x12*txs + 1./2.*x2z*txs + 1./2.*x2z + tx*x12s - 1./2.*tx* + x2zs - 1./2.*x2zs - 3*txs ) GG20q = GG20q + rwwg(6,6)*XX*vvq*yc * ( - 3*O*x2z*txs - 3*O*tx* + x2zs - 3*x12*x2z*txs + 3./2.*x2z*txs + 3./2.*tx*x2zs ) GG20q = GG20q + rwwg(6,6)*Xpi*vvq*yc * ( - 6*O*x2z*tx - 3*O*txs + - 3./2.*x12*x2z*tx - 3*x12*txs + 3*x2z*tx + 3./2.*txs ) GG20q = GG20q + rwwg(6,6)*vvq*Xp*yc * ( - 1./4. - 3./2.*O*x12 + + 3./4.*O*x2z - 5./2.*O*tx + O - 3./4.*Os + 1./2.*x12*x2z - x12 + *tx + 3./4.*x12 - 1./4.*x2z*tx - 3./4.*x2z + 5./4.*tx - 1./2. + *x12s + 1./4.*txs ) GG20q = GG20q + rwwg(6,6)*vvq*Xps*yc * ( 1./4. - 1./4.*O - 1./4.* + x12 ) GG20q = GG20q + rwwg(6,6)*vvq*yc * ( 3./2.*O*x12*x2z + 3./4.*O* + x12*tx + 21./4.*O*x2z*tx - 5./4.*O*x2z + 3*O*tx - 1./2.*O* + x2zs + 13./4.*O*txs + Os*x2z + 1./2.*x12*x2z*tx - 1./2.*x12* + x2z + x12*tx + 13./4.*x12*txs - 11./4.*x2z*tx - 1./4.*x2z*txs + + 1./4.*x2z + 3./4.*tx*x12s + 1./4.*tx*x2zs - 3./2.*tx + 1./ + 2.*x2zs - 3./2.*txs ) GG20q = GG20q + rwwg(7,1)*XX*vvq*yc * ( - 6*O*x12*x2z*txs + 6*O* + x2zc - 6*O*x2zs*txs - 3*Os*x2z*txs - 3*Os*x2zc + 6*x12*tx* + x2zs - 6*x12*x2zs*txs - 3*x2z*x12s*txs - 3*x2zc + 6*x2zs*txs + ) GG20q = GG20q + rwwg(7,1)*Xpi*vvq*yc * ( - 9*O*x12*x2z*tx - 6*O* + x12*x2zs - 9*O*x2z*txs - 3*O*tx*x2zs + 15*O*x2zs - 3*Os*x2z* + tx - 9*Os*x2zs + 6*x12*x2z*tx - 9*x12*x2z*txs + 6*x12*x2zs - + 6*x2z*tx*x12s + 6*x2z*txs + 3*tx*x2zs - 6*x2zs ) GG20q = GG20q + rwwg(7,1)*vvq*Xp*yc * ( - 9*O*x12*x2z - 3*O*x2z* + tx + 9*O*x2z - O*txs + Os*x12 - 6*Os*x2z - Os + Oc - 3*x12* + x2z*tx + 6*x12*x2z - x12*txs + 3*x2z*tx - 3*x2z*x12s - 3*x2z + + txs ) GG20q = GG20q + rwwg(7,1)*vvq*yc * ( 9*O*x12*x2z*tx + 9*O*x12*x2z + + 6*O*x12*x2zs + 3*O*x2z*tx + 10*O*x2z*txs - 9*O*x2z + 3*O* + tx*x2zs - 15*O*x2zs - Os*x12*x2z + 3*Os*x2z*tx + 7*Os*x2z + 9 + *Os*x2zs - Oc*x2z - 3*x12*x2z*tx + 10*x12*x2z*txs - 6*x12*x2z + - 6*x12*x2zs + 6*x2z*tx*x12s - 3*x2z*tx + 3*x2z*x12s - 7*x2z + *txs + 3*x2z - 3*tx*x2zs + 6*x2zs ) GG20q = GG20q + rwwg(7,4)*XX*vvq*yc * ( - 3./4.*O*x12*x2zc + 3./ + 2.*O*x12*x2zs*txs + 3./4.*O*tx*x12s*x2zs - 3./4.*O*tx*x2zq - + 3./4.*O*tx*x2zc + 3./4.*O*x2zq + 3./4.*O*x2zc*txs + 3./2.*Os* + x12*tx*x2zs - 3./4.*Os*x12*x2zc - 3./4.*Os*x2zq + 3./4.*Os* + x2zc + 3./4.*Os*x2zs*txs + 3./4.*Oc*tx*x2zs - 3./4.*Oc*x2zc + - 3./4.*x12*tx*x2zc + 3./4.*x12*x2zc*txs + 3./4.*tx*x2zq + 3. + /4.*x12s*x2zs*txs - 3./2.*x2zc*txs ) GG20q = GG20q + rwwg(7,4)*Xpi*vvq*yc * ( 3./2.*O*x12*x2z*txs + 3./ + 2.*O*x12*tx*x2zs - 3./4.*O*x12*x2zc - 3./2.*O*x12*x2zs + 3./4. + *O*x2z*tx*x12s - 3./2.*O*tx*x2zc - 3./2.*O*tx*x2zs + 3./4.*O* + x12s*x2zs + 3./2.*O*x2zc + 9./4.*O*x2zs*txs + 3./2.*Os*x12* + x2z*tx - 3./4.*Os*x12*x2zs + 3./4.*Os*x2z*txs + 3./4.*Os*tx* + x2zs - 3./2.*Os*x2zc + 3./2.*Os*x2zs + 3./4.*Oc*x2z*tx - 3./2. + *Oc*x2zs - 3./4.*x12*tx*x2zc - 3./2.*x12*tx*x2zs + 9./4.*x12* + x2zs*txs + 3./4.*x2z*x12s*txs + 3./4.*tx*x12s*x2zs + 3./2.*tx + *x2zc - 3*x2zs*txs ) GG20q = GG20q + rwwg(7,4)*vvq*Xp*yc * ( 2*O*x12*x2z*tx - O*x12* + x2z + 1./4.*O*x12*tx - 7./8.*O*x12*x2zs - 1./2.*O*x12*txs - O + *x2z*tx + O*x2z*x12s + 7./4.*O*x2z*txs - 3./8.*O*tx*x12s - 7./ + 8.*O*tx*x2zs + 1./8.*O*x12s - 1./8.*O*x12c + 7./8.*O*x2zs + 1. + /4.*O*txs + 1./4.*Os*x12*x2z - 3./8.*Os*x12*tx + Os*x2z*tx + + 3./4.*Os*x2z + 1./8.*Os*tx - 1./8.*Os*x12s - 7./8.*Os*x2zs - + 1./4.*Os*txs + 1./8.*Oc*x12 - 3./4.*Oc*x2z - 1./8.*Oc*tx - 1./ + 8.*Oc + 1./8.*Oq - x12*x2z*tx + 7./4.*x12*x2z*txs - 7./8.*x12 + *tx*x2zs + 1./4.*x12*txs + x2z*tx*x12s - 7./4.*x2z*txs + 1./8. + *tx*x12s - 1./8.*tx*x12c + 7./8.*tx*x2zs - 1./4.*x12s*txs ) GG20q = GG20q + rwwg(7,4)*vvq*yc * ( - 7./4.*O*x12*x2z*tx - 3./2. + *O*x12*x2z*txs + 3./4.*O*x12*x2z - 13./8.*O*x12*tx*x2zs + 3./ + 4.*O*x12*x2zc + 5./2.*O*x12*x2zs - 7./8.*O*x2z*tx*x12s + 3./4. + *O*x2z*tx - 7./8.*O*x2z*x12s - 7./4.*O*x2z*txs + 1./8.*O*tx* + x12c + 13./8.*O*tx*x2zc + 5./2.*O*tx*x2zs - 3./4.*O*x12s*x2zs + + 3./8.*O*x12s*txs - 13./8.*O*x2zc - 19./8.*O*x2zs*txs - 3./ + 4.*O*x2zs - 7./4.*Os*x12*x2z*tx + 3./4.*Os*x12*x2zs + 3./8.* + Os*x12*txs - 7./8.*Os*x2z*tx - 1./8.*Os*x2z*x12s - 3./4.*Os* + x2z*txs - 3./4.*Os*x2z + 3./8.*Os*tx*x12s - 7./8.*Os*tx*x2zs + + 13./8.*Os*x2zc - 3./4.*Os*x2zs - 1./4.*Oc*x12*x2z + 3./8.* + Oc*x12*tx - 7./8.*Oc*x2z*tx + 7./8.*Oc*x2z + 3./2.*Oc*x2zs + + 1./8.*Oc*txs - 1./8.*Oq*x2z + 1./8.*Oq*tx + 3./4.*x12*x2z*tx + - 7./4.*x12*x2z*txs + 3./4.*x12*tx*x2zc + 5./2.*x12*tx*x2zs + - 19./8.*x12*x2zs*txs - 7./8.*x2z*tx*x12s - 3./4.*x2z*x12s* + txs + 3./2.*x2z*txs - 3./4.*tx*x12s*x2zs - 13./8.*tx*x2zc - 3. + /4.*tx*x2zs ) GG20q = GG20q + rwwg(7,4)*vvq*yc * ( 1./8.*x12c*txs + 13./4.*x2zs + *txs ) GG20q = GG20q + rwwg(7,7)*XX*vvq*yc * ( - 3./4.*O*x12*x2zs*txs + + 3./4.*O*x2zq - 3./8.*O*x2zc*txs - 3./8.*Os*x12*x2zc - 3./8. + *Os*x2zq + 3./8.*Os*x2zc - 3./8.*Os*x2zs*txs - 3./8.*Oc*x2zc + + 3./4.*x12*tx*x2zc - 3./8.*x12*x2zc*txs - 3./8.*x12s*x2zs* + txs - 3./8.*x2zq + 3./8.*x2zc*txs ) GG20q = GG20q + rwwg(7,7)*Xpi*vvq*yc * ( - 3./4.*O*x12*tx*x2zs + - 3./4.*O*x12*x2zc + 3./2.*O*x2zc - 3./8.*O*x2zs*txs - 3./8. + *Os*x12*x2zs - 3./4.*Os*x2zc + 3./8.*Os*x2zs - 3./8.*Oc*x2zs + + 3./4.*x12*tx*x2zs + 3./4.*x12*x2zc - 3./8.*x12*x2zs*txs - + 3./4.*tx*x12s*x2zs - 3./4.*x2zc + 3./8.*x2zs*txs ) GG20q = GG20q + rwwg(7,7)*vvq*Xp*yc * ( - O*x12*x2z - 1./2.*O* + x12*tx - 3./4.*O*x12*x2zs + 1./4.*O*x12*txs + 1./4.*O*x2z* + x12s + 3./4.*O*x2z + 1./2.*O*tx*x12s + 3./4.*O*x2zs - 1./4.*O + *txs + 1./2.*Os*x12*x2z + 1./4.*Os*x12*tx - 1./4.*Os*x12 - 3./ + 4.*Os*x2z + 1./8.*Os*x12s - 3./8.*Os*x2zs + 1./8.*Os*txs + 1./ + 8.*Os + 1./4.*Oc*x12 + 1./4.*Oc*x2z - 1./4.*Oc + 1./8.*Oq + 1. + /2.*x12*x2z + 1./4.*x12*tx + 3./4.*x12*x2zs - 1./4.*x12*txs + - 1./4.*x2z*x12s - 1./4.*x2z - 1./2.*tx*x12s + 1./4.*tx*x12c + - 3./8.*x12s*x2zs + 1./8.*x12s*txs - 3./8.*x2zs + 1./8.*txs + ) GG20q = GG20q + rwwg(7,7)*vvq*Xps*yc * ( 1./8. + 3./4.*O*x12 - 3./ + 8.*O*x12s - 3./8.*O - 3./8.*Os*x12 + 3./8.*Os - 1./8.*Oc - 3./ + 8.*x12 + 3./8.*x12s - 1./8.*x12c ) GG20q = GG20q + rwwg(7,7)*vvq*yc * ( 1./4.*O*x12*x2z*tx - 1./4.*O + *x12*x2z*txs + 3./4.*O*x12*tx*x2zs + 3./4.*O*x12*x2zc + O*x12 + *x2zs + 1./4.*O*x12*txs + 1./4.*O*x2z*txs - 3./8.*O*x12s*txs + - 3./2.*O*x2zc + 3./8.*O*x2zs*txs - 9./8.*O*x2zs + 1./4.*Os* + x12*x2z + 1./4.*Os*x12*x2zs - 3./8.*Os*x12*txs - 1./8.*Os*x2z + *x12s - 1./8.*Os*x2z*txs - 1./8.*Os*x2z + 3./4.*Os*x2zc + 3./ + 8.*Os*x2zs + 1./8.*Os*txs - 1./4.*Oc*x12*x2z + 1./4.*Oc*x2z + + 1./4.*Oc*x2zs - 1./8.*Oc*txs - 1./8.*Oq*x2z - 1./4.*x12* + x2z*tx + 1./4.*x12*x2z*txs - 3./4.*x12*tx*x2zs - 3./4.*x12* + x2zc + 3./8.*x12*x2zs*txs - 7./8.*x12*x2zs + 1./4.*x2z*tx* + x12s - 1./8.*x2z*x12s*txs - 1./8.*x2z*txs + 3./4.*tx*x12s* + x2zs + 3./8.*x12s*x2zs + 1./8.*x12s*txs - 1./8.*x12c*txs + 3./ + 4.*x2zc - 3./8.*x2zs*txs + 1./2.*x2zs ) GG20q = GG20q + rwwg(7,11)*vvq*Xp*yc * ( 1./4.*O*x12*x2z - 1./2.* + O*x12*tx + 1./4.*O*x12 + 1./4.*O*x2z*tx - 1./4.*O*x2z + 1./4. + *O*tx - 1./4.*O*x12s - 1./2.*O*txs + 1./4.*Os*x2z - 1./4.*Os* + tx - 1./4.*Os + 1./4.*Oc + 1./4.*x12*x2z*tx + 1./4.*x12*tx - + 1./2.*x12*txs - 1./4.*x2z*tx - 1./4.*tx*x12s + 1./2.*txs ) GG20q = GG20q + rwwg(7,11)*vvq*yc * ( - 1./4.*O*x12*x2z + 1./2.* + O*x12*txs - 1./4.*O*x2z*tx + 1./4.*O*x2z*txs + 1./4.*O*tx* + x12s - 1./4.*O*tx*x2zs + 1./4.*O*x2zs - 1./4.*Os*x12*x2z + 1./ + 2.*Os*x12*tx + 1./4.*Os*x2z - 1./4.*Os*x2zs + 1./4.*Os*txs - + 1./4.*Oc*x2z + 1./4.*Oc*tx - 1./4.*x12*x2z*tx + 1./4.*x12*x2z + *txs - 1./2.*x2z*txs + 1./4.*tx*x2zs + 1./4.*x12s*txs ) GG20q = GG20q + rwwg(7,12)*XX*vvq*yc * ( - 3*O*x12*x2z*txs + 3./ + 2.*O*x12*tx*x2zs + 3./2.*O*tx*x2zc + 3./2.*O*x2zc - 3./2.*O* + x2zs*txs - 3./2.*Os*x2z*txs + 3./2.*Os*tx*x2zs + 3*x12*tx* + x2zs - 3./2.*x12*x2zs*txs - 3./2.*x2z*x12s*txs - 3./2.*tx* + x2zc - 3./2.*x2zc + 3*x2zs*txs ) GG20q = GG20q + rwwg(7,12)*Xpi*vvq*yc * ( - 3*O*x12*x2z*tx - 3./ + 2.*O*x12*x2zs - 3*O*x2z*txs + 3./2.*O*tx*x2zs + 9./2.*O*x2zs + - 3./2.*Os*x2zs + 3*x12*x2z*tx - 3*x12*x2z*txs + 3./2.*x12* + tx*x2zs + 3*x12*x2zs - 3*x2z*tx*x12s + 3*x2z*txs - 3./2.*tx* + x2zs - 3*x2zs ) GG20q = GG20q + rwwg(7,12)*vvq*Xp*yc * ( - 3*O*x12*x2z + 3*O*x2z + - 3./2.*Os*x2z + 3*x12*x2z - 3./2.*x2z*x12s - 3./2.*x2z ) GG20q = GG20q + rwwg(7,12)*vvq*yc * ( 3*O*x12*x2z*tx + 3*O*x12* + x2z + 3./2.*O*x12*x2zs + 3*O*x2z*txs - 3*O*x2z - 3./2.*O*tx* + x2zs - 9./2.*O*x2zs + 3./2.*Os*x2z + 3./2.*Os*x2zs - 3*x12* + x2z*tx + 3*x12*x2z*txs - 3*x12*x2z - 3./2.*x12*tx*x2zs - 3* + x12*x2zs + 3*x2z*tx*x12s + 3./2.*x2z*x12s - 3*x2z*txs + 3./2. + *x2z + 3./2.*tx*x2zs + 3*x2zs ) GG20q = GG20q + rwwg(7,13)*XX*vvq*yc * ( - 3./2.*O*x12*x2z*txs + + 3./2.*O*x2zc - 3./2.*O*x2zs*txs - 3./4.*Os*x2z*txs - 3./4. + *Os*x2zc + 3./2.*x12*tx*x2zs - 3./2.*x12*x2zs*txs - 3./4.*x2z + *x12s*txs - 3./4.*x2zc + 3./2.*x2zs*txs ) GG20q = GG20q + rwwg(7,13)*Xpi*vvq*yc * ( - 3./2.*O*x12*x2z*tx + - 3./2.*O*x12*x2zs - 3./2.*O*x2z*txs + 3*O*x2zs - 3./2.*Os* + x2zs + 3./2.*x12*x2z*tx - 3./2.*x12*x2z*txs + 3./2.*x12*x2zs + - 3./2.*x2z*tx*x12s + 3./2.*x2z*txs - 3./2.*x2zs ) GG20q = GG20q + rwwg(7,13)*vvq*Xp*yc * ( - 3./2.*O*x12*x2z + 3./ + 2.*O*x2z - 3./4.*Os*x2z + 3./2.*x12*x2z - 3./4.*x2z*x12s - 3./ + 4.*x2z ) GG20q = GG20q + rwwg(7,13)*vvq*yc * ( 3./2.*O*x12*x2z*tx + 3./2.* + O*x12*x2z + 3./2.*O*x12*x2zs + 3./2.*O*x2z*txs - 3./2.*O*x2z + - 3*O*x2zs + 3./4.*Os*x2z + 3./2.*Os*x2zs - 3./2.*x12*x2z*tx + + 3./2.*x12*x2z*txs - 3./2.*x12*x2z - 3./2.*x12*x2zs + 3./2. + *x2z*tx*x12s + 3./4.*x2z*x12s - 3./2.*x2z*txs + 3./4.*x2z + 3. + /2.*x2zs ) GG20q = GG20q + rwwg(7,14)*XX*vvq*yc * ( 3./4.*O*x12*tx*x2zs + 3./ + 4.*O*tx*x2zc - 3./4.*O*x2zc + 3./4.*O*x2zs*txs + 3./4.*Os*tx* + x2zs + 3./4.*Os*x2zc + 3./4.*x12*x2zs*txs - 3./4.*tx*x2zc ) GG20q = GG20q + rwwg(7,14)*Xpi*vvq*yc * ( 3./4.*O*x12*x2z*tx + 3./ + 4.*O*x12*x2zs + 3./4.*O*x2z*txs + 3./2.*O*tx*x2zs - 3./2.*O* + x2zs + 3./4.*Os*x2z*tx + 3./2.*Os*x2zs + 3./4.*x12*x2z*txs + + 3./4.*x12*tx*x2zs - 3./2.*tx*x2zs ) GG20q = GG20q + rwwg(7,14)*vvq*Xp*yc * ( 1./4.*O*x12*x2z - 1./2.* + O*x12*tx + 3./4.*O*x2z*tx + 1./4.*O*x2z - 1./4.*O*txs - 1./4. + *Os*x12 + 1./4.*Os*x2z + 1./4.*Os - 1./4.*Oc + 3./4.*x12*x2z* + tx + 1./2.*x12*x2z + 1./2.*x12*tx - 1./4.*x12*txs - 3./4.*x2z + *tx - 1./2.*x2z - 1./2.*tx*x12s + 1./4.*txs ) GG20q = GG20q + rwwg(7,14)*vvq*Xps*yc * ( 1./4. + 1./2.*O*x12 - 1. + /2.*O + 1./4.*Os - 1./2.*x12 + 1./4.*x12s ) GG20q = GG20q + rwwg(7,14)*vvq*yc * ( - 3./4.*O*x12*x2z*tx - 3./ + 4.*O*x12*x2z - 3./4.*O*x12*x2zs + 1./2.*O*x12*txs - 3./4.*O* + x2z*tx - 1./2.*O*x2z*txs + 3./4.*O*x2z - 3./2.*O*tx*x2zs + O* + x2zs + 1./4.*Os*x12*x2z - 3./4.*Os*x2z*tx - Os*x2z - 5./4.*Os + *x2zs + 1./4.*Os*txs + 1./4.*Oc*x2z - 5./4.*x12*x2z*tx - 1./2. + *x12*x2z*txs - 3./4.*x12*tx*x2zs + 3./4.*x2z*tx - 1./4.*x2z* + txs + 3./2.*tx*x2zs + 1./4.*x12s*txs + 1./4.*x2zs ) GG20q = GG20q + rwwg(8,1)*Xpi*vvq*yc * ( - 6*O*x12*x2z*tx + 6*O* + x2z*tx - 6*O*x2z*txs + 6*O*tx*x2zs - 12*O*x2zs - 6*Os*x2z*tx + + 6*Os*x2zs - 6*x12*x2z*tx - 6*x12*x2z*txs + 12*x2z*txs - 6* + tx*x2zs + 6*x2zs ) GG20q = GG20q + rwwg(8,1)*vvq*Xp*yc * ( 6 + 13*O*x12*x2z - 10*O* + x12*tx + 17*O*x12 + 13*O*x2z*tx - 33*O*x2z + O*tx + O*x12s - + 20*O*txs - 18*O + 2*Os*x12 + 21*Os*x2z - 15*Os*tx + 11*Os + + Oc + 5*x12*x2z*tx - 12*x12*x2z - 11*x12*tx - 20*x12*txs - 12* + x12 + 3*x2z*tx + 12*x2z + 5*tx*x12s + 6*tx + 6*x12s + 12*txs + ) GG20q = GG20q + rwwg(8,1)*vvq*Xps*yc * ( - 6 - 20*O*x12 + 8*O*tx + + 20*O - 14*Os + 8*x12*tx + 12*x12 - 8*tx - 6*x12s ) GG20q = GG20q + rwwg(8,1)*vvq*yc * ( 6*O*x12*x2z*tx - 11*O*x12* + x2z + 6*O*x12*tx + 2*O*x12*txs - 19*O*x2z*tx + 7*O*x2z*txs + + 30*O*x2z + O*tx*x12s - 7*O*tx*x2zs - 6*O*tx + 13*O*x2zs + 18* + O*txs - Os*x12*x2z + 2*Os*x12*tx + 6*Os*x2z*tx - 17*Os*x2z + + 12*Os*tx - 7*Os*x2zs + Os*txs - Oc*x2z + Oc*tx - x12*x2z*tx + + 7*x12*x2z*txs + 12*x12*x2z + 6*x12*tx + 18*x12*txs - 12* + x2z*txs - 12*x2z - 6*tx*x12s + 5*tx*x2zs + x12s*txs - 6*x2zs + - 12*txs ) GG20q = GG20q + rwwg(8,4)*Xpi*vvq*yc * ( 3*O*x12*x2zs - 3*O*tx* + x2zs + 3*O*x2zc + 3*x12*tx*x2zs + 3*tx*x2zc - 3*x2zc - 3*x2zs + *txs ) GG20q = GG20q + rwwg(8,4)*vvq*Xp*yc * ( - O*x12*x2z*tx + O*x12* + x2z - 7./2.*O*x12*x2zs + O*x12*txs + 3*O*x12 - 10*O*x2z*tx - + 4*O*x2z*x12s + 7./2.*O*x2z*txs + 14*O*x2z - 1./2.*O*tx*x12s + - 7./2.*O*tx*x2zs - 3*O*tx - 5./2.*O*x12s - 1./2.*O*x12c + + 29./2.*O*x2zs + 5./2.*O*txs - 9./2.*Os*x12*x2z + 1./2.*Os*x12 + *tx - 5./2.*Os*x12 + 3*Os*x2z*tx - 9./2.*Os*x2z + 5./2.*Os*tx + - Os*x12s - 7./2.*Os*x2zs + 1./2.*Os*txs - 1./2.*Oc*x12 - 1./ + 2.*Oc*x2z + 1./2.*Oc*tx + 5*x12*x2z*tx + 7./2.*x12*x2z*txs + + 11*x12*x2z - 7./2.*x12*tx*x2zs + 3*x12*tx + 7*x12*x2zs + 5./2. + *x12*txs - 4*x2z*tx*x12s + 3*x2z*tx - 2*x2z*x12s - 15./2.*x2z + *txs - 9*x2z - 5./2.*tx*x12s - 1./2.*tx*x12c + 15./2.*tx*x2zs + + 1./2.*x12s*txs - 11*x2zs - 3*txs ) GG20q = GG20q + rwwg(8,4)*vvq*Xps*yc * ( 3 + 11*O*x12*x2z + 4*O* + x2z*tx - 19*O*x2z + 4*O*tx + 11./2.*O*x12s - 4*O*txs - 11./2. + *O + 11./2.*Os*x12 + 15./2.*Os*x2z - 4*Os*tx + 2*Os + 1./2.* + Oc + 4*x12*x2z*tx - 15*x12*x2z - 4*x12*tx - 4*x12*txs - 11./2. + *x12 - 4*x2z*tx + 7./2.*x2z*x12s + 23./2.*x2z + 4*tx*x12s + 2 + *x12s + 1./2.*x12c + 4*txs ) GG20q = GG20q + rwwg(8,4)*vvq*yc * ( - 6*O*x12*x2z - 8*O*x12*Xpc + - O*x12*x2zs + 6*O*x2z*tx + 5./2.*O*x2z*x12s - 5./2.*O*x2z* + txs + 6*O*tx*x2zs + 8*O*Xpc - 7./2.*O*x2zc - 23./2.*O*x2zs + + 5./2.*Os*x12*x2z - 5./2.*Os*x2z*tx - 4*Os*Xpc + 5./2.*Os*x2zs + - 6*x12*x2z*tx - 5./2.*x12*x2z*txs - x12*tx*x2zs + 8*x12*Xpc + - 11./2.*x12*x2zs + 5./2.*x2z*tx*x12s + 6*x2z*txs - 7./2.*tx + *x2zc - 6*tx*x2zs - 4*Xpc*x12s - 4*Xpc + 7./2.*x2zc + 7./2.* + x2zs*txs + 9*x2zs ) GG20q = GG20q + rwwg(8,7)*Xpi*vvq*yc * ( - 3./2.*O*x12*x2z*txs + + 3./4.*O*x12*x2zs - 3./4.*O*x2z*tx*x12s + 3./4.*O*tx*x2zc + + 3./4.*O*tx*x2zs - 3./4.*O*x2zc - 3./4.*O*x2zs*txs - 3./2.* + Os*x12*x2z*tx + 3./4.*Os*x12*x2zs - 3./4.*Os*x2z*txs + 3./4.* + Os*x2zc - 3./4.*Os*x2zs - 3./4.*Oc*x2z*tx + 3./4.*Oc*x2zs + 3. + /4.*x12*tx*x2zs - 3./4.*x12*x2zs*txs - 3./4.*x2z*x12s*txs - 3. + /4.*tx*x2zc + 3./2.*x2zs*txs ) GG20q = GG20q + rwwg(8,7)*vvq*Xp*yc * ( - 3./2.*O*x12*x2z*tx + 1. + /2.*O*x12*x2z + 3./4.*O*x12*tx + 7./8.*O*x12*x2zs - 1./2.*O* + x12*txs - 1./4.*O*x12 + 1./2.*O*x2z*tx - 3./4.*O*x2z*x12s - 7. + /4.*O*x2z*txs + 1./4.*O*x2z - 3./8.*O*tx*x12s + 7./8.*O*tx* + x2zs - 1./4.*O*tx + 3./8.*O*x12s - 1./8.*O*x12c - 7./8.*O* + x2zs + 3./4.*O*txs + 1./4.*Os*x12*x2z - 3./8.*Os*x12*tx - 3./ + 4.*Os*x2z*tx - 5./4.*Os*x2z + 3./8.*Os*tx - 1./8.*Os*x12s + 7. + /8.*Os*x2zs - 1./4.*Os*txs + 1./4.*Os + 1./8.*Oc*x12 + Oc*x2z + - 1./8.*Oc*tx - 3./8.*Oc + 1./8.*Oq + 1./2.*x12*x2z*tx - 7./ + 4.*x12*x2z*txs + 7./8.*x12*tx*x2zs - 1./4.*x12*tx + 3./4.*x12 + *txs - 3./4.*x2z*tx*x12s + 1./4.*x2z*tx + 7./4.*x2z*txs + 3./ + 8.*tx*x12s - 1./8.*tx*x12c - 7./8.*tx*x2zs - 1./4.*x12s*txs + - 1./2.*txs ) GG20q = GG20q + rwwg(8,7)*vvq*yc * ( 5./4.*O*x12*x2z*tx + 2*O*x12 + *x2z*txs - 1./2.*O*x12*x2z - 1./8.*O*x12*tx*x2zs - 3./2.*O* + x12*x2zs - 1./2.*O*x12*txs + 7./8.*O*x2z*tx*x12s - 1./2.*O* + x2z*tx + 5./8.*O*x2z*x12s + O*x2z*txs - 1./4.*O*tx*x12s + 1./ + 8.*O*tx*x12c - 7./8.*O*tx*x2zc - 5./4.*O*tx*x2zs + 3./8.*O* + x12s*txs + 7./8.*O*x2zc + 7./8.*O*x2zs*txs + 1./2.*O*x2zs + 7. + /4.*Os*x12*x2z*tx + 1./4.*Os*x12*x2z - 1./2.*Os*x12*tx - Os* + x12*x2zs + 3./8.*Os*x12*txs + 5./8.*Os*x2z*tx - 1./8.*Os*x2z* + x12s + Os*x2z*txs + 1./2.*Os*x2z + 3./8.*Os*tx*x12s - 1./8.* + Os*tx*x2zs - 7./8.*Os*x2zc + 1./2.*Os*x2zs - 1./4.*Os*txs - 1. + /4.*Oc*x12*x2z + 3./8.*Oc*x12*tx + 7./8.*Oc*x2z*tx - 3./8.*Oc + *x2z - 1./4.*Oc*tx - Oc*x2zs + 1./8.*Oc*txs - 1./8.*Oq*x2z + + 1./8.*Oq*tx - 1./2.*x12*x2z*tx + x12*x2z*txs - 3./2.*x12*tx* + x2zs + 7./8.*x12*x2zs*txs + 5./8.*x2z*tx*x12s + x2z*x12s*txs + - x2z*txs + 7./8.*tx*x2zc + 1./2.*tx*x2zs - 1./4.*x12s*txs + + 1./8.*x12c*txs ) GG20q = GG20q + rwwg(8,7)*vvq*yc * ( - 7./4.*x2zs*txs ) GG20q = GG20q + rwwg(8,8)*vvq*Xp*yc * ( - 2*O*x12 + 4*O*x2z*tx + - 6*O*x2z + 2*O*tx + 2*O*x12s - 2*O*x2zs - 2*O*txs + 2*Os* + x12 + 2*Os*x2z - 2*Os*tx - 4*x12*x2z - 2*x12*tx - 2*x12*txs + - 2*x2z*tx + 2*x2z*txs + 4*x2z + 2*tx*x12s - 2*tx*x2zs + 2* + x2zs + 2*txs ) GG20q = GG20q + rwwg(8,8)*vvq*Xps*yc * ( - 2 - 2*O*x12*x2z - 2*O + *x12 - 2*O*x2z*tx + 6*O*x2z - 2*O*tx - 2*O*x12s + 2*O*txs + 4 + *O - 2*Os*x12 - 2*Os*x2z + 2*Os*tx - 2*Os - 2*x12*x2z*tx + 4* + x12*x2z + 2*x12*tx + 2*x12*txs + 4*x12 + 2*x2z*tx - 4*x2z - 2 + *tx*x12s - 2*x12s - 2*txs ) GG20q = GG20q + rwwg(8,8)*vvq*yc * ( 2*O*x12*x2z + 4*O*x12*Xpc - + 2*O*x2z*tx - 4*O*Xpc + 2*O*x2zs + 2*Os*Xpc + 2*x12*x2z*tx - 4 + *x12*Xpc - 2*x2z*txs + 2*tx*x2zs + 2*Xpc*x12s + 2*Xpc - 2* + x2zs ) GG20q = GG20q + rwwg(8,11)*vvq*Xp*yc * ( - O*x12*x2z + O*x12 - O + *x2z*tx + 3*O*x2z - O*tx - O*x12s + O*txs - Os*x12 - Os*x2z + + Os*tx - x12*x2z*tx + 2*x12*x2z + x12*tx + x12*txs + x2z*tx + - 2*x2z - tx*x12s - txs ) GG20q = GG20q + rwwg(8,11)*vvq*Xps*yc * ( 1 + 2*O*x12 - 2*O + Os + - 2*x12 + x12s ) GG20q = GG20q + rwwg(8,11)*vvq*yc * ( - O*x12*x2z + O*x2z*tx - O + *x2zs - x12*x2z*tx + x2z*txs - tx*x2zs + x2zs ) GG20q = GG20q + rwwg(8,12)*Xpi*vvq*yc * ( 3*O*x2z*tx - 3*O*x2zs + - 3*x12*x2z*tx + 6*x2z*txs - 6*tx*x2zs + 3*x2zs ) GG20q = GG20q + rwwg(8,12)*vvq*Xp*yc * ( 3 + 4*O*x12*x2z + 5*O* + x12 + 7*O*x2z*tx - 12*O*x2z + 4*O*tx + O*x12s - 7*O*txs - 6*O + + Os*x12 + 4*Os*x2z - 4*Os*tx + 3*Os + 7*x12*x2z*tx - 8*x12* + x2z - 4*x12*tx - 7*x12*txs - 6*x12 - 7*x2z*tx + 8*x2z + 4*tx* + x12s + 3*x12s + 7*txs ) GG20q = GG20q + rwwg(8,12)*vvq*Xps*yc * ( - 4 - 8*O*x12 + 8*O - + 4*Os + 8*x12 - 4*x12s ) GG20q = GG20q + rwwg(8,12)*vvq*yc * ( - 2*O*x12*x2z - 10*O*x2z* + tx + 9*O*x2z - 3*O*tx + 4*O*x2zs + 6*O*txs - 3*Os*x2z + 3*Os* + tx - 2*x12*x2z*tx + 6*x12*x2z + 3*x12*tx + 6*x12*txs + 6*x2z* + tx - 7*x2z*txs - 6*x2z - 3*tx*x12s + 7*tx*x2zs - 4*x2zs - 6* + txs ) GG20q = GG20q + rwwg(8,13)*Xpi*vvq*yc * ( - 3./2.*O*x12*x2z*tx + + 3./2.*O*x2z*tx - 3./2.*O*x2z*txs + 3./2.*O*tx*x2zs - 3*O* + x2zs - 3./2.*Os*x2z*tx + 3./2.*Os*x2zs - 3./2.*x12*x2z*tx - 3. + /2.*x12*x2z*txs + 3*x2z*txs - 3./2.*tx*x2zs + 3./2.*x2zs ) GG20q = GG20q + rwwg(8,13)*vvq*Xp*yc * ( 3./2. + 13./4.*O*x12*x2z + - 1./2.*O*x12*tx + 13./4.*O*x12 + 7./4.*O*x2z*tx - 25./4.*O* + x2z + 7./4.*O*tx - 1./4.*O*x12s - 7./2.*O*txs - 3*O + 13./4.* + Os*x2z - 7./4.*Os*tx + 5./4.*Os + 1./4.*Oc + 7./4.*x12*x2z*tx + - 3*x12*x2z - 5./4.*x12*tx - 7./2.*x12*txs - 3*x12 - 7./4.* + x2z*tx + 3*x2z + 5./4.*tx*x12s + 3./2.*x12s + 7./2.*txs ) GG20q = GG20q + rwwg(8,13)*vvq*Xps*yc * ( - 3./2. - 3*O*x12 + 3* + O - 3./2.*Os + 3*x12 - 3./2.*x12s ) GG20q = GG20q + rwwg(8,13)*vvq*yc * ( 3./2.*O*x12*x2z*tx - 13./4. + *O*x12*x2z + 1./2.*O*x12*txs - 13./4.*O*x2z*tx + 7./4.*O*x2z* + txs + 6*O*x2z + 1./4.*O*tx*x12s - 7./4.*O*tx*x2zs - 3./2.*O* + tx + 13./4.*O*x2zs + 3*O*txs - 1./4.*Os*x12*x2z + 1./2.*Os* + x12*tx + 3./2.*Os*x2z*tx - 11./4.*Os*x2z + 3./2.*Os*tx - 7./4. + *Os*x2zs + 1./4.*Os*txs - 1./4.*Oc*x2z + 1./4.*Oc*tx - 1./4.* + x12*x2z*tx + 7./4.*x12*x2z*txs + 3*x12*x2z + 3./2.*x12*tx + 3 + *x12*txs + 3./2.*x2z*tx - 7./2.*x2z*txs - 3*x2z - 3./2.*tx* + x12s + 7./4.*tx*x2zs + 1./4.*x12s*txs - 3./2.*x2zs - 3*txs ) GG20q = GG20q + rwwg(8,14)*Xpi*vvq*yc * ( 3./2.*O*x12*x2z*tx + 3./ + 2.*O*x2z*txs - 3./2.*O*tx*x2zs + 3./2.*O*x2zs + 3./2.*Os*x2z* + tx - 3./2.*Os*x2zs + 3./2.*x12*x2z*txs - 3./2.*tx*x2zs ) GG20q = GG20q + rwwg(8,14)*vvq*Xp*yc * ( - 7./4.*O*x12*x2z + 2*O + *x12*tx - 7./4.*O*x12 - 1./4.*O*x2z*tx + 13./4.*O*x2z + 5./4. + *O*tx + 1./4.*O*x12s + 2*O*txs + 3./2.*O - 13./4.*Os*x2z + 7./ + 4.*Os*tx - 5./4.*Os - 1./4.*Oc + 5./4.*x12*x2z*tx + 5./4.*x12 + *tx + 2*x12*txs - 11./4.*x2z*tx + 1./4.*tx*x12s - 3./2.*tx - + 1./2.*txs ) GG20q = GG20q + rwwg(8,14)*vvq*Xps*yc * ( 3./2.*O*x12 - 3./2.*O* + tx - 3./2.*O + 3./2.*Os - 3./2.*x12*tx + 3./2.*tx ) GG20q = GG20q + rwwg(8,14)*vvq*yc * ( - 3./2.*O*x12*x2z*tx + 7./ + 4.*O*x12*x2z - 3./2.*O*x12*tx - 1./2.*O*x12*txs + 1./4.*O*x2z + *tx - 7./4.*O*x2z*txs - 3*O*x2z - 1./4.*O*tx*x12s + 7./4.*O* + tx*x2zs - 7./4.*O*x2zs - 3./2.*O*txs + 1./4.*Os*x12*x2z - 1./ + 2.*Os*x12*tx - 3./2.*Os*x2z*tx + 11./4.*Os*x2z - 3./2.*Os*tx + + 7./4.*Os*x2zs - 1./4.*Os*txs + 1./4.*Oc*x2z - 1./4.*Oc*tx + - 5./4.*x12*x2z*tx - 7./4.*x12*x2z*txs - 3./2.*x12*txs + 3* + x2z*tx + 1./2.*x2z*txs + 5./4.*tx*x2zs - 1./4.*x12s*txs ) GG20q = GG20q + rwwg(9,1)*Xpi*vvq*yc * ( 12*O*x2z*tx + 12*O*txs + + 12*x12*txs - 12*x2z*tx ) GG20q = GG20q + rwwg(9,1)*vvq*Xp*yc * ( 44*O*tx + 12*x12*tx - 12* + tx ) GG20q = GG20q + rwwg(9,1)*vvq*yc * ( - 4*O*x12*tx - 16*O*x2z*tx + - 36*O*tx - 12*O*txs - 4*Os*tx - 12*x12*tx - 12*x12*txs + 12 + *x2z*tx + 12*tx ) GG20q = GG20q + rwwg(9,4)*Xpi*vvq*yc * ( - 3*O*x12*x2z*tx - 3*O* + x2z*txs + 3*O*tx*x2zs - 3*O*x2zs - 3*Os*x2z*tx + 3*Os*x2zs - + 3*x12*x2z*txs + 3*tx*x2zs ) GG20q = GG20q + rwwg(9,4)*vvq*Xp*yc * ( 7./2.*O*x12*x2z - 5*O*x12 + *tx + 5./2.*O*x12 + 1./2.*O*x2z*tx - 15./2.*O*x2z - 5./2.*O* + tx + 1./2.*O*x12s - 4*O*txs - 3*O + Os*x12 + 15./2.*Os*x2z - + 9./2.*Os*tx + 5./2.*Os + 1./2.*Oc - 7./2.*x12*x2z*tx - 5./2.* + x12*tx - 4*x12*txs + 15./2.*x2z*tx - 1./2.*tx*x12s + 3*tx ) GG20q = GG20q + rwwg(9,4)*vvq*Xps*yc * ( - 4*O*x12 + 4*O*tx + 4* + O - 4*Os + 4*x12*tx - 4*tx ) GG20q = GG20q + rwwg(9,4)*vvq*yc * ( 3*O*x12*x2z*tx - 5./2.*O*x12 + *x2z + 3*O*x12*tx + O*x12*txs - 1./2.*O*x2z*tx + 7./2.*O*x2z* + txs + 6*O*x2z + 1./2.*O*tx*x12s - 7./2.*O*tx*x2zs + 7./2.*O* + x2zs + 3*O*txs - 1./2.*Os*x12*x2z + Os*x12*tx + 3*Os*x2z*tx + - 11./2.*Os*x2z + 3*Os*tx - 7./2.*Os*x2zs + 1./2.*Os*txs - 1. + /2.*Oc*x2z + 1./2.*Oc*tx + 5./2.*x12*x2z*tx + 7./2.*x12*x2z* + txs + 3*x12*txs - 6*x2z*tx - 7./2.*tx*x2zs + 1./2.*x12s*txs ) GG20q = GG20q + rwwg(9,7)*Xpi*vvq*yc * ( 3./2.*O*x12*x2z*tx + 3./ + 2.*O*x2z*txs + 3./2.*O*tx*x2zs - 3./2.*O*x2zs + 3./2.*Os*x2z* + tx + 3./2.*Os*x2zs + 3./2.*x12*x2z*txs - 3./2.*tx*x2zs ) GG20q = GG20q + rwwg(9,7)*vvq*Xp*yc * ( 7./4.*O*x12*x2z + 1./2.*O + *x12*tx - 3./4.*O*x12 + 7./4.*O*x2z*tx - 7./4.*O*x2z - 3./4.* + O*tx + 1./4.*O*x12s + 1./2.*O + 1./2.*Os*x12 + 7./4.*Os*x2z + + 1./4.*Os*tx - 3./4.*Os + 1./4.*Oc + 7./4.*x12*x2z*tx - 3./ + 4.*x12*tx - 7./4.*x2z*tx + 1./4.*tx*x12s + 1./2.*tx ) GG20q = GG20q + rwwg(9,7)*vvq*yc * ( - 2*O*x12*x2z*tx - 5./4.*O* + x12*x2z + 1./2.*O*x12*tx - 1./2.*O*x12*txs - 3./4.*O*x2z*tx + - 7./4.*O*x2z*txs + O*x2z - 1./4.*O*tx*x12s - 7./4.*O*tx* + x2zs + 7./4.*O*x2zs + 1./2.*O*txs - 1./4.*Os*x12*x2z - 1./2.* + Os*x12*tx - 2*Os*x2z*tx - 3./4.*Os*x2z + 1./2.*Os*tx - 7./4.* + Os*x2zs - 1./4.*Os*txs - 1./4.*Oc*x2z - 1./4.*Oc*tx - 5./4.* + x12*x2z*tx - 7./4.*x12*x2z*txs + 1./2.*x12*txs + x2z*tx + 7./ + 4.*tx*x2zs - 1./4.*x12s*txs ) GG20q = GG20q + rwwg(9,8)*vvq*Xp*yc * ( 4*O*x12*tx - 4*O*x12 - 4* + O*x2z*tx + 4*O*x2z + 4*O*tx + 4*O*txs + 4*O - 4*Os*x2z + 4*Os + *tx - 4*Os + 4*x12*tx + 4*x12*txs - 4*x2z*tx - 4*tx ) GG20q = GG20q + rwwg(9,8)*vvq*Xps*yc * ( 4*O*x12 - 4*O*tx - 4*O + + 4*Os - 4*x12*tx + 4*tx ) GG20q = GG20q + rwwg(9,8)*vvq*yc * ( - 4*O*x12*tx + 4*O*x2z*tx + - 4*O*x2z - 4*O*txs + 4*Os*x2z - 4*Os*tx - 4*x12*txs + 4*x2z + *tx ) GG20q = GG20q + rwwg(9,9)*vvq*Xp*yc * ( - 8*O*tx ) GG20q = GG20q + rwwg(9,9)*vvq*yc * ( 8*O*tx ) GG20q = GG20q + rwwg(9,11)*vvq*Xp*yc * ( O*x12 - O*tx - O + Os - + x12*tx + tx ) GG20q = GG20q + rwwg(9,11)*vvq*yc * ( O*x12*tx - O*x2z*tx + O*x2z + + O*txs - Os*x2z + Os*tx + x12*txs - x2z*tx ) GG20q = GG20q + rwwg(9,12)*Xpi*vvq*yc * ( - 6*O*x2z*tx + 6*O*txs + + 6*x12*txs - 6*x2z*tx ) GG20q = GG20q + rwwg(9,12)*vvq*Xp*yc * ( - O*x12 + 7*O*tx + O - + Os + 7*x12*tx - 7*tx ) GG20q = GG20q + rwwg(9,12)*vvq*yc * ( - O*x12*tx + 7*O*x2z*tx - + O*x2z - 6*O*tx - 7*O*txs + Os*x2z - Os*tx - 6*x12*tx - 7*x12* + txs + 7*x2z*tx + 6*tx ) GG20q = GG20q + rwwg(9,13)*Xpi*vvq*yc * ( 3*O*x2z*tx + 3*O*txs + + 3*x12*txs - 3*x2z*tx ) GG20q = GG20q + rwwg(9,13)*vvq*Xp*yc * ( 1./2.*O*x12 + 7./2.*O*tx + - 1./2.*O + 1./2.*Os + 7./2.*x12*tx - 7./2.*tx ) GG20q = GG20q + rwwg(9,13)*vvq*yc * ( - 1./2.*O*x12*tx - 7./2.*O + *x2z*tx + 1./2.*O*x2z - 3*O*tx - 7./2.*O*txs - 1./2.*Os*x2z + - 1./2.*Os*tx - 3*x12*tx - 7./2.*x12*txs + 7./2.*x2z*tx + 3* + tx ) GG20q = GG20q + rwwg(9,14)*Xpi*vvq*yc * ( - 6*O*x2z*tx ) GG20q = GG20q + rwwg(9,14)*vvq*Xp*yc * ( - 1./2.*O*x12 - 13./2.* + O*tx + 1./2.*O - 1./2.*Os - 1./2.*x12*tx + 1./2.*tx ) GG20q = GG20q + rwwg(9,14)*vvq*yc * ( 1./2.*O*x12*tx + 13./2.*O* + x2z*tx - 1./2.*O*x2z + 6*O*tx + 1./2.*O*txs + 1./2.*Os*x2z + + 1./2.*Os*tx + 1./2.*x12*txs - 1./2.*x2z*tx ) GG20q = GG20q + rwwg(10,1)*XX*vvq*yc * ( 6*O*x12*x2z*txs - 6*O* + x2zc + 6*O*x2zs*txs + 3*Os*x2z*txs + 3*Os*x2zc - 6*x12*tx* + x2zs + 6*x12*x2zs*txs + 3*x2z*x12s*txs + 3*x2zc - 6*x2zs*txs + ) GG20q = GG20q + rwwg(10,1)*Xpi*vvq*yc * ( 9*O*x12*x2z*tx + 6*O* + x12*x2zs + 6*O*x12*txs + 15*O*x2z*txs + 3*O*tx*x2zs - 21*O* + x2zs + 3*Os*x2z*tx + 12*Os*x2zs + 3*Os*txs - 12*x12*x2z*tx + + 15*x12*x2z*txs - 6*x12*x2zs + 6*x2z*tx*x12s - 12*x2z*txs - 3* + tx*x2zs + 3*x12s*txs + 9*x2zs ) GG20q = GG20q + rwwg(10,1)*vvq*Xp*yc * ( 3 + 31./2.*O*x12*x2z + + 11*O*x12*tx + 17./2.*O*x12 + 15./2.*O*x2z*tx - 51./2.*O*x2z + + 5./2.*O*tx + 1./2.*O*x12s + 11*O*txs - 9*O + 33./2.*Os*x2z + + 9./2.*Os*tx + 13./2.*Os - 1./2.*Oc + 7./2.*x12*x2z*tx - 12 + *x12*x2z - 7./2.*x12*tx + 11*x12*txs - 6*x12 - 15./2.*x2z*tx + + 3*x2z*x12s + 9*x2z + 13./2.*tx*x12s - 3*tx + 3*x12s - 7* + txs ) GG20q = GG20q + rwwg(10,1)*vvq*Xps*yc * ( - 3 - 10*O*x12 - 4*O* + tx + 10*O - 7*Os - 4*x12*tx + 6*x12 + 4*tx - 3*x12s ) GG20q = GG20q + rwwg(10,1)*vvq*yc * ( - 10*O*x12*x2z*tx - 29./2. + *O*x12*x2z - 9*O*x12*tx - 6*O*x12*x2zs - 7*O*x12*txs - 11./2. + *O*x2z*tx - 33./2.*O*x2z*txs + 24*O*x2z - 1./2.*O*tx*x12s - 7. + /2.*O*tx*x2zs + 43./2.*O*x2zs - 9*O*txs + 1./2.*Os*x12*x2z - + Os*x12*tx - 4*Os*x2z*tx - 31./2.*Os*x2z - 3*Os*tx - 25./2.*Os + *x2zs - 7./2.*Os*txs + 1./2.*Oc*x2z - 1./2.*Oc*tx + 19./2.* + x12*x2z*tx - 33./2.*x12*x2z*txs + 12*x12*x2z + 6*x12*tx + 6* + x12*x2zs - 9*x12*txs - 6*x2z*tx*x12s + 6*x2z*tx - 3*x2z*x12s + + 13*x2z*txs - 9*x2z - 6*tx*x12s + 7./2.*tx*x2zs - 7./2.* + x12s*txs - 9*x2zs + 6*txs ) GG20q = GG20q + rwwg(10,4)*XX*vvq*yc * ( 3./4.*O*x12*x2zc - 3./2. + *O*x12*x2zs*txs - 3./4.*O*tx*x12s*x2zs + 3./4.*O*tx*x2zq + 3./ + 4.*O*tx*x2zc - 3./4.*O*x2zq - 3./4.*O*x2zc*txs - 3./2.*Os*x12 + *tx*x2zs + 3./4.*Os*x12*x2zc + 3./4.*Os*x2zq - 3./4.*Os*x2zc + - 3./4.*Os*x2zs*txs - 3./4.*Oc*tx*x2zs + 3./4.*Oc*x2zc + 3./ + 4.*x12*tx*x2zc - 3./4.*x12*x2zc*txs - 3./4.*tx*x2zq - 3./4.* + x12s*x2zs*txs + 3./2.*x2zc*txs ) GG20q = GG20q + rwwg(10,4)*Xpi*vvq*yc * ( - 3*O*x12*x2z*txs - 3./ + 2.*O*x12*tx*x2zs + 3./4.*O*x12*x2zc + 9./4.*O*x12*x2zs - 3./2. + *O*x2z*tx*x12s + 9./4.*O*tx*x2zc + 9./4.*O*tx*x2zs - 3./4.*O* + x12s*x2zs - 9./4.*O*x2zc - 3*O*x2zs*txs - 3*Os*x12*x2z*tx + 3. + /2.*Os*x12*x2zs - 3./2.*Os*x2z*txs - 3./4.*Os*tx*x2zs + 9./4. + *Os*x2zc - 9./4.*Os*x2zs - 3./2.*Oc*x2z*tx + 9./4.*Oc*x2zs + + 3./4.*x12*tx*x2zc + 9./4.*x12*tx*x2zs - 3*x12*x2zs*txs - 3./2. + *x2z*x12s*txs - 3./4.*tx*x12s*x2zs - 9./4.*tx*x2zc + 9./2.* + x2zs*txs ) GG20q = GG20q + rwwg(10,4)*vvq*Xp*yc * ( - 7./2.*O*x12*x2z*tx + + 7./2.*O*x12*x2z - 3./2.*O*x12*tx + 7./4.*O*x12*x2zs - 2*O*x12 + *txs + 3./4.*O*x12 + 7./2.*O*x2z*tx - 7./4.*O*x2z*x12s - 9./2. + *O*x2z*txs - 3./4.*O*x2z - O*tx*x12s + 11./4.*O*tx*x2zs + 3./ + 4.*O*tx - 3./4.*O*x12s - 11./4.*O*x2zs - 3./2.*O*txs + Os*x12 + *x2z - 2*Os*x12*tx - 7./4.*Os*x2z*tx - 2*Os*x2z - 3./4.*Os*tx + + 11./4.*Os*x2zs - Os*txs - 3./4.*Os + 11./4.*Oc*x2z - Oc*tx + + 3./4.*Oc + 7./2.*x12*x2z*tx - 9./2.*x12*x2z*txs + 7./4.* + x12*tx*x2zs + 3./4.*x12*tx - 3./2.*x12*txs - 7./4.*x2z*tx* + x12s - 3./4.*x2z*tx + 11./2.*x2z*txs - 3./4.*tx*x12s - 11./4. + *tx*x2zs - x12s*txs + 3./2.*txs ) GG20q = GG20q + rwwg(10,4)*vvq*Xps*yc * ( - O*x12*x2z + 2*O*x12* + tx - O*x12 - O*x2z*tx + O*x2z - O*tx + O*x12s + 2*O*txs - Os* + x2z + Os*tx + Os - Oc - x12*x2z*tx - x12*tx + 2*x12*txs + x2z + *tx + tx*x12s - 2*txs ) GG20q = GG20q + rwwg(10,4)*vvq*yc * ( 3*O*x12*x2z*tx + 7./2.*O* + x12*x2z*txs - 9./4.*O*x12*x2z + 3./2.*O*x12*tx*x2zs - 3./4.*O + *x12*x2zc - 4*O*x12*x2zs + 3./2.*O*x12*txs + 7./4.*O*x2z*tx* + x12s - 9./4.*O*x2z*tx + 3./2.*O*x2z*x12s + 15./4.*O*x2z*txs + + 3./4.*O*tx*x12s - 5./2.*O*tx*x2zc - 19./4.*O*tx*x2zs + 3./ + 4.*O*x12s*x2zs + 5./2.*O*x2zc + 13./4.*O*x2zs*txs + 9./4.*O* + x2zs + 7./2.*Os*x12*x2z*tx - 3./4.*Os*x12*x2z + 3./2.*Os*x12* + tx - 7./4.*Os*x12*x2zs + 3./2.*Os*x2z*tx + 7./4.*Os*x2z*txs + + 9./4.*Os*x2z + 3./4.*Os*tx*x2zs - 5./2.*Os*x2zc + 1./4.*Os + *x2zs + 3./4.*Os*txs + 7./4.*Oc*x2z*tx - 9./4.*Oc*x2z + 3./4. + *Oc*tx - 5./2.*Oc*x2zs - 9./4.*x12*x2z*tx + 15./4.*x12*x2z* + txs - 3./4.*x12*tx*x2zc - 4*x12*tx*x2zs + 13./4.*x12*x2zs*txs + + 3./2.*x2z*tx*x12s + 7./4.*x2z*x12s*txs - 9./2.*x2z*txs + 3. + /4.*tx*x12s*x2zs + 5./2.*tx*x2zc + 9./4.*tx*x2zs + 3./4.*x12s + *txs - 5*x2zs*txs ) GG20q = GG20q + rwwg(10,7)*XX*vvq*yc * ( 3./2.*O*x12*x2zs*txs - 3. + /2.*O*x2zq + 3./4.*O*x2zc*txs + 3./4.*Os*x12*x2zc + 3./4.*Os* + x2zq - 3./4.*Os*x2zc + 3./4.*Os*x2zs*txs + 3./4.*Oc*x2zc - 3./ + 2.*x12*tx*x2zc + 3./4.*x12*x2zc*txs + 3./4.*x12s*x2zs*txs + 3. + /4.*x2zq - 3./4.*x2zc*txs ) GG20q = GG20q + rwwg(10,7)*Xpi*vvq*yc * ( 3./2.*O*x12*x2z*txs + 3. + /2.*O*x12*tx*x2zs + 3./2.*O*x12*x2zc - 9./2.*O*x2zc + 3./2.*O + *x2zs*txs + 3./2.*Os*x12*x2zs + 3./4.*Os*x2z*txs + 9./4.*Os* + x2zc - 3./2.*Os*x2zs + 3./2.*Oc*x2zs - 3*x12*tx*x2zs - 3./2.* + x12*x2zc + 3./2.*x12*x2zs*txs + 3./4.*x2z*x12s*txs + 3./2.*tx + *x12s*x2zs + 9./4.*x2zc - 3./2.*x2zs*txs ) GG20q = GG20q + rwwg(10,7)*vvq*Xp*yc * ( 7./4.*O*x12*x2z*tx + 9./ + 4.*O*x12*x2z + 1./4.*O*x12*tx + 13./4.*O*x12*x2zs - 1./4.*O* + x12*txs - 1./4.*O*x2z*x12s + 7./8.*O*x2z*txs - 7./4.*O*x2z - + 1./2.*O*tx*x12s - 5*O*x2zs + 1./8.*O*txs + 3./8.*Os*x12*x2z + - 1./4.*Os*x12*tx + 1./8.*Os*x12 + 3./8.*Os*x2z - 1./8.*Os* + x12s + 5./2.*Os*x2zs - 1./8.*Os*txs - 1./4.*Oc*x12 + 5./8.*Oc + *x2z + 1./8.*Oc - 1./8.*Oq - 7./4.*x12*x2z*tx + 7./8.*x12*x2z + *txs - 7./4.*x12*x2z - 13./4.*x12*x2zs + 1./8.*x12*txs + 7./4. + *x2z*tx*x12s + x2z*x12s - 7./8.*x2z*txs + 3./4.*x2z + 1./4.* + tx*x12s - 1./4.*tx*x12c + 3./4.*x12s*x2zs - 1./8.*x12s*txs + + 5./2.*x2zs ) GG20q = GG20q + rwwg(10,7)*vvq*Xps*yc * ( - 7./4.*O*x12*x2z - 1./ + 2.*O*x12 + 7./4.*O*x2z + 3./8.*O*x12s + 1./8.*O + 3./8.*Os* + x12 - 7./8.*Os*x2z - 1./4.*Os + 1./8.*Oc + 7./4.*x12*x2z + 1./ + 8.*x12 - 7./8.*x2z*x12s - 7./8.*x2z - 1./4.*x12s + 1./8.*x12c + ) GG20q = GG20q + rwwg(10,7)*vvq*yc * ( - 7./4.*O*x12*x2z*tx - 3./ + 2.*O*x12*x2z*txs - 3./2.*O*x12*tx*x2zs - 3./2.*O*x12*x2zc - + 13./4.*O*x12*x2zs - 7./8.*O*x2z*txs + 3./8.*O*x12s*txs + 19./ + 4.*O*x2zc - 13./8.*O*x2zs*txs + 37./8.*O*x2zs - 7./8.*Os*x12* + x2z - 3./2.*Os*x12*x2zs + 3./8.*Os*x12*txs + 1./8.*Os*x2z* + x12s - 3./4.*Os*x2z*txs + 3./4.*Os*x2z - 19./8.*Os*x2zc - 7./ + 8.*Os*x2zs + 1./4.*Oc*x12*x2z - 7./8.*Oc*x2z - 3./2.*Oc*x2zs + + 1./8.*Oc*txs + 1./8.*Oq*x2z + 3./2.*x12*x2z*tx - 7./8.*x12 + *x2z*txs + 13./4.*x12*tx*x2zs + 3./2.*x12*x2zc - 13./8.*x12* + x2zs*txs + 25./8.*x12*x2zs - 7./4.*x2z*tx*x12s - 3./4.*x2z* + x12s*txs + 3./4.*x2z*txs - 3./2.*tx*x12s*x2zs - 3./4.*x12s* + x2zs + 1./8.*x12c*txs - 19./8.*x2zc + 13./8.*x2zs*txs - 9./4. + *x2zs ) GG20q = GG20q + rwwg(10,8)*Xpi*vvq*yc * ( 3./2.*O*x12*x2z*txs - 3. + /4.*O*x12*x2zs + 3./4.*O*x2z*tx*x12s - 3./4.*O*tx*x2zc - 3./4. + *O*tx*x2zs + 3./4.*O*x2zc + 3./4.*O*x2zs*txs + 3./2.*Os*x12* + x2z*tx - 3./4.*Os*x12*x2zs + 3./4.*Os*x2z*txs - 3./4.*Os*x2zc + + 3./4.*Os*x2zs + 3./4.*Oc*x2z*tx - 3./4.*Oc*x2zs - 3./4.* + x12*tx*x2zs + 3./4.*x12*x2zs*txs + 3./4.*x2z*x12s*txs + 3./4. + *tx*x2zc - 3./2.*x2zs*txs ) GG20q = GG20q + rwwg(10,8)*vvq*Xp*yc * ( 3./2.*O*x12*x2z*tx - 5./ + 2.*O*x12*x2z + 5./4.*O*x12*tx - 7./8.*O*x12*x2zs + 5./2.*O* + x12*txs - 3./4.*O*x12 - 5./2.*O*x2z*tx + 3./4.*O*x2z*x12s + + 11./4.*O*x2z*txs + 3./4.*O*x2z + 11./8.*O*tx*x12s - 15./8.*O* + tx*x2zs - 3./4.*O*tx + 5./8.*O*x12s + 1./8.*O*x12c + 15./8.*O + *x2zs + 5./4.*O*txs - 5./4.*Os*x12*x2z + 19./8.*Os*x12*tx + 3. + /4.*Os*x2z*tx + 5./4.*Os*x2z + 5./8.*Os*tx + 1./8.*Os*x12s - + 15./8.*Os*x2zs + 5./4.*Os*txs + 3./4.*Os - 1./8.*Oc*x12 - 2* + Oc*x2z + 9./8.*Oc*tx - 5./8.*Oc - 1./8.*Oq - 5./2.*x12*x2z*tx + + 11./4.*x12*x2z*txs - 7./8.*x12*tx*x2zs - 3./4.*x12*tx + 5./ + 4.*x12*txs + 3./4.*x2z*tx*x12s + 3./4.*x2z*tx - 15./4.*x2z* + txs + 5./8.*tx*x12s + 1./8.*tx*x12c + 15./8.*tx*x2zs + 5./4.* + x12s*txs - 3./2.*txs ) GG20q = GG20q + rwwg(10,8)*vvq*Xps*yc * ( O*x12*x2z - 2*O*x12*tx + + O*x12 + O*x2z*tx - O*x2z + O*tx - O*x12s - 2*O*txs + Os* + x2z - Os*tx - Os + Oc + x12*x2z*tx + x12*tx - 2*x12*txs - x2z + *tx - tx*x12s + 2*txs ) GG20q = GG20q + rwwg(10,8)*vvq*yc * ( - 5./4.*O*x12*x2z*tx - 2*O + *x12*x2z*txs + 3./2.*O*x12*x2z + 1./8.*O*x12*tx*x2zs + 3./2.* + O*x12*x2zs - 3./2.*O*x12*txs - 7./8.*O*x2z*tx*x12s + 3./2.*O* + x2z*tx - 5./8.*O*x2z*x12s - 2*O*x2z*txs - 3./4.*O*tx*x12s - 1. + /8.*O*tx*x12c + 7./8.*O*tx*x2zc + 9./4.*O*tx*x2zs - 3./8.*O* + x12s*txs - 7./8.*O*x2zc - 7./8.*O*x2zs*txs - 3./2.*O*x2zs - 7. + /4.*Os*x12*x2z*tx + 3./4.*Os*x12*x2z - 3./2.*Os*x12*tx + Os* + x12*x2zs - 3./8.*Os*x12*txs - 5./8.*Os*x2z*tx + 1./8.*Os*x2z* + x12s - Os*x2z*txs - 3./2.*Os*x2z - 3./8.*Os*tx*x12s + 1./8.* + Os*tx*x2zs + 7./8.*Os*x2zc + 1./2.*Os*x2zs - 3./4.*Os*txs + 1. + /4.*Oc*x12*x2z - 3./8.*Oc*x12*tx - 7./8.*Oc*x2z*tx + 11./8.* + Oc*x2z - 3./4.*Oc*tx + Oc*x2zs - 1./8.*Oc*txs + 1./8.*Oq*x2z + - 1./8.*Oq*tx + 3./2.*x12*x2z*tx - 2*x12*x2z*txs + 3./2.*x12 + *tx*x2zs - 7./8.*x12*x2zs*txs - 5./8.*x2z*tx*x12s - x2z*x12s* + txs + 3*x2z*txs - 7./8.*tx*x2zc - 3./2.*tx*x2zs - 3./4.*x12s* + txs ) GG20q = GG20q + rwwg(10,8)*vvq*yc * ( - 1./8.*x12c*txs + 7./4.* + x2zs*txs ) GG20q = GG20q + rwwg(10,9)*Xpi*vvq*yc * ( - 3./2.*O*x12*x2z*tx + - 3./2.*O*x2z*txs - 3./2.*O*tx*x2zs + 3./2.*O*x2zs - 3./2.* + Os*x2z*tx - 3./2.*Os*x2zs - 3./2.*x12*x2z*txs + 3./2.*tx*x2zs + ) GG20q = GG20q + rwwg(10,9)*vvq*Xp*yc * ( - 7./4.*O*x12*x2z - 5./ + 2.*O*x12*tx - 5./4.*O*x12 - 15./4.*O*x2z*tx + 15./4.*O*x2z - + 5./4.*O*tx - 1./4.*O*x12s - 2*O*txs + 3./2.*O - 1./2.*Os*x12 + - 15./4.*Os*x2z - 9./4.*Os*tx - 5./4.*Os - 1./4.*Oc - 7./4.* + x12*x2z*tx - 5./4.*x12*tx - 2*x12*txs + 15./4.*x2z*tx - 1./4. + *tx*x12s + 3./2.*tx ) GG20q = GG20q + rwwg(10,9)*vvq*Xps*yc * ( 2*O*x12 + 2*O*tx - 2*O + + 2*Os + 2*x12*tx - 2*tx ) GG20q = GG20q + rwwg(10,9)*vvq*yc * ( 2*O*x12*x2z*tx + 5./4.*O* + x12*x2z + 3./2.*O*x12*tx + 1./2.*O*x12*txs + 11./4.*O*x2z*tx + + 7./4.*O*x2z*txs - 3*O*x2z + 1./4.*O*tx*x12s + 7./4.*O*tx* + x2zs - 7./4.*O*x2zs + 3./2.*O*txs + 1./4.*Os*x12*x2z + 1./2.* + Os*x12*tx + 2*Os*x2z*tx + 11./4.*Os*x2z + 3./2.*Os*tx + 7./4. + *Os*x2zs + 1./4.*Os*txs + 1./4.*Oc*x2z + 1./4.*Oc*tx + 5./4.* + x12*x2z*tx + 7./4.*x12*x2z*txs + 3./2.*x12*txs - 3*x2z*tx - 7. + /4.*tx*x2zs + 1./4.*x12s*txs ) GG20q = GG20q + rwwg(10,10)*XX*vvq*yc * ( - 3./4.*O*x12*x2zs*txs + + 3./4.*O*x2zq - 3./8.*O*x2zc*txs - 3./8.*Os*x12*x2zc - 3./8. + *Os*x2zq + 3./8.*Os*x2zc - 3./8.*Os*x2zs*txs - 3./8.*Oc*x2zc + + 3./4.*x12*tx*x2zc - 3./8.*x12*x2zc*txs - 3./8.*x12s*x2zs* + txs - 3./8.*x2zq + 3./8.*x2zc*txs ) GG20q = GG20q + rwwg(10,10)*Xpi*vvq*yc * ( - 3./2.*O*x12*x2z*txs + - 3./4.*O*x12*tx*x2zs - 3./4.*O*x12*x2zc + 3*O*x2zc - 9./8.* + O*x2zs*txs - 9./8.*Os*x12*x2zs - 3./4.*Os*x2z*txs - 3./2.*Os* + x2zc + 9./8.*Os*x2zs - 9./8.*Oc*x2zs + 9./4.*x12*tx*x2zs + 3./ + 4.*x12*x2zc - 9./8.*x12*x2zs*txs - 3./4.*x2z*x12s*txs - 3./4. + *tx*x12s*x2zs - 3./2.*x2zc + 9./8.*x2zs*txs ) GG20q = GG20q + rwwg(10,10)*vvq*Xp*yc * ( - 7./4.*O*x12*x2z*tx + - 9./4.*O*x12*x2z - 3./4.*O*x12*tx - 5./2.*O*x12*x2zs - O* + x12*txs - 11./8.*O*x2z*txs + 3*O*x2z + 21./4.*O*x2zs - 3./8.* + O*txs - 11./8.*Os*x12*x2z - 3./8.*Os*x12 - 1./8.*Os*x2z - 21./ + 8.*Os*x2zs - 1./2.*Os*txs + 3./8.*Os - 11./8.*Oc*x2z - 3./8.* + Oc + 11./4.*x12*x2z*tx - 11./8.*x12*x2z*txs + 9./4.*x12*x2z + + 3./4.*x12*tx + 5./2.*x12*x2zs - 3./8.*x12*txs - 7./4.*x2z* + tx*x12s - 3./4.*x2z*x12s + 11./8.*x2z*txs - 3./2.*x2z - 3./4. + *tx*x12s - 3./8.*x12s*x2zs - 1./2.*x12s*txs - 21./8.*x2zs + 3. + /8.*txs ) GG20q = GG20q + rwwg(10,10)*vvq*Xps*yc * ( 3./8. + 11./4.*O*x12* + x2z + O*x12*tx + 3./4.*O*x12 - 15./4.*O*x2z + 1./2.*O*txs - 3. + /4.*O + 1./2.*Os*x12 + 15./8.*Os*x2z - 1./8.*Os + 1./2.*Oc - + 11./4.*x12*x2z - x12*tx + 1./2.*x12*txs - 3./4.*x12 + 7./8.* + x2z*x12s + 15./8.*x2z + tx*x12s + 3./8.*x12s - 1./2.*txs ) GG20q = GG20q + rwwg(10,10)*vvq*yc * ( 3./2.*O*x12*x2z*tx + 7./4. + *O*x12*x2z*txs + 3./4.*O*x12*tx*x2zs - O*x12*Xpc + 3./4.*O* + x12*x2zc + 9./4.*O*x12*x2zs + 3./4.*O*x12*txs + 9./8.*O*x2z* + txs + O*Xpc - 13./4.*O*x2zc + 5./4.*O*x2zs*txs - 9./2.*O*x2zs + + 9./8.*Os*x12*x2z + 5./4.*Os*x12*x2zs + 7./8.*Os*x2z*txs - + 9./8.*Os*x2z - 1./2.*Os*Xpc + 13./8.*Os*x2zc + Os*x2zs + 3./8. + *Os*txs + 9./8.*Oc*x2z + 5./4.*Oc*x2zs - 9./4.*x12*x2z*tx + 9. + /8.*x12*x2z*txs - 5./2.*x12*tx*x2zs + x12*Xpc - 3./4.*x12* + x2zc + 5./4.*x12*x2zs*txs - 9./4.*x12*x2zs + 3./2.*x2z*tx* + x12s + 7./8.*x2z*x12s*txs - 9./8.*x2z*txs + 3./4.*tx*x12s* + x2zs - 1./2.*Xpc*x12s - 1./2.*Xpc + 3./8.*x12s*x2zs + 3./8.* + x12s*txs + 13./8.*x2zc - 5./4.*x2zs*txs + 9./4.*x2zs ) GG20q = GG20q + rwwg(10,12)*XX*vvq*yc * ( 3*O*x12*x2z*txs - 3./2. + *O*x12*tx*x2zs - 3./2.*O*tx*x2zc - 3./2.*O*x2zc + 3./2.*O* + x2zs*txs + 3./2.*Os*x2z*txs - 3./2.*Os*tx*x2zs - 3*x12*tx* + x2zs + 3./2.*x12*x2zs*txs + 3./2.*x2z*x12s*txs + 3./2.*tx* + x2zc + 3./2.*x2zc - 3*x2zs*txs ) GG20q = GG20q + rwwg(10,12)*Xpi*vvq*yc * ( 3./2.*O*x12*x2z*tx + 3. + /2.*O*x12*x2zs + 3*O*x12*txs + 9./2.*O*x2z*txs - 3*O*tx*x2zs + - 6*O*x2zs - 3./2.*Os*x2z*tx + 3./2.*Os*x2zs + 3./2.*Os*txs + - 6*x12*x2z*tx + 9./2.*x12*x2z*txs - 3./2.*x12*tx*x2zs - 3* + x12*x2zs + 3*x2z*tx*x12s - 6*x2z*txs + 3*tx*x2zs + 3./2.*x12s + *txs + 9./2.*x2zs ) GG20q = GG20q + rwwg(10,12)*vvq*Xp*yc * ( 3./2. + 17./4.*O*x12* + x2z + 7./2.*O*x12*tx + 11./4.*O*x12 - 7./4.*O*x2z*tx - 29./4. + *O*x2z - 1./4.*O*tx + 1./4.*O*x12s + 7./2.*O*txs - 3*O + 11./ + 4.*Os*x2z + 1./4.*Os*tx + 7./4.*Os - 1./4.*Oc - 7./4.*x12*x2z + *tx - 6*x12*x2z - 13./4.*x12*tx + 7./2.*x12*txs - 3*x12 + 7./ + 4.*x2z*tx + 3./2.*x2z*x12s + 9./2.*x2z + 13./4.*tx*x12s + 3./ + 2.*x12s - 7./2.*txs ) GG20q = GG20q + rwwg(10,12)*vvq*Xps*yc * ( - 3./2. - 3*O*x12 + 3 + *O - 3./2.*Os + 3*x12 - 3./2.*x12s ) GG20q = GG20q + rwwg(10,12)*vvq*yc * ( - 3./2.*O*x12*x2z*tx - 17. + /4.*O*x12*x2z - 3*O*x12*tx - 3./2.*O*x12*x2zs - 7./2.*O*x12* + txs + 7./4.*O*x2z*tx - 19./4.*O*x2z*txs + 15./2.*O*x2z - 1./4. + *O*tx*x12s + 13./4.*O*tx*x2zs + 23./4.*O*x2zs - 3*O*txs + 1./ + 4.*Os*x12*x2z - 1./2.*Os*x12*tx + 3./2.*Os*x2z*tx - 13./4.*Os + *x2z - 5./4.*Os*x2zs - 7./4.*Os*txs + 1./4.*Oc*x2z - 1./4.*Oc + *tx + 31./4.*x12*x2z*tx - 19./4.*x12*x2z*txs + 6*x12*x2z + 3./ + 2.*x12*tx*x2zs + 3*x12*tx + 3*x12*x2zs - 3*x12*txs - 3*x2z*tx + *x12s - 3./2.*x2z*tx - 3./2.*x2z*x12s + 13./2.*x2z*txs - 9./2. + *x2z - 3*tx*x12s - 13./4.*tx*x2zs - 7./4.*x12s*txs - 9./2.* + x2zs + 3*txs ) GG20q = GG20q + rwwg(10,13)*XX*vvq*yc * ( 3./2.*O*x12*x2z*txs - 3. + /2.*O*x2zc + 3./2.*O*x2zs*txs + 3./4.*Os*x2z*txs + 3./4.*Os* + x2zc - 3./2.*x12*tx*x2zs + 3./2.*x12*x2zs*txs + 3./4.*x2z* + x12s*txs + 3./4.*x2zc - 3./2.*x2zs*txs ) GG20q = GG20q + rwwg(10,13)*Xpi*vvq*yc * ( 3./2.*O*x12*x2z*tx + 3. + /2.*O*x12*x2zs + 3./2.*O*x12*txs + 3*O*x2z*txs - 9./2.*O*x2zs + + 9./4.*Os*x2zs + 3./4.*Os*txs - 3*x12*x2z*tx + 3*x12*x2z* + txs - 3./2.*x12*x2zs + 3./2.*x2z*tx*x12s - 3*x2z*txs + 3./4.* + x12s*txs + 9./4.*x2zs ) GG20q = GG20q + rwwg(10,13)*vvq*Xp*yc * ( 3./4. + 7./2.*O*x12*x2z + + 2*O*x12*tx + 3./2.*O*x12 - 11./2.*O*x2z + 7./4.*O*txs - 3./ + 2.*O + 1./4.*Os*x12 + 11./4.*Os*x2z + 1./2.*Os + 1./4.*Oc - 7. + /2.*x12*x2z - 2*x12*tx + 7./4.*x12*txs - 3./2.*x12 + 3./4.* + x2z*x12s + 11./4.*x2z + 2*tx*x12s + 3./4.*x12s - 7./4.*txs ) GG20q = GG20q + rwwg(10,13)*vvq*Xps*yc * ( - 1 - 2*O*x12 + 2*O + - Os + 2*x12 - x12s ) GG20q = GG20q + rwwg(10,13)*vvq*yc * ( - 3./2.*O*x12*x2z*tx - 3* + O*x12*x2z - 3./2.*O*x12*tx - 3./2.*O*x12*x2zs - 2*O*x12*txs + - 13./4.*O*x2z*txs + 9./2.*O*x2z + 5*O*x2zs - 3./2.*O*txs - + 1./4.*Os*x12*x2z - 2*Os*x2z - 5./2.*Os*x2zs - Os*txs - 1./4.* + Oc*x2z + 7./2.*x12*x2z*tx - 13./4.*x12*x2z*txs + 3*x12*x2z + + 3./2.*x12*tx + 3./2.*x12*x2zs - 3./2.*x12*txs - 3./2.*x2z*tx* + x12s - 3./4.*x2z*x12s + 13./4.*x2z*txs - 9./4.*x2z - 3./2.*tx + *x12s - x12s*txs - 5./2.*x2zs + 3./2.*txs ) GG20q = GG20q + rwwg(10,14)*XX*vvq*yc * ( - 3./4.*O*x12*tx*x2zs + - 3./4.*O*tx*x2zc + 3./4.*O*x2zc - 3./4.*O*x2zs*txs - 3./4.* + Os*tx*x2zs - 3./4.*Os*x2zc - 3./4.*x12*x2zs*txs + 3./4.*tx* + x2zc ) GG20q = GG20q + rwwg(10,14)*Xpi*vvq*yc * ( - 3./2.*O*x12*x2z*tx + - 3./4.*O*x12*x2zs - 3./2.*O*x2z*txs - 9./4.*O*tx*x2zs + 9./ + 4.*O*x2zs - 3./2.*Os*x2z*tx - 9./4.*Os*x2zs - 3./2.*x12*x2z* + txs - 3./4.*x12*tx*x2zs + 9./4.*tx*x2zs ) GG20q = GG20q + rwwg(10,14)*vvq*Xp*yc * ( - 3./2.*O*x12*x2z - 3./ + 4.*O*x12*tx - 3./4.*O*x12 - 9./4.*O*x2z*tx + 9./4.*O*x2z - 3./ + 4.*O*tx - 3./4.*O*txs + 3./4.*O - 9./4.*Os*x2z - 3./4.*Os*tx + - 3./4.*Os - 3./2.*x12*x2z*tx - 3./4.*x12*tx - 3./4.*x12*txs + + 9./4.*x2z*tx + 3./4.*tx ) GG20q = GG20q + rwwg(10,14)*vvq*Xps*yc * ( 3./4.*O*x12 + 3./4.*O* + tx - 3./4.*O + 3./4.*Os + 3./4.*x12*tx - 3./4.*tx ) GG20q = GG20q + rwwg(10,14)*vvq*yc * ( 3./2.*O*x12*x2z*tx + 3./2. + *O*x12*x2z + 3./4.*O*x12*tx + 3./4.*O*x12*x2zs + 9./4.*O*x2z* + tx + 3./2.*O*x2z*txs - 9./4.*O*x2z + 9./4.*O*tx*x2zs - 9./4.* + O*x2zs + 3./4.*O*txs + 3./2.*Os*x2z*tx + 9./4.*Os*x2z + 3./4. + *Os*tx + 9./4.*Os*x2zs + 3./2.*x12*x2z*tx + 3./2.*x12*x2z*txs + + 3./4.*x12*tx*x2zs + 3./4.*x12*txs - 9./4.*x2z*tx - 9./4.* + tx*x2zs ) GG20q = GG20q + rwwg(11,1)*vvq*Xp*yc * ( - 6*O*x12 - 6*O*x2z + 2 + *O*tx - 2*x12*x2z - 6*x12*tx + 2*x12 - 4*x2z*tx + 6*x2z + 2* + tx - 2*x12s + 4*txs ) GG20q = GG20q + rwwg(11,1)*vvq*Xps*yc * ( - 4 + 4*O + 4*x12 ) GG20q = GG20q + rwwg(11,1)*vvq*yc * ( 2*O*x12*x2z + 2*O*x12*tx + + 2*O*x2zs - 2*O*txs + 6*x12*x2z*tx - 2*x12*x2z - 2*x12*txs - 2 + *x2z*tx - 4*x2z*txs + 2*tx*x12s + 4*tx*x2zs - 2*x2zs ) GG20q = GG20q + rwwg(12,1)*XX*vvq*yc * ( - 12*O*x2z*txs + 12*O* + tx*x2zs - 12*x12*x2z*txs + 24*x2z*txs - 12*tx*x2zs ) GG20q = GG20q + rwwg(12,1)*Xpi*vvq*yc * ( 24*O*x2z*tx - 36*O*txs + + 12*x12*x2z*tx - 36*x12*txs + 24*txs ) GG20q = GG20q + rwwg(12,1)*vvq*Xp*yc * ( 4 + 8*O*x12 + 2*O*x2z - + 16*O*tx - 10*O + 6*Os + 2*x12*x2z - 16*x12*tx - 6*x12 - 2*x2z + + 16*tx + 2*x12s ) GG20q = GG20q + rwwg(12,1)*vvq*yc * ( - 2*O*x12*x2z + 4*O*x12*tx + - 22*O*x2z*tx + 6*O*x2z + 12*O*tx - 2*O*x2zs + 36*O*txs - 2* + Os*x2z + 2*Os*tx - 10*x12*x2z*tx + 2*x12*x2z + 12*x12*tx + 36 + *x12*txs - 4*x2z*tx - 4*x2z + 2*tx*x12s - 12*tx + 2*x2zs - 24 + *txs ) GG20q = GG20q + rwwg(13,1)*XX*vvq*yc * ( - 12*O*x2z*txs - 12*x12 + *x2z*txs + 12*x2z*txs ) GG20q = GG20q + rwwg(13,1)*Xpi*vvq*yc * ( - 6*O*x2z*tx - 18*O* + txs - 18*x12*txs + 6*x2z*tx + 12*txs ) GG20q = GG20q + rwwg(13,1)*vvq*Xp*yc * ( - 3*O*x12 - O*x2z - 7*O + *tx + 2*O - 2*Os - x12*x2z - 7*x12*tx + x12 + x2z + 7*tx - + x12s ) GG20q = GG20q + rwwg(13,1)*vvq*yc * ( O*x12*x2z + 5*O*x12*tx + 8* + O*x2z*tx + 4*O*tx + O*x2zs + 17*O*txs + 2*Os*tx + 3*x12*x2z* + tx - x12*x2z + 4*x12*tx + 17*x12*txs - 7*x2z*tx + 3*tx*x12s + - 6*tx - x2zs - 12*txs ) GG20q = GG20q + rwwg(13,4)*XX*vvq*yc * ( 3./2.*O*x12*tx*x2zs - 3./ + 2.*O*tx*x2zc - 3./2.*O*tx*x2zs + 3*O*x2zc + 3./2.*O*x2zs*txs + + 3./2.*Os*tx*x2zs - 3./2.*Os*x2zc + 3./2.*x12*tx*x2zs + 3./ + 2.*x12*x2zs*txs + 3./2.*tx*x2zc - 3./2.*x2zc - 3*x2zs*txs ) GG20q = GG20q + rwwg(13,4)*Xpi*vvq*yc * ( 3./2.*O*x12*x2z*tx - 3* + O*x12*x2zs - 3*O*x2z*tx + 9./2.*O*x2z*txs - 3*O*tx*x2zs + 9*O + *x2zs + 3*Os*x2z*tx - 9./2.*Os*x2zs + 3*x12*x2z*tx + 9./2.* + x12*x2z*txs - 3./2.*x12*tx*x2zs + 3*x12*x2zs - 3./2.*x2z*tx* + x12s - 6*x2z*txs + 3*tx*x2zs - 9./2.*x2zs ) GG20q = GG20q + rwwg(13,4)*vvq*Xp*yc * ( - 3./2. - 25./4.*O*x12* + x2z + 1./2.*O*x12*tx - 13./4.*O*x12 - 7./4.*O*x2z*tx + 37./4. + *O*x2z - 7./4.*O*tx + 1./4.*O*x12s + 7./2.*O*txs + 3*O - 19./ + 4.*Os*x2z + 7./4.*Os*tx - 5./4.*Os - 1./4.*Oc - 7./4.*x12*x2z + *tx + 6*x12*x2z + 5./4.*x12*tx + 7./2.*x12*txs + 3*x12 + 7./4. + *x2z*tx - 3./2.*x2z*x12s - 9./2.*x2z - 5./4.*tx*x12s - 3./2.* + x12s - 7./2.*txs ) GG20q = GG20q + rwwg(13,4)*vvq*Xps*yc * ( 3./2. + 3*O*x12 - 3*O + + 3./2.*Os - 3*x12 + 3./2.*x12s ) GG20q = GG20q + rwwg(13,4)*vvq*yc * ( - 3./2.*O*x12*x2z*tx + 25./ + 4.*O*x12*x2z + 3*O*x12*x2zs - 1./2.*O*x12*txs + 19./4.*O*x2z* + tx - 19./4.*O*x2z*txs - 9*O*x2z - 1./4.*O*tx*x12s + 13./4.*O* + tx*x2zs + 3./2.*O*tx - 37./4.*O*x2zs - 3*O*txs + 1./4.*Os*x12 + *x2z - 1./2.*Os*x12*tx - 3*Os*x2z*tx + 17./4.*Os*x2z - 3./2.* + Os*tx + 19./4.*Os*x2zs - 1./4.*Os*txs + 1./4.*Oc*x2z - 1./4.* + Oc*tx - 5./4.*x12*x2z*tx - 19./4.*x12*x2z*txs - 6*x12*x2z + 3. + /2.*x12*tx*x2zs - 3./2.*x12*tx - 3*x12*x2zs - 3*x12*txs + 3./ + 2.*x2z*tx*x12s - 3./2.*x2z*tx + 3./2.*x2z*x12s + 13./2.*x2z* + txs + 9./2.*x2z + 3./2.*tx*x12s - 13./4.*tx*x2zs - 1./4.*x12s + *txs + 9./2.*x2zs + 3*txs ) GG20q = GG20q + rwwg(13,11)*vvq*Xp*yc * ( - O*x12 - 1./2.*O*x2z + + 1./2.*O - 1./2.*Os - 1./2.*x12*x2z + 1./2.*x12 + 1./2.*x2z + - 1./2.*x12s ) GG20q = GG20q + rwwg(13,11)*vvq*yc * ( 3./2.*O*x12*x2z + 1./2.*O* + x2z*tx - 1./2.*O*x2z + 1./2.*O*x2zs - O*txs + 1./2.*Os*x2z - + 1./2.*Os*tx + 3./2.*x12*x2z*tx - 1./2.*x12*x2z - x12*txs + 1./ + 2.*tx*x12s - 1./2.*x2zs ) GG20q = GG20q + rwwg(13,12)*XX*vvq*yc * ( - 3*O*x2z*txs + 3*O*tx + *x2zs - 3*x12*x2z*txs + 6*x2z*txs - 3*tx*x2zs ) GG20q = GG20q + rwwg(13,12)*Xpi*vvq*yc * ( 3*O*x2z*tx - 6*O*txs + + 3*x12*x2z*tx - 6*x12*txs - 3*x2z*tx + 6*txs ) GG20q = GG20q + rwwg(13,12)*vvq*yc * ( - O*x12*x2z + 2*O*x12*tx + - 3*O*x2z*tx + O*x2z - O*tx + 6*O*txs - Os*x2z + Os*tx - 3* + x12*x2z*tx - x12*tx + 6*x12*txs + 3*x2z*tx + tx*x12s - 6*txs + ) GG20q = GG20q + rwwg(14,1)*XX*vvq*yc * ( 6*O*x2z*txs + 6*O*tx* + x2zs + 6*x12*x2z*txs - 6*tx*x2zs ) GG20q = GG20q + rwwg(14,1)*Xpi*vvq*yc * ( 24*O*x2z*tx + 6*O*txs + + 6*x12*x2z*tx + 6*x12*txs - 12*x2z*tx ) GG20q = GG20q + rwwg(14,1)*vvq*Xp*yc * ( 2*O*x12 + O*x2z + 16*O* + tx + O - Os + x12*x2z + 4*x12*tx - x12 - 2*x2z*tx - x2z - 4* + tx + x12s + 2*txs ) GG20q = GG20q + rwwg(14,1)*vvq*yc * ( - O*x12*x2z - 2*O*x12*tx + - 23*O*x2z*tx - O*x2z - 18*O*tx - O*x2zs - 6*O*txs + Os*x2z + - Os*tx - 5*x12*x2z*tx + x12*x2z - 6*x12*tx - 6*x12*txs + 10 + *x2z*tx - 2*x2z*txs - tx*x12s + 2*tx*x2zs + 6*tx + x2zs ) GG20q = GG20q + rwwg(14,4)*XX*vvq*yc * ( - 3./2.*O*x12*tx*x2zs + + 3./2.*O*tx*x2zc - 3./2.*O*x2zc - 3./2.*O*x2zs*txs - 3./2.* + Os*tx*x2zs + 3./2.*Os*x2zc - 3./2.*x12*x2zs*txs + 3./2.*tx* + x2zc ) GG20q = GG20q + rwwg(14,4)*Xpi*vvq*yc * ( - 3*O*x12*x2z*tx + 3./ + 2.*O*x12*x2zs - 3*O*x2z*txs + 3./2.*O*tx*x2zs - 9./2.*O*x2zs + - 3*Os*x2z*tx + 9./2.*Os*x2zs - 3*x12*x2z*txs - 3./2.*x12*tx + *x2zs + 9./2.*tx*x2zs ) GG20q = GG20q + rwwg(14,4)*vvq*Xp*yc * ( 3*O*x12*x2z - 3./2.*O* + x12*tx + 3./2.*O*x12 - 3./2.*O*x2z*tx - 9./2.*O*x2z - 3./2.*O + *tx - 3./2.*O*txs - 3./2.*O + 9./2.*Os*x2z - 3./2.*Os*tx + 3./ + 2.*Os - 3*x12*x2z*tx - 3./2.*x12*tx - 3./2.*x12*txs + 9./2.* + x2z*tx + 3./2.*tx ) GG20q = GG20q + rwwg(14,4)*vvq*Xps*yc * ( - 3./2.*O*x12 + 3./2.* + O*tx + 3./2.*O - 3./2.*Os + 3./2.*x12*tx - 3./2.*tx ) GG20q = GG20q + rwwg(14,4)*vvq*yc * ( 3*O*x12*x2z*tx - 3*O*x12* + x2z + 3./2.*O*x12*tx - 3./2.*O*x12*x2zs + 3./2.*O*x2z*tx + 3* + O*x2z*txs + 9./2.*O*x2z - 3./2.*O*tx*x2zs + 9./2.*O*x2zs + 3./ + 2.*O*txs + 3*Os*x2z*tx - 9./2.*Os*x2z + 3./2.*Os*tx - 9./2.* + Os*x2zs + 3*x12*x2z*tx + 3*x12*x2z*txs + 3./2.*x12*tx*x2zs + + 3./2.*x12*txs - 9./2.*x2z*tx - 9./2.*tx*x2zs ) GG20q = GG20q + rwwg(14,11)*vvq*Xp*yc * ( O*x12 - x2z*tx + txs ) GG20q = GG20q + rwwg(14,11)*vvq*yc * ( - O*x12*x2z - x2z*txs + + tx*x2zs ) GG20q = GG20q + rwwg(14,12)*XX*vvq*yc * ( 3*O*x2z*txs - 3*O*tx* + x2zs + 3*x12*x2z*txs - 3*tx*x2zs ) GG20q = GG20q + rwwg(14,12)*Xpi*vvq*yc * ( 3*O*txs + 3*x12*x2z*tx + + 3*x12*txs - 6*x2z*tx ) GG20q = GG20q + rwwg(14,12)*vvq*Xp*yc * ( 1./2.*O*x2z + 2*O*tx + + 1./2.*O - 1./2.*Os + 1./2.*x12*x2z + 2*x12*tx - 1./2.*x12 - 1. + /2.*x2z - 2*tx + 1./2.*x12s ) GG20q = GG20q + rwwg(14,12)*vvq*yc * ( 1./2.*O*x12*x2z - O*x12*tx + + 1./2.*O*x2z*tx - 1./2.*O*x2z - 3*O*tx - 1./2.*O*x2zs - 3*O + *txs + 1./2.*Os*x2z - 1./2.*Os*tx - 5./2.*x12*x2z*tx + 1./2.* + x12*x2z - 3*x12*tx - 3*x12*txs + 5*x2z*tx - 1./2.*tx*x12s + 3 + *tx + 1./2.*x2zs ) GG11q = 0 GG21q = 0 GG12q = 0 GG22q = 0 GIAMPIERO job terminated at 2-DEC-1999 11:43:52.21 Accounting information: Buffered I/O count: 1263 Peak working set size: 12272 Direct I/O count: 4200 Peak page file size: 100560 Page faults: 937 Mounted volumes: 0 Charged CPU time: 0 00:12:00.39 Elapsed time: 0 00:12:47.96