*
*-------------------------------------------------------------------------
*
      real*8 function wtoxsswcfl(ndim,x)
      implicit real*8(a-h,o-z)
      character*1 opeak,ofl,rio
*
      common/wtfls/ofl
      common/wtps/opeak
      common/wtkount/ik
      common/wtistrf/isf
      common/wtipt/ifz(51)
      common/wtfsw/tfactsw
      common/wtmult/inm,jnm
      common/wtnpr/ipr,ipr0
      common/wticuts/iac(4)
      common/wtcutsw/tcs,s0cut
      common/wtcmplx/sw(2),sz(2),rsw(2),rsz(2)
      common/wtfmass/em,rmm,tm,rnm,uqm,dqm,cqm,sqm,bqm,tqm,dmy
      common/wtbpar/wm,zm,zg,gf,pi,pis,cfct,fcnt,ge,alphai,alwi
      common/wtcpar/alpha,hbet,hbeti,omhb,eob,d0gl,g8,tfact,pih,alw,
     #              eta,feta,beta,g2,tfacth
      common/wtapar/ars,s,rwm,rwm2,rwg,rwmg,swg,swgs,opswgs,sth2,cth2,
     #            hsth2,tsth2,scth2,asth2,tth2,rzm,rzm2,rzg,rzmg,szg,
     #            szgs,opszgs,sth4,cth4,ve,vf,vfp,rbqm2,rszw,rszw2,
     #            s0w,s0z
      common/wtcuts/aim(6),bim(6),ae(4),asa(4),bsa(4),afsa(6),bfsa(6),
     #            ombsa(4),opbsa(4),teq,rae(4),omasa(4),opasa(4),
     #            sg12,cg12,sg13,cg13,sg14,cg14,sg23,cg23,sg24,
     #            cg24,sg34,cg34,sct120,sct130,sct140,sct230,
     #            sct240,sct340,sgam(4),cgam(4)
*
      dimension co(2)
      dimension vu(4),vut(4)
      dimension vd(4),vdt(4)
      dimension vn(4),vnt(4)
      dimension x(ndim),ww(2)
      dimension cph_11(2),cph_12(2)
      dimension cmh_11(2),cmh_12(2)
      dimension c03(2,6),c02(2,4),c01(2,2),c00(2)
      dimension ct3(2,6),ct2(2,4),ct1(2,2),ct0(2)
      dimension ctt3(2,6),ctt2(2,4),ctt1(2,2),ctt0(2)
      dimension cph_21(2),cph_22(2),cph_23(2),cph_24(2)
      dimension cmh_21(2),cmh_22(2),cmh_23(2),cmh_24(2)
      dimension cph_31(2),cph_32(2),cph_33(2),cph_34(2),
     #          cph_35(2),cph_36(2)
      dimension cmh_31(2),cmh_32(2),cmh_33(2),cmh_34(2),
     #          cmh_35(2),cmh_36(2)
      dimension w(10,2),dw(10,2),wg(14,2),wz(10,2),rs1wg(14),
     #          rs2wg(14),rt1wg(4),rt2wg(14),rwwg(14,14),rs1wz(14),
     #          rs2wz(14),rt1wz(4),rt2wz(14),rwwz(14,14)
*
      external s09aaf
*
*-----order of integration is: uv,vv; y; x2,x1,tau/ups,z,phi_u/phi_d
*
      ik= ik+1
      inull= 0
      taujc= 0.d0
      upsjc= 0.d0
      if(ofl.ne.'c'.and.rio.ne.'a') then
       print*,'I/O parameter error'
       stop
      endif
      co(1)= 1.d0
      co(2)= 0.d0
      swis= sw(2)*sw(2)
      srwis= rsw(2)*rsw(2)
      srzis= rsz(2)*rsz(2)
      aswi= abs(rsw(2))
      wm2= wm*wm
      zm2= zm*zm
      ali= alphai
      call wtopolez0(pggf0,fw0)
*
      p2r= -wm2
      p2i= 0.d0
      call wtopole(p2r,p2i,p3qw,fzw,fw)
*
      p2r= -zm2
      p2i= 0.d0
      call wtopoleg(p2r,p2i,pggfzm,pgglqzm,pggnpzm)
      ccz= gf*zm2/pis
      ccw= gf*wm2/pis
      apis= 16.d0*pis
*
*-----running g at sw
*
      p2r= -sw(1)
      p2i= -sw(2)
      call wtopole(p2r,p2i,p3qsw,fzsw,fwsw)
      xgsw0= 1.d0/8.d0/gf/wm2
      xgswr= 1.d0+0.5d0*ccw*((fw0-fw(1))/wm2+
     #       p3qw(1)-p3qsw(1))
      xgswi= -0.5d0*ccw*p3qsw(2)
      agrsw= xgsw0*xgswr
      agisw= xgsw0*xgswi
      agmsw= agrsw*agrsw+agisw*agisw
      grsw= agrsw/agmsw
      gisw= -agisw/agmsw
*
*-----running g at sz
*
      p2r= -sz(1)
      p2i= -sz(2)
      call wtopole(p2r,p2i,p3qsz,fzsz,fwsz)
      xgsz0= 1.d0/8.d0/gf/wm2
      xgszr= 1.d0+0.5d0*ccw*((fw0-fw(1))/wm2+
     #       p3qw(1)-p3qsz(1))
      xgszi= -0.5d0*ccw*p3qsz(2)
      agrsz= xgsz0*xgszr
      agisz= xgsz0*xgszi
      agmsz= agrsz*agrsz+agisz*agisz
      grsz= agrsz/agmsz
      gisz= -agisz/agmsz
*
*-----running sine at sz
*
      call wtopoleg(p2r,p2i,pggfsz,pgglqsz,pggnpsz)
      aresz= arezm+0.25d0*(pggfzm(1)+pgglqzm(1)-
     #       pggfsz(1)-pgglqsz(1))/pi
      aisz= aizm+0.25d0*(pggfzm(2)+pgglqzm(2)-
     #      pggfsz(2)-pgglqsz(2))/pi
      ermz= aresz*aresz+aisz*aisz
      ersz= 4.d0*pi*aresz/ermz
      eisz= -4.d0*pi*aisz/ermz
      gmsz= grsz*grsz+gisz*gisz
      strrsz= ersz*agrsz-eisz*agisz
      strisz= ersz*agisz+eisz*agrsz
*
      if(ipr.eq.4) then
         ipro= 1
      else if(ipr.eq.5) then
         ipro= 2
      else if(ipr.eq.39) then
         ipro= 3
      endif
      wwt= 0.d0
      psf= 0.d0
      wwp= 0.d0
      tjac= 0.d0
      do kk=1,2
        ww(kk)= 0.d0
      enddo
*
      em2= em*em
      rem2= em2/s
      rem= em/sqrt(s)
      rwms= rwm2
      rwmq= rwms*rwms
      rwgs= rwg*rwg
      rwgm= rwg*rwm
      rwgms= rwgs*rwms
      rwmgs= rwmg*rwmg
      rwmpgs= rwms+rwgs
      if(ipro.eq.2) then
       ums= uqm*uqm/s
       dms= dqm*dqm/s
      else if(ipro.eq.1) then
       ums= 0.d0
       dms= rmm*rmm/s
      else if(ipro.eq.3) then
       ums= 0.d0
       dms= tm*tm/s
      endif
      um= sqrt(ums)
      dm= sqrt(dms)
      s0= s0cut
*
      if(ndim.eq.7) then
       yx= x(1)
       xx= x(2)
       x2x= x(3)
       x1x= x(4)
       angx= x(5)
       zx= x(6)
       phx= x(7)
      else if(ndim.eq.9) then 
       uvx= x(1)
       vvx= x(2)
       yx= x(3)
       xx= x(4)
       x2x= x(5)
       x1x= x(6)
       angx= x(7)
       zx= x(8)
       phx= x(9)
      endif
      omangx= 1.d0-angx
*
      iz= 1
*
      if(ndim.eq.7) then
         ueps= 0.d0
         uv= 1.d0
         uvs= uv*uv
         ujc= 1.d0
         veps= 0.d0
         vv= 1.d0
         vjc= 1.d0
      else
       if(uvx.gt.1.d0) then
          iz= 0
          ifz(1)= ifz(1)+1
          go to 1
       endif
       vcut= s0
       vvl= 0.25d0*(rem+sqrt(rem*rem+4.d0*vcut))**2
       omul= 1.d0-vvl
       ueps= omul*(1.d0-uvx)**hbeti
       uv= 1.d0-ueps
       ujc= omul**hbet
       uvs= uv*uv
*
       uvl= uv-vvl
       veps= uvl*(1.d0-vvx)**hbeti
       vv= uv-veps
       vjc0= 1.d0-vvl/uv
       if(vjc0.le.0.d0) then
          iz= 0
          ifz(2)= ifz(2)+1
          go to 1
       else
          vjc= vjc0**hbet
       endif
      endif
*
      if(vv.lt.0.d0) then
         iz= 0
         ifz(3)= ifz(3)+1
         go to 1
      endif
      svv= sqrt(vv)
      vvs= vv*vv
      vvc= vvs*vv
      vvq= vvc*vv
      vvi= 1.d0/vv
      rdms= dms*vv
      rums= ums*vv
      xm= uv
      xms= xm*xm
      xp= vv/uv  
      xps= xp*xp
      xmop= xm/xp
      sh= vv*s
      ssh= sqrt(sh)
      vwmg= aswi*vv
*
      opxp= 1.d0+xp
      opxm= 1.d0+xm
      omxp= veps/uv
      omxm= ueps
      if(isf.eq.0) then
         stfp= 1.d0
         stfm= 1.d0
      else if(isf.gt.0) then
         if(omxp.eq.0) then
            stfp= d0gl
         else
            rcpx= 0.25d0*opxp*opxp
            rcpy= xp
            iflp= 1
            rclp= s21baf(rcpx,rcpy,iflp)
            stfp= d0gl+eob*omxp**omhb*(-0.5d0*opxp+
     #            feta*(-4.d0*opxp*log(omxp)+
     #            3.d0*opxp*log(xp)+4.d0*rclp-5.d0-xp))
         endif
         if(omxm.eq.0) then
            stfm= d0gl
         else
            rcmx= 0.25d0*opxm*opxm
            rcmy= xm
            iflm= 1
            rclm= s21baf(rcmx,rcmy,iflm)
            stfm= d0gl+eob*omxm**omhb*(-0.5d0*opxm+
     #            feta*(-4.d0*opxm*log(omxm)+
     #            3.d0*opxm*log(xm)+4.d0*rclm-5.d0-xm))
         endif
      endif
*
      stf= stfp*stfm
*
*-----y is initialized
*
      yl1= s0/vv
      yl2= (um+dm)*(um+dm)/vv
      yl= dmax1(yl1,yl2)
      yu= 1.d0-em/ssh
      if(yl.gt.yu) then
         iz= 0
         ifz(4)= ifz(4)+1
         go to 1
      endif
      yjc= yu-yl
      y= yjc*yx+yl
      ys= y*y
      yc= ys*y
      yq= yc*y
      yvv= y*vv
      omy= 1.d0-y
      omys= omy*omy
      omyc= omys*omy
      dmsh= dms/yvv
      umsh= ums/yvv
      dmh= sqrt(dmsh)
      umh= sqrt(umsh)
      umshs= umsh*umsh
      dmshs= dmsh*dmsh
      umshc= umshs*umsh
      dmshc= dmshs*dmsh
      umshq= umshc*umsh
      dmshq= dmshc*dmsh
      umshf= umshq*umsh
*
*-----X is initialized
*
      qh0s= em2*(xm*y+omxm)*y/omy
      ctc= cos(sqrt(tcs))
      ctcs= ctc*ctc
      betaes= 1.d0-4.d0*rem2
      betae= sqrt(betaes)
      argq= omys-4.d0*(1.d0-betaes*ctcs)/(1.d0+betaes)**2*rem2
      argq= sqrt(qrgq)
      argq= omy+argq
      chiq= 0.5d0*(1.d0+betaes)/(1.d0*betae*ctc)*argq*sqrt(s)
      qhcs= -2.d0*em2+0.5d0*sqrt(s)/chiq*((1.d0-betae*ctc)*chiq*chiq+
     #      (1.d0+betae*cts)*em2)
      ah= xm-(1.d0-xm)*rem2
      bh= xm-1.d0
      qhcs= ah*qhcs+bh*em2*y
*
      x0= qh0s/y/sh
      xc0= qhcs/y/sh
      xc1= omy/y
      xc= dmin1(xc0,xc1)
      dxc= xc-x0
      x0s= x0*x0
      xcs= xc*xc
*
      if(x0.gt.xc) then
         iz= 0
         ifz(5)= ifz(5)+1
         go to 1
      endif
*
*-----ii=1,4; 1 me^4/X^3, 2 me^2/X^2, 3 1/X, 4 rest
*
      ii= inm
      if(ii.eq.1) then
       xjac= 0.5d0*(1/x0s-1/xcs)
       xv= xjac*xx-0.5d0/x0s
       xv= sqrt(-0.5d0/xv)
       xjac= xjac/(y*sh)**2
      else if(ii.eq.2) then
       xjac= dxc/xc/x0/y/sh
       xv= x0*xc/(dxc*xx+x0)
      else if(ii.eq.3) then
       xjac= log(xc/x0)
       xv= exp(xjac*xx+log(x0))
      else if(ii.eq.4) then
       xjac= dxc
       xv= xjac*xx+x0
      endif
      omxv= 1.d0-xv
      opxv= 1.d0+xv
      opxvs= opxv*opxv
      xvs= xv*xv
      xpo= xv+1.d0
*
*-----Quantities are initialized in the X-channel
*
      arezm= ali-0.25d0*(pggfzm(1)-pggf0+pggnpzm)/pi
      aizm= -0.25d0*(pggfzm(2)+pgglqzm(2))/pi
      p2r= -xv*y*sh
      p2i= 0.d0
      call wtopole(p2r,p2i,p3qx,fzx,fwx)
      xgx0= 1.d0/8.d0/gf/wm2
      xgxr= 1.d0+0.5d0*ccw*((fw0-fw(1))/wm2+
     #      p3qw(1)-p3qx(1))
      xgxi= -0.5d0*ccw*p3qx(2)
      agrx= xgx0*xgxr
      agix= xgx0*xgxi
      gmx= agrx*agrx+agix*agix
      grx= agrx/gmx
      gix= -agix/gmx
      call wtopoleg(p2r,p2i,pggfx,pgglqx,pggnpx)
      arex= arezm+0.25d0*(pggfzm(1)+pgglqzm(1)-
     #      pggfx(1)-pgglqx(1))/pi
      aix= aizm+0.25d0*(pggfzm(2)+pgglqzm(2)-
     #     pggfx(2)-pgglqx(2))/pi
      emx= arex*arex+aix*aix
      erx= 4.d0*pi*arex/emx
      eix= -4.d0*pi*aix/emx
      strrx= erx*agrx-eix*agix
      strix= erx*agix+eix*agrx
*
      ctrrx= 1.d0-strrx
      ctrix= -strix
      ctrrsz= 1.d0-strrsz
      ctrisz= -strisz
      ctrmx= ctrrx*ctrrx+ctrix*ctrix
      ctrrxi= ctrrx/ctrmx
      ctrixi= -ctrix/ctrmx
      ttrrx= strrx*ctrrxi-strix*ctrixi
      ttrix= strrx*ctrixi+strix*ctrrxi
*
*-----propagator in X-channel
*
      prxr= xv*y*sh-sz(1)
      prxi= -sz(2)
      prxm= prxr*prxr+prxi*prxi
      prxri= prxr/prxm
      prxii= -prxi/prxm
      ratgr= grx*agrsz-gix*agisz
      ratgi= grx*agisz+gix*agrsz
      ratcr= ctrrsz*ctrrsi-ctrisz*ctrisi
      ratci= ctrrsz*ctrisi+ctrisz*ctrrsi
      ratgcr= grx*ctrrxi-gix*ctrixi
      ratgci= grx*ctrixi+gix*ctrrxi
      ratr= 1.d0-ratgr*ratcr+ratgi*ratci
      rati= -ratgr*ratci-ratgi*ratcr
      arhrx= xv*y*sh-sz(1)+ratr*sz(1)-rati*sz(2)+(ratgcr*(fzs(1)-
     #       fzsz(1))-ratgci*(fzx(2)-fzsz(2)))/apis
      arhix= -sz(2)+ratr*sz(2)+rati*sz(1)+(ratgcr*(fzs(2)-
     #       fzsz(2))+ratgci*(fzx(1)-fzsz(1)))/apis
      brhrx= arhrx*prxri-arhix*prxii
      brhix= arhrx*prxii+arhix*prxri
      brhmx= brhrx*brhrx+brhix*brhix
      rhrx= brhrx/brhmx
      rhix= -brhix/brhmx
*
*-----flux-funxtions are given
*
      psf_gg_11= 0.5d0*omxm*omxm
      psf_gg_12= -0.5d0*omxm*omxm
      psf_gg_21= 2.d0+0.5d0*omxm
      psf_gg_22= omxm*(2.d0/y-3.d0/2.d0)
      psf_gg_31= -1.d0
      psf_gg_32= 2.d0*(1.d0-1.d0/y)
      psf_gg_42= 2.d0/ys*(1.d0/xpo+1.d0)/xpo-
     #           2.d0/y*(1.d0/xpo+1.d0)/xpo+1.d0/xpo
*
      verx= 4.d0*strx-1.d0
      psf_gz_41= -y*verx
      psf_gz_42= verx*(-2.d0/y/xpos+2.d0/xpos+y*(1.d0-1.d0/xpo))
      psf_gz_43= (y-2.d0)/xpo
*
      v2a2rx= verx*verx+1.d0
      psf_zz_41= -v2a2rx*xv*ys
      psf_zz_42= v2a2rx*xv*(ys-2.d0/xpos-ys/xpo-y/xpos)
      psf_zz_43= 2.d0*verx*xv*y*(y-2.d0)/xpo
      psf_zz_44= -0.5d0*xv*ys*v2a2rx
*
*-----x2 is initialized
*
      x2l1= (um+dm)*(um+dm)/yvv
      x2l2= s0/yvv
      x2l= dmax1(x2l1,x2l2)
      x2u= 1.d0
      if(x2l.gt.x2u) then
         iz= 0
         ifz(6)= ifz(6)+1
         go to 1
      endif
      zma= yvv*x2l
      zmb= yvv*x2u
      zmas= zma-rsw(1)
      zmbs= zmb-rsw(1)
      atma= zmas/aswi
      atmb= zmbs/aswi
*
      if(opeak.eq.'y') then
       if(atma.gt.1.d0.and.atm.gt.1.d0) then
          atma= 1.d0/atma
          atma= atan(atma)
          zmat= (pih-atma)/vwmg
          atmb= 1.d0/atmb
          atmb= atan(atmb)
          zmbt= (pih-atmb)/vwmg
          x2jc0= (-atmb+atma)/vwmg
       else if(atma.gt.1.d0.and.atmb.lt.-1.d0) then
          atma= 1.d0/atma
          atma= atan(atma)
          zmat= (pih-atma)/vwmg
          atmb= -1.d0/atmb
          atmb= atan(atmb)
          zmbt= (-pih+atmb)/vwmg
          x2jc0= (-pi+atmb+atma)/vwmg
       else if(atma.gt.1.d0.and.abs(atmb).lt.1.d0) then
          atma= 1.d0/atma
          atma= atan(atma)
          zmat= (pih-atma)/vwmg
          atmb= atan(atmb)
          zmbt= atmb/vwmg
          x2jc0= (-pih+atmb+atma)/vwmg
       else if(atma.lt.-1.d0.and.atmb.gt.1.d0) then
          atma= -1.d0/atma
          atma= atan(atma)
          zmat= (-pih+atma)/vwmg
          atmb= 1.d0/atmb
          atmb= atan(atmb)
          zmbt= (pih-atmb)/vwmg
          x2jc0= (pi-atmb-atma)/vwmg
       else if(atma.lt.-1.d0.and.atmb.lt.-1.d0) then
          atma= -1.d0/atma
          atma= atan(atma)
          zmat= (-pih+atma)/vwmg
          atmb= -1.d0/atmb
          atmb= atan(atmb)
          zmbt= (-pih+atmb)/vwmg
          x2jc0= (atmb-atma)/vwmg
       else if(atma.lt.-1.d0.and.abs(atmb).lt.1.d0) then
          atma= -1.d0/atma
          atma= atan(atma)
          zmat= (-pih+atma)/vwmg
          atmb= atan(atmb)
          zmbt= atmb/vwmg
          x2jc0= (pih+atmb-atma)/vwmg
       else if(abs(atma).lt.1.d0.and.atmb.gt.1.d0) then
          atma= atan(atma)
          zmat= atma/vwmg
          atmb= 1.d0/atmb
          atmb= atan(atmb)
          zmbt= (pih-atmb)/vwmg
          x2jc0= (pih-atmb-atma)/vwmg
       else if(abs(atma).lt.1.d0.and.atmb.lt.-1.d0) then
          atma= atan(atma)
          zmat= atma/vwmg
          atmb= -1.d0/atmb
          atmb= atan(atmb)
          zmbt= (-pih+atmb)/vwmg
          x2jc0= (-pih+atmb-atma)/vwmg
       else if(abs(atma).lt.1.d0.and.abs(atmb).lt.1.d0) then
          atma= atan(atma)
          zmat= atma/vwmg
          atmb= atan(atmb)
          zmbt= atmb/vwmg
          x2jc0= (atmb-atma)/vwmg
       endif
*
       x2jc= x2jc0/yvv
       argx2= vwmg*(x2jc0*x2x+zmat)
       iftn= 1
       s07= s07aaf(argx2,iftn)
       x2= (rsw(1)+aswi*s07)/yvv
       pmjc= 1.d0
*
      else if(opeak.eq.'n') then         
       smjc0= zmb-zma
       x2= (smjc0*x2x+zma)/yvv
       pmjc= 1.d0/((yvv*x2-rsw(1))**2+srwis)
       x2jc= smjc0/yvv
      endif
      omx2= 1.d0-x2
      omx2s= omx2*omx2
      x2s= x2*x2
      x2c= x2s*x2
      x2q= x2c*x2
*
*-----Quantities are initialized in the x2-channel
*
      p2x2r= -x2*y*sh
      p2x2i= 0.d0
      call wtopole(p2x2r,p2x2i,p3qx2,fzx2,fwsx2)
      xgx20= 1.d0/8.d0/gf/wm2
      xgx2r= 1.d0+0.5d0*ccw*((fw0-fw(1))/wm2+p3qw(1)-p3qx2(1))
      xgx2i= -0.5d0*ccw*p3qx2(2)
      agrx2= xgx20*xgx2r
      agix2= xgx20*xgx2i
      agx2m= agrx2*agrx2+agix2*agix2
      grx2= agrx2/agx2m
      gix2= -agix2/agx2m
*
*-----propagator in x2-channel
*
      px2r= x2*y*sh-sw(1)
      px2ir= px2r/(px2r*px2r+swis)
      px2ii= sw(2)/(px2r*px2r+swis)
      xrhrx2= fwsx2(1)-fwsw(1)+sw(1)*(p3qsw(1)-p3qx2(1))-
     #       sw(2)*(p3qsw(2)-p3qx2(2))
      xrhix2= fwsx2(2)-fwsw(2)+sw(1)*(p3qsw(2)-p3qx2(2))+
     #       sw(2)*(p3qsw(1)-p3qx2(1))
      arhrx2= 1.d0+1.d0/apis*(px2ir*(grx2*xrhrx2-gix2*xrhix2)-
     #        px2ii*(grx2*xrhix2+gix2*xrhrx2))
      arhix2= 1.d0/apis*(px2ii*(grx2*xrhrx2-gix2*xrhix2)+
     #        px2ir*(grx2*xrhix2+gix2*xrhrx2))
      arhx2m= arhrx2*arhrx2+arhix2*arhix2
      rhrx2= arhrx2/arhx2m
      rhix2= -arhix2/arhx2m
*
*-----x1 is initialized
*
      xlk= x2*(x2-2.d0*(dmsh+umsh))+(dmsh-umsh)*(dmsh-umsh)
      xlk= sqrt(xlk)
      x1l1= dmsh+2.d0*umh
      x1l2= x2
      x1l3= dmsh+(umsh-dmsh+x2*(1.d0+umsh-dmsh+x2)-omx2*xlk)/x2/2.d0
      x1l= dmax1(x1l1,x1l2,x1l3)
      x1u1= 1.d0
      x1u2= (1.d0-dmh)**2+x2
      x1u3= 1.d0-dmsh*omx2/x2
      x1u4= dmsh+(umsh-dmsh+x2*(1.d0+umsh-dmsh+x2)+omx2*xlk)/x2/2.d0
      x1u= dmin1(x1u1,x1u2,x1u3,x1u4)
      if(x1l.gt.x1u) then
         iz= 0
         ifz(7)= ifz(7)+1
         go to 1
      endif
      x1jc= x1u-x1l
      x1= x1jc*x1x+x1l
      omx1= 1.d0-x1
      omx1s= omx1*omx1
      x1mo= x1-1.d0
      x1mos= x1mo*x1mo
      x1moc= x1mos*x1mo
      x1moq= x1moc*x1mo
      x1mx2= x1-x2
      x2mx1= x2-x1
      x2mx1s= x2mx1*x2mx1
      x2mx1c= x2mx1s*x2mx1
      x2mx1q= x2mx1c*x2mx1
      x2mx1f= x2mx1q*x2mx1
      x2mx1sx= x2mx1f*x2mx1
      x1s= x1*x1
      x1c= x1s*x1
      x1q= x1c*x1
      x1f= x1q*x1
      edm= 1.d0+x2-x1
      edms= edm*edm
      edmc= edms*edm
      edmq= edmc*edm
      edmf= edmq*edm
      edmsx= edmf*edm
      reu= x1-dmsh
      reus= reu*reu
      reuc= reus*reu
      red= 1.d0+x2-x1+dmsh
      reds= red*red
      redc= reds*red
      betus= 1.d0-4.d0*umsh/reus
      betds= 1.d0-4.d0*dmsh/reds
      if(betus.lt.0.d0.or.betds.lt.0.d0) then
         iz= 0
         ifz(8)= ifz(8)+1
         go to 1
      endif
      betu= sqrt(betus)
      betd= sqrt(betds)
*
      jj= jnm
      if(jj.le.3) then
       psjc= 1.d0/reu/betu/opxv
      else if(jj.ge.4) then
       psjc= 1.d0/red/betd/opxv
      endif
*
*-----tau/upsilon is initialized
*
*-----Here is the tau branch
*
      if(jj.le.3) then
       if(ipro.eq.2) then
        taul0= -x1-xv+umsh+dmsh+0.5d0*(1.d0-betu)*opxv*reu
        tauu0= -x1-xv+umsh+dmsh+0.5d0*(1.d0+betu)*opxv*reu
       else 
        taul0= -reu-xv
        tauu0= xv*(reu-1.d0)
       endif
*
       phta= umsh*dmsh*(-1+x2)
       phta= phta+umsh*(1-x1*x2-x1+x2s)
       phta= phta+umshs
       phta= phta+dmsh*(-x1*x2+x1-x2+x2s)
       phta= phta-x2*x1mo*x2mx1
*
       phtb= xv*umsh*dmsh*(-1-2*x1*x2+2*x2+x2s)
       phtb= phtb+xv*umsh*dmshs*(-1+x2)
       phtb= phtb+xv*umsh*(2-2*x1*x2-x1*x2s-3*x1+x1s*x2+
     #    x1s+2*x2s)
       phtb= phtb+xv*umshs*dmsh
       phtb= phtb+xv*umshs*(2-x1)
       phtb= phtb+xv*dmsh*(-2*x1*x2-2*x1*x2s+2*x1+2*x1s*x2
     #    -x1s-2*x2+3*x2s)
       phtb= phtb+xv*dmshs*(-x1*x2+x1-x2+x2s)
       phtb= phtb+xv*(x1*x2*x1mo*x2mx1-2*x2*x1mo*x2mx1)
       phtb= phtb+umsh*dmsh*(-1+4*x1*x2-2*x1+2*x2-3*x2s)
       phtb= phtb+umsh*dmshs*(1-x2)
       phtb= phtb+umsh*(2*x1*x2+3*x1*x2s+x1-3*x1s*x2-x1s-2*x2s)
       phtb= phtb+umshs*dmsh*(1-2*x2)
       phtb= phtb+umshs*(-2+2*x1*x2+3*x1-2*x2s)
       phtb= phtb+umshc*(-2)
       phtb= phtb+dmsh*(2*x1*x2s-2*x1s*x2+x1s-x2s)
       phtb= phtb+dmshs*(x1*x2-x1+x2-x2s)
       phtb= phtb-x1*x2*x1mo*x2mx1
*
       phtc= xv*umsh*dmsh*(-1+2*x1*x2+4*x1*x2s+2*x1-5*x1s*
     #    x2-2*x2s)
       phtc= phtc+xv*umsh*dmshs*(4*x1*x2-2*x1-2*x2s)
       phtc= phtc+xv*umsh*dmshc*(1-x2)
       phtc= phtc+xv*umsh*(2*x1*x2s+x1-2*x1s*x2-2*x1s*x2s
     #    -2*x1s+2*x1c*x2+x1c)
       phtc= phtc+xv*umshs*dmsh*(-2+2*x1*x2+2*x1-x2s)
       phtc= phtc+xv*umshs*dmshs*(-x2)
       phtc= phtc+xv*umshs*(x1*x2s+2*x1-x1s*x2-2*x1s)
       phtc= phtc+xv*umshc*dmsh*(-1)
       phtc= phtc+xv*umshc*(x1)
       phtc= phtc+xv*dmsh*(4*x1*x2s-3*x1s*x2-3*x1s*x2s+
     #    x1s+3*x1c*x2-x1c-x2s)
       phtc= phtc+xv*dmshs*(3*x1*x2s-x1-3*x1s*x2+2*x1s+
     #    x2-2*x2s)
       phtc= phtc+xv*dmshc*(x1*x2-x1+x2-x2s)
       phtc= phtc+xv*(-x1*x2*x1mo*x2mx1+x1s*x2*x1mo*
     #    x2mx1)
       phtc= phtc+xvs*umsh*dmsh*(-3*x1*x2+x1+2*x2s)
       phtc= phtc+xvs*umsh*dmshs*(-1+x2)
       phtc= phtc+xvs*umsh*(1-2*x1*x2-2*x1*x2s-2*x1+2*x1s
     #    *x2+x1s+2*x2s)
       phtc= phtc+xvs*umshs*dmsh*(x2)
       phtc= phtc+xvs*umshs*(2-x1*x2-2*x1+x2s)
       phtc= phtc+xvs*umshc
       phtc= phtc+xvs*dmsh*(-x1*x2-2*x1*x2s+x1+2*x1s*x2
     #    -x1s-x2+2*x2s)
       phtc= phtc+xvs*dmshs*(-x1*x2+x1-x2+x2s)
       phtc= phtc+xvs*(x1*x2*x1mo*x2mx1-x2*x1mo*x2mx1)
       phtc= phtc+umsh*dmsh*(-x1*x2-2*x1*x2s+x1+2*x1s*x2-
     #    x1s-x2+2*x2s)
       phtc= phtc+umsh*dmshs*(-x1*x2+x1-x2+x2s)
       phtc= phtc+umsh*(-x1*x2-2*x1*x2s+2*x1s*x2+x1s*
     #    x2s-x1c*x2+x2s)
       phtc= phtc+umshs*dmsh*(-3*x1*x2+x1+2*x2s)
       phtc= phtc+umshs*dmshs*(-1+x2)
       phtc= phtc+umshs*(1-2*x1*x2-2*x1*x2s-2*x1+2*x1s*x2
     #    +x1s+2*x2s)
       phtc= phtc+umshc*dmsh*(x2)
       phtc= phtc+umshc*(2-x1*x2-2*x1+x2s)
       phtc= phtc+umshq
*
       phtdisc= umsh*dmsh*opxvs*(-20*x1*x2s+8*x1*x2c+4*x1*x2q
     #    +10*x1s*x2+16*x1s*x2s-8*x1s*x2c+6*x1s*
     #    x2q-14*x1c*x2+2*x1c*x2s-14*x1c*x2c+2*
     #    x1c+2*x1q*x2+8*x1q*x2s-2*x1q+8*x2c-8*x2q)
       phtdisc= phtdisc+umsh*dmshs*opxvs*(10*x1*x2-20*x1*x2s+4*x1*
     #    x2c-6*x1*x2q+10*x1s*x2-8*x1s*x2s+18*x1s*
     #    x2c-8*x1s+6*x1c*x2-12*x1c*x2s+2*x1c-2*
     #    x2s+8*x2c-2*x2q)
       phtdisc= phtdisc+umsh*dmshc*opxvs*(-2*x1*x2+10*x1*x2s-10*x1
     #    *x2c+2*x1-10*x1s*x2+8*x1s*x2s+2*x1s-2*x2+2*x2q)
       phtdisc= phtdisc+umsh*dmshq*opxvs*(4*x1*x2-2*x1*x2s-2*x1+2*
     #    x2-4*x2s+2*x2c)
       phtdisc= phtdisc+umsh*opxvs*(8*x1*x2c+8*x1*x2q-2*x1s*x2s
     #    -16*x1s*x2c-2*x1s*x2q-2*x1c*x2+4*x1c*
     #    x2s+4*x1c*x2c-2*x1c*x2q+4*x1q*x2+4*x1q*
     #    x2c-2*x1f*x2-2*x1f*x2s-4*x2q)
       phtdisc= phtdisc+umshs*dmsh*opxvs*(-8*x1*x2-16*x1*x2s+24*x1
     #    *x2c-2*x1*x2q-10*x1+16*x1s*x2-8*x1s*x2s+6
     #    *x1s*x2c+10*x1s-10*x1c*x2-4*x1c*x2s+2*x1c+8*x2-8*x2q)
       phtdisc= phtdisc+umshs*dmshs*opxvs*(1-20*x1*x2+4*x1*x2s-6
     #    *x1*x2c+10*x1+6*x1s*x2+6*x1s*x2s-6*x1s-8*
     #    x2+20*x2s-8*x2c+x2q)
       phtdisc= phtdisc+umshs*dmshc*opxvs*(-2+2*x1*x2-4*x1*x2s
     #    +2*x1+2*x2c)
       phtdisc= phtdisc+umshs*dmshq*opxvs*(1-2*x2+x2s)
       phtdisc= phtdisc+umshs*opxvs*(8*x1*x2+16*x1*x2s+16*x1*x2c
     #    +8*x1*x2q-16*x1s*x2-12*x1s*x2s-16*x1s*x2c
     #    +x1s*x2q+x1s+4*x1c*x2+4*x1c*x2s-2*x1c
     #    *x2c-2*x1c+4*x1q*x2+x1q*x2s+x1q-8*x2s-8*x2q)
       phtdisc= phtdisc+umshc*dmsh*opxvs*(8+8*x1*x2+4*x1*x2s-20*x1
     #    +6*x1s*x2+2*x1s-8*x2c)
       phtdisc= phtdisc+umshc*dmshs*opxvs*(-2-6*x1*x2+2*x1+8*x2
     #    -2*x2s)
       phtdisc= phtdisc+umshc*dmshc*opxvs*(-2+2*x2)
       phtdisc= phtdisc+umshc*opxvs*(-4+16*x1*x2+16*x1*x2s+8*x1
     #    *x2c+8*x1-16*x1s*x2-2*x1s*x2s-2*x1s-2*
     #    x1c*x2-2*x1c-16*x2s-4*x2q)
       phtdisc= phtdisc+umshq*dmsh*opxvs*(8-2*x1-8*x2)
       phtdisc= phtdisc+umshq*dmshs*opxvs
       phtdisc= phtdisc+umshq*opxvs*(-8+8*x1*x2+8*x1+x1s-8*x2s)
       phtdisc= phtdisc+umshf*opxvs*(-4)
       phtdisc= phtdisc+dmsh*opxvs*(-2*x1*x2q+2*x1s*x2c+6*x1s
     #    *x2q+2*x1c*x2s-10*x1c*x2c-4*x1c*x2q-2*
     #    x1q*x2+2*x1q*x2s+8*x1q*x2c+2*x1f*x2-4*x1f*x2s)
       phtdisc= phtdisc+dmshs*opxvs*(2*x1*x2c-6*x1*x2q-6*x1s*
     #    x2s+6*x1s*x2c+6*x1s*x2q+2*x1c*x2+6*x1c*
     #    x2s-12*x1c*x2c-6*x1q*x2+6*x1q*x2s+x1q+x2q)
       phtdisc= phtdisc+dmshc*opxvs*(2*x1*x2s+2*x1*x2c-4*x1*x2q
     #    +2*x1s*x2-10*x1s*x2s+8*x1s*x2c+6*x1c*x2
     #    -4*x1c*x2s-2*x1c-2*x2c+2*x2q)
       phtdisc= phtdisc+dmshq*opxvs*(-2*x1*x2+4*x1*x2s-2*x1*x2c
     #    -2*x1s*x2+x1s*x2s+x1s+x2s-2*x2c+x2q)
       phtdisc= phtdisc+opxvs*(x2s*x1mos*x2mx1s*x1s)
       if(phtdisc.lt.1.d-15) then
        taul= taul0
        tauu= tauu0
       else
        if(phtb.gt.0.d0) then
         phtq= -0.5d0*(phtb+sqrt(phtdisc))
        else if(phtb.lt.0.d0) then
         phtq= -0.5d0*(phtb-sqrt(phtdisc))
        endif
        ataul= phtq/phta
        atauu= phtc/phtq
        taupl= dmin1(ataul,atauu)
        taupu= dmax1(ataul,atauu)
        taul= dmax1(taul0,taupl)
        tauu= dmin1(tauu0,taupu)
       endif
       if(taul.gt.tauu) then
         iz= 0
         ifz(10)= ifz(10)+1
         go to 1
       endif
*
*-----Here is the ups branch
*
      else if(jj.ge.4) then
       upsl0= -1.d0-x2+x1-xv+0.5d0*(1.d0-betd)*opxv*red
       upsu0= -1.d0-x2+x1-xv+0.5d0*(1.d0+betd)*opxv*red
*
       phta= umsh*dmsh*(-1+x2)
       phta= phta+umsh*(1-x1*x2-x1+x2s)
       phta= phta+umshs
       phta= phta+dmsh*(-x1*x2+x1-x2+x2s)
       phta= phta-x2*x1mo*x2mx1
*
       phtb= xv*umsh*dmsh*(-2+2*x1*x2+2*x2-2*x2s)
       phtb= phtb+xv*umsh*dmshs*(1-x2)
       phtb= phtb+xv*umsh*(1+2*x1*x2s-x1s*x2-x1s-x2+x2s-x2c)
       phtb= phtb+xv*umshs*dmsh*(-1)
       phtb= phtb+xv*umshs*(1+x1-x2)
       phtb= phtb+xv*dmsh*(-2*x1*x2+3*x1*x2s+x1-2*x1s*x2+
     #    x1s-x2+x2s-x2c)
       phtb= phtb+xv*dmshs*(x1*x2-x1+x2-x2s)
       phtb= phtb+xv*(-x1*x2*x1mo*x2mx1-x2*x1mo*x2mx1+
     #    x2s*x1mo*x2mx1)
       phtb= phtb+umsh*dmsh*(-2+2*x1)
       phtb= phtb+umsh*dmshs*(1-x2)
       phtb= phtb+umsh*(1-2*x1*x2-2*x1*x2s-2*x1+x1s*x2+
     #    x1s+x2+x2s+x2c)
       phtb= phtb+umshs*dmsh*(-1)
       phtb= phtb+umshs*(1-x1+x2)
       phtb= phtb+dmsh*(2*x1*x2-x1*x2s+x1-x1s-x2-x2s+x2c)
       phtb= phtb+dmshs*(x1*x2-x1+x2-x2s)
       phtb= phtb+x1*x2*x1mo*x2mx1-x2*x1mo*x2mx1-x2s*x1mo*x2mx1
*
       phtc= xv*umsh*dmsh*(4*x1*x2s-2*x1s*x2-2*x2c)
       phtc= phtc+xv*umsh*dmshs*(x1*x2-x1+x2-x2s)
       phtc= phtc+xv*umsh*(3*x1*x2+3*x1*x2s+3*x1*x2c+x1-3*
     #    x1s*x2-3*x1s*x2s-2*x1s+x1c*x2+x1c-x2-
     #    x2s-x2c-x2q)
       phtc= phtc+xv*umshs*dmsh*x1mx2
       phtc= phtc+xv*umshs*(2*x1*x2+x1-x1s-x2-x2s)
       phtc= phtc+xv*dmsh*(-2*x1*x2+x1*x2s+4*x1*x2c+x1s*
     #    x2-5*x1s*x2s+x1s+2*x1c*x2-x1c+x2s-x2c-x2q)
       phtc= phtc+xv*dmshs*(-2*x1*x2+2*x1*x2s-x1s*x2+
     #    x1s+x2s-x2c)
       phtc= phtc+xv*(-x1*x2*x1mo*x2mx1-2*x1*x2s*x1mo*
     #    x2mx1+x1s*x2*x1mo*x2mx1+x2s*x1mo*x2mx1+
     #    x2c*x1mo*x2mx1)
       phtc= phtc+xvs*umsh*dmsh*(x1*x2-x1+x2-x2s)
       phtc= phtc+xvs*umsh*(x1*x2+2*x1*x2s+x1-x1s*x2-x1s-x2-x2c)
       phtc= phtc+xvs*umshs*x1mx2
       phtc= phtc+xvs*dmsh*(-2*x1*x2+2*x1*x2s-x1s*x2+
     #    x1s+x2s-x2c)
       phtc= phtc+xvs*(-x1*x2*x1mo*x2mx1+x2s*x1mo*x2mx1)
       phtc= phtc+umsh*dmsh*(x1*x2+2*x1*x2s+x1-x1s*x2-x1s
     #    -x2-x2c)
       phtc= phtc+umsh*dmshs*(x1*x2-x1+x2-x2s)
       phtc= phtc+umshs*dmsh*x1mx2
       phtc= phtc+dmsh*(2*x1*x2s+x1*x2c-x1s*x2-2*x1s*
     #    x2s+x1c*x2-x2c)
       phtc= phtc+dmshs*(-2*x1*x2+2*x1*x2s-x1s*x2+x1s+x2s-x2c)
*
       phtdisc= umsh*dmsh*opxvs*(-8*x2mx1*x1mos-6*x2mx1*x1moc+2*
     #    x2mx1s*x1mo-2*x2mx1s*x1mos+4*x2mx1s*x1moc+2*
     #    x2mx1c*x1mo-4*x2mx1c*x1mos-6*x2mx1c*x1moc+2*
     #    x2mx1c-2*x2mx1q*x1mo-10*x2mx1q*x1mos+6*x2mx1q
     #    -2*x2mx1f*x1mo+6*x2mx1f+2*x2mx1sx)
       phtdisc= phtdisc+umsh*dmshs*opxvs*(12*x2mx1*x1mos+6*x2mx1*
     #    x1moc+6*x2mx1s*x1mo-2*x2mx1s*x1mos-6*x2mx1s*
     #    x1moc-4*x2mx1c*x1mo-6*x2mx1c*x1mos-2*x2mx1c
     #    +6*x2mx1q*x1mo+4*x2mx1q+6*x2mx1f)
       phtdisc= phtdisc+umsh*dmshc*opxvs*(-8*x2mx1*x1mos-2*x2mx1*
     #    x1moc-10*x2mx1s*x1mo+2*x2mx1s*x1mos+10*x2mx1c
     #    *x1mo-2*x2mx1c+6*x2mx1q)
       phtdisc= phtdisc+umsh*dmshq*opxvs*(2*x2mx1*x1mos+4*x2mx1s*
     #    x1mo+2*x2mx1c)
       phtdisc= phtdisc+umsh*opxvs*(2*x2mx1*x1mos+2*x2mx1*x1moc-2*
     #    x2mx1s*x1mo+2*x2mx1s*x1mos+2*x2mx1s*x1moc-8*
     #    x2mx1c*x1mo-6*x2mx1c*x1mos-2*x2mx1c*x1moc-12*
     #    x2mx1q*x1mo-10*x2mx1q*x1mos-2*x2mx1q*x1moc-8*
     #    x2mx1f*x1mo-4*x2mx1f*x1mos-2*x2mx1sx*x1mo)
       phtdisc= phtdisc+umshs*dmsh*opxvs*(10*x2mx1*x1mo+8*x2mx1*
     #    x1mos+4*x2mx1s*x1mo-8*x2mx1s*x1mos+2*x2mx1s+2*
     #    x2mx1c*x1mo+4*x2mx1c*x1mos+8*x2mx1c+8*x2mx1q*
     #    x1mo+10*x2mx1q+4*x2mx1f-4*x1mos)
       phtdisc= phtdisc+umshs*dmshs*opxvs*(-6*x2mx1*x1mo-10*x2mx1*
     #    x1mos-2*x2mx1s*x1mo+6*x2mx1s*x1mos-6*x2mx1s
     #    +12*x2mx1c*x1mo+8*x2mx1c+6*x2mx1q+6*x1mos)
       phtdisc= phtdisc+umshs*dmshc*opxvs*(-2*x2mx1*x1mo+4*x2mx1*
     #    x1mos+8*x2mx1s*x1mo+2*x2mx1s+4*x2mx1c-4*x1mos)
       phtdisc= phtdisc+umshs*dmshq*opxvs*(2*x2mx1*x1mo+x2mx1s+
     #    x1mos)
       phtdisc= phtdisc+umshs*opxvs*(-4*x2mx1*x1mo-2*x2mx1*x1mos-
     #    10*x2mx1s*x1mo-6*x2mx1s*x1mos+x2mx1s-6*x2mx1c
     #    *x1mo-2*x2mx1c*x1mos+4*x2mx1c+2*x2mx1q*x1mo+
     #    x2mx1q*x1mos+6*x2mx1q+2*x2mx1f*x1mo+4*x2mx1f
     #    +x2mx1sx+x1mos)
       phtdisc= phtdisc+umshc*dmsh*opxvs*(-4*x2mx1*x1mo-2*x2mx1+6*
     #    x2mx1s*x1mo+4*x2mx1s+6*x2mx1c+6*x1mo)
       phtdisc= phtdisc+umshc*dmshs*opxvs*(6*x2mx1*x1mo-2*x2mx1+6*
     #    x2mx1s-6*x1mo)
       phtdisc= phtdisc+umshc*dmshc*opxvs*(2*x2mx1+2*x1mo)
       phtdisc= phtdisc+umshc*opxvs*(-2*x2mx1*x1mo+2*x2mx1+2*
     #    x2mx1s*x1mo+6*x2mx1s+2*x2mx1c*x1mo+6*x2mx1c+2
     #    *x2mx1q-2*x1mo)
       phtdisc= phtdisc+umshq*dmsh*opxvs*(-2+2*x2mx1)
       phtdisc= phtdisc+umshq*dmshs*opxvs
       phtdisc= phtdisc+umshq*opxvs*(1+2*x2mx1+x2mx1s)
       phtdisc= phtdisc+dmsh*opxvs*(-4*x2mx1s*x1mos-6*x2mx1s*
     #    x1moc-2*x2mx1s*x1moq-2*x2mx1c*x1mo-10*x2mx1c*
     #    x1mos-4*x2mx1c*x1moc+2*x2mx1c*x1moq-6*
     #    x2mx1q*x1mo-8*x2mx1q*x1mos+2*x2mx1q*x1moc-6*
     #    x2mx1f*x1mo-2*x2mx1f*x1mos-2*x2mx1sx*x1mo)
       phtdisc= phtdisc+dmshs*opxvs*(6*x2mx1s*x1mos+6*x2mx1s*
     #    x1moc+x2mx1s*x1moq+6*x2mx1c*x1mo+8*x2mx1c*
     #    x1mos-2*x2mx1c*x1moc+4*x2mx1q*x1mo-6*x2mx1q*
     #    x1mos+x2mx1q-2*x2mx1f*x1mo+2*x2mx1f+x2mx1sx)
       phtdisc= phtdisc+dmshc*opxvs*(-4*x2mx1s*x1mos-2*x2mx1s*
     #    x1moc-6*x2mx1c*x1mo-2*x2mx1c*x1mos+2*x2mx1q*
     #    x1mo-2*x2mx1q+2*x2mx1f)
       phtdisc= phtdisc+dmshq*opxvs*(x2mx1s*x1mos+2*x2mx1c*x1mo
     #    +x2mx1q)
       phtdisc= phtdisc+opxvs*(x2mx1s*x1mos*x2s*edms)
*
       if(phtdisc.lt.1.d-15) then
        upsl= upsl0
        upsu= upsu0
       else
        if(phtb.gt.0.d0) then
         phtq= -0.5d0*(phtb+sqrt(phtdisc))
        else if(phtb.lt.0.d0) then
         phtq= -0.5d0*(phtb-sqrt(phtdisc))
        endif
        aupsl= phtq/phta
        aupsu= phtc/phtq
        upspl= dmin1(aupsl,aupsu)
        upspu= dmax1(aupsl,aupsu)
        upsl= dmax1(upsl0,upspl)
        upsu= dmin1(upsu0,upspu)
       endif
       if(upsl.gt.upsu) then
         iz= 0
         ifz(12)= ifz(12)+1
         go to 1
       endif
      endif
*
*-----Quark propagators are mapped away (for no angular cuts)
*
      if(asa(3).eq.-1.d0.and.asa(4).eq.-1.d0.and.
     #   bsa(3).eq.1.d0.and.bsa(4).eq.1.d0) then
       if(jj.eq.1) then
        taujc= betu*opxv*reu
        tau= taujc*angx+taul0
        taus= tau*tau
       else if(jj.eq.2) then
        taujc= log((umsh-tauu0)/(umsh-taul0))
        tau= umsh-exp(taujc*angx+log(umsh-taul0))
        taus= tau*tau
       else if(jj.eq.3) then
        taujc= 1.d0/(umsh-tauu0)-1.d0/(umsh-taul0)
        tau= umsh-1.d0/(taujc*angx+1.d0/(umsh-taul0))
        taus= tau*tau
       else if(jj.eq.4) then
        upsjc= betd*opxv*red
        ups= upsjc*angx+upsl0
        upss= ups*ups
       else if(jj.eq.5) then
        upsjc= log((dmsh-upsu0)/(dmsh-upsl0))
        ups= dmsh-exp(upsjc*angx+log(dmsh-upsl0))
        upss= ups*ups
       else if(jj.eq.6) then
        upsjc= 1.d0/(dmsh-upsu0)-1.d0/(dmsh-upsl0)
        ups= dmsh-1.d0/(upsjc*angx+1.d0/(dmsh-upsl0))
        upss= ups*ups
       endif
      else
       if(jj.le.3) then
        taujc0= tauu-taul
        tau= taujc0*angx+taul
        taus= tau*tau
       else if(jj.ge.4) then
        upsjc0= upsu-upsl
        ups= upsjc0*angx+upsl
        upss= ups*ups
       endif
       if(jj.le.3.and.(tau-umsh).gt.0.d0) then
         iz= 0
         ifz(13)= ifz(13)+1
         go to 1
       endif
       if(jj.ge.4.and.(ups-dmsh).gt.0.d0) then
         iz= 0
         ifz(13)= ifz(13)+1
         go to 1
       endif
       if(jj.eq.1) then
        taujc= taujc0
       else if(jj.eq.2) then
        taujc= taujc0/(tau-umsh)
       else if(jj.eq.3) then
        taujc= taujc0/(tau-umsh)/(tau-umsh)
       else if(jj.eq.4) then
        upsjc= upsjc0
       else if(jj.eq.5) then
        upsjc= upsjc0/(ups-dmsh)
       else if(jj.eq.6) then
        upsjc= upsjc0/(ups-dmsh)/(ups-dmsh)
       endif
      endif
*
*-----z is initialized
*
      if(omx2.eq.0.d0.or.x1.eq.0.d0) then
         iz= 0
         ifz(13)= ifz(13)+1
         go to 1
      else
         if(jj.le.3) then
          ct= (-omxv-2.d0*(tau+xv-umsh)/reu)/opxv/betu
          cp= (1.d0-2.d0*(x1-x2-umsh)/omx2/reu)/betu
         else if(jj.ge.4) then
          ct= (-omxv-2.d0*(ups+xv-dmsh)/red)/opxv/betd
          cp= (1.d0-2.d0*(omx1+umsh)/omx2/red)/betd
         endif
         if(ct.lt.-1.d0.or.ct.gt.1.d0) then
            iz= 0
            ifz(14)= ifz(14)+1
            go to 1
         else
            st= sqrt(1.d0-ct*ct)
         endif
         if(cp.lt.-1.d0.or.cp.gt.1.d0) then
            iz= 0
            ifz(15)= ifz(15)+1
            go to 1
         else
            sp= sqrt(1.d0-cp*cp)
         endif
      endif
*
      zca= -1.d0
      zcb= -xv-0.5d0*omx2*(omxv+opxv*ct*cp)
      zcc= -xvs+xv*omx2s-xv*omxv*omx2-0.25d0*omx2s*opxvs*
     #     (ct*ct+cp*cp)-xv*opxv*omx2*ct*cp-0.5d0*omxv*opxv*
     #     omx2s*ct*cp
      zdisc= 0.5d0*opxv*omx2*st*sp
      if(zcb.gt.0.d0) then
       zcq= -(zcb+zdisc)
      else if(zcb.lt.0.d0) then
       zcq= -(zcb-zdisc)
      endif
      azl= -zcq
      azu= zcc/zcq
      zl= dmin1(azl,azu)
      zu= dmax1(azl,azu)
      if(jj.le.3) then
       zl1= -tau-x1+x2-xv+umsh+dmsh-0.5d0*(1.d0+betd)*opxv*red
       zu1= -tau-x1+x2-xv+umsh+dmsh-0.5d0*(1.d0-betd)*opxv*red
       zl2= -1.d0+x2-xv
       zu2= -xv*x2
*
       phca= 16.d0*umsh
       phca= phca+8.d0*dmsh*x1
       phca= phca-4.d0*dmshs
       phca= phca-4.d0*x1s
*
       phcb= xv*umsh*dmsh*(8)
       phcb= phcb+xv*umsh*(32-8*x1+16*x2)
       phcb= phcb+xv*dmsh*(-8+8*x1+16*x2)
       phcb= phcb+xv*dmshs*(-8)
       phcb= phcb+xv*(-16*x1*x2-8*x1+16*x2)
       phcb= phcb+umsh*dmsh*(-8*x2)
       phcb= phcb+umsh*(16+8*x1*x2+16*x1-32*x2+16*tau)
       phcb= phcb+umshs*(-16)
       phcb= phcb+dmsh*(8*x1+8*x2*tau-8*x2-8*tau)
       phcb= phcb-8*x1*x2*tau+8*x1*x2-8*x1*tau-8*x1s+16*x2*tau
*
       phcc= xv*umsh*dmsh*(16-24*x2)
       phcc= phcc+xv*umsh*(16+32*x1*x2+8*x1+8*x2*tau-32*x2-16
     #    *x2s+8*tau)
       phcc= phcc+xv*umshs*(-16-8*x2)
       phcc= phcc+xv*dmsh*(16*x1*x2-8*x1+8*x2*tau+8*x2-16*x2s-8*tau)
       phcc= phcc+xv*(-16*x1*x2*tau+16*x1*x2+16*x1*x2s-8*x1
     #    -16*x1s*x2+24*x2*tau+8*x2-16*x2s-8*tau)
       phcc= phcc+xvs*umsh*dmsh*(8)
       phcc= phcc+xvs*umsh*(8+16*x2)
       phcc= phcc+xvs*umshs*(-4)
       phcc= phcc+xvs*dmsh*(-8+16*x2)
       phcc= phcc+xvs*dmshs*(-4)
       phcc= phcc+xvs*(-4-16*x1*x2+16*x2)
       phcc= phcc+umsh*(-8*x1*x2+16*x1-24*x2*tau-16*x2+8*
     #    x2s*tau+8*x2s+16*tau)
       phcc= phcc+umshs*(-16+16*x2-4*x2s)
       phcc= phcc+8*x1*x2*tau+8*x1*x2-8*x1*tau-4*x1s+8*x2*tau
     #    +8*x2*taus-8*x2s*tau-4*x2s*taus-4*x2s-4*taus
*
       phdisc= 256.d0*phta*(tau-taupl)*(tau-taupu)
       if(phdisc.lt.1.d-15) then
        zl3= zl
        zu3= zu
       else
        if(phcb.gt.0.d0) then
         phcq= -0.5d0*(phcb+sqrt(phdisc))
        else if(phcb.lt.0.d0) then
         phcq= -0.5d0*(phcb-sqrt(phdisc))
        endif
        azl3= phcq/phca
        azu3= phcc/phcq
        zl3= dmin1(azl3,azu3)
        zu3= dmax1(azl3,azu3)
       endif
       zln= dmax1(zl,zl1,zl2,zl3)
       zun= dmin1(zu,zu1,zu2,zu3)
      else if(jj.ge.4) then
       zl1= -1.d0+x1-ups-xv-0.5d0*(1.d0+betu)*opxv*reu
       zu1= -1.d0+x1-ups-xv-0.5d0*(1.d0-betu)*opxv*reu
       zl2= -1.d0+x2-xv
       zu2= -xv*x2
*
       phca= dmsh*(8+8*x1-8*x2)
       phca= phca+dmshs*(-4)
       phca= phca-4+8*x1*x2+8*x1-4*x1s-8*x2-4*x2s
*
       phcb= xv*umsh*dmsh*(8)
       phcb= phcb+xv*umsh*(-8-8*x1+8*x2)
       phcb= phcb+xv*dmsh*(16+8*x1-8*x2)
       phcb= phcb+xv*dmshs*(-8)
       phcb= phcb+xv*(-8+16*x1*x2+8*x1-8*x2-16*x2s)
       phcb= phcb+umsh*dmsh*(8)
       phcb= phcb+umsh*(-8+8*x1-8*x2-16*ups)
       phcb= phcb+dmsh*(16-8*x1*x2-8*x2*ups-16*x2+8*x2s+8*ups)
       phcb= phcb+dmshs*(-8+8*x2)
       phcb= phcb-8+8*x1*x2*ups+8*x1*x2+8*x1*ups+16*x1-8*x1s
     #    -8*x2-8*x2s*ups-8*ups
*
       phcc= xv*umsh*dmsh*(16-8*x2)
       phcc= phcc+xv*umsh*(-16+16*x1*x2+8*x1-8*x2*ups-16*
     #    x2s-8*ups)
       phcc= phcc+xv*umshs*(-8)
       phcc= phcc+xv*dmsh*(16-8*x1-8*x2*ups-8*x2+8*ups)
       phcc= phcc+xv*dmshs*(-8+8*x2)
       phcc= phcc+xv*(-8+16*x1*x2*ups+16*x1*x2+16*x1*x2s+8
     #    *x1-16*x1s*x2+8*x2*ups-16*x2s*ups-16*x2s-8*ups)
       phcc= phcc+xvs*umsh*dmsh*(8)
       phcc= phcc+xvs*umsh*(-8)
       phcc= phcc+xvs*umshs*(-4)
       phcc= phcc+xvs*dmsh*(8)
       phcc= phcc+xvs*dmshs*(-4)
       phcc= phcc+xvs*(-4+16*x1*x2-16*x2s)
       phcc= phcc+umsh*dmsh*(8-8*x2)
       phcc= phcc+umsh*(-8+8*x1+8*x2*ups-8*ups)
       phcc= phcc+umshs*(-4)
       phcc= phcc+dmsh*(8+8*x1*x2-8*x1-16*x2*ups-8*x2+8*x2s
     #    *ups+8*ups)
       phcc= phcc+dmshs*(-4+8*x2-4*x2s)
       phcc= phcc-4-8*x1*x2*ups+8*x1*ups+8*x1-4*x1s+8*x2*ups
     #    +8*x2*upss-4*x2s*upss-8*ups-4*upss
*
       phdisc= 256.d0*phta*(ups-upspl)*(ups-upspu)
       if(phdisc.lt.1.d-15) then
        zl3= zl
        zu3= zu
       else
        if(phcb.gt.0.d0) then
         phcq= -0.5d0*(phcb+sqrt(phdisc))
        else if(phcb.lt.0.d0) then
         phcq= -0.5d0*(phcb-sqrt(phdisc))
        endif
        azl3= phcq/phca
        azu3= phcc/phcq
        zl3= dmin1(azl3,azu3)
        zu3= dmax1(azl3,azu3)
       endif
       zln= dmax1(zl,zl1,zl2,zl3)
       zun= dmin1(zu,zu1,zu2,zu3)
      endif
*
      if(zln.gt.zun) then
       iz= 0
       ifz(18)= ifz(18)+1
       go to 1
      endif
*
*-----the overall sqrt is mapped away
*
      sqz= 0.5d0*opxv*omx2*st*sp
      if(sqz.eq.0.d0) then
       iz= 0
       ifz(19)= ifz(19)+1
       go to 1
      endif
      dzl= (zln-zl)/sqz
      dzu= (zu-zun)/sqz
      if(zl.eq.zln) then
       tl= -pi/2.d0
      else
       if(dzl.gt.0.d0.and.dzl.lt.1.d-10) then
        tl= -pi/2.d0+sqrt(2.d0*dzl)*(1.d0-dzl/12.d0)
       else
        ifas= 1
        aa= (zcb-zln)/sqz
        tl= -s09aaf(aa,ifas)
        if(ifas.ne.0) then
         iz= 0
         ifz(20)= ifz(20)+1
          go to 1
        endif
       endif
      endif
      if(zu.eq.zun) then
       tu= pi/2.d0
      else
       if(dzu.gt.0.d0.and.dzu.lt.1.d-10) then
        tu= pi/2.d0-sqrt(2.d0*dzu)*(1.d0-dzu/12.d0)
       else
        ifas= 1
        bb= (zcb-zun)/sqz
        tu= -s09aaf(bb,ifas)
        if(ifas.ne.0) then
         iz= 0
         ifz(21)= ifz(21)+1
         go to 1
        endif
       endif
      endif
*
      zjc= tu-tl
      arg= zjc*zx+tl
      z= zcb+sqz*sin(arg)
      zs= z*z
      zc= zs*z
      zxi= 1.d0/(z+1.d0+2.d0*xv)
*
      bcphi= z+xv+0.5d0*omx2*(opxv*ct*cp+omxv)
      acphi= 0.5d0*omx2*opxv*st*sp
      if((acphi+bcphi).lt.0.d0.or.(acphi-bcphi).lt.0.d0) then
       iz= 0
       ifz(22)= ifz(22)+1
       go to 1
      endif
*
      by= -1.d0-xv+x2-z
*
*-----Quantities are initialized in the Y-channel
*
      p2yr= -by*y*sh
      p2yi= 0.d0
      call wtopole(p2yr,p2yi,p3qy,fzy,fwsy)
      xgy0= 1.d0/8.d0/gf/wm2
      xgyr= 1.d0+0.5d0*ccw*((fw0-fw(1))/wm2+p3qw(1)-p3qy(1))
      xgyi= -0.5d0*ccw*p3qy(2)
      agry= xgy0*xgyr
      agiy= xgy0*xgyi
      agym= agry*agry+agiy*agiy
      gry= agry/agym
      giy= -agiy/agym
*
*-----propagator in Y-channel
*
      pyr= by*y*sh-sw(1)
      pyir= pyr/(pyr*pyr+swis)
      pyii= sw(2)/(pyr*pyr+swis)
      xrhry= fwsy(1)-fwsw(1)+sw(1)*(p3qsw(1)-p3qy(1))-
     #       sw(2)*(p3qsw(2)-p3qy(2))
      xrhiy= fwsy(2)-fwsw(2)+sw(1)*(p3qsw(2)-p3qy(2))+
     #       sw(2)*(p3qsw(1)-p3qy(1))
      arhry= 1.d0+1.d0/apis*(pyir*(gry*xrhry-giy*xrhiy)-
     #        pyii*(gry*xrhiy+giy*xrhry))
      arhiy= 1.d0/apis*(pyii*(gry*xrhry-giy*xrhiy)+
     #        pyir*(gry*xrhiy+giy*xrhry))
      arhym= arhry*arhry+arhiy*arhiy
      rhry= arhry/arhym
      rhiy= -arhiy/arhym
*
*-----vertices are initialized
*
      jfl= 0
      p1s= -by*y*sh
      p2s= -x2*y*sh
      ps= xv*y*sh
      rm12= rnm2
      rm22= rnm2
      rm32= rnm2
      call wtocff(jfl,p1s,p2s,ps,rm12,rm22,rm32,c00,c01,c02,c03)
      if(jfl.eq.-1) then
         iz= 0
         ifz(22)= ifz(22)+1
         go to 1
      endif
*
      jfl= 0
      p1s= -by*y*sh
      p2s= -x2*y*sh
      ps= xv*y*sh
      rm12= rnm2
      rm22= tqm2
      rm32= rnm2
      call wtocff(jfl,p1s,p2s,ps,rm12,rm22,rm32,ct0,ct1,ct2,ct3)
      if(jfl.eq.-1) then
         iz= 0
         ifz(23)= ifz(23)+1
         go to 1
      endif
*
      jfl= 0
      p1s= -by*y*sh
      p2s= -x2*y*sh
      ps= xv*y*sh
      rm12= tqm2
      rm22= rnm2
      rm32= tqm2
      call wtocff(jfl,p1s,p2s,ps,rm12,rm22,rm32,ctt0,ctt1,ctt2,ctt3)
      if(jfl.eq.-1) then
         iz= 0
         ifz(24)= ifz(24)+1
         go to 1
      endif
*
      do k=1,2
       cph_11(k)= ctt1(k,1)+0.5d0*ct1(k,1)-3.d0/2.d0*c01(k,1) 
       cph_12(k)= ctt1(k,2)+0.5d0*ct1(k,2)-3.d0/2.d0*c01(k,2)  
       cph_21(k)= ctt2(k,1)+0.5d0*ct2(k,1)-3.d0/2.d0*c02(k,1)  
       cph_22(k)= ctt2(k,2)+0.5d0*ct2(k,2)-3.d0/2.d0*c02(k,2)   
       cph_23(k)= ctt2(k,3)+0.5d0*ct2(k,3)-3.d0/2.d0*c02(k,3)   
       cph_24(k)= ctt2(k,4)+0.5d0*ct2(k,4)-3.d0/2.d0*c02(k,4)   
       cph_31(k)= ctt3(k,1)+0.5d0*ct3(k,1)-3.d0/2.d0*c03(k,1)      
       cph_32(k)= ctt3(k,2)+0.5d0*ct3(k,2)-3.d0/2.d0*c03(k,2)    
       cph_33(k)= ctt3(k,3)+0.5d0*ct3(k,3)-3.d0/2.d0*c03(k,3)    
       cph_34(k)= ctt3(k,4)+0.5d0*ct3(k,4)-3.d0/2.d0*c03(k,4)    
       cph_35(k)= ctt3(k,5)+0.5d0*ct3(k,5)-3.d0/2.d0*c03(k,5)    
       cph_36(k)= ctt3(k,6)+0.5d0*ct3(k,6)-3.d0/2.d0*c03(k,6)    
*
       cp_11(k)= ctt1(k,1)+ct1(k,1)-2.d0*c01(k,1) 
       cp_12(k)= ctt1(k,2)+ct1(k,2)-2.d0*c01(k,2)  
       cp_21(k)= ctt2(k,1)+ct2(k,1)-2.d0*c02(k,1)  
       cp_22(k)= ctt2(k,2)+ct2(k,2)-2.d0*c02(k,2)   
       cp_23(k)= ctt2(k,3)+ct2(k,3)-2.d0*c02(k,3)   
       cp_24(k)= ctt2(k,4)+ct2(k,4)-2.d0*c02(k,4)   
       cp_31(k)= ctt3(k,1)+ct3(k,1)-2.d0*c03(k,1)      
       cp_32(k)= ctt3(k,2)+ct3(k,2)-2.d0*c03(k,2)    
       cp_33(k)= ctt3(k,3)+ct3(k,3)-2.d0*c03(k,3)    
       cp_34(k)= ctt3(k,4)+ct3(k,4)-2.d0*c03(k,4)    
       cp_35(k)= ctt3(k,5)+ct3(k,5)-2.d0*c03(k,5)    
       cp_36(k)= ctt3(k,6)+ct3(k,6)-2.d0*c03(k,6)    
*
       cmh_11(k)= ctt1(k,1)-0.5d0*ct1(k,1)-1.d0/2.d0*c01(k,1) 
       cmh_12(k)= ctt1(k,2)-0.5d0*ct1(k,2)-1.d0/2.d0*c01(k,2)  
       cmh_21(k)= ctt2(k,1)-0.5d0*ct2(k,1)-1.d0/2.d0*c02(k,1)  
       cmh_22(k)= ctt2(k,2)-0.5d0*ct2(k,2)-1.d0/2.d0*c02(k,2)   
       cmh_23(k)= ctt2(k,3)-0.5d0*ct2(k,3)-1.d0/2.d0*c02(k,3)   
       cmh_24(k)= ctt2(k,4)-0.5d0*ct2(k,4)-1.d0/2.d0*c02(k,4)   
       cmh_31(k)= ctt3(k,1)-0.5d0*ct3(k,1)-1.d0/2.d0*c03(k,1)      
       cmh_32(k)= ctt3(k,2)-0.5d0*ct3(k,2)-1.d0/2.d0*c03(k,2)    
       cmh_33(k)= ctt3(k,3)-0.5d0*ct3(k,3)-1.d0/2.d0*c03(k,3)    
       cmh_34(k)= ctt3(k,4)-0.5d0*ct3(k,4)-1.d0/2.d0*c03(k,4)    
       cmh_35(k)= ctt3(k,5)-0.5d0*ct3(k,5)-1.d0/2.d0*c03(k,5)    
       cmh_36(k)= ctt3(k,6)-0.5d0*ct3(k,6)-1.d0/2.d0*c03(k,6)    
*
       cm_11(k)= ctt1(k,1)-ct1(k,1)
       cm_12(k)= ctt1(k,2)-ct1(k,2)
       cm_21(k)= ctt2(k,1)-ct2(k,1)
       cm_22(k)= ctt2(k,2)-ct2(k,2)
       cm_23(k)= ctt2(k,3)-ct2(k,3)
       cm_24(k)= ctt2(k,4)-ct2(k,4)
       cm_31(k)= ctt3(k,1)-ct3(k,1)
       cm_32(k)= ctt3(k,2)-ct3(k,2)
       cm_33(k)= ctt3(k,3)-ct3(k,3)
       cm_34(k)= ctt3(k,4)-ct3(k,4)
       cm_35(k)= ctt3(k,5)-ct3(k,5)
       cm_36(k)= ctt3(k,6)-ct3(k,6)
      enddo
*
*-----3 massless generations
*
      x0h= y*sh
      xh= xv*y*sh
      x2h= x2*y*sh
      yh= by*y*sh
*
      do k=1,2
       w(1,k)= x2h*(-c03(k,2)-c03(k,3)+2.d0*c03(k,4))
     #            +xh*(c01(k,2)+c02(k,2)-c03(k,3)+c03(k,4))
     #            +yh*(c02(k,1)+c02(k,2)-2.d0*c02(k,3)+
     #            c03(k,1)-2.d0*c03(k,3)+c03(k,4))
     #            -2.d0/3.d0*co(k)+2.d0*c02(k,4)-2.d0*c03(k,5)+
     #            2.d0*c03(k,6)
       w(2,k)= x2h*(-2.d0*c02(k,2)+2.d0*c02(k,3)+
     #            3.d0*c03(k,2)+3.d0*c03(k,3)-6.d0*c03(k,4))
     #            +xh*(-c01(k,2)-3.d0*c02(k,2)+2.d0*c02(k,3)+
     #            3.d0*c03(k,3)-3.d0*c03(k,4))+yh*(-2.d0*
     #            c01(k,1)+2.d0*c01(k,2)-5*c02(k,1)-3.d0*c02(k,2)
     #            +8.d0*c02(k,3)-3.d0*c03(k,1)+6.d0*c03(k,3)-
     #            3.d0*c03(k,4))+2.d0*c02(k,4)+6.d0*c03(k,5)-
     #            6.d0*c03(k,6)
       w(3,k)= x2h*(-2.d0*c02(k,2)+2.d0*c02(k,3)-c03(k,2)+
     #            c03(k,3))+xh*(c01(k,2)+c02(k,2)+2.d0*
     #            c02(k,3)+c03(k,3)+c03(k,4))+yh*(-c02(k,1)+
     #            c02(k,2)-c03(k,1)+c03(k,4))+2.d0*c02(k,4)+
     #            2.d0*c03(k,5)+2.d0*c03(k,6)
       w(4,k)= 8.d0*x0h*(-c02(k,2)+c02(k,3)+c03(k,3)-
     #            c03(k,4))
       w(5,k)= 0.d0
       w(6,k)= 0.d0
       w(7,k)= 0.d0
       w(8,k)= x0h*(-4.d0*c01(k,2)-8.d0*c02(k,2)-4.d0*
     #            c02(k,3)-8.d0*c03(k,4))
       w(9,k)= 2.d0*x2h*(c01(k,2)+c02(k,3)-c03(k,2)+
     #            c03(k,4))+2.d0*xh*(c01(k,2)+c02(k,2)+
     #            c02(k,3)+c03(k,4))+2.d0*yh*(-c01(k,1)-
     #            c02(k,1)+c02(k,2)-c02(k,3)-c03(k,3)+c03(k,4))
     #            -2.d0/3.d0*co(k)+4*c02(k,4)+4*c03(k,6)
       w(10,k)= 0.d0
      enddo
      do if=1,10
       do k=1,2
        w(if,k)= 3.d0*w(if,k)
       enddo
      enddo
*
*-----t-b subtracted
*
      do k=1,2
       w(1,k)= w(1,k)+
     # x2h*(-0.5d0*cph_32(k)-0.5d0*cph_33(k)+cph_34(k))
     # +0.5d0*xh*(cph_12(k)+cph_22(k)-cph_33(k)+cph_34(k))
     # +0.5d0*yh*(cph_21(k)+cph_22(k)-2.d0*cph_23(k)+cph_31(k)
     # -2.d0*cph_33(k)+cph_34(k))
     # +0.5d0*tqm2*(ctt1(k,1)-ctt1(k,2))
     # +0.5d0*ctt0*tqm2 
     # +cph_24(k)-cph_35(k)+cph_36(k)
       w(2,k)= w(2,k)+
     # x2h*(-cph_22(k)+cph_23(k)+1.5d0*cph_32(k)+1.5d0*cph_33(k)
     # -3.d0*cph_34(k))
     # +0.5d0*xh*(-cph_12(k)-3.d0*cph_22(k)+2.d0*cph_23(k)
     # +3.d0*cph_33(k)-3.d0*cph_34(k))
     # +yh*(-cph_11(k)+cph_12(k)-2.5d0*cph_21(k)-1.5d0*cph_22(k)
     # +4.d0*cph_23(k)-1.5d0*cph_31(k)+3.d0*cph_33(k)-1.5d0*cph_34(k))
     # +0.5d0*tqm2*(-ctt1(k,1)+ctt1(k,2))
     # -0.5d0*ctt0*tqm2
     # +cph_24(k)+3.d0*cph_35(k)-3.d0*cph_36(k)
       w(3,k)= w(3,k)+
     # x2h*(-cph_22(k)+cph_23(k)-0.5d0*cph_32(k)+0.5d0*cph_33(k))
     # +0.5d0*xh*(cph_12(k)+cph_22(k)+2.d0*cph_23(k)
     # +cph_33(k)+cph_34(k))
     # +0.5d0*yh*(-cph_21(k)+cph_22(k)-cph_31(k)+cph_34(k))
     # +0.5d0*tqm2*(ctt1(k,1)+ctt1(k,2))
     # +0.5d0*ctt0*tqm2 
     # +cph_24(k)+cph_35(k)+cph_36(k)
       w(4,k)= w(4,k)+
     # 4.d0*x0h*(-cph_22(k)+cph_23(k)+cph_33(k)-cph_34(k))
       w(5,k)= w(5,k)+
     # x2h*(-cmh_32(k)+cmh_33(k))
     # +xh*(cmh_12(k)+cmh_22(k)+2.d0*cmh_23(k)
     # +cmh_33(k)+cmh_34(k))
     # +yh*(-2.d0*cmh_11(k)+2.d0*cmh_12(k)
     # -3.d0*cmh_21(k)+cmh_22(k)
     # +2.d0*cmh_23(k)-cmh_31(k)+cmh_34(k))
     # +tqm2*(ctt1(k,1)+ctt1(k,2))
     # +ctt0*tqm2 
     # +6.d0*cmh_24(k)+6.d0*cmh_35(k)+6.d0*cmh_36(k)
       w(6,k)= w(6,k)+
     # x2h*(-cmh_32(k)-cmh_33(k)+2.d0*cmh_34(k))
     # +xh*(-cmh_12(k)+cmh_22(k)-2.d0*cmh_23(k)
     # -cmh_33(k)+cmh_34(k))
     # +yh*(cmh_21(k)+cmh_22(k)-2.d0*cmh_23(k)
     # +cmh_31(k)-2.d0*cmh_33(k)+cmh_34(k))
     # +tqm2*(-ctt1(k,1)+ctt1(k,2))
     # -ctt0*tqm2
     # -2.d0*cmh_24(k)-6.d0*cmh_35(k)+6.d0*cmh_36(k)
       w(7,k)= w(7,k)+
     # 4.d0*x0h*(cmh_12(k)+cmh_23(k))
       w(8,k)= w(8,k)+
     # x0h*(-2.d0*cmh_12(k)-4.d0*cph_22(k)
     # -2.d0*cph_23(k)-4.d0*cph_34(k))
       w(9,k)= w(9,k)+
     # x2h*(cph_12(k)+cph_23(k)-cph_32(k)+cph_34(k))
     # +xh*(cph_12(k)+cph_22(k)+cph_23(k)+cph_34(k))
     # +yh*(-cmh_11(k)-cph_21(k)+cph_22(k)-cph_23(k)
     # -cph_33(k)+cph_34(k))
     # -tqm2*ctt1(k,2) 
     # +2.d0*cph_24(k)+2.d0*cph_36(k)
       w(10,k)= w(10,k)+
     # 4.d0*x0h*(cmh_12(k)+cmh_23(k))
      enddo
*
*-----additions for Z
*
      do k=1,2
       do if=1,10
        wg(if,k)= w(if,k) 
       enddo
      enddo
      do k=1,2
       dw(1,k)= 0.125d0*x2h*(cm_32(k)+cm_33(k)-2.d0*cm_34(k))
     # +0.125d0*xh*(-cm_12(k)-cm_22(k)+cm_33(k)-cm_34(k))
     # +0.125d0*yh*(-cm_21(k)-cm_22(k)+2.d0*cm_23(k)-cm_31(k)
     # +2.d0*cm_33(k)-cm_34(k))
     # +0.5d0*tqm2*(-ctt1(k,1)+ctt1(k,2))
     # +0.25d0*(-cm_24(k)+cm_35(k)-cm_36(k))
     # -0.5d0*ctt0(k)*tqm2
       dw(2,k)= 0.125d0*x2h*(2.d0*cm_22(k)-2.d0*cm_23(k)
     # -3.d0*cm_32(k)-3.d0*cm_33(k)+6.d0*cm_34(k))
     # +0.125d0*xh*(cm_12(k)+3.d0*cm_22(k)-2*cm_23(k)
     # -3.d0*cm_33(k)+3.d0*cm_34(k))
     # +0.125d0*yh*(2.d0*cm_11(k)-2.d0*cm_12(k)+5*cm_21(k)
     # +3.d0*cm_22(k)-8*cm_23(k)+3.d0*cm_31(k)-6.d0*cm_33(k)
     # +3.d0*cm_34(k))+0.5d0*tqm2*(ctt1(k,1)-ctt1(k,2))
     # +0.25d0*(-cm_24(k)-3.d0*cm_35(k)+3.d0*cm_36(k))
     # +0.5d0*ctt0(k)*tqm2 
       dw(3,k)=  0.125d0*x2h*(2.d0*cm_22(k)-2.d0*cm_23(k)
     # +cm_32(k)-cm_33(k))+0.125d0*xh*(-cm_12(k)-cm_22(k)
     # -2.d0*cm_23(k)-cm_33(k)-cm_34(k))
     # +0.125d0*yh*(cm_21(k)-cm_22(k)+cm_31(k)-cm_34(k))
     # +0.5d0*tqm2*(-ctt1(k,1)-ctt1(k,2))
     # +0.25d0*(-cm_24(k)-cm_35(k)-cm_36(k))
     # -0.5d0*ctt0(k)*tqm2 
       dw(4,k)= x0h*(cm_22(k)-cm_23(k)-cm_33(k)+cm_34(k))
       dw(5,k)= 0.25d0*x2h*(cp_32(k)-cp_33(k))
     # +0.25d0*xh*(-cp_12(k)-cp_22(k)
     # -2.d0*cp_23(k)-cp_33(k)-cp_34(k))
     # +0.25d0*yh*(2.d0*cp_11(k)-2.d0*cp_12(k)+3.d0*cp_21(k)
     # -cp_22(k)-2.d0*cp_23(k)+cp_31(k)-cp_34(k))
     # +tqm2*(-ctt1(k,1)-ctt1(k,2))
     # +1.5d0*(-cp_24(k)-cp_35(k)-cp_36(k))
     # -ctt0(k)*tqm2 
       dw(6,k)= 0.25d0*x2h*(cp_32(k)+cp_33(k)-2.d0*cp_34(k))
     # +0.25d0*xh*(cp_12(k)-cp_22(k)+2.d0*cp_23(k)
     # +cp_33(k)-cp_34(k))
     # +0.25d0*yh*(-cp_21(k)-cp_22(k)+2.d0*cp_23(k)-cp_31(k)
     # +2.d0*cp_33(k)-cp_34(k))
     # +tqm2*(ctt1(k,1)-ctt1(k,2))
     # +0.5d0*( cp_24(k)+3.d0*cp_35(k)-3.d0*cp_36(k))
     # +ctt0(k)*tqm2 
       dw(7,k)= -x0h*(cp_12(k)+cp_23(k))
       dw(8,k)= 0.5d0*x0h*(cm_12(k)+2.d0*cm_22(k)
     # +cm_23(k)+2.d0*cm_34(k))
       dw(9,k)= 0.25d0*x2h*(-cm_12(k)-cm_23(k)
     # +cm_32(k)-cm_34(k))
     # +0.25d0*xh*(-cm_12(k)-cm_22(k)-cm_23(k)-cm_34(k))
     # +0.25d0*yh*(cm_11(k)+cm_21(k)-cm_22(k)+cm_23(k)
     # +cm_33(k)-cm_34(k))+tqm2*ctt1(k,2) 
     # -0.5d0*(cm_24(k)+cm_36(k))
       dw(10,k)= -x0h*(cp_12(k)+cp_23(k))
      enddo
      do k=1,2
       do if=1,10
        wz(if,k)= w(if,k)+dw(if,k)/ctrrx
       enddo
      enddo
      do k=1,2
       do if=1,10
        wg(if,k)= wg(if,k)/apis
        wz(if,k)= wz(if,k)/apis
       enddo
      enddo
*
*-----phi is initialized
*
      if(jj.le.3) then
       cpu= cos(2.d0*pi*phx)
       spu= sin(2.d0*pi*phx)
      else if(jj.ge.4) then
       cpd= cos(2.d0*pi*phx)
       spd= sin(2.d0*pi*phx)
      endif
*
*-----here one starts with u,d variables and then n variables
*
      if(jj.le.3) then
       eu= x1-dmsh
       ctu= (1.d0-2.d0*(tau+x1+xv-umsh-dmsh)/opxv/reu)/betu
       if(abs(ctu).gt.1.d0) then
        iz= 0
        ifz(23)= ifz(23)+1
        go to 1
       endif
       epsu= 1.d0-abs(ctu)
       if(epsu.lt.1.d-5) then
        stu= sqrt(2.d0*epsu)*(1.d0-epsu/4.d0*(1.d0+epsu/8.d0))
       else
        stu= sqrt(1.d0-ctu*ctu)
       endif
       if(stu.eq.0.d0) then
        iz= 0
        ifz(24)= ifz(24)+1
        go to 1
       endif
*
       ed= 1.d0+x2-x1+dmsh
       ctd= (1.d0+2.d0*(tau+x1-x2+z+xv-umsh-dmsh)/opxv/red)/betd
       if(abs(ctd).gt.1.d0) then
        iz= 0
        ifz(25)= ifz(25)+1
        go to 1
       endif
       epsd= 1.d0-abs(ctd)
       if(epsd.lt.1.d-5) then
        std= sqrt(2.d0*epsd)*(1.d0-epsd/4.d0*(1.d0+epsd/8.d0))
       else
        std= sqrt(1.d0-ctd*ctd)
       endif
       aca= betu*betd*stu*std*cpu
       acb= betu*betd*stu*std*spu
       acca= -1.d0+2.d0*(x2-umsh-dmsh)/reu/red
       acc= betu*betd*ctu*ctd+acca
       discazn= acb*acb-acc*acc+aca*aca
       if(discazn.lt.0.d0) then
        iz= 0
        ifz(26)= ifz(26)+1
        go to 1
       endif
       discazn= sqrt(discazn)
*
       if(acc.eq.aca) then
        if(acb.eq.0.d0) then
         iz= 0
         ifz(26)= ifz(26)+1
         go to 1
        else
         byp= -aca/acb
         bym= -aca/acb
        endif
       else
        if(acb.gt.0.d0) then
         acqn= -(acb+discazn)
        else if(acb.lt.0.d0) then
         acqn= -(acb-discazn)
        endif
        byp= acqn/(acc-aca)
        bym= (acc+aca)/acqn
       endif
*
       cpdp= (1.d0-byp*byp)/(1.d0+byp*byp)
       cpdm= (1.d0-bym*bym)/(1.d0+bym*bym)
       spdp= 2.d0*byp/(1.d0+byp*byp)
       spdm= 2.d0*bym/(1.d0+bym*bym)
*
       en= omx2
       ctn= 1.d0-2.d0*(1.d0-x2+z+xv)/opxv/omx2
       actn= -(betu*eu*ctu+betd*ed*ctd)/en
       if(abs(ctn).gt.1.d0) then
        iz= 0
        ifz(27)= ifz(27)+1
        go to 1
       endif
       epsn= 1.d0-abs(ctn)
       if(epsn.lt.1.d-5) then
        stn= sqrt(2.d0*epsn)*(1.d0-epsn/4.d0*(1.d0+epsn/8.d0))
       else
        stn= sqrt(1.d0-ctn*ctn)
       endif
       cpnp= -(betu*eu*stu*cpu+betd*ed*std*cpdp)/en/stn
       spnp= -(betu*eu*stu*spu+betd*ed*std*spdp)/en/stn
       cpnm= -(betu*eu*stu*cpu+betd*ed*std*cpdm)/en/stn
       spnm= -(betu*eu*stu*spu+betd*ed*std*spdm)/en/stn
       tstn= 1.d0-(omx2s-(betu*eu*ctu+betd*ed*ctd)**2)/(en*stn)**2
*
*-----here one starts with d,u variables and then n variables
*
      else if(jj.ge.4) then
       ed= 1.d0+x2-x1+dmsh
       ctd= (1.d0-2.d0*(1.d0+x2-x1+ups+xv)/opxv/red)/betd
       if(abs(ctd).gt.1.d0) then
        iz= 0
        ifz(28)= ifz(28)+1
        go to 1
       endif
       epsd= 1.d0-abs(ctd)
       if(epsd.lt.1.d-5) then
        std= sqrt(2.d0*epsd)*(1.d0-epsd/4.d0*(1.d0+epsd/8.d0))
       else
        std= sqrt(1.d0-ctd*ctd)
       endif
       if(std.eq.0.d0) then
        iz= 0
        ifz(29)= ifz(29)+1
        go to 1
       endif
*
       eu= x1-dmsh
       ctu= (1.d0+2.d0*(omx1+ups+z+xv)/opxv/reu)/betu
       if(abs(ctu).gt.1.d0) then
        iz= 0
        ifz(30)= ifz(30)+1
        go to 1
       endif
       epsu= 1.d0-abs(ctu)
       if(epsu.lt.1.d-5) then
        stu= sqrt(2.d0*epsu)*(1.d0-epsu/4.d0*(1.d0+epsu/8.d0))
       else
        stu= sqrt(1.d0-ctu*ctu)
       endif
       aca= betu*betd*stu*std*cpd
       acb= betu*betd*stu*std*spd
       acca= -1.d0+2.d0*(x2-umsh-dmsh)/reu/red
       acc= betu*betd*ctu*ctd+acca
       discazn= acb*acb-acc*acc+aca*aca
       if(discazn.lt.0.d0) then
        iz= 0
        ifz(31)= ifz(31)+1
        go to 1
       endif
       discazn= sqrt(discazn)
       if(acb.gt.0.d0) then
        acqn= -(acb+discazn)
       else if(acb.lt.0.d0) then
        acqn= -(acb-discazn)
       endif
       byp= acqn/(acc-aca)
       bym= (acc+aca)/acqn
       cpup= (1.d0-byp*byp)/(1.d0+byp*byp)
       cpum= (1.d0-bym*bym)/(1.d0+bym*bym)
       spup= 2.d0*byp/(1.d0+byp*byp)
       spum= 2.d0*bym/(1.d0+bym*bym)
*
       en= omx2
       ctn= 1.d0-2.d0*(1.d0-x2+z+xv)/opxv/omx2
       if(abs(ctn).gt.1.d0) then
        iz= 0
        ifz(32)= ifz(32)+1
        go to 1
       endif
       epsn= 1.d0-abs(ctn)
       if(epsn.lt.1.d-5) then
        stn= sqrt(2.d0*epsn)*(1.d0-epsn/4.d0*(1.d0+epsn/8.d0))
       else
        stn= sqrt(1.d0-ctn*ctn)
       endif
       cpnp= -(betu*eu*stu*cpup+betd*ed*std*cpd)/en/stn
       cpnm= -(betu*eu*stu*cpum+betd*ed*std*cpd)/en/stn
       spnp= -(betu*eu*stu*spup+betd*ed*std*spd)/en/stn
       spnm= -(betu*eu*stu*spum+betd*ed*std*spd)/en/stn
       tstn= 1.d0-(omx2s-(betu*eu*ctu+betd*ed*ctd)**2)/(en*stn)**2
      endif
*
*-----third loop starts here
*
      do kk=1,2
*
      if(kk.eq.1) then
       if(jj.le.3) then
        if(abs(cpdp).le.1.d0.and.abs(cpnp).le.1.d0.and.
     #     abs(spnp).le.1.d0) then
         cpd= cpdp
         spd= spdp
         cpn= cpnp
         spn= spnp
        else
         iz= 0
         ifz(33)= ifz(33)+1
         go to 2
        endif
       else if(jj.ge.4) then
        if(abs(cpup).le.1.d0.and.abs(cpnp).le.1.d0.and.
     #     abs(spnp).le.1.d0) then
         cpu= cpup
         spu= spup
         cpn= cpnp
         spn= spnp
        else
         iz= 0
         ifz(34)= ifz(34)+1
         go to 2
        endif
       endif
      else if(kk.eq.2) then
       if(jj.le.3) then
        if(abs(cpdm).le.1.d0.and.abs(cpnm).le.1.d0.and.
     #     abs(spnm).le.1.d0) then
         cpd= cpdm
         spd= spdm
         cpn= cpnm
         spn= spnm
        else
         iz= 0
         ifz(35)= ifz(35)+1
         go to 2
        endif
       else if(jj.ge.4) then
        if(abs(cpum).le.1.d0.and.abs(cpnm).le.1.d0.and.
     #     abs(spnm).le.1.d0) then
         cpu= cpum
         spu= spum
         cpn= cpnm
         spn= spnm
        else
         iz= 0
         ifz(36)= ifz(36)+1
         go to 2
        endif
       endif
      endif
*
      vfact= xp+xm*y
      vfacts= vfact*vfact
      velp= 1.d0-2.d0*xm*y/vfact+xv*xm*y/vfact*(-6.d0+2.d0*y+
     #      6.d0*xm*y/vfact-2.d0*xm*ys/vfact)+xvs*xm*y/vfact*(
     #      -8.d0+10.d0*y-2.d0*ys+26.d0*xm*y/vfact-22.d0*xm*ys/vfact+ 
     #      4.d0*xm*yc/vfact-18.d0*xms*ys/vfacts+12.d0*xms*yc/vfacts- 
     #      2.d0*xms*yq/vfacts)
      if(abs(velp).gt.1.d0) then
       iz= 0
       ifz(37)= ifz(37)+1
       go to 2
      endif
      betpl= 2.d0*sqrt(xp*xm*y)/vfact*(1.d0+
     #       xv*(3.d0/2.d0-3.d0*xm*y/vfact+xm*ys/vfact-0.5d0*y)+
     #       xvs*(7.d0/8.d0-17.d0/2.d0*xm*y/vfact+8.d0*xm*ys/vfact- 
     #       3.d0/2.d0*xm*yc/vfact+9.d0*xms*ys/vfacts-6.d0*xms*yc/
     #       vfacts+xms*yq/vfacts-7.d0/4.d0*y+3.d0/8.d0*ys))
*
      if(abs(betpl).gt.1.d0) then
       iz= 0
       ifz(38)= ifz(38)+1
       go to 2
      endif
      betl= 1.d0-0.5d0*xv*omy+xvs/8.d0*(-1.d0+6.d0*y-ys)
      if(abs(betl).gt.1.d0) then
       iz= 0
       ifz(39)= ifz(39)+1
       go to 2
      endif
      vels= xv*(omy-xv*y)
      vel= sqrt(vels)
      if(abs(vel).gt.1.d0) then
       iz= 0
       ifz(40)= ifz(40)+1
       go to 2
      endif
*
      ysn= sqrt(y*sh)
*
      vu(1)= 0.5d0*eu*stu*cpu*ysn
      vu(2)= 0.5d0*eu*stu*spu*ysn
      vu(3)= 0.5d0*eu*ctu*ysn
      vu(4)= 0.5d0*eu*ysn
*
      vd(1)= 0.5d0*ed*std*cpd*ysn
      vd(2)= 0.5d0*ed*std*spd*ysn
      vd(3)= 0.5d0*ed*ctd*ysn
      vd(4)= 0.5d0*ed*ysn
*
      vn(1)= 0.5d0*en*stn*cpn*ysn
      vn(2)= 0.5d0*en*stn*spn*ysn
      vn(3)= 0.5d0*en*ctn*ysn
      vn(4)= 0.5d0*en*ysn
*
      vut(1)= vel*(vu(4)-vu(3))-vu(1)
      vut(2)= vu(2)
      vut(3)= (vel*(1.d0+velp)*vu(1)+(vel*vel-1.d0)*vu(3)-
     #        (vel*vel+velp)*vu(4))/betl/betpl
      vut(4)= (-vel*(1.d0+velp)*vu(1)+velp*(1.d0-vel*vel)*vu(3)+
     #        (1.d0+vel*vel*velp)*vu(4))/betl/betpl
*
      vdt(1)= vel*(vd(4)-vd(3))-vd(1)
      vdt(2)= vd(2)
      vdt(3)= (vel*(1.d0+velp)*vd(1)+(vel*vel-1.d0)*vd(3)-
     #        (vel*vel+velp)*vd(4))/betl/betpl
      vdt(4)= (-vel*(1.d0+velp)*vd(1)+velp*(1.d0-vel*vel)*vd(3)+
     #        (1.d0+vel*vel*velp)*vd(4))/betl/betpl
*
      vnt(1)= vel*(vn(4)-vn(3))-vn(1)
      vnt(2)= vn(2)
      vnt(3)= (vel*(1.d0+velp)*vn(1)+(vel*vel-1.d0)*vn(3)-
     #        (vel*vel+velp)*vn(4))/betl/betpl
      vnt(4)= (-vel*(1.d0+velp)*vn(1)+velp*(1.d0-vel*vel)*vn(3)+
     #        (1.d0+vel*vel*velp)*vn(4))/betl/betpl
*
      eut= vut(4)
      ctut= vut(3)/eut
      edt= vdt(4)
      ctdt= vdt(3)/edt
      ent= vnt(4)
      ctnt= vnt(3)/ent
*
      if(ipro.eq.2) then
       eutmn= dmax1(uqm,ae(3))
       edtmn= dmax1(dqm,ae(4))
      else if(ipro.eq.1) then
       edtmn= dmax1(rmm,ae(4))
      else if(ipro.eq.3) then
       edtmn= dmax1(tm,ae(4))
      endif
*
      if(ipro.eq.2) then
       if(eut.lt.eutmn.and.edt.lt.edtmn) then
        iz= 0
        ifz(41)= ifz(41)+1
        go to 2
       endif
       if(eut.lt.eutmn) then
        iz= 0
        ifz(42)= ifz(42)+1
        go to 2
       endif
       if(edt.lt.edtmn) then
        iz= 0
        ifz(43)= ifz(43)+1
        go to 2
       endif
       if(ctut.lt.asa(3).or.ctut.gt.bsa(3)) then
        iz= 0
        ifz(44)= ifz(44)+1
        go to 2
       endif
       if(ctdt.lt.asa(4).or.ctdt.gt.bsa(4)) then
        iz= 0
        ifz(45)= ifz(45)+1
        go to 2
       endif
      else if(ipro.eq.1.or.ipro.eq.3) then
       if(edt.lt.edtmn) then
        iz= 0
        ifz(46)= ifz(46)+1
        go to 2
       endif
       if(ctdt.lt.asa(4).or.ctdt.gt.bsa(4)) then
        iz= 0
        ifz(47)= ifz(47)+1
        go to 2
       endif
       vuts= vut(1)*vut(1)+vut(2)*vut(2)+vut(3)*vut(3)-
     #       vut(4)*vut(4)
       vdts= vdt(1)*vdt(1)+vdt(2)*vdt(2)+vdt(3)*vdt(3)-
     #       vdt(4)*vdt(4)
       hadim= vut(1)*vdt(1)+vut(2)*vdt(2)+vut(3)*vdt(3)-
     #        vut(4)*vdt(4)
       hadim= 2.d0*hadim+vuts+vdts
       hadim= -hadim
       if(hadim.lt.(s0*s)) then
        iz= 0
        ifz(47)= ifz(47)+1
        go to 2
       endif
      endif
*
      if(jj.le.3) then
       tjac= ujc*vjc*yjc*x2jc*x1jc*xjac*taujc*zjc*psjc*pmjc
      else if(jj.ge.4) then
       tjac= ujc*vjc*yjc*x2jc*x1jc*xjac*upsjc*zjc*psjc*pmjc
      endif
*
*-----ingredients for the amplitude squared
*
      gsm2= agx2m
      gtm2= agym
      pwsm2= ((x2*yvv-rsw(1))*(x2*yvv-rsw(1))+srwis)/arhx2m
      pwtm2= ((by*yvv-rsw(1))*(by*yvv-rsw(1))+srwis)/arhym
      rl3= x2*yvv-rsw(1)
*
      crhr= rhry*rhrx2+rhiy*rhix2
      crhi= rhry*rhix2-rhiy*rhrx2 
      ccr= grx2*gry+gix2*giy
      cci= gix2*gry-grx2*giy 
*
*-----special numeration 11 = 2+3, 12= 2-3, 13= 5+6, 14= 5-6
*
      tmpr1= wg(2,1)+wg(3,1)
      tmpr2= wg(2,1)-wg(3,1)
      tmpr3= wg(5,1)+wg(6,1)
      tmpr4= wg(5,1)-wg(6,1)
      tmpi1= wg(2,2)+wg(3,2)
      tmpi2= wg(2,2)-wg(3,2)
      tmpi3= wg(5,2)+wg(6,2)
      tmpi4= wg(5,2)-wg(6,2)
*
      wg(11,1)= tmpr1
      wg(11,2)= tmpi1
      wg(12,1)= tmpr2
      wg(12,2)= tmpi2
      wg(13,1)= tmpr3
      wg(13,2)= tmpi3
      wg(14,1)= tmpr4
      wg(14,2)= tmpi4
*
      tmpr1= wz(2,1)+wz(3,1)
      tmpr2= wz(2,1)-wz(3,1)
      tmpr3= wz(5,1)+wz(6,1)
      tmpr4= wz(5,1)-wz(6,1)
      tmpi1= wz(2,2)+wz(3,2)
      tmpi2= wz(2,2)-wz(3,2)
      tmpi3= wz(5,2)+wz(6,2)
      tmpi4= wz(5,2)-wz(6,2)
*
      wz(11,1)= tmpr1
      wz(11,2)= tmpi1
      wz(12,1)= tmpr2
      wz(12,2)= tmpi2
      wz(13,1)= tmpr3
      wz(13,2)= tmpi3
      wz(14,1)= tmpr4
      wz(14,2)= tmpi4
*
*-----real1 = Re(Gs*Gtc*Pwt*PwsC)
*
      rl1= by*x2*yvv^2*crhr*ccr+by*x2*yvv^2*crhi*cci 
     #     -rsw(1)*by*yvv*crhr*ccr-rsw(1)*by*yvv*crhi*cci
     #     -rsw(1)*x2*yvv*crhr*ccr-rsw(1)*x2*yvv*crhi*cci 
     #     +rsw(1)*rsw(1)*crhr*ccr+rsw(1)*rsw(1)*crhi*cci
     #     -rsw(2)*by*yvv*crhr*cci+rsw(2)*by*yvv*crhi*ccr
     #     +rsw(2)*x2*yvv*crhr*cci-rsw(2)*x2*yvv*crhi*ccr 
     #     +rsw(2)*rsw(2)*crhr*ccr+rsw(2)*rsw(2)*crhi*cci
*
*-----real2 = Re(Gs*Gtc*Pwt)
*
      rl2= by*yvv*ccr*rhry-by*yvv*cci*rhiy
     #     -rsw(1)*ccr*rhry+rsw(1)*cci*rhiy
     #     +rsw(2)*ccr*rhiy+rsw(2)*cci*rhry
*
*-----Re(w(n)*Gs*PwsC)
*-----Re(w(n)*Gs)
*
      ccrhsr= grx2*rhrx2+gix2*rhix2
      ccrhsi= grx2*rhix2-gix2*rhrx2
      do if=1,14
       rs1wg(if)= x2*yvv*(wg(if,1)*ccrhsr+wg(if,2)*ccrhsi)
     #             +rsw(1)*(-wg(if,1)*ccrhsr-wg(if,2)*ccrhsi)
     #             +rsw(2)*(wg(if,1)*ccrhsi-wg(if,2)*ccrhsr)
       rs2wg(if)= wg(if,1)*grx2-wg(if,2)*gix2
       rs1wz(if)= x2*yvv*(wz(if,1)*ccrhsr+wz(if,2)*ccrhsi)
     #             +rsw(1)*(-wz(if,1)*ccrhsr-wz(if,2)*ccrhsi)
     #             +rsw(2)*(wz(if,1)*ccrhsi-wz(if,2)*ccrhsr)
       rs2wz(if)= wz(if,1)*grx2-wz(if,2)*gix2
      enddo
*
*-----Re(w(n)*Gt*PwtC)
*-----Re(w(n)*Gt)
*
      ccrhtr= gry*rhry+giy*rhiy
      ccrhti= gry*rhiy-giy*rhry
      do if=1,14
       rt1wg(if)= by*yvv*(wg(if,1)*ccrhtr+wg(if,2)*ccrhti)
     #             +rsw(1)*(-wg(if,1)*ccrhtr-wg(if,2)*ccrhti)
     #             +rsw(2)*(wg(if,1)*ccrhti-wg(if,2)*ccrhtr)
       rt2wg(if)= wg(if,1)*gry-wg(if,2)*giy
       rt1wz(if)= by*yvv*(wz(if,1)*ccrhtr+wz(if,2)*ccrhti)
     #             +rsw(1)*(-wz(if,1)*ccrhtr-wz(if,2)*ccrhti)
     #             +rsw(2)*(wz(if,1)*ccrhti-wz(if,2)*ccrhtr)
       rt2wz(if)= wz(if,1)*gry-wz(if,2)*giy
      enddo
*
*-----Re(w(i)*wC(j))
*
      do if=1,14
       do jf=1,14
        rwwg(if,jf)= wg(if,1)*wg(jf,1)+wg(if,2)*wg(jf,2)
        rwwz(if,jf)= wz(if,1)*wz(jf,1)+wz(if,2)*wz(jf,2)
        rwwgz(if,jf)= wg(if,1)*wz(jf,1)+wg(if,2)*wz(jf,2)
       enddo
      enddo
*
      bxp= xv+1.d0
      bxps= bxp*bxp
      bxpi= 1.d0/bxp
      xx= xv/bxps
      o= 1.d0-x1
      os= o*o
      oc= os*o
      oq= oc*o
      x12= x1-x2
      x12s= x12*x12
      x12c= x12s*x12
      x2z= x2-z
      x2zs= x2z*x2z
      x2zc= x2zs*x2z
      x2zq= x2zc*x2z
      zi= 1.d0/z
      zis= zi*zi
      if(jj.le.3) then
       tx= tau+xv+x1
       txs= tx*tx
      else if(jj.ge.4) then
       ux= ups+xv+x1
       uxs= ux*ux
      endif
*
*-----running quantities in the X-channel
*
      cst= ctrrx 
      cqt= cst*cst
      csti=  1.d0/cst
      cqti= 1.d0/cqt
      vet= -0.5d0+strrx
      aet= strrx+0.25d0
      vdt= -0.5d0+strrx/3.d0
      adt= strrx/3.d0+0.25d0
      vut= 0.5d0+2.d0/3.d0*strrx
      aut= -2.d0/3.d0*strrx-0.25d0
      vets= vet*vet
      aets= aet*aet
      vdts= vdt*vdt
      adts= adt*adt
      vuts= vut*vut
      auts= aut*aut

*
*-----First the GG amplitude, proportional to g^2, g^3 and g^4
*     the W1 and W2 form-factors
*
      if(jj.eq.1) then
*
*---------------------------------------------------------------------
*
      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+bxpi*rl3*vvc*gtm2*ys*(-8./3.*o*tx-4./3.*o
     #    +4./3.*os-4./3.*x12*tx+4./3.*tx)
      gg10s= gg10s+bxpi*vvs*gtm2*pwsm2*y*zxi*(-4./9.*o*tx-4./9.
     #    *o+4./9.*x12*tx+4./9.*tx)
      gg10s= gg10s+bxpi*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*bxp*ys*(1+o*x12-o*x2z-4*o+3*os
     #    -2*x12*tx-x12+x2z+tx)
      gg10s= gg10s+rl2*vvc*bxps*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*bxp*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*bxp*(-o+os)
      gg10s= gg10s+vvs*gsm2*pwtm2*y*(o*tx)
      gg10s= gg10s+vvs*gtm2*pwsm2*y*bxp*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*bxp*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*bxps*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+bxpi*rl3*vvc*gtm2*ys*(-8*o*tx-4*o+4*os-
     #    4*x12*tx+4*tx)
      gg20s= gg20s+bxpi*vvs*gtm2*pwsm2*y*zxi*(-4./3.*o*tx-4./3.
     #    *o+4./3.*x12*tx+4./3.*tx)
      gg20s= gg20s+bxpi*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*bxp*ys*(1+o*x12-o*x2z-4*o+3*os
     #    -2*x12*tx-x12+x2z+tx)
      gg20s= gg20s+rl2*vvc*bxps*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*bxp*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*bxp*(-o+os)
      gg20s= gg20s+vvs*gsm2*pwtm2*y*(o*tx)
      gg20s= gg20s+vvs*gtm2*pwsm2*y*bxp*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*bxp*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*bxps*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)
*
      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)*bxpi*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*bxp*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)*bxpi*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*bxp*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)*bxpi*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*bxp*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)*bxpi*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*bxp*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)*bxpi*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)*bxpi*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*bxp*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*bxp*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)*bxpi*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)*bxpi*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)*bxpi*vvc*gtm2*ys*(4./3.*o*tx-4./3.*
     #    os)
      gg10c= gg10c+rs1wg(14)*vvc*gtm2*bxp*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)*bxpi*vvq*gtm2*yc*(-6*o*x2z*tx-14*o
     #    *txs-14*x12*txs+6*x2z*tx+8*txs)
      gg10c= gg10c+rs2wg(1)*vvq*gtm2*bxp*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*bxps*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)*bxpi*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*bxp*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*bxps*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)*bxpi*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*bxp*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)*bxpi*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*bxp*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*bxps*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)*bxpi*vvq*gtm2*yc*(2*o*x2z*tx+2*o*txs
     #    +2*x12*txs-2*x2z*tx)
      gg10c= gg10c+rs2wg(9)*vvq*gtm2*bxp*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)*bxpi*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*bxp*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*bxps*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*bxp*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*bxps*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)*bxpi*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*bxp*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)*bxpi*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*bxp*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)*bxpi*vvq*gtm2*yc*(3*o*x2z*tx+o*txs
     #    +x12*x2z*tx+x12*txs-2*x2z*tx)
      gg10c= gg10c+rs2wg(14)*vvq*gtm2*bxp*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*bxp*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*bxps*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*bxp*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*bxps*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*bxp*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*bxps*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*bxp*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*bxp*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*bxps*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*bxp*ys*(-o*x12-o*x2z-o
     #    +os-2*x12*tx+x2z+tx)
      gg10c= gg10c+rt1wg(11)*vvc*gsm2*bxps*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*bxp*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*bxp*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*bxp*ys*(-1./2.*o*x2z+o
     #    -os-x12*tx+1./2.*x2z+1./2.*tx)
      gg10c= gg10c+rt1wg(14)*vvc*gsm2*bxps*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)*bxpi*vvc*gtm2*ys*(-24*o*tx-8*o+
     #    16*os-8*x12*tx+8*tx)
      gg20c= gg20c+rs1wg(1)*vvc*gtm2*bxp*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)*bxpi*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*bxp*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)*bxpi*vvc*gtm2*ys*(-o*x12*x2z-o*x2z
     #    *tx-os*x2z-x12*x2z*tx+x2z*tx)
      gg20c= gg20c+rs1wg(7)*vvc*gtm2*bxp*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)*bxpi*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*bxp*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)*bxpi*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)*bxpi*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*bxp*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*bxp*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)*bxpi*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)*bxpi*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)*bxpi*vvc*gtm2*ys*(4*o*tx-4*os)
      gg20c= gg20c+rs1wg(14)*vvc*gtm2*bxp*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)*bxpi*vvq*gtm2*yc*(-18*o*x2z*tx-42*
     #    o*txs-42*x12*txs+18*x2z*tx+24*txs)
      gg20c= gg20c+rs2wg(1)*vvq*gtm2*bxp*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*bxps*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)*bxpi*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*bxp*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*bxps*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)*bxpi*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*bxp*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)*bxpi*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*bxp*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*bxps*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)*bxpi*vvq*gtm2*yc*(6*o*x2z*tx+6*o*txs
     #    +6*x12*txs-6*x2z*tx)
      gg20c= gg20c+rs2wg(9)*vvq*gtm2*bxp*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)*bxpi*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*bxp*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*bxps*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*bxp*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*bxps*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)*bxpi*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*bxp*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)*bxpi*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*bxp*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)*bxpi*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*bxp*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*bxp*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*bxps*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*bxp*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*bxps*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*bxp*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*bxps*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*bxp*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*bxp*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*bxps*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*bxp*ys*(-o*x12-o*x2z-o
     #    +os-2*x12*tx+x2z+tx)
      gg20c= gg20c+rt1wg(11)*vvc*gsm2*bxps*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*bxp*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*bxp*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*bxp*ys*(-1./2.*o*x2z+o
     #    -os-x12*tx+1./2.*x2z+1./2.*tx)
      gg20c= gg20c+rt1wg(14)*vvc*gsm2*bxps*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)
*
      gg10q= rwwg(1,1)*xx*vvq*yc*(-8*o*x2z*txs-8*x12*x2z*txs+8*
     #    x2z*txs)
      gg10q= gg10q+rwwg(1,1)*bxpi*vvq*yc*(-8*o*x2z*tx-16*o*txs
     #    -16*x12*txs+8*x2z*tx+8*txs)
      gg10q= gg10q+rwwg(1,1)*vvq*bxp*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*bxps*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)*bxpi*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*bxp*yc*(1-o*x2z-2*o+os-2*
     #    x12*tx-x12-x2z*tx+x2z+tx+txs)
      gg10q= gg10q+rwwg(2,2)*vvq*bxps*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)*bxpi*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*bxp*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*bxps*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)*bxpi*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*bxp*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*bxps*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)*bxpi*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*bxp*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*bxps*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)*bxpi*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*bxp*bxps*yc*(1+2*o*x12-2*o+
     #    os-2*x12+x12s)
      gg10q= gg10q+rwwg(4,4)*vvq*bxp*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*bxps*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-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-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-1./2.*os*x2zc-3./2.*os*x2zs
     #    +3./2.*x12*x2z*tx+x12*x2z*txs-1./2.*x12*tx*x2zc+x12*
     #    tx*x2zs+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-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)*bxpi*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*bxp*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*bxps*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)*bxpi*vvq*yc*(1./2.*x12*x2z*tx-x2z*
     #    tx+1./2.*txs)
      gg10q= gg10q+rwwg(5,5)*vvq*bxp*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*bxps*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)*bxpi*vvq*yc*(2*o*x2z*tx-o*txs-x12
     #    *txs+txs)
      gg10q= gg10q+rwwg(5,6)*vvq*bxp*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*bxps*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)*bxpi*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*bxp*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*bxps*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)*bxpi*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*bxp*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)*bxpi*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*bxp*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)*bxpi*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*bxp*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*bxps*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*bxp*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)*bxpi*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*bxp*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)*bxpi*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*bxp*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)*bxpi*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*bxp*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*bxps*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)*bxpi*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*bxp*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*bxps*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)*bxpi*vvq*yc*(o*x12*x2zs-o*tx*x2zs
     #    +o*x2zc+x12*tx*x2zs+tx*x2zc-x2zc-x2zs*txs)
      gg10q= gg10q+rwwg(8,4)*vvq*bxp*bxps*yc*(-2-4*o*x12+4*o
     #    -2*os+4*x12-2*x12s)
      gg10q= gg10q+rwwg(8,4)*vvq*bxp*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*bxps*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-o*x12*x2zs
     #    +2*o*x2z*tx+1./2.*o*x2z*x12s-1./2.*o*x2z*txs+2*o*tx*
     #    x2zs-3./2.*o*x2zc-7./2.*o*x2zs+1./2.*os*x12*x2z-1./2.
     #    *os*x2z*tx+1./2.*os*x2zs-2*x12*x2z*tx-1./2.*x12*x2z*txs
     #    -x12*tx*x2zs-3./2.*x12*x2zs+1./2.*x2z*tx*x12s+2*x2z*
     #    txs-3./2.*tx*x2zc-2*tx*x2zs+3./2.*x2zc+3./2.*x2zs*txs
     #    +3*x2zs)
      gg10q= gg10q+rwwg(8,7)*bxpi*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*bxp*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*bxp*bxps*yc*(1+2*o*x12-2*o+
     #    os-2*x12+x12s)
      gg10q= gg10q+rwwg(8,8)*vvq*bxp*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*bxps*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-o*x2z*tx+o*
     #    x2zs+x12*x2z*tx-x2z*txs+tx*x2zs-x2zs)
      gg10q= gg10q+rwwg(8,11)*vvq*bxp*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*bxps*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)*bxpi*vvq*yc*(o*x2z*tx-o*x2zs-x12
     #    *x2z*tx+2*x2z*txs-2*tx*x2zs+x2zs)
      gg10q= gg10q+rwwg(8,12)*vvq*bxp*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*bxps*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)*bxpi*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*bxp*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*bxps*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)*bxpi*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*bxp*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*bxps*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)*bxpi*vvq*yc*(4*o*x2z*tx+4*o*txs+4
     #    *x12*txs-4*x2z*tx)
      gg10q= gg10q+rwwg(9,1)*vvq*bxp*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)*bxpi*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*bxp*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*bxps*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)*bxpi*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*bxp*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*bxp*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*bxps*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*bxp*yc*(-4*o*tx)
      gg10q= gg10q+rwwg(9,9)*vvq*yc*(4*o*tx)
      gg10q= gg10q+rwwg(9,11)*vvq*bxp*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)*bxpi*vvq*yc*(-2*o*x2z*tx+2*o*txs
     #    +2*x12*txs-2*x2z*tx)
      gg10q= gg10q+rwwg(9,12)*vvq*bxp*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)*bxpi*vvq*yc*(o*x2z*tx+o*txs+x12*
     #    txs-x2z*tx)
      gg10q= gg10q+rwwg(9,13)*vvq*bxp*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)*bxpi*vvq*yc*(-2*o*x2z*tx)
      gg10q= gg10q+rwwg(9,14)*vvq*bxp*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)*bxpi*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*bxp*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*bxps*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)*bxpi*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*bxp*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*bxps*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)*bxpi*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*bxp*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*bxps*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)*bxpi*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*bxp*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*bxps*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)*bxpi*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*bxp*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*bxps*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)*bxpi*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*bxp*bxps*yc*(-1./4.-1./2.*o*
     #    x12+1./2.*o-1./4.*os+1./2.*x12-1./4.*x12s)
      gg10q= gg10q+rwwg(10,10)*vvq*bxp*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*bxps*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./4.*o*x12*x2zc+3./
     #    4.*o*x12*x2zs+1./4.*o*x12*txs+3./8.*o*x2z*txs-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+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./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./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)*bxpi*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*bxp*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*bxps*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)*bxpi*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*bxp*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*bxps*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)*bxpi*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*bxp*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*bxps*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*bxp*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*bxps*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)*bxpi*vvq*yc*(8*o*x2z*tx-12*o*txs
     #    +4*x12*x2z*tx-12*x12*txs+8*txs)
      gg10q= gg10q+rwwg(12,1)*vvq*bxp*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)*bxpi*vvq*yc*(-2*o*x2z*tx-6*o*txs
     #    -6*x12*txs+2*x2z*tx+4*txs)
      gg10q= gg10q+rwwg(13,1)*vvq*bxp*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)*bxpi*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*bxp*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*bxps*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*bxp*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)*bxpi*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)*bxpi*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*bxp*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)*bxpi*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*bxp*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*bxps*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*bxp*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)*bxpi*vvq*yc*(o*txs+x12*x2z*tx+
     #    x12*txs-2*x2z*tx)
      gg10q= gg10q+rwwg(14,12)*vvq*bxp*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)*bxpi*vvq*yc*(-24*o*x2z*tx-48*o*
     #    txs-48*x12*txs+24*x2z*tx+24*txs)
      gg20q= gg20q+rwwg(1,1)*vvq*bxp*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*bxps*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)*bxpi*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*bxp*yc*(1-o*x2z-2*o+os-2*
     #    x12*tx-x12-x2z*tx+x2z+tx+txs)
      gg20q= gg20q+rwwg(2,2)*vvq*bxps*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)*bxpi*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*bxp*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*bxps*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)*bxpi*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*bxp*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*bxps*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)*bxpi*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*bxp*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*bxps*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)*bxpi*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*bxp*bxps*yc*(2+4*o*x12-4*o+2
     #    *os-4*x12+2*x12s)
      gg20q= gg20q+rwwg(4,4)*vvq*bxp*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*bxps*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-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-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-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+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-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)*bxpi*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*bxp*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*bxps*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)*bxpi*vvq*yc*(3./2.*x12*x2z*tx-3*x2z
     #    *tx+3./2.*txs)
      gg20q= gg20q+rwwg(5,5)*vvq*bxp*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*bxps*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)*bxpi*vvq*yc*(6*o*x2z*tx-3*o*txs-3
     #    *x12*txs+3*txs)
      gg20q= gg20q+rwwg(5,6)*vvq*bxp*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*bxps*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)*bxpi*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*bxp*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*bxps*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)*bxpi*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*bxp*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)*bxpi*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*bxp*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)*bxpi*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*bxp*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*bxps*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*bxp*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)*bxpi*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*bxp*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)*bxpi*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*bxp*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)*bxpi*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*bxp*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*bxps*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)*bxpi*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*bxp*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*bxps*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)*bxpi*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*bxp*bxps*yc*(-4-8*o*x12+8*o
     #    -4*os+8*x12-4*x12s)
      gg20q= gg20q+rwwg(8,4)*vvq*bxp*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*bxps*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-o*x12*x2zs
     #    +6*o*x2z*tx+5./2.*o*x2z*x12s-5./2.*o*x2z*txs+6*o*tx*
     #    x2zs-7./2.*o*x2zc-23./2.*o*x2zs+5./2.*os*x12*x2z-5./2.
     #    *os*x2z*tx+5./2.*os*x2zs-6*x12*x2z*tx-5./2.*x12*x2z*txs
     #    -x12*tx*x2zs-11./2.*x12*x2zs+5./2.*x2z*tx*x12s+6*x2z*
     #    txs-7./2.*tx*x2zc-6*tx*x2zs+7./2.*x2zc+7./2.*x2zs*txs
     #    +9*x2zs)
      gg20q= gg20q+rwwg(8,7)*bxpi*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*bxp*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*bxp*bxps*yc*(2+4*o*x12-4*o+2
     #    *os-4*x12+2*x12s)
      gg20q= gg20q+rwwg(8,8)*vvq*bxp*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*bxps*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-2*o*x2z*tx+2
     #    *o*x2zs+2*x12*x2z*tx-2*x2z*txs+2*tx*x2zs-2*x2zs)
      gg20q= gg20q+rwwg(8,11)*vvq*bxp*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*bxps*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)*bxpi*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*bxp*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*bxps*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)*bxpi*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*bxp*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*bxps*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)*bxpi*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*bxp*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*bxps*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)*bxpi*vvq*yc*(12*o*x2z*tx+12*o*txs
     #    +12*x12*txs-12*x2z*tx)
      gg20q= gg20q+rwwg(9,1)*vvq*bxp*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)*bxpi*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*bxp*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*bxps*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)*bxpi*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*bxp*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*bxp*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*bxps*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*bxp*yc*(-8*o*tx)
      gg20q= gg20q+rwwg(9,9)*vvq*yc*(8*o*tx)
      gg20q= gg20q+rwwg(9,11)*vvq*bxp*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)*bxpi*vvq*yc*(-6*o*x2z*tx+6*o*txs
     #    +6*x12*txs-6*x2z*tx)
      gg20q= gg20q+rwwg(9,12)*vvq*bxp*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)*bxpi*vvq*yc*(3*o*x2z*tx+3*o*txs+
     #    3*x12*txs-3*x2z*tx)
      gg20q= gg20q+rwwg(9,13)*vvq*bxp*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)*bxpi*vvq*yc*(-6*o*x2z*tx)
      gg20q= gg20q+rwwg(9,14)*vvq*bxp*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)*bxpi*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*bxp*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*bxps*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)*bxpi*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*bxp*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*bxps*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)*bxpi*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*bxp*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*bxps*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)*bxpi*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*bxp*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*bxps*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)*bxpi*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*bxp*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*bxps*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)*bxpi*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*bxp*bxps*yc*(-1./2.-o*x12+
     #    o-1./2.*os+x12-1./2.*x12s)
      gg20q= gg20q+rwwg(10,10)*vvq*bxp*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*bxps*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+3./4.*o*x12*x2zc+9./
     #    4.*o*x12*x2zs+3./4.*o*x12*txs+9./8.*o*x2z*txs-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+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
     #    -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+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)*bxpi*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*bxp*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*bxps*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)*bxpi*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*bxp*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*bxps*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)*bxpi*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*bxp*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*bxps*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*bxp*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*bxps*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)*bxpi*vvq*yc*(24*o*x2z*tx-36*o*txs
     #    +12*x12*x2z*tx-36*x12*txs+24*txs)
      gg20q= gg20q+rwwg(12,1)*vvq*bxp*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)*bxpi*vvq*yc*(-6*o*x2z*tx-18*o*
     #    txs-18*x12*txs+6*x2z*tx+12*txs)
      gg20q= gg20q+rwwg(13,1)*vvq*bxp*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)*bxpi*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*bxp*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*bxps*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*bxp*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)*bxpi*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)*bxpi*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*bxp*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)*bxpi*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*bxp*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*bxps*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*bxp*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)*bxpi*vvq*yc*(3*o*txs+3*x12*x2z*tx
     #    +3*x12*txs-6*x2z*tx)
      gg20q= gg20q+rwwg(14,12)*vvq*bxp*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)
*
*--------------------------------------------------------------------------
*
      else if(jj.eq.2) then
*
*--------------------------------------------------------------------------
*
      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+bxpi*rl3*vvc*gtm2*ys*(4./3.*o*x2z+4./3.*os*
     #    x12-4./3.*os*x2z+4./3.*os)
      gg11s= gg11s+bxpi*vvs*gtm2*pwsm2*y*zxi*(4./9.*o*x12-8./9.*
     #    os*x12+8./9.*os)
      gg11s= gg11s+bxpi*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*bxp*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*bxp*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+bxpi*rl3*vvc*gtm2*ys*(4*o*x2z+4*os*x12-4*os
     #    *x2z+4*os)
      gg21s= gg21s+bxpi*vvs*gtm2*pwsm2*y*zxi*(4./3.*o*x12-8./3.*
     #    os*x12+8./3.*os)
      gg21s= gg21s+bxpi*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*bxp*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*bxp*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)
*
      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)*bxpi*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*bxp*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)*bxpi*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*bxp*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*bxps*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)*bxpi*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*bxp*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*bxps*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)*bxpi*vvc*gtm2*ys*(4./3.*os*x2z)
      gg11c= gg11c+rs1wg(8)*vvc*gtm2*bxp*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*bxps*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)*bxpi*vvc*gtm2*ys*(8./3.*oc)
      gg11c= gg11c+rs1wg(9)*vvc*gtm2*bxp*ys*(8./3.*os)
      gg11c= gg11c+rs1wg(9)*vvc*gtm2*ys*(-8./3.*os-8./3.*oc)
      gg11c= gg11c+rs1wg(10)*bxpi*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*bxp*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*bxps*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*bxp*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)*bxpi*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*bxp*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)*bxpi*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*bxp*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)*bxpi*vvc*gtm2*ys*(4./3.*os*x2z+4./3.
     #    *oc)
      gg11c= gg11c+rs1wg(14)*vvc*gtm2*bxp*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)*bxpi*vvc*gtm2*ys*(8*o*x2z+8*os*x12
     #    -8*os*x2z+8*os-8*oc)
      gg21c= gg21c+rs1wg(1)*vvc*gtm2*bxp*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)*bxpi*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*bxp*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*bxps*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)*bxpi*vvc*gtm2*ys*(o*x2zs+os*x12*x2z
     #    -os*x2zs+oc*x2z)
      gg21c= gg21c+rs1wg(7)*vvc*gtm2*bxp*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*bxps*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)*bxpi*vvc*gtm2*ys*(4*os*x2z)
      gg21c= gg21c+rs1wg(8)*vvc*gtm2*bxp*ys*(2*o*x2z+2*o-2*os*
     #    x12+2*os*x2z+4*os-2*oc)
      gg21c= gg21c+rs1wg(8)*vvc*gtm2*bxps*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)*bxpi*vvc*gtm2*ys*(8*oc)
      gg21c= gg21c+rs1wg(9)*vvc*gtm2*bxp*ys*(8*os)
      gg21c= gg21c+rs1wg(9)*vvc*gtm2*ys*(-8*os-8*oc)
      gg21c= gg21c+rs1wg(10)*bxpi*vvc*gtm2*ys*(-o*x2zs-os*x12*
     #    x2z+os*x2zs-oc*x2z)
      gg21c= gg21c+rs1wg(10)*vvc*gtm2*bxp*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*bxps*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*bxp*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)*bxpi*vvc*gtm2*ys*(4*o*x2z+4*os*x12
     #    +4*os*x2z+4*os+4*oc)
      gg21c= gg21c+rs1wg(12)*vvc*gtm2*bxp*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)*bxpi*vvc*gtm2*ys*(2*o*x2z+2*os*x12
     #    -2*os*x2z+2*os+2*oc)
      gg21c= gg21c+rs1wg(13)*vvc*gtm2*bxp*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)*bxpi*vvc*gtm2*ys*(4*os*x2z+4*oc)
      gg21c= gg21c+rs1wg(14)*vvc*gtm2*bxp*ys*(10./3.*os)
      gg21c= gg21c+rs1wg(14)*vvc*gtm2*ys*(2./3.*os*x12-4*os*x2z
     #    -4*os-10./3.*oc)
*
      gg11q= 0.d0
      gg21q= 0.d0
*
*--------------------------------------------------------------------------
*
      else if(jj.eq.3) then
*
*--------------------------------------------------------------------------
*
      gg12s= xx*vvs*ums*gtm2*pwsm2*(8./9.*oc)
      gg12s= gg12s+xx*vvs*gtm2*pwsm2*y*(8./9.*oq)
      gg12s= gg12s+bxpi*vvs*ums*gtm2*pwsm2*(8./9.*os)
      gg12s= gg12s+bxpi*vvs*gtm2*pwsm2*y*(8./9.*oc)
      gg12s= gg12s+vvs*ums*gtm2*pwsm2*bxp*(4./9.*o)
      gg12s= gg12s+vvs*ums*gtm2*pwsm2*(-4./9.*o-16./9.
     #    *os)
      gg12s= gg12s+vvs*gtm2*pwsm2*y*bxp*(4./9.*os)
      gg12s= gg12s+vvs*gtm2*pwsm2*y*(-4./9.*os-8./9.*oc)
*
      gg22s= xx*vvs*ums*gtm2*pwsm2*(8./3.*oc)
      gg22s= gg22s+xx*vvs*gtm2*pwsm2*y*(8./3.*oq)
      gg22s= gg22s+bxpi*vvs*ums*gtm2*pwsm2*(8./3.*os)
      gg22s= gg22s+bxpi*vvs*gtm2*pwsm2*y*(8./3.*oc)
      gg22s= gg22s+vvs*ums*gtm2*pwsm2*bxp*(4./9.*o)
      gg22s= gg22s+vvs*ums*gtm2*pwsm2*(-4./9.*o-32./9.
     #    *os)
      gg22s= gg22s+vvs*gtm2*pwsm2*y*bxp*(4./9.*os)
      gg22s= gg22s+vvs*gtm2*pwsm2*y*(-4./9.*os-8./3.*oc)
*
      gg12c= 0.d0
      gg22c= 0.d0
      gg12q= 0.d0
      gg22q= 0.d0
*
*---------------------------------------------------------------------------
*
      else if(jj.eq.4) then
*
*---------------------------------------------------------------------------
*
      gg10s= xx*rl3*vvc*gtm2*ys*(2*o*x12*x2z-2./3.*o*x12*ux-4./3.*o
     #    *x2z*ux-2./3.*o*x2z+2./3.*o*x2zs+2./3.*o*uxs-4./3.*os
     #    *x12-4./3.*os*x2z+4./3.*os*ux+2./3.*oc-2./3.*x12*x2z*
     #    ux+4./3.*x12*x2z-2./3.*x12*x2zs+2./3.*x12*uxs-2./3.*
     #    x2z*ux+4./3.*x2z*x12s-2*ux*x12s+2*x12c+4./3.*x2zs)
      gg10s= gg10s+xx*vvs*gtm2*pwsm2*y*zxi*(8./3.*o*x12*ux-4./3.
     #    *o*x12-4./9.*o*ux-4./9.*o*uxs+40./9.*os*x12-16./9.*os
     #    *ux-4./3.*os-16./9.*oc-4./9.*x12*ux+4./9.*x12*uxs)
      gg10s= gg10s+xx*vvs*gtm2*pwsm2*y*(34./9.*o*x12+4./9.*o*
     #    x2z-8./9.*o*ux-4./3.*o-4./3.*os-8./9.*x12*x2z+10./9.
     #    *x12*ux+8./9.*x2z-4./9.*ux-2./3.*x12s)
      gg10s= gg10s+bxpi*rl3*vvc*gtm2*ys*(5./3.*o*x12+1./3.*o*x2z
     #    -1./3.*o*ux-2./3.*o-1./3.*os-4./3.*x12*x2z+1./3.*
     #    x12*ux+4./3.*x12+7./3.*x2z-2./3.*ux)
      gg10s= gg10s+bxpi*vvs*gtm2*pwsm2*y*zxi*(40./9.*o*x12-4./3.
     #    *o*ux-20./9.*o-8./3.*os+4./3.*x12*ux-8./9.*x12-4./9.
     #    *ux)
      gg10s= gg10s+bxpi*vvs*gtm2*pwsm2*y*(-4./9.*o)
      gg10s= gg10s+rl1*vvs*y*bxp*(1./3.-1./3.*o-x12)
      gg10s= gg10s+rl1*vvs*y*(1./3.*o*x2z-1./3.*o*ux-1./3.*o
     #    +2./3.*x12*x2z-1./3.*x12*ux+1./3.*x12-1./3.*x2z+2./
     #    3.*x12s)
      gg10s= gg10s+rl3*vvc*gtm2*bxp*ys*(2-5./3.*o-1./3.*x12+
     #    4./3.*x2z-2./3.*ux)
      gg10s= gg10s+rl3*vvc*gtm2*bxps*ys*(-2./3.)
      gg10s= gg10s+rl3*vvc*gtm2*ys*(-1-2./3.*o*x12+o*x2z+
     #    1./3.*o*ux+1./3.*o+2./3.*os+2./3.*x12*x2z-x12+2./3.
     #    *x2z*ux-10./3.*x2z+2./3.*ux-2./3.*x2zs)
      gg10s= gg10s+vvs*gtm2*pwsm2*y*bxp*zxi*(-2./3.-14./9.*o
     #    +2./3.*x12)
      gg10s= gg10s+vvs*gtm2*pwsm2*y*bxp*(1./9.)
      gg10s= gg10s+vvs*gtm2*pwsm2*y*zxi*(8./9.-34./9.*o*x12+
     #    14./9.*o*ux+28./9.*o+10./3.*os-10./9.*x12*ux-4./9.*
     #    x12+4./9.*ux)
      gg10s= gg10s+vvs*gtm2*pwsm2*y*(-2./9.+o+1./3.*x12-1.
     #    /9.*x2z)
*
      gg20s= xx*rl3*vvc*gtm2*ys*(6*o*x12*x2z-2*o*x12*ux-4*o*x2z*ux
     #    -2*o*x2z+2*o*x2zs+2*o*uxs-4*os*x12-4*os*x2z+4*os*
     #    ux+2*oc-2*x12*x2z*ux+4*x12*x2z-2*x12*x2zs+2*x12*uxs
     #    -2*x2z*ux+4*x2z*x12s-6*ux*x12s+6*x12c+4*x2zs)
      gg20s= gg20s+xx*vvs*gtm2*pwsm2*y*zxi*(8*o*x12*ux-4*o*x12
     #    -4./3.*o*ux-4./3.*o*uxs+40./3.*os*x12-16./3.*os*ux-
     #    4*os-16./3.*oc-4./3.*x12*ux+4./3.*x12*uxs)
      gg20s= gg20s+xx*vvs*gtm2*pwsm2*y*(34./3.*o*x12+4./3.*o*
     #    x2z-8./3.*o*ux-4*o-4*os-8./3.*x12*x2z+10./3.*x12*ux
     #    +8./3.*x2z-4./3.*ux-2*x12s)
      gg20s= gg20s+bxpi*rl3*vvc*gtm2*ys*(5*o*x12+o*x2z-o*ux-
     #    2*o-os-4*x12*x2z+x12*ux+4*x12+7*x2z-2*ux)
      gg20s= gg20s+bxpi*vvs*gtm2*pwsm2*y*zxi*(40./3.*o*x12-4*o*
     #    ux-20./3.*o-8*os+4*x12*ux-8./3.*x12-4./3.*ux)
      gg20s= gg20s+bxpi*vvs*gtm2*pwsm2*y*(-4./3.*o)
      gg20s= gg20s+rl1*vvs*y*bxp*(1./3.-1./3.*o-x12)
      gg20s= gg20s+rl1*vvs*y*(1./3.*o*x2z-1./3.*o*ux-1./3.*o
     #    +2./3.*x12*x2z-1./3.*x12*ux+1./3.*x12-1./3.*x2z+2./
     #    3.*x12s)
      gg20s= gg20s+rl3*vvc*gtm2*bxp*ys*(4-5./3.*o-5./3.*x12+
     #    4./3.*x2z-2./3.*ux)
      gg20s= gg20s+rl3*vvc*gtm2*bxps*ys*(-2./3.)
      gg20s= gg20s+rl3*vvc*gtm2*ys*(-3-4*o*x12+1./3.*o*x2z
     #    +o*ux+5./3.*o+4./3.*os+10./3.*x12*x2z-2./3.*x12*ux
     #    -7./3.*x12+2./3.*x2z*ux-8*x2z+2*ux-2./3.*x2zs)
      gg20s= gg20s+vvs*gtm2*pwsm2*y*bxp*zxi*(-22./9.-10./3.*o
     #    +22./9.*x12)
      gg20s= gg20s+vvs*gtm2*pwsm2*y*bxp*(1./9.)
      gg20s= gg20s+vvs*gtm2*pwsm2*y*zxi*(8./3.-38./3.*o*x12+
     #    38./9.*o*ux+28./3.*o+26./3.*os-34./9.*x12*ux-4./9.*
     #    x12+4./3.*ux)
      gg20s= gg20s+vvs*gtm2*pwsm2*y*(-2./9.+17./9.*o+1./3.*
     #    x12-1./9.*x2z)
*
      gg10c= rs1wg(1)*xx*vvc*gtm2*ys*(4*o*x12*x2z-4./3.*o*x12*ux-8./
     #    3.*o*x2z*ux-4./3.*o*x2z+4./3.*o*x2zs+4./3.*o*uxs-8./3.
     #    *os*x12-8./3.*os*x2z+8./3.*os*ux+4./3.*oc-4./3.*x12*
     #    x2z*ux+8./3.*x12*x2z-4./3.*x12*x2zs+4./3.*x12*uxs-4./
     #    3.*x2z*ux+8./3.*x2z*x12s-4*ux*x12s+4*x12c+8./3.*x2zs
     #    )
      gg10c= gg10c+rs1wg(1)*bxpi*vvc*gtm2*ys*(16./3.*o*x12+4./3.
     #    *o*x2z-4./3.*o*ux-4./3.*o-4./3.*os-4*x12*x2z+4./3.*
     #    x12*ux+8./3.*x12+16./3.*x2z-4./3.*ux-4./3.*x12s)
      gg10c= gg10c+rs1wg(1)*vvc*gtm2*bxp*ys*(14./3.-10./3.*o-2
     #    *x12+8./3.*x2z-4./3.*ux)
      gg10c= gg10c+rs1wg(1)*vvc*gtm2*bxps*ys*(-4./3.)
      gg10c= gg10c+rs1wg(1)*vvc*gtm2*ys*(-8./3.-4*o*x12+2./
     #    3.*o*x2z+2*o*ux+2./3.*o+8./3.*os+8./3.*x12*x2z-2./3.
     #    *x12*ux-2./3.*x12+4./3.*x2z*ux-22./3.*x2z+4./3.*ux+
     #    4./3.*x12s-4./3.*x2zs)
      gg10c= gg10c+rs1wg(4)*xx*vvc*gtm2*ys*(2./3.*o*x12*x2z*ux-
     #    1./3.*o*x12*x2zs-2./3.*o*x2z*x12s-1./3.*o*x2z*uxs+1./3.
     #    *o*ux*x2zs-1./3.*o*x2zs+1./3.*os*x12*x2z-1./3.*os*x2z*
     #    ux+1./3.*os*x2zs-1./3.*x12*x2z*uxs+2./3.*x12*ux*x2zs-
     #    1./3.*x12*x2zc-1./3.*x12*x2zs+x2z*ux*x12s-x2z*x12c+1./
     #    3.*ux*x2zs-4./3.*x12s*x2zs-1./3.*x2zc)
      gg10c= gg10c+rs1wg(4)*bxpi*vvc*gtm2*ys*(-2./3.*o*x12*x2z
     #    +2./3.*o*x12*ux+1./3.*o*x2z*ux-2./3.*o*x2z-2./3.*o*
     #    x12s-1./3.*o*uxs+1./3.*os*x12+2./3.*os*x2z-1./3.*os*
     #    ux+2./3.*x12*x2z*ux-2./3.*x12*x2z-2./3.*x12*x2zs-1./3.
     #    *x12*uxs+2./3.*x2z*ux-2*x2z*x12s+ux*x12s-x12c-x2zs
     #    )
      gg10c= gg10c+rs1wg(4)*vvc*gtm2*bxp*ys*(-1./3.+1./6.*o*
     #    x12+1./2.*o*x2z-1./6.*o*ux-1./2.*o+1./2.*os+1./6.*
     #    x12*x2z-1./6.*x12*ux-2./3.*x12-5./3.*x2z+1./2.*ux-1.
     #    /3.*x12s)
      gg10c= gg10c+rs1wg(4)*vvc*gtm2*bxps*ys*(2./3.-1./3.*o-1./
     #    3.*x12)
      gg10c= gg10c+rs1wg(4)*vvc*gtm2*ys*(1./3.*o*x12*x2z-5./6.*
     #    o*x12*ux+1./3.*o*x12-1./3.*o*x2z*ux+5./6.*o*x2z+2./3.
     #    *o*x12s-1./6.*o*x2zs+1./2.*o*uxs+1./3.*o-1./2.*os*x12
     #    -5./6.*os*x2z+1./2.*os*ux-1./3.*os-5./6.*x12*x2z*ux
     #    +4./3.*x12*x2z+1./2.*x12*x2zs+1./2.*x12*uxs+1./3.*x12
     #    -5./6.*x2z*ux+2*x2z*x12s+x2z-4./3.*ux*x12s-1./3.*ux
     #    +2./3.*x12s+7./6.*x12c+4./3.*x2zs)
      gg10c= gg10c+rs1wg(7)*xx*vvc*gtm2*ys*(1./6.*o*x12*x2zs-1./
     #    6.*o*x2z*x12s+1./6.*o*x2z*uxs-1./3.*o*ux*x2zs+1./6.*o*
     #    x2zc-1./3.*o*x2zs-1./6.*os*x12*x2z+1./3.*os*x2z*ux-1./
     #    6.*os*x2zs+1./6.*oc*x2z+1./6.*x12*x2z*uxs-1./6.*x12*ux*
     #    x2zs-1./6.*x12*x2zc+2./3.*x12*x2zs-1./3.*x2z*ux*x12s+
     #    1./6.*x2z*x12c-1./6.*ux*x2zs+1./3.*x2zc)
      gg10c= gg10c+rs1wg(7)*bxpi*vvc*gtm2*ys*(-1./6.*o*x12*x2z
     #    -1./3.*o*x2z+1./6.*os*x2z+2./3.*x12*x2z-1./6.*x12*
     #    x2zs-1./6.*x2z*ux-1./3.*x2z*x12s+1./2.*x2zs)
      gg10c= gg10c+rs1wg(7)*vvc*gtm2*bxp*ys*(-1./2.*o*x12-1./2.
     #    *o*x2z+1./6.*o*ux-1./6.*o+1./12.*os-1./2.*x12*x2z+1.
     #    /6.*x12*ux+1./2.*x12+2./3.*x2z-1./6.*ux-7./12.*x12s)
      gg10c= gg10c+rs1wg(7)*vvc*gtm2*bxps*ys*(-1./6.+1./6.*o
     #    +1./6.*x12)
      gg10c= gg10c+rs1wg(7)*vvc*gtm2*ys*(2./3.*o*x12*x2z-1./6.*
     #    o*x12*ux-1./6.*o*x2z*ux+1./2.*o*x2z+1./4.*o*x12s+1./3.
     #    *o*x2zs-1./6.*os*x2z-1./12.*os*ux-1./12.*oc-1./6.*x12
     #    *x2z*ux-7./6.*x12*x2z+1./2.*x12*x2zs+1./3.*x2z*ux+5./
     #    6.*x2z*x12s-1./6.*x2z-1./12.*ux*x12s+1./6.*x12c-5./6.
     #    *x2zs)
      gg10c= gg10c+rs1wg(8)*bxpi*vvc*gtm2*ys*(1./3.*o*x12*x2z-2./
     #    3.*o*x12*ux-1./3.*o*x2z*ux+1./3.*o*x2z+2./3.*o*x12s+1.
     #    /3.*o*uxs-1./3.*os*x12-1./3.*os*x2z+1./3.*os*ux-2./3.
     #    *x12*x2z*ux+1./3.*x12*x2z+1./3.*x12*x2zs+1./3.*x12*uxs
     #    -1./3.*x2z*ux+4./3.*x2z*x12s-ux*x12s+x12c+1./3.*
     #    x2zs)
      gg10c= gg10c+rs1wg(8)*vvc*gtm2*bxp*ys*(1./3.+1./6.*o*x12
     #    +1./6.*o*x2z-1./6.*o*ux+2./3.*o-2./3.*os+1./2.*x12*
     #    x2z-1./6.*x12*ux+1./6.*x12+1./2.*x2z-1./6.*ux+5./6.
     #    *x12s)
      gg10c= gg10c+rs1wg(8)*vvc*gtm2*bxps*ys*(-1./3.)
      gg10c= gg10c+rs1wg(8)*vvc*gtm2*ys*(-1./3.*o*x12*x2z+5./
     #    6.*o*x12*ux-1./3.*o*x12+1./2.*o*x2z*ux-2./3.*o*x2z-2./
     #    3.*o*x12s-1./2.*o*uxs-1./3.*o+1./2.*os*x12+1./2.*os*
     #    x2z-1./2.*os*ux+1./3.*os+x12*x2z*ux-1./2.*x12*x2z-1.
     #    /2.*x12*x2zs-1./2.*x12*uxs-1./3.*x12+1./6.*x2z*ux-5./
     #    3.*x2z*x12s-2./3.*x2z+4./3.*ux*x12s+1./3.*ux-2./3.*
     #    x12s-7./6.*x12c-1./6.*x2zs)
      gg10c= gg10c+rs1wg(9)*bxpi*vvc*gtm2*ys*(-2*o*x12-2./3.*o
     #    *x2z+2./3.*o*ux+2./3.*os+4./3.*x12*x2z-2./3.*x12*ux
     #    -2./3.*x2z+4./3.*x12s)
      gg10c= gg10c+rs1wg(9)*vvc*gtm2*bxp*ys*(-2./3.+4./3.*x12
     #    )
      gg10c= gg10c+rs1wg(9)*vvc*gtm2*ys*(2./3.+8./3.*o*x12+4./
     #    3.*o*x2z-4./3.*o*ux-4./3.*os-4./3.*x12*x2z+2./3.*x12*
     #    ux-4./3.*x12+2./3.*x2z-4./3.*x12s)
      gg10c= gg10c+rs1wg(10)*xx*vvc*gtm2*ys*(-1./6.*o*x12*x2zs
     #    +1./6.*o*x2z*x12s-1./6.*o*x2z*uxs+1./3.*o*ux*x2zs-1./
     #    6.*o*x2zc+1./3.*o*x2zs+1./6.*os*x12*x2z-1./3.*os*x2z*ux
     #    +1./6.*os*x2zs-1./6.*oc*x2z-1./6.*x12*x2z*uxs+1./6.*
     #    x12*ux*x2zs+1./6.*x12*x2zc-2./3.*x12*x2zs+1./3.*x2z*ux*
     #    x12s-1./6.*x2z*x12c+1./6.*ux*x2zs-1./3.*x2zc)
      gg10c= gg10c+rs1wg(10)*bxpi*vvc*gtm2*ys*(1./3.*o*x2z*ux+2./
     #    3.*o*x2z+1./6.*o*x12s-1./6.*o*x2zs-1./6.*o*uxs+1./6.*
     #    os*x12-1./3.*os*ux-1./6.*oc+1./6.*x12*x2z*ux-4./3.*
     #    x12*x2z+1./3.*x12*x2zs-1./6.*x12*uxs+1./3.*x2z*ux+1./
     #    3.*x2z*x12s+1./3.*ux*x12s-1./6.*x12c-5./6.*x2zs)
      gg10c= gg10c+rs1wg(10)*vvc*gtm2*bxp*ys*(-1./6.+7./12.*o*
     #    x12+5./12.*o*x2z-1./12.*o*ux+1./2.*o-1./4.*os+7./12.
     #    *x12*x2z-1./12.*x12*ux-13./12.*x12-13./12.*x2z+1./4.*
     #    ux+5./6.*x12s)
      gg10c= gg10c+rs1wg(10)*vvc*gtm2*bxps*ys*(1./3.-1./6.*o-1.
     #    /6.*x12)
      gg10c= gg10c+rs1wg(10)*vvc*gtm2*ys*(-1./3.*o*x12*x2z+1./
     #    12.*o*x12*ux-1./6.*o*x12-5./12.*o*x2z*ux-5./6.*o*x2z-
     #    5./12.*o*x12s+1./4.*o*uxs-1./3.*o-1./4.*os*x12-1./12.
     #    *os*x2z+1./2.*os*ux+1./6.*os+1./4.*oc-1./6.*x12*x2z*
     #    ux+19./12.*x12*x2z-7./12.*x12*x2zs+1./4.*x12*uxs+2./3.
     #    *x12-5./12.*x2z*ux-2./3.*x2z*x12s+2./3.*x2z-5./12.*ux
     #    *x12s-1./6.*ux-1./3.*x12s+1./12.*x12c+13./12.*x2zs)
      gg10c= gg10c+rs1wg(11)*vvc*gtm2*bxp*ys*(-1./3.*o+5./3.*
     #    x12+4./3.*x2z-2./3.*ux)
      gg10c= gg10c+rs1wg(11)*vvc*gtm2*bxps*ys*(-2./3.)
      gg10c= gg10c+rs1wg(11)*vvc*gtm2*ys*(1./3.*o*x12+1./3.*o*
     #    x2z-5./3.*x12*x2z+2./3.*x12*ux+2./3.*x2z*ux-x12s-2./
     #    3.*x2zs)
      gg10c= gg10c+rs1wg(12)*xx*vvc*gtm2*ys*(-2./3.*o*x12*ux-
     #    2./3.*o*x2z*ux-2./3.*o*x2z+2./3.*o*uxs-4./3.*os*x12-2.
     #    /3.*os*x2z+4./3.*os*ux+2./3.*oc-4./3.*x12*x2z*ux+4./3.
     #    *x12*x2z+2./3.*x12*x2zs+2./3.*x12*uxs-2./3.*x2z*ux+8./
     #    3.*x2z*x12s-2*ux*x12s+2*x12c+2./3.*x2zs)
      gg10c= gg10c+rs1wg(12)*bxpi*vvc*gtm2*ys*(2./3.*o*x12-2./3.
     #    *o+2./3.*x12*x2z+4./3.*x12+4./3.*x2z-2./3.*ux+2./3.
     #    *x12s)
      gg10c= gg10c+rs1wg(12)*vvc*gtm2*bxp*ys*(4./3.-2./3.*o-2./
     #    3.*x12)
      gg10c= gg10c+rs1wg(12)*vvc*gtm2*ys*(-2./3.+1./3.*o*x2z
     #    +1./3.*o+1./3.*os-1./3.*x12*x2z-5./3.*x12-2*x2z+2.
     #    /3.*ux-1./3.*x12s)
      gg10c= gg10c+rs1wg(13)*xx*vvc*gtm2*ys*(o*x12*x2z-1./3.*o*
     #    x12*ux-2./3.*o*x2z*ux-1./3.*o*x2z+1./3.*o*x2zs+1./3.*
     #    o*uxs-2./3.*os*x12-2./3.*os*x2z+2./3.*os*ux+1./3.*oc
     #    -1./3.*x12*x2z*ux+2./3.*x12*x2z-1./3.*x12*x2zs+1./3.*
     #    x12*uxs-1./3.*x2z*ux+2./3.*x2z*x12s-ux*x12s+x12c+2./
     #    3.*x2zs)
      gg10c= gg10c+rs1wg(13)*bxpi*vvc*gtm2*ys*(1./3.*o*x12-1./3.
     #    *o-1./3.*x12*x2z+2./3.*x12+x2z-1./3.*ux+1./3.*x12s
     #    )
      gg10c= gg10c+rs1wg(13)*vvc*gtm2*bxp*ys*(1./2.)
      gg10c= gg10c+rs1wg(13)*vvc*gtm2*ys*(-1./3.-1./6.*o*x12
     #    +1./6.*o*ux+1./2.*o+1./2.*x12*x2z+1./6.*x12*ux-7./6.
     #    *x12-7./6.*x2z+1./3.*ux-1./6.*x12s)
      gg10c= gg10c+rs1wg(14)*xx*vvc*gtm2*ys*(-o*x12*x2z+1./3.
     #    *o*x2z*ux-1./3.*o*x2zs+1./3.*os*x2z-1./3.*x12*x2z*ux+
     #    2./3.*x12*x2zs+2./3.*x2z*x12s-1./3.*x2zs)
      gg10c= gg10c+rs1wg(14)*bxpi*vvc*gtm2*ys*(-o*x12-1./3.*o*
     #    x2z+1./3.*o*ux+1./3.*os+4./3.*x12*x2z-1./3.*x12*ux-
     #    2./3.*x2z+2./3.*x12s)
      gg10c= gg10c+rs1wg(14)*vvc*gtm2*bxp*ys*(-1./6.-1./6.*o
     #    +3./2.*x12+2./3.*x2z-1./3.*ux)
      gg10c= gg10c+rs1wg(14)*vvc*gtm2*bxps*ys*(-1./3.)
      gg10c= gg10c+rs1wg(14)*vvc*gtm2*ys*(1./3.+2./3.*o*x12+1.
     #    /3.*o*x2z-1./6.*o*ux-1./6.*os-13./6.*x12*x2z+1./2.*
     #    x12*ux-2./3.*x12+1./3.*x2z*ux+1./2.*x2z-7./6.*x12s-
     #    1./3.*x2zs)
*
      gg20c= rs1wg(1)*xx*vvc*gtm2*ys*(12*o*x12*x2z-4*o*x12*ux-8*o*
     #    x2z*ux-4*o*x2z+4*o*x2zs+4*o*uxs-8*os*x12-8*os*x2z
     #    +8*os*ux+4*oc-4*x12*x2z*ux+8*x12*x2z-4*x12*x2zs+4
     #    *x12*uxs-4*x2z*ux+8*x2z*x12s-12*ux*x12s+12*x12c+8*
     #    x2zs)
      gg20c= gg20c+rs1wg(1)*bxpi*vvc*gtm2*ys*(16*o*x12+4*o*x2z
     #    -4*o*ux-4*o-4*os-12*x12*x2z+4*x12*ux+8*x12+16*
     #    x2z-4*ux-4*x12s)
      gg20c= gg20c+rs1wg(1)*vvc*gtm2*bxp*ys*(10-10./3.*o-22./3.
     #    *x12+8./3.*x2z-4./3.*ux)
      gg20c= gg20c+rs1wg(1)*vvc*gtm2*bxps*ys*(-4./3.)
      gg20c= gg20c+rs1wg(1)*vvc*gtm2*ys*(-8-44./3.*o*x12-2*
     #    o*x2z+14./3.*o*ux+10./3.*o+16./3.*os+32./3.*x12*x2z
     #    -10./3.*x12*ux-2./3.*x12+4./3.*x2z*ux-18*x2z+4*ux
     #    +4*x12s-4./3.*x2zs)
      gg20c= gg20c+rs1wg(4)*xx*vvc*gtm2*ys*(2*o*x12*x2z*ux-o*
     #    x12*x2zs-2*o*x2z*x12s-o*x2z*uxs+o*ux*x2zs-o*x2zs+os
     #    *x12*x2z-os*x2z*ux+os*x2zs-x12*x2z*uxs+2*x12*ux*x2zs
     #    -x12*x2zc-x12*x2zs+3*x2z*ux*x12s-3*x2z*x12c+ux*x2zs
     #    -4*x12s*x2zs-x2zc)
      gg20c= gg20c+rs1wg(4)*bxpi*vvc*gtm2*ys*(-2*o*x12*x2z+2*o
     #    *x12*ux+o*x2z*ux-2*o*x2z-2*o*x12s-o*uxs+os*x12+2*
     #    os*x2z-os*ux+2*x12*x2z*ux-2*x12*x2z-2*x12*x2zs-x12*
     #    uxs+2*x2z*ux-6*x2z*x12s+3*ux*x12s-3*x12c-3*x2zs)
      gg20c= gg20c+rs1wg(4)*vvc*gtm2*bxp*ys*(-1-1./2.*o*x12+
     #    1./2.*o*x2z-1./6.*o*ux-7./6.*o+7./6.*os-1./2.*x12*x2z
     #    -1./6.*x12*ux-4./3.*x12-11./3.*x2z+7./6.*ux-5./3.*
     #    x12s)
      gg20c= gg20c+rs1wg(4)*vvc*gtm2*bxps*ys*(4./3.-1./3.*o-1./
     #    3.*x12)
      gg20c= gg20c+rs1wg(4)*vvc*gtm2*ys*(5./3.*o*x12*x2z-13./6.
     #    *o*x12*ux+o*x12-o*x2z*ux+13./6.*o*x2z+2*o*x12s-1./6.
     #    *o*x2zs+7./6.*o*uxs+o-7./6.*os*x12-13./6.*os*x2z+7./
     #    6.*os*ux-os-13./6.*x12*x2z*ux+10./3.*x12*x2z+11./6.*
     #    x12*x2zs+7./6.*x12*uxs+x12-13./6.*x2z*ux+6*x2z*x12s
     #    +3*x2z-10./3.*ux*x12s-ux+2*x12s+19./6.*x12c+10./3.
     #    *x2zs)
      gg20c= gg20c+rs1wg(7)*xx*vvc*gtm2*ys*(1./2.*o*x12*x2zs-1./
     #    2.*o*x2z*x12s+1./2.*o*x2z*uxs-o*ux*x2zs+1./2.*o*x2zc-
     #    o*x2zs-1./2.*os*x12*x2z+os*x2z*ux-1./2.*os*x2zs+1./2.
     #    *oc*x2z+1./2.*x12*x2z*uxs-1./2.*x12*ux*x2zs-1./2.*x12*
     #    x2zc+2*x12*x2zs-x2z*ux*x12s+1./2.*x2z*x12c-1./2.*ux*
     #    x2zs+x2zc)
      gg20c= gg20c+rs1wg(7)*bxpi*vvc*gtm2*ys*(-1./2.*o*x12*x2z
     #    -o*x2z+1./2.*os*x2z+2*x12*x2z-1./2.*x12*x2zs-1./2.*
     #    x2z*ux-x2z*x12s+3./2.*x2zs)
      gg20c= gg20c+rs1wg(7)*vvc*gtm2*bxp*ys*(-1./2.*o*x12-1./2.
     #    *o*x2z+1./6.*o*ux-1./6.*o+1./12.*os-1./2.*x12*x2z+1.
     #    /6.*x12*ux+1./2.*x12+x2z-1./6.*ux-7./12.*x12s)
      gg20c= gg20c+rs1wg(7)*vvc*gtm2*bxps*ys*(-1./6.+1./6.*o
     #    +1./6.*x12)
      gg20c= gg20c+rs1wg(7)*vvc*gtm2*ys*(o*x12*x2z-1./6.*o*x12*
     #    ux-1./6.*o*x2z*ux+7./6.*o*x2z+1./4.*o*x12s+1./3.*o*
     #    x2zs-1./2.*os*x2z-1./12.*os*ux-1./12.*oc-1./6.*x12*
     #    x2z*ux-5./2.*x12*x2z+5./6.*x12*x2zs+2./3.*x2z*ux+3./2.
     #    *x2z*x12s-1./2.*x2z-1./12.*ux*x12s+1./6.*x12c-11./6.*
     #    x2zs)
      gg20c= gg20c+rs1wg(8)*bxpi*vvc*gtm2*ys*(o*x12*x2z-2*o*x12*
     #    ux-o*x2z*ux+o*x2z+2*o*x12s+o*uxs-os*x12-os*x2z+
     #    os*ux-2*x12*x2z*ux+x12*x2z+x12*x2zs+x12*uxs-x2z*ux
     #    +4*x2z*x12s-3*ux*x12s+3*x12c+x2zs)
      gg20c= gg20c+rs1wg(8)*vvc*gtm2*bxp*ys*(1+5./6.*o*x12+1./
     #    6.*o*x2z-1./6.*o*ux+4./3.*o-4./3.*os+7./6.*x12*x2z-
     #    1./6.*x12*ux+5./6.*x12+11./6.*x2z-5./6.*ux+13./6.*
     #    x12s)
      gg20c= gg20c+rs1wg(8)*vvc*gtm2*bxps*ys*(-1)
      gg20c= gg20c+rs1wg(8)*vvc*gtm2*ys*(-o*x12*x2z+13./6.*o*
     #    x12*ux-o*x12+7./6.*o*x2z*ux-4./3.*o*x2z-2*o*x12s-7./
     #    6.*o*uxs-o+7./6.*os*x12+7./6.*os*x2z-7./6.*os*ux+os
     #    +7./3.*x12*x2z*ux-11./6.*x12*x2z-7./6.*x12*x2zs-7./6.
     #    *x12*uxs-x12+5./6.*x2z*ux-13./3.*x2z*x12s-2*x2z+10./
     #    3.*ux*x12s+ux-2*x12s-19./6.*x12c-5./6.*x2zs)
      gg20c= gg20c+rs1wg(9)*bxpi*vvc*gtm2*ys*(-6*o*x12-2*o*x2z
     #    +2*o*ux+2*os+4*x12*x2z-2*x12*ux-2*x2z+4*x12s)
      gg20c= gg20c+rs1wg(9)*vvc*gtm2*bxp*ys*(-2+4*x12)
      gg20c= gg20c+rs1wg(9)*vvc*gtm2*ys*(2+20./3.*o*x12+8./3.
     #    *o*x2z-8./3.*o*ux-8./3.*os-4*x12*x2z+2*x12*ux-4*x12
     #    +2*x2z-4*x12s)
      gg20c= gg20c+rs1wg(10)*xx*vvc*gtm2*ys*(-1./2.*o*x12*x2zs
     #    +1./2.*o*x2z*x12s-1./2.*o*x2z*uxs+o*ux*x2zs-1./2.*o*
     #    x2zc+o*x2zs+1./2.*os*x12*x2z-os*x2z*ux+1./2.*os*x2zs
     #    -1./2.*oc*x2z-1./2.*x12*x2z*uxs+1./2.*x12*ux*x2zs+1./
     #    2.*x12*x2zc-2*x12*x2zs+x2z*ux*x12s-1./2.*x2z*x12c+1./
     #    2.*ux*x2zs-x2zc)
      gg20c= gg20c+rs1wg(10)*bxpi*vvc*gtm2*ys*(o*x2z*ux+2*o*x2z
     #    +1./2.*o*x12s-1./2.*o*x2zs-1./2.*o*uxs+1./2.*os*x12
     #    -os*ux-1./2.*oc+1./2.*x12*x2z*ux-4*x12*x2z+x12*x2zs
     #    -1./2.*x12*uxs+x2z*ux+x2z*x12s+ux*x12s-1./2.*x12c
     #    -5./2.*x2zs)
      gg20c= gg20c+rs1wg(10)*vvc*gtm2*bxp*ys*(-1./2.+11./12.*o
     #    *x12+5./12.*o*x2z-1./12.*o*ux+7./6.*o-7./12.*os+11./
     #    12.*x12*x2z-1./12.*x12*ux-29./12.*x12-29./12.*x2z+7./
     #    12.*ux+3./2.*x12s)
      gg20c= gg20c+rs1wg(10)*vvc*gtm2*bxps*ys*(2./3.-1./6.*o-1.
     #    /6.*x12)
      gg20c= gg20c+rs1wg(10)*vvc*gtm2*ys*(-1./3.*o*x12*x2z+1./
     #    12.*o*x12*ux-1./2.*o*x12-13./12.*o*x2z*ux-13./6.*o*x2z
     #    -3./4.*o*x12s+1./3.*o*x2zs+7./12.*o*uxs-o-7./12.*os
     #    *x12-1./12.*os*x2z+7./6.*os*ux+1./2.*os+7./12.*oc-1.
     #    /2.*x12*x2z*ux+47./12.*x12*x2z-5./4.*x12*x2zs+7./12.*
     #    x12*uxs+2*x12-13./12.*x2z*ux-4./3.*x2z*x12s+2*x2z-
     #    13./12.*ux*x12s-1./2.*ux-x12s+5./12.*x12c+11./4.*x2zs
     #    )
      gg20c= gg20c+rs1wg(11)*vvc*gtm2*bxp*ys*(-1./3.*o+5./3.*
     #    x12+4./3.*x2z-2./3.*ux)
      gg20c= gg20c+rs1wg(11)*vvc*gtm2*bxps*ys*(-2./3.)
      gg20c= gg20c+rs1wg(11)*vvc*gtm2*ys*(1./3.*o*x12+1./3.*o*
     #    x2z-5./3.*x12*x2z+2./3.*x12*ux+2./3.*x2z*ux-x12s-2./
     #    3.*x2zs)
      gg20c= gg20c+rs1wg(12)*xx*vvc*gtm2*ys*(-2*o*x12*ux-2*o*
     #    x2z*ux-2*o*x2z+2*o*uxs-4*os*x12-2*os*x2z+4*os*ux+
     #    2*oc-4*x12*x2z*ux+4*x12*x2z+2*x12*x2zs+2*x12*uxs-2*
     #    x2z*ux+8*x2z*x12s-6*ux*x12s+6*x12c+2*x2zs)
      gg20c= gg20c+rs1wg(12)*bxpi*vvc*gtm2*ys*(2*o*x12-2*o+2*
     #    x12*x2z+4*x12+4*x2z-2*ux+2*x12s)
      gg20c= gg20c+rs1wg(12)*vvc*gtm2*bxp*ys*(8./3.-2./3.*o-2./
     #    3.*x12)
      gg20c= gg20c+rs1wg(12)*vvc*gtm2*ys*(-2-4./3.*o*x12+1./
     #    3.*o*x2z+5./3.*o+1./3.*os-5./3.*x12*x2z-13./3.*x12-
     #    14./3.*x2z+2*ux-5./3.*x12s)
      gg20c= gg20c+rs1wg(13)*xx*vvc*gtm2*ys*(3*o*x12*x2z-o*x12*
     #    ux-2*o*x2z*ux-o*x2z+o*x2zs+o*uxs-2*os*x12-2*os*
     #    x2z+2*os*ux+oc-x12*x2z*ux+2*x12*x2z-x12*x2zs+x12*
     #    uxs-x2z*ux+2*x2z*x12s-3*ux*x12s+3*x12c+2*x2zs)
      gg20c= gg20c+rs1wg(13)*bxpi*vvc*gtm2*ys*(o*x12-o-x12*x2z
     #    +2*x12+3*x2z-ux+x12s)
      gg20c= gg20c+rs1wg(13)*vvc*gtm2*bxp*ys*(7./6.)
      gg20c= gg20c+rs1wg(13)*vvc*gtm2*ys*(-1-5./6.*o*x12+1./
     #    6.*o*ux+7./6.*o+7./6.*x12*x2z+1./6.*x12*ux-5./2.*x12
     #    -19./6.*x2z+ux-5./6.*x12s)
      gg20c= gg20c+rs1wg(14)*xx*vvc*gtm2*ys*(-3*o*x12*x2z+o*
     #    x2z*ux-o*x2zs+os*x2z-x12*x2z*ux+2*x12*x2zs+2*x2z*
     #    x12s-x2zs)
      gg20c= gg20c+rs1wg(14)*bxpi*vvc*gtm2*ys*(-3*o*x12-o*x2z
     #    +o*ux+os+4*x12*x2z-x12*ux-2*x2z+2*x12s)
      gg20c= gg20c+rs1wg(14)*vvc*gtm2*bxp*ys*(-5./6.-1./6.*o
     #    +17./6.*x12+2./3.*x2z-1./3.*ux)
      gg20c= gg20c+rs1wg(14)*vvc*gtm2*bxps*ys*(-1./3.)
      gg20c= gg20c+rs1wg(14)*vvc*gtm2*ys*(1+8./3.*o*x12+o*x2z
     #    -5./6.*o*ux-5./6.*os-29./6.*x12*x2z+7./6.*x12*ux-2*
     #    x12+1./3.*x2z*ux+11./6.*x2z-5./2.*x12s-1./3.*x2zs)
*
      gg10q= 0.d0
      gg20q= 0.d0
*
*----------------------------------------------------------------
*
      else if(jj.eq.5) then
*
*----------------------------------------------------------------
*
      gg11s= xx*rl3*vvc*gtm2*ys*(-2./3.*o*x12*x2zs-4./3.*o*x2z*x12s
     #    -2./3.*o*x12c-2./3.*x12*x12c+2./3.*x12*x2zc-4./3.*x12
     #    *x2zs-2./3.*x2z*x12s-2./3.*x2z*x12c+2./3.*x12s*x2zs-2.
     #    /3.*x2zc)
      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*(-8./9.*o*x12*x2z+4./9.
     #    *o*x2z-8./9.*o*x12s+8./9.*os*x12-4./9.*os-4./9.*x12*
     #    x2z+2./9.*x12*x2zs-2./9.*x12c-4./9.*x2zs)
      gg11s= gg11s+bxpi*rl3*vvc*gtm2*ys*(-5./3.*o*x12*x2z-5./3.
     #    *o*x12s-3*x12*x2z+5./3.*x12*x2zs+2./3.*x2z*x12s-2./3.
     #    *x12s-x12c-7./3.*x2zs)
      gg11s= gg11s+bxpi*vvs*gtm2*pwsm2*y*zxi*(-4./9.*o*x12+8./
     #    9.*os*x12-8./9.*os)
      gg11s= gg11s+bxpi*vvs*gtm2*pwsm2*y*(-8./9.*o*x12+4./9.*
     #    x12*x2z-4./9.*x12-8./9.*x2z)
      gg11s= gg11s+rl1*vvs*y*bxp*(-1./3.+2./3.*o*x2z+1./3.*o
     #    +4./3.*x12*x2z+1./3.*x12-x2z+4./3.*x12s)
      gg11s= gg11s+rl1*vvs*y*bxps*(2./3.-2./3.*o-4./3.*x12)
      gg11s= gg11s+rl1*vvs*y*(1./3.*o*x12-1./3.*o*x2z-1./3.*
     #    os*x12-1./3.*x12*x2zs-2./3.*x2z*x12s+1./3.*x2z-1./3.*
     #    x12s-1./3.*x12c+1./3.*x2zs)
      gg11s= gg11s+rl3*vvc*gtm2*bxp*bxps*ys*(-2./3.)
      gg11s= gg11s+rl3*vvc*gtm2*bxp*ys*(-4./3.+1./3.*o*x12+2
     #    *o*x2z+1./3.*o+5./3.*x12*x2z-2*x12-5*x2z+x12s-2./
     #    3.*x2zs)
      gg11s= gg11s+rl3*vvc*gtm2*bxps*ys*(7./3.-4./3.*o-2./3.*
     #    x12+4./3.*x2z)
      gg11s= gg11s+rl3*vvc*gtm2*ys*(1./3.*o*x12*x2z+4./3.*o*x12
     #    -1./3.*o*x2z+o*x12s-2./3.*o*x2zs-1./3.*os*x12+8./3.
     #    *x12*x2z-2*x12*x2zs+5./3.*x12-4./3.*x2z*x12s+3*x2z+
     #    2./3.*x12s+2./3.*x12c+10./3.*x2zs)
      gg11s= gg11s+vvs*gtm2*pwsm2*y*bxp*zxi*(-2./9.+4./9.*o*
     #    x12-4./9.*os)
      gg11s= gg11s+vvs*gtm2*pwsm2*y*bxp*(-7./9.+1./3.*o+1./3.
     #    *x12-1./3.*x2z)
      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*bxps*(2./9.)
      gg11s= gg11s+vvs*gtm2*pwsm2*y*(2./3.+7./9.*o*x12-1./3.*
     #    o*x2z-4./9.*o+4./9.*os-4./9.*x12*x2z+1./9.*x12+11./
     #    9.*x2z-1./9.*x12s+1./9.*x2zs)
*
      gg21s= xx*rl3*vvc*gtm2*ys*(-2*o*x12*x2zs-4*o*x2z*x12s-2*o*
     #    x12c-2*x12*x12c+2*x12*x2zc-4*x12*x2zs-2*x2z*x12s-2*
     #    x2z*x12c+2*x12s*x2zs-2*x2zc)
      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*(-8./3.*o*x12*x2z+4./3.
     #    *o*x2z-8./3.*o*x12s+8./3.*os*x12-4./3.*os-4./3.*x12*
     #    x2z+2./3.*x12*x2zs-2./3.*x12c-4./3.*x2zs)
      gg21s= gg21s+bxpi*rl3*vvc*gtm2*ys*(-5*o*x12*x2z-5*o*x12s
     #    -9*x12*x2z+5*x12*x2zs+2*x2z*x12s-2*x12s-3*x12c-7*
     #    x2zs)
      gg21s= gg21s+bxpi*vvs*gtm2*pwsm2*y*zxi*(-4./3.*o*x12+8./
     #    3.*os*x12-8./3.*os)
      gg21s= gg21s+bxpi*vvs*gtm2*pwsm2*y*(-8./3.*o*x12+4./3.*
     #    x12*x2z-4./3.*x12-8./3.*x2z)
      gg21s= gg21s+rl1*vvs*y*bxp*(-1./3.+2./3.*o*x2z+1./3.*o
     #    +4./3.*x12*x2z+1./3.*x12-x2z+4./3.*x12s)
      gg21s= gg21s+rl1*vvs*y*bxps*(2./3.-2./3.*o-4./3.*x12)
      gg21s= gg21s+rl1*vvs*y*(1./3.*o*x12-1./3.*o*x2z-1./3.*
     #    os*x12-1./3.*x12*x2zs-2./3.*x2z*x12s+1./3.*x2z-1./3.*
     #    x12s-1./3.*x12c+1./3.*x2zs)
      gg21s= gg21s+rl3*vvc*gtm2*bxp*bxps*ys*(-2./3.)
      gg21s= gg21s+rl3*vvc*gtm2*bxp*ys*(-10./3.-5./3.*o*x12+
     #    2*o*x2z+1./3.*o+5*x12*x2z-4*x12-31./3.*x2z+5./3.*
     #    x12s-2./3.*x2zs)
      gg21s= gg21s+rl3*vvc*gtm2*bxps*ys*(13./3.-4./3.*o-2*x12
     #    +4./3.*x2z)
      gg21s= gg21s+rl3*vvc*gtm2*ys*(11./3.*o*x12*x2z+10./3.*o*
     #    x12-1./3.*o*x2z+13./3.*o*x12s-2./3.*o*x2zs-1./3.*os*
     #    x12+16./3.*x12*x2z-16./3.*x12*x2zs+5*x12-8./3.*x2z*
     #    x12s+25./3.*x2z+4./3.*x12s+8./3.*x12c+8*x2zs)
      gg21s= gg21s+vvs*gtm2*pwsm2*y*bxp*zxi*(-2./9.+4./9.*o*
     #    x12-8./9.*o-4./9.*os)
      gg21s= gg21s+vvs*gtm2*pwsm2*y*bxp*(-5./3.+1./3.*o+7./9.
     #    *x12-1./3.*x2z)
      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*bxps*(2./9.)
      gg21s= gg21s+vvs*gtm2*pwsm2*y*(14./9.+23./9.*o*x12-1./3.
     #    *o*x2z-4./9.*o+4./9.*os-4./3.*x12*x2z+5./9.*x12+3*
     #    x2z-1./9.*x12s+1./9.*x2zs)
*
      gg11c= rs1wg(1)*xx*vvc*gtm2*ys*(-4./3.*o*x12*x2zs-8./3.*o*x2z
     #    *x12s-4./3.*o*x12c-4./3.*x12*x12c+4./3.*x12*x2zc-8./3.
     #    *x12*x2zs-4./3.*x2z*x12s-4./3.*x2z*x12c+4./3.*x12s*x2zs
     #    -4./3.*x2zc)
      gg11c= gg11c+rs1wg(1)*bxpi*vvc*gtm2*ys*(-4*o*x12*x2z-4*o
     #    *x12s-20./3.*x12*x2z+4*x12*x2zs+8./3.*x2z*x12s-4./3.*
     #    x12s-4./3.*x12c-16./3.*x2zs)
      gg11c= gg11c+rs1wg(1)*vvc*gtm2*bxp*bxps*ys*(-4./3.)
      gg11c= gg11c+rs1wg(1)*vvc*gtm2*bxp*ys*(-10./3.+4*o*x2z
     #    +2./3.*o+16./3.*x12*x2z-10./3.*x12-34./3.*x2z+4*
     #    x12s-4./3.*x2zs)
      gg11c= gg11c+rs1wg(1)*vvc*gtm2*bxps*ys*(16./3.-8./3.*o-8.
     #    /3.*x12+8./3.*x2z)
      gg11c= gg11c+rs1wg(1)*vvc*gtm2*ys*(4./3.*o*x12*x2z+10./3.
     #    *o*x12-2./3.*o*x2z+8./3.*o*x12s-4./3.*o*x2zs-2./3.*os
     #    *x12+4*x12*x2z-14./3.*x12*x2zs+4*x12-4*x2z*x12s+22./
     #    3.*x2z-2./3.*x12s+2./3.*x12c+22./3.*x2zs)
      gg11c= gg11c+rs1wg(4)*xx*vvc*gtm2*ys*(2./3.*o*x12*x2zs+2./
     #    3.*o*x2z*x12c+2./3.*o*x12s*x2zs+1./3.*os*x2z*x12s+1./3.
     #    *x12*x2z*x12c+1./3.*x12s*x2zc+2./3.*x12c*x2zs+1./3.*
     #    x2zc)
      gg11c= gg11c+rs1wg(4)*bxpi*vvc*gtm2*ys*(4./3.*o*x12*x2z+o*
     #    x12*x2zs+5./3.*o*x2z*x12s+2./3.*o*x12c+1./3.*os*x12s+
     #    1./3.*x12*x12c+1./3.*x12*x2zc-1./3.*x12*x2zs+5./3.*x2z*
     #    x12c+5./3.*x12s*x2zs+1./3.*x2zc+x2zs)
      gg11c= gg11c+rs1wg(4)*vvc*gtm2*bxp*bxps*ys*(2./3.-1./3.*o
     #    -1./3.*x12)
      gg11c= gg11c+rs1wg(4)*vvc*gtm2*bxp*ys*(1./3.+4./3.*o*x12*
     #    x2z+11./6.*o*x12-1./3.*o*x2z+2./3.*o*x12s-1./3.*o*
     #    x2zs-1./6.*os*x12+1./6.*x12*x2z+1./6.*x12*x2zs-1./3.*
     #    x12+5./3.*x2z*x12s+7./3.*x2z+7./6.*x12s+5./6.*x12c+
     #    5./3.*x2zs)
      gg11c= gg11c+rs1wg(4)*vvc*gtm2*bxps*ys*(-5./6.-2./3.*o*
     #    x12+2./3.*o*x2z+1./6.*o+1./3.*x12*x2z+1./6.*x12-11./
     #    6.*x2z-2./3.*x12s)
      gg11c= gg11c+rs1wg(4)*vvc*gtm2*ys*(-7./2.*o*x12*x2z-2./
     #    3.*o*x12*x2zs-2./3.*o*x12-4./3.*o*x2z*x12s-o*x12s-2./
     #    3.*o*x12c+1./6.*o*x2zs+1./6.*os*x12*x2z-1./3.*os*x12s
     #    +2./3.*x12*x2z-1./3.*x12*x12c-1./6.*x12*x2zc-2./3.*
     #    x12*x2zs-5./2.*x2z*x12s-3./2.*x2z*x12c-x2z-4./3.*x12s
     #    *x2zs-x12c-1./2.*x2zc-13./6.*x2zs)
      gg11c= gg11c+rs1wg(7)*xx*vvc*gtm2*ys*(1./6.*o*x12*x2zs-1./
     #    6.*o*x2zc-1./6.*os*x12*x2zs+1./6.*x12*x2zq-2./3.*x12*
     #    x2zc+1./3.*x12s*x2zc-1./2.*x12s*x2zs+1./6.*x12c*x2zs-
     #    1./6.*x2zq+1./6.*x2zc)
      gg11c= gg11c+rs1wg(7)*bxpi*vvc*gtm2*ys*(1./6.*o*x12*x2z+1./
     #    2.*o*x12*x2zs+1./6.*o*x2z*x12s-1./3.*o*x2zs-1./6.*os*
     #    x12*x2z+1./3.*x12*x2zc-5./3.*x12*x2zs-1./2.*x2z*x12s+
     #    1./3.*x2z*x12c+2./3.*x12s*x2zs-1./2.*x2zc+1./3.*x2zs)
      gg11c= gg11c+rs1wg(7)*vvc*gtm2*bxp*bxps*ys*(-1./6.+1./6.*
     #    o+1./6.*x12)
      gg11c= gg11c+rs1wg(7)*vvc*gtm2*bxp*ys*(11./6.*o*x12*x2z-1./
     #    2.*o*x2z+2./3.*o*x12s+1./2.*o*x2zs+1./6.*os*x12+1./3.
     #    *os*x2z-13./6.*x12*x2z+2./3.*x12*x2zs+3./2.*x2z*x12s+
     #    1./6.*x2z-1./3.*x12s+1./2.*x12c-x2zs)
      gg11c= gg11c+rs1wg(7)*vvc*gtm2*bxps*ys*(-1./12.-5./6.*o*
     #    x12-1./2.*o*x2z+1./6.*o-1./6.*os-1./2.*x12*x2z+2./3.
     #    *x12+2./3.*x2z-2./3.*x12s)
      gg11c= gg11c+rs1wg(7)*vvc*gtm2*ys*(-2./3.*o*x12*x2z-o*
     #    x12*x2zs-2./3.*o*x2z*x12s+1./6.*o*x2z-1./6.*o*x12c-1./
     #    6.*o*x2zc+1./2.*o*x2zs-1./12.*os*x12s-1./6.*os*x2zs+
     #    x12*x2z-1./12.*x12*x12c-1./2.*x12*x2zc+2*x12*x2zs+1./
     #    3.*x2z*x12s-2./3.*x2z*x12c-1./6.*x2z-13./12.*x12s*x2zs
     #    +2./3.*x2zc+1./12.*x2zs)
      gg11c= gg11c+rs1wg(8)*bxpi*vvc*gtm2*ys*(-2./3.*o*x12*x2z
     #    -2./3.*o*x2z*x12s-2./3.*o*x12c-1./3.*os*x12s-1./3.*
     #    x12*x12c-2./3.*x2z*x12c-1./3.*x12s*x2zs-1./3.*x2zs)
      gg11c= gg11c+rs1wg(8)*vvc*gtm2*bxp*bxps*ys*(-1./3.)
      gg11c= gg11c+rs1wg(8)*vvc*gtm2*bxp*ys*(-1./3.-o*x12*x2z
     #    -5./3.*o*x12-o*x12s-1./3.*x12*x2zs+1./3.*x12-4./3.*
     #    x2z*x12s-4./3.*x2z-x12s-x12c-1./3.*x2zs)
      gg11c= gg11c+rs1wg(8)*vvc*gtm2*bxps*ys*(2./3.+o*x12+1./3.
     #    *x12*x2z-1./3.*x12+2./3.*x2z+x12s)
      gg11c= gg11c+rs1wg(8)*vvc*gtm2*ys*(5./3.*o*x12*x2z+2./3.*
     #    o*x12+2./3.*o*x2z*x12s+o*x12s+2./3.*o*x12c+1./3.*os*
     #    x12s-1./3.*x12*x2z+1./3.*x12*x12c+1./3.*x12*x2zs+4./3.
     #    *x2z*x12s+2./3.*x2z*x12c+2./3.*x2z+1./3.*x12s*x2zs+
     #    x12c+2./3.*x2zs)
      gg11c= gg11c+rs1wg(9)*bxpi*vvc*gtm2*ys*(2./3.*o*x12*x2z+2./
     #    3.*o*x12s+2./3.*x12*x2z-2./3.*x12*x2zs-4./3.*x2z*x12s
     #    -2./3.*x12c+2./3.*x2zs)
      gg11c= gg11c+rs1wg(9)*vvc*gtm2*bxp*ys*(2./3.+2./3.*o*x12
     #    -2*x12*x2z-2./3.*x12+4./3.*x2z-2*x12s)
      gg11c= gg11c+rs1wg(9)*vvc*gtm2*bxps*ys*(-2./3.+4./3.*x12
     #    )
      gg11c= gg11c+rs1wg(9)*vvc*gtm2*ys*(-2./3.*o*x12*x2z-2./
     #    3.*o*x12-2./3.*o*x12s+4./3.*x12*x2z+2./3.*x12*x2zs-2./
     #    3.*x12+4./3.*x2z*x12s-4./3.*x2z+2*x12s+2./3.*x12c-2.
     #    /3.*x2zs)
      gg11c= gg11c+rs1wg(10)*xx*vvc*gtm2*ys*(-1./6.*o*x12*x2zs
     #    +1./6.*o*x2zc+1./6.*os*x12*x2zs-1./6.*x12*x2zq+2./3.*
     #    x12*x2zc-1./3.*x12s*x2zc+1./2.*x12s*x2zs-1./6.*x12c*
     #    x2zs+1./6.*x2zq-1./6.*x2zc)
      gg11c= gg11c+rs1wg(10)*bxpi*vvc*gtm2*ys*(-1./3.*o*x12*x2z
     #    -1./2.*o*x12*x2zs-1./6.*o*x2z*x12s+1./2.*o*x2zs+1./3.
     #    *os*x12*x2z-1./2.*x12*x2zc+7./3.*x12*x2zs+x2z*x12s-1./
     #    2.*x2z*x12c-x12s*x2zs+2./3.*x2zc-1./2.*x2zs)
      gg11c= gg11c+rs1wg(10)*vvc*gtm2*bxp*bxps*ys*(1./3.-1./6.*o
     #    -1./6.*x12)
      gg11c= gg11c+rs1wg(10)*vvc*gtm2*bxp*ys*(-1./6.-7./3.*o*
     #    x12*x2z-2./3.*o*x12+5./6.*o*x2z-5./6.*o*x12s-1./2.*o*
     #    x2zs+1./6.*o-1./3.*os*x2z+11./3.*x12*x2z-x12*x2zs+
     #    x12-13./6.*x2z*x12s+1./3.*x12s-5./6.*x12c+3./2.*x2zs
     #    )
      gg11c= gg11c+rs1wg(10)*vvc*gtm2*bxps*ys*(1./12.+4./3.*o*
     #    x12+1./2.*o*x2z-1./3.*o+1./6.*os+2./3.*x12*x2z-5./3.
     #    *x12-7./6.*x2z+7./6.*x12s)
      gg11c= gg11c+rs1wg(10)*vvc*gtm2*ys*(4./3.*o*x12*x2z+o*x12
     #    *x2zs+1./6.*o*x12+2./3.*o*x2z*x12s-1./2.*o*x2z+1./6.*
     #    o*x12s+1./6.*o*x12c+1./6.*o*x2zc-2./3.*o*x2zs-1./6.*
     #    os*x12*x2z-1./6.*os*x12+1./12.*os*x12s+1./6.*os*x2zs-
     #    8./3.*x12*x2z+1./12.*x12*x12c+2./3.*x12*x2zc-7./3.*x12*
     #    x2zs-1./6.*x2z*x12s+5./6.*x2z*x12c+1./2.*x2z+17./12.*
     #    x12s*x2zs-1./2.*x12s+1./3.*x12c-5./6.*x2zc-5./12.*
     #    x2zs)
      gg11c= gg11c+rs1wg(11)*vvc*gtm2*bxp*bxps*ys*(-2./3.)
      gg11c= gg11c+rs1wg(11)*vvc*gtm2*bxp*ys*(-1./3.*o*x12-5./
     #    3.*x12*x2z-1./3.*x12-2./3.*x2z-x12s-2./3.*x2zs)
      gg11c= gg11c+rs1wg(11)*vvc*gtm2*bxps*ys*(1./3.+4./3.*x12
     #    +4./3.*x2z)
      gg11c= gg11c+rs1wg(11)*vvc*gtm2*ys*(1./3.*o*x12*x2z+1./3.
     #    *o*x12s+1./3.*x12*x2z+1./3.*x12*x2zs+2./3.*x2z*x12s+1.
     #    /3.*x12c+1./3.*x2zs)
      gg11c= gg11c+rs1wg(12)*xx*vvc*gtm2*ys*(-2./3.*o*x2z*x12s
     #    -2./3.*o*x12c-2./3.*x12*x12c-2./3.*x12*x2zs-2./3.*x2z
     #    *x12s-4./3.*x2z*x12c-2./3.*x12s*x2zs)
      gg11c= gg11c+rs1wg(12)*bxpi*vvc*gtm2*ys*(-2./3.*o*x12*x2z
     #    -4./3.*o*x12s-2*x12*x2z-2./3.*x12*x2zs-2*x2z*x12s-2.
     #    /3.*x12s-4./3.*x12c-2./3.*x2zs)
      gg11c= gg11c+rs1wg(12)*vvc*gtm2*bxp*ys*(-1+2./3.*o*x2z
     #    +1./3.*o-5./3.*x12-7./3.*x2z)
      gg11c= gg11c+rs1wg(12)*vvc*gtm2*bxps*ys*(4./3.-2./3.*o-2.
     #    /3.*x12)
      gg11c= gg11c+rs1wg(12)*vvc*gtm2*ys*(o*x12-1./3.*o*x2z+2.
     #    /3.*o*x12s-1./3.*os*x12+10./3.*x12*x2z+1./3.*x12*x2zs
     #    +4./3.*x12+4./3.*x2z*x12s+5./3.*x2z+5./3.*x12s+x12c
     #    +x2zs)
      gg11c= gg11c+rs1wg(13)*xx*vvc*gtm2*ys*(-1./3.*o*x12*x2zs
     #    -2./3.*o*x2z*x12s-1./3.*o*x12c-1./3.*x12*x12c+1./3.*
     #    x12*x2zc-2./3.*x12*x2zs-1./3.*x2z*x12s-1./3.*x2z*x12c
     #    +1./3.*x12s*x2zs-1./3.*x2zc)
      gg11c= gg11c+rs1wg(13)*bxpi*vvc*gtm2*ys*(-2./3.*o*x12*x2z
     #    -2./3.*o*x12s-4./3.*x12*x2z+2./3.*x12*x2zs-1./3.*x12s
     #    -2./3.*x12c-x2zs)
      gg11c= gg11c+rs1wg(13)*vvc*gtm2*bxp*ys*(-1./6.+1./6.*o*
     #    x12+1./3.*o*x2z-1./6.*o+5./6.*x12*x2z-5./3.*x12-3./
     #    2.*x2z+1./6.*x12s)
      gg11c= gg11c+rs1wg(13)*vvc*gtm2*bxps*ys*(1./2.)
      gg11c= gg11c+rs1wg(13)*vvc*gtm2*ys*(1./6.*o*x12*x2z+1./6.
     #    *o*x12+1./6.*o*x2z+1./2.*o*x12s-1./3.*o*x2zs+1./6.*os
     #    *x12+11./6.*x12*x2z-x12*x2zs+2./3.*x12-2./3.*x2z*x12s
     #    +5./6.*x2z+7./6.*x12s+1./3.*x12c+4./3.*x2zs)
      gg11c= gg11c+rs1wg(14)*xx*vvc*gtm2*ys*(1./3.*o*x12*x2zs+1.
     #    /3.*o*x2z*x12s-1./3.*x12*x2zc+1./3.*x12*x2zs-1./3.*x2z*
     #    x12c-2./3.*x12s*x2zs+1./3.*x2zc)
      gg11c= gg11c+rs1wg(14)*bxpi*vvc*gtm2*ys*(2./3.*o*x12*x2z+1.
     #    /3.*o*x12s+2./3.*x12*x2z-4./3.*x12*x2zs-5./3.*x2z*x12s
     #    -1./3.*x12c+x2zs)
      gg11c= gg11c+rs1wg(14)*vvc*gtm2*bxp*bxps*ys*(-1./3.)
      gg11c= gg11c+rs1wg(14)*vvc*gtm2*bxp*ys*(1./3.-1./3.*o*x12
     #    -2./3.*o*x2z-3*x12*x2z-1./3.*x12+x2z-2*x12s-1./3.
     #    *x2zs)
      gg11c= gg11c+rs1wg(14)*vvc*gtm2*bxps*ys*(-1./3.+1./3.*o
     #    +5./3.*x12+2./3.*x2z)
      gg11c= gg11c+rs1wg(14)*vvc*gtm2*ys*(-1./3.*o*x12+1./3.*
     #    o*x2zs+x12*x2z+5./3.*x12*x2zs-1./3.*x12+7./3.*x2z*
     #    x12s-x2z+x12s+2./3.*x12c-x2zs)
*
      gg21c= rs1wg(1)*xx*vvc*gtm2*ys*(-4*o*x12*x2zs-8*o*x2z*x12s-
     #    4*o*x12c-4*x12*x12c+4*x12*x2zc-8*x12*x2zs-4*x2z*x12s
     #    -4*x2z*x12c+4*x12s*x2zs-4*x2zc)
      gg21c= gg21c+rs1wg(1)*bxpi*vvc*gtm2*ys*(-12*o*x12*x2z-12
     #    *o*x12s-20*x12*x2z+12*x12*x2zs+8*x2z*x12s-4*x12s-4*
     #    x12c-16*x2zs)
      gg21c= gg21c+rs1wg(1)*vvc*gtm2*bxp*bxps*ys*(-4./3.)
      gg21c= gg21c+rs1wg(1)*vvc*gtm2*bxp*ys*(-26./3.-16./3.*o*
     #    x12+4*o*x2z+2./3.*o+16*x12*x2z-6*x12-74./3.*x2z+
     #    28./3.*x12s-4./3.*x2zs)
      gg21c= gg21c+rs1wg(1)*vvc*gtm2*bxps*ys*(32./3.-8./3.*o-8
     #    *x12+8./3.*x2z)
      gg21c= gg21c+rs1wg(1)*vvc*gtm2*ys*(28./3.*o*x12*x2z+26./3.
     #    *o*x12-2./3.*o*x2z+32./3.*o*x12s-4./3.*o*x2zs-2./3.*
     #    os*x12+20./3.*x12*x2z-38./3.*x12*x2zs+12*x12-28./3.*
     #    x2z*x12s+62./3.*x2z-10./3.*x12s+10./3.*x12c+18*x2zs)
      gg21c= gg21c+rs1wg(4)*xx*vvc*gtm2*ys*(2*o*x12*x2zs+2*o*
     #    x2z*x12c+2*o*x12s*x2zs+os*x2z*x12s+x12*x2z*x12c+x12s*
     #    x2zc+2*x12c*x2zs+x2zc)
      gg21c= gg21c+rs1wg(4)*bxpi*vvc*gtm2*ys*(4*o*x12*x2z+3*o*
     #    x12*x2zs+5*o*x2z*x12s+2*o*x12c+os*x12s+x12*x12c+x12
     #    *x2zc-x12*x2zs+5*x2z*x12c+5*x12s*x2zs+x2zc+3*x2zs)
      gg21c= gg21c+rs1wg(4)*vvc*gtm2*bxp*bxps*ys*(4./3.-1./3.*o
     #    -1./3.*x12)
      gg21c= gg21c+rs1wg(4)*vvc*gtm2*bxp*ys*(1+16./3.*o*x12*x2z
     #    +31./6.*o*x12-1./3.*o*x2z+8./3.*o*x12s-1./3.*o*x2zs
     #    -1./6.*os*x12-1./2.*x12*x2z+3./2.*x12*x2zs-x12+19./
     #    3.*x2z*x12s+19./3.*x2z+19./6.*x12s+17./6.*x12c+11./3.
     #    *x2zs)
      gg21c= gg21c+rs1wg(4)*vvc*gtm2*bxps*ys*(-13./6.-8./3.*o*
     #    x12+2./3.*o*x2z+1./6.*o-1./3.*x12*x2z+5./6.*x12-23./
     #    6.*x2z-8./3.*x12s)
      gg21c= gg21c+rs1wg(4)*vvc*gtm2*ys*(-61./6.*o*x12*x2z-8./
     #    3.*o*x12*x2zs-2*o*x12-14./3.*o*x2z*x12s-3*o*x12s-2*o*
     #    x12c+1./6.*o*x2zs+1./6.*os*x12*x2z-os*x12s+2*x12*x2z
     #    -x12*x12c-5./6.*x12*x2zc-4./3.*x12*x2zs-43./6.*x2z*
     #    x12s-29./6.*x2z*x12c-3*x2z-14./3.*x12s*x2zs-3*x12c-
     #    7./6.*x2zc-37./6.*x2zs)
      gg21c= gg21c+rs1wg(7)*xx*vvc*gtm2*ys*(1./2.*o*x12*x2zs-1./
     #    2.*o*x2zc-1./2.*os*x12*x2zs+1./2.*x12*x2zq-2*x12*x2zc
     #    +x12s*x2zc-3./2.*x12s*x2zs+1./2.*x12c*x2zs-1./2.*x2zq
     #    +1./2.*x2zc)
      gg21c= gg21c+rs1wg(7)*bxpi*vvc*gtm2*ys*(1./2.*o*x12*x2z+3./
     #    2.*o*x12*x2zs+1./2.*o*x2z*x12s-o*x2zs-1./2.*os*x12*x2z
     #    +x12*x2zc-5*x12*x2zs-3./2.*x2z*x12s+x2z*x12c+2*x12s
     #    *x2zs-3./2.*x2zc+x2zs)
      gg21c= gg21c+rs1wg(7)*vvc*gtm2*bxp*bxps*ys*(-1./6.+1./6.*
     #    o+1./6.*x12)
      gg21c= gg21c+rs1wg(7)*vvc*gtm2*bxp*ys*(17./6.*o*x12*x2z-5./
     #    6.*o*x2z+2./3.*o*x12s+1./2.*o*x2zs+1./6.*os*x12+1./3.
     #    *os*x2z-25./6.*x12*x2z+x12*x2zs+5./2.*x2z*x12s+1./6.*
     #    x2z-1./3.*x12s+1./2.*x12c-2*x2zs)
      gg21c= gg21c+rs1wg(7)*vvc*gtm2*bxps*ys*(-1./12.-5./6.*o*
     #    x12-1./2.*o*x2z+1./6.*o-1./6.*os-1./2.*x12*x2z+2./3.
     #    *x12+x2z-2./3.*x12s)
      gg21c= gg21c+rs1wg(7)*vvc*gtm2*ys*(-2*o*x12*x2z-2*o*x12
     #    *x2zs-o*x2z*x12s+1./2.*o*x2z-1./6.*o*x12c-1./6.*o*
     #    x2zc+7./6.*o*x2zs+1./3.*os*x12*x2z-1./12.*os*x12s-1./
     #    6.*os*x2zs+3*x12*x2z-1./12.*x12*x12c-7./6.*x12*x2zc+5
     #    *x12*x2zs+1./3.*x2z*x12s-4./3.*x2z*x12c-1./2.*x2z-29./
     #    12.*x12s*x2zs+5./3.*x2zc+5./12.*x2zs)
      gg21c= gg21c+rs1wg(8)*bxpi*vvc*gtm2*ys*(-2*o*x12*x2z-2*o
     #    *x2z*x12s-2*o*x12c-os*x12s-x12*x12c-2*x2z*x12c-x12s
     #    *x2zs-x2zs)
      gg21c= gg21c+rs1wg(8)*vvc*gtm2*bxp*bxps*ys*(-1)
      gg21c= gg21c+rs1wg(8)*vvc*gtm2*bxp*ys*(-1-3*o*x12*x2z-
     #    5*o*x12-3*o*x12s-x12*x2zs+x12-4*x2z*x12s-4*x2z-3*
     #    x12s-3*x12c-x2zs)
      gg21c= gg21c+rs1wg(8)*vvc*gtm2*bxps*ys*(2+3*o*x12+x12*
     #    x2z-x12+2*x2z+3*x12s)
      gg21c= gg21c+rs1wg(8)*vvc*gtm2*ys*(5*o*x12*x2z+2*o*x12+
     #    2*o*x2z*x12s+3*o*x12s+2*o*x12c+os*x12s-x12*x2z+x12*
     #    x12c+x12*x2zs+4*x2z*x12s+2*x2z*x12c+2*x2z+x12s*x2zs
     #    +3*x12c+2*x2zs)
      gg21c= gg21c+rs1wg(9)*bxpi*vvc*gtm2*ys*(2*o*x12*x2z+2*o*
     #    x12s+2*x12*x2z-2*x12*x2zs-4*x2z*x12s-2*x12c+2*x2zs
     #    )
      gg21c= gg21c+rs1wg(9)*vvc*gtm2*bxp*ys*(2+2*o*x12-6*x12*
     #    x2z-2*x12+4*x2z-6*x12s)
      gg21c= gg21c+rs1wg(9)*vvc*gtm2*bxps*ys*(-2+4*x12)
      gg21c= gg21c+rs1wg(9)*vvc*gtm2*ys*(-2*o*x12*x2z-2*o*x12
     #    -2*o*x12s+4*x12*x2z+2*x12*x2zs-2*x12+4*x2z*x12s-4
     #    *x2z+6*x12s+2*x12c-2*x2zs)
      gg21c= gg21c+rs1wg(10)*xx*vvc*gtm2*ys*(-1./2.*o*x12*x2zs
     #    +1./2.*o*x2zc+1./2.*os*x12*x2zs-1./2.*x12*x2zq+2*x12*
     #    x2zc-x12s*x2zc+3./2.*x12s*x2zs-1./2.*x12c*x2zs+1./2.*
     #    x2zq-1./2.*x2zc)
      gg21c= gg21c+rs1wg(10)*bxpi*vvc*gtm2*ys*(-o*x12*x2z-3./2.
     #    *o*x12*x2zs-1./2.*o*x2z*x12s+3./2.*o*x2zs+os*x12*x2z-
     #    3./2.*x12*x2zc+7*x12*x2zs+3*x2z*x12s-3./2.*x2z*x12c-3
     #    *x12s*x2zs+2*x2zc-3./2.*x2zs)
      gg21c= gg21c+rs1wg(10)*vvc*gtm2*bxp*bxps*ys*(2./3.-1./6.*o
     #    -1./6.*x12)
      gg21c= gg21c+rs1wg(10)*vvc*gtm2*bxp*ys*(-1./2.-13./3.*o*
     #    x12*x2z-2*o*x12+11./6.*o*x2z-7./6.*o*x12s-1./2.*o*
     #    x2zs+1./2.*o+1./3.*os*x12-1./3.*os*x2z+26./3.*x12*x2z
     #    -2*x12*x2zs+3*x12-9./2.*x2z*x12s+1./3.*x2z+1./3.*
     #    x12s-3./2.*x12c+7./2.*x2zs)
      gg21c= gg21c+rs1wg(10)*vvc*gtm2*bxps*ys*(1./12.+7./3.*o*
     #    x12+1./2.*o*x2z-2./3.*o+1./6.*os+x12*x2z-11./3.*x12
     #    -5./2.*x2z+13./6.*x12s)
      gg21c= gg21c+rs1wg(10)*vvc*gtm2*ys*(4*o*x12*x2z+2*o*x12*
     #    x2zs+1./2.*o*x12+o*x2z*x12s-3./2.*o*x2z+1./2.*o*x12s
     #    +1./6.*o*x12c+1./6.*o*x2zc-5./3.*o*x2zs-5./6.*os*x12*
     #    x2z-1./2.*os*x12+1./12.*os*x12s+1./6.*os*x2zs-8*x12*
     #    x2z+1./12.*x12*x12c+5./3.*x12*x2zc-6*x12*x2zs+1./6.*
     #    x2z*x12s+11./6.*x2z*x12c+3./2.*x2z+41./12.*x12s*x2zs-
     #    3./2.*x12s+x12c-13./6.*x2zc-17./12.*x2zs)
      gg21c= gg21c+rs1wg(11)*vvc*gtm2*bxp*bxps*ys*(-2./3.)
      gg21c= gg21c+rs1wg(11)*vvc*gtm2*bxp*ys*(-1./3.*o*x12-5./
     #    3.*x12*x2z-1./3.*x12-2./3.*x2z-x12s-2./3.*x2zs)
      gg21c= gg21c+rs1wg(11)*vvc*gtm2*bxps*ys*(1./3.+4./3.*x12
     #    +4./3.*x2z)
      gg21c= gg21c+rs1wg(11)*vvc*gtm2*ys*(1./3.*o*x12*x2z+1./3.
     #    *o*x12s+1./3.*x12*x2z+1./3.*x12*x2zs+2./3.*x2z*x12s+1.
     #    /3.*x12c+1./3.*x2zs)
      gg21c= gg21c+rs1wg(12)*xx*vvc*gtm2*ys*(-2*o*x2z*x12s-2*
     #    o*x12c-2*x12*x12c-2*x12*x2zs-2*x2z*x12s-4*x2z*x12c-
     #    2*x12s*x2zs)
      gg21c= gg21c+rs1wg(12)*bxpi*vvc*gtm2*ys*(-2*o*x12*x2z-4*
     #    o*x12s-6*x12*x2z-2*x12*x2zs-6*x2z*x12s-2*x12s-4*
     #    x12c-2*x2zs)
      gg21c= gg21c+rs1wg(12)*vvc*gtm2*bxp*ys*(-7./3.-4./3.*o*
     #    x12+2./3.*o*x2z+1./3.*o-4./3.*x12*x2z-13./3.*x12-5*
     #    x2z-4./3.*x12s)
      gg21c= gg21c+rs1wg(12)*vvc*gtm2*bxps*ys*(8./3.-2./3.*o-2.
     #    /3.*x12)
      gg21c= gg21c+rs1wg(12)*vvc*gtm2*ys*(4./3.*o*x12*x2z+7./3.
     #    *o*x12-1./3.*o*x2z+10./3.*o*x12s-1./3.*os*x12+26./3.*
     #    x12*x2z+5./3.*x12*x2zs+4*x12+16./3.*x2z*x12s+13./3.*
     #    x2z+13./3.*x12s+11./3.*x12c+7./3.*x2zs)
      gg21c= gg21c+rs1wg(13)*xx*vvc*gtm2*ys*(-o*x12*x2zs-2*o*
     #    x2z*x12s-o*x12c-x12*x12c+x12*x2zc-2*x12*x2zs-x2z*
     #    x12s-x2z*x12c+x12s*x2zs-x2zc)
      gg21c= gg21c+rs1wg(13)*bxpi*vvc*gtm2*ys*(-2*o*x12*x2z-2*
     #    o*x12s-4*x12*x2z+2*x12*x2zs-x12s-2*x12c-3*x2zs)
      gg21c= gg21c+rs1wg(13)*vvc*gtm2*bxp*ys*(-5./6.-1./2.*o*
     #    x12+1./3.*o*x2z-1./6.*o+3./2.*x12*x2z-3*x12-7./2.*
     #    x2z-1./2.*x12s)
      gg21c= gg21c+rs1wg(13)*vvc*gtm2*bxps*ys*(7./6.)
      gg21c= gg21c+rs1wg(13)*vvc*gtm2*ys*(3./2.*o*x12*x2z+5./6.
     #    *o*x12+1./6.*o*x2z+11./6.*o*x12s-1./3.*o*x2zs+1./6.*
     #    os*x12+23./6.*x12*x2z-7./3.*x12*x2zs+2*x12-2./3.*x2z*
     #    x12s+17./6.*x2z+5./2.*x12s+5./3.*x12c+10./3.*x2zs)
      gg21c= gg21c+rs1wg(14)*xx*vvc*gtm2*ys*(o*x12*x2zs+o*x2z*
     #    x12s-x12*x2zc+x12*x2zs-x2z*x12c-2*x12s*x2zs+x2zc)
      gg21c= gg21c+rs1wg(14)*bxpi*vvc*gtm2*ys*(2*o*x12*x2z+o*
     #    x12s+2*x12*x2z-4*x12*x2zs-5*x2z*x12s-x12c+3*x2zs)
      gg21c= gg21c+rs1wg(14)*vvc*gtm2*bxp*bxps*ys*(-1./3.)
      gg21c= gg21c+rs1wg(14)*vvc*gtm2*bxp*ys*(1+1./3.*o*x12-2./
     #    3.*o*x2z-19./3.*x12*x2z-x12+3*x2z-4*x12s-1./3.*x2zs
     #    )
      gg21c= gg21c+rs1wg(14)*vvc*gtm2*bxps*ys*(-1+1./3.*o+3*
     #    x12+2./3.*x2z)
      gg21c= gg21c+rs1wg(14)*vvc*gtm2*ys*(-4./3.*o*x12*x2z-o*
     #    x12-2./3.*o*x12s+1./3.*o*x2zs+3*x12*x2z+13./3.*x12*
     #    x2zs-x12+17./3.*x2z*x12s-3*x2z+3*x12s+4./3.*x12c-
     #    3*x2zs)
*
      gg11q= 0.d0
      gg21q= 0.d0
*
*--------------------------------------------------------------
*
      else if(jj.eq.6) then
*
*--------------------------------------------------------------
*
      gg12s= xx*vvs*dms*gtm2*pwsm2*(-4./9.*x12*x2zs-10./9.*
     #    x2z*x12s-2./3.*x12c)
      gg12s= gg12s+xx*vvs*gtm2*pwsm2*y*(2./9.*x12*x12c+4./9.*
     #    x2z*x12c+2./9.*x12s*x2zs)
      gg12s= gg12s+bxpi*vvs*dms*gtm2*pwsm2*(-14./9.*x12*
     #    x2z-14./9.*x12s-2./9.*x2zs)
      gg12s= gg12s+bxpi*vvs*gtm2*pwsm2*y*(2./9.*x12*x2zs+8./9.*
     #    x2z*x12s+2./3.*x12c)
      gg12s= gg12s+vvs*dms*gtm2*pwsm2*bxp*(-1./3.-7./9.
     #    *x12-1./9.*x2z)
      gg12s= gg12s+vvs*dms*gtm2*pwsm2*bxps*(1./9.)
      gg12s= gg12s+vvs*dms*gtm2*pwsm2*(10./9.*x12*x2z+
     #    11./9.*x12+5./9.*x2z+4./3.*x12s)
      gg12s= gg12s+vvs*gtm2*pwsm2*y*bxp*bxps*(1./9.)
      gg12s= gg12s+vvs*gtm2*pwsm2*y*bxp*(2./3.*x12*x2z+4./9.*x12
     #    +2./9.*x2z+7./9.*x12s+1./9.*x2zs)
      gg12s= gg12s+vvs*gtm2*pwsm2*y*bxps*(-1./9.-4./9.*x12-2.
     #    /9.*x2z)
      gg12s= gg12s+vvs*gtm2*pwsm2*y*(-2./3.*x12*x2z-2./9.*x12
     #    *x2zs-8./9.*x2z*x12s-7./9.*x12s-2./3.*x12c-1./9.*x2zs
     #    )
*
      gg22s= xx*vvs*dms*gtm2*pwsm2*(-4./3.*x12*x2zs-10./3.*
     #    x2z*x12s-2*x12c)
      gg22s= gg22s+xx*vvs*gtm2*pwsm2*y*(2./3.*x12*x12c+4./3.*
     #    x2z*x12c+2./3.*x12s*x2zs)
      gg22s= gg22s+bxpi*vvs*dms*gtm2*pwsm2*(-14./3.*x12*
     #    x2z-14./3.*x12s-2./3.*x2zs)
      gg22s= gg22s+bxpi*vvs*gtm2*pwsm2*y*(2./3.*x12*x2zs+8./3.*
     #    x2z*x12s+2*x12c)
      gg22s= gg22s+vvs*dms*gtm2*pwsm2*bxp*(-7./9.-3*
     #    x12-x2z)
      gg22s= gg22s+vvs*dms*gtm2*pwsm2*bxps*(5./9.)
      gg22s= gg22s+vvs*dms*gtm2*pwsm2*(38./9.*x12*x2z+
     #    31./9.*x12+13./9.*x2z+40./9.*x12s+4./9.*x2zs)
      gg22s= gg22s+vvs*gtm2*pwsm2*y*bxp*bxps*(1./9.)
      gg22s= gg22s+vvs*gtm2*pwsm2*y*bxp*(14./9.*x12*x2z+8./9.*
     #    x12+2./9.*x2z+19./9.*x12s+1./9.*x2zs)
      gg22s= gg22s+vvs*gtm2*pwsm2*y*bxps*(-1./9.-8./9.*x12-2.
     #    /9.*x2z)
      gg22s= gg22s+vvs*gtm2*pwsm2*y*(-14./9.*x12*x2z-2./3.*
     #    x12*x2zs-8./3.*x2z*x12s-19./9.*x12s-2*x12c-1./9.*x2zs
     #    )
*
      gg11c= rs1wg(1)*xx*vvc*gtm2*ys*(-4./3.*o*x12*x2zs-8./3.*o*x2z
     #    *x12s-4./3.*o*x12c-4./3.*x12*x12c+4./3.*x12*x2zc-8./3.
     #    *x12*x2zs-4./3.*x2z*x12s-4./3.*x2z*x12c+4./3.*x12s*x2zs
     #    -4./3.*x2zc)
      gg11c= gg11c+rs1wg(1)*bxpi*vvc*gtm2*ys*(-4*o*x12*x2z-4*o
     #    *x12s-20./3.*x12*x2z+4*x12*x2zs+8./3.*x2z*x12s-4./3.*
     #    x12s-4./3.*x12c-16./3.*x2zs)
      gg11c= gg11c+rs1wg(1)*vvc*gtm2*bxp*bxps*ys*(-4./3.)
      gg11c= gg11c+rs1wg(1)*vvc*gtm2*bxp*ys*(-10./3.+4*o*x2z
     #    +2./3.*o+16./3.*x12*x2z-10./3.*x12-34./3.*x2z+4*
     #    x12s-4./3.*x2zs)
      gg11c= gg11c+rs1wg(1)*vvc*gtm2*bxps*ys*(16./3.-8./3.*o-8.
     #    /3.*x12+8./3.*x2z)
      gg11c= gg11c+rs1wg(1)*vvc*gtm2*ys*(4./3.*o*x12*x2z+10./3.
     #    *o*x12-2./3.*o*x2z+8./3.*o*x12s-4./3.*o*x2zs-2./3.*os
     #    *x12+4*x12*x2z-14./3.*x12*x2zs+4*x12-4*x2z*x12s+22./
     #    3.*x2z-2./3.*x12s+2./3.*x12c+22./3.*x2zs)
      gg11c= gg11c+rs1wg(4)*xx*vvc*gtm2*ys*(2./3.*o*x12*x2zs+2./
     #    3.*o*x2z*x12c+2./3.*o*x12s*x2zs+1./3.*os*x2z*x12s+1./3.
     #    *x12*x2z*x12c+1./3.*x12s*x2zc+2./3.*x12c*x2zs+1./3.*
     #    x2zc)
      gg11c= gg11c+rs1wg(4)*bxpi*vvc*gtm2*ys*(4./3.*o*x12*x2z+o*
     #    x12*x2zs+5./3.*o*x2z*x12s+2./3.*o*x12c+1./3.*os*x12s+
     #    1./3.*x12*x12c+1./3.*x12*x2zc-1./3.*x12*x2zs+5./3.*x2z*
     #    x12c+5./3.*x12s*x2zs+1./3.*x2zc+x2zs)
      gg11c= gg11c+rs1wg(4)*vvc*gtm2*bxp*bxps*ys*(2./3.-1./3.*o
     #    -1./3.*x12)
      gg11c= gg11c+rs1wg(4)*vvc*gtm2*bxp*ys*(1./3.+4./3.*o*x12*
     #    x2z+11./6.*o*x12-1./3.*o*x2z+2./3.*o*x12s-1./3.*o*
     #    x2zs-1./6.*os*x12+1./6.*x12*x2z+1./6.*x12*x2zs-1./3.*
     #    x12+5./3.*x2z*x12s+7./3.*x2z+7./6.*x12s+5./6.*x12c+
     #    5./3.*x2zs)
      gg11c= gg11c+rs1wg(4)*vvc*gtm2*bxps*ys*(-5./6.-2./3.*o*
     #    x12+2./3.*o*x2z+1./6.*o+1./3.*x12*x2z+1./6.*x12-11./
     #    6.*x2z-2./3.*x12s)
      gg11c= gg11c+rs1wg(4)*vvc*gtm2*ys*(-7./2.*o*x12*x2z-2./
     #    3.*o*x12*x2zs-2./3.*o*x12-4./3.*o*x2z*x12s-o*x12s-2./
     #    3.*o*x12c+1./6.*o*x2zs+1./6.*os*x12*x2z-1./3.*os*x12s
     #    +2./3.*x12*x2z-1./3.*x12*x12c-1./6.*x12*x2zc-2./3.*
     #    x12*x2zs-5./2.*x2z*x12s-3./2.*x2z*x12c-x2z-4./3.*x12s
     #    *x2zs-x12c-1./2.*x2zc-13./6.*x2zs)
      gg11c= gg11c+rs1wg(7)*xx*vvc*gtm2*ys*(1./6.*o*x12*x2zs-1./
     #    6.*o*x2zc-1./6.*os*x12*x2zs+1./6.*x12*x2zq-2./3.*x12*
     #    x2zc+1./3.*x12s*x2zc-1./2.*x12s*x2zs+1./6.*x12c*x2zs-
     #    1./6.*x2zq+1./6.*x2zc)
      gg11c= gg11c+rs1wg(7)*bxpi*vvc*gtm2*ys*(1./6.*o*x12*x2z+1./
     #    2.*o*x12*x2zs+1./6.*o*x2z*x12s-1./3.*o*x2zs-1./6.*os*
     #    x12*x2z+1./3.*x12*x2zc-5./3.*x12*x2zs-1./2.*x2z*x12s+
     #    1./3.*x2z*x12c+2./3.*x12s*x2zs-1./2.*x2zc+1./3.*x2zs)
      gg11c= gg11c+rs1wg(7)*vvc*gtm2*bxp*bxps*ys*(-1./6.+1./6.*
     #    o+1./6.*x12)
      gg11c= gg11c+rs1wg(7)*vvc*gtm2*bxp*ys*(11./6.*o*x12*x2z-1./
     #    2.*o*x2z+2./3.*o*x12s+1./2.*o*x2zs+1./6.*os*x12+1./3.
     #    *os*x2z-13./6.*x12*x2z+2./3.*x12*x2zs+3./2.*x2z*x12s+
     #    1./6.*x2z-1./3.*x12s+1./2.*x12c-x2zs)
      gg11c= gg11c+rs1wg(7)*vvc*gtm2*bxps*ys*(-1./12.-5./6.*o*
     #    x12-1./2.*o*x2z+1./6.*o-1./6.*os-1./2.*x12*x2z+2./3.
     #    *x12+2./3.*x2z-2./3.*x12s)
      gg11c= gg11c+rs1wg(7)*vvc*gtm2*ys*(-2./3.*o*x12*x2z-o*
     #    x12*x2zs-2./3.*o*x2z*x12s+1./6.*o*x2z-1./6.*o*x12c-1./
     #    6.*o*x2zc+1./2.*o*x2zs-1./12.*os*x12s-1./6.*os*x2zs+
     #    x12*x2z-1./12.*x12*x12c-1./2.*x12*x2zc+2*x12*x2zs+1./
     #    3.*x2z*x12s-2./3.*x2z*x12c-1./6.*x2z-13./12.*x12s*x2zs
     #    +2./3.*x2zc+1./12.*x2zs)
      gg11c= gg11c+rs1wg(8)*bxpi*vvc*gtm2*ys*(-2./3.*o*x12*x2z
     #    -2./3.*o*x2z*x12s-2./3.*o*x12c-1./3.*os*x12s-1./3.*
     #    x12*x12c-2./3.*x2z*x12c-1./3.*x12s*x2zs-1./3.*x2zs)
      gg11c= gg11c+rs1wg(8)*vvc*gtm2*bxp*bxps*ys*(-1./3.)
      gg11c= gg11c+rs1wg(8)*vvc*gtm2*bxp*ys*(-1./3.-o*x12*x2z
     #    -5./3.*o*x12-o*x12s-1./3.*x12*x2zs+1./3.*x12-4./3.*
     #    x2z*x12s-4./3.*x2z-x12s-x12c-1./3.*x2zs)
      gg11c= gg11c+rs1wg(8)*vvc*gtm2*bxps*ys*(2./3.+o*x12+1./3.
     #    *x12*x2z-1./3.*x12+2./3.*x2z+x12s)
      gg11c= gg11c+rs1wg(8)*vvc*gtm2*ys*(5./3.*o*x12*x2z+2./3.*
     #    o*x12+2./3.*o*x2z*x12s+o*x12s+2./3.*o*x12c+1./3.*os*
     #    x12s-1./3.*x12*x2z+1./3.*x12*x12c+1./3.*x12*x2zs+4./3.
     #    *x2z*x12s+2./3.*x2z*x12c+2./3.*x2z+1./3.*x12s*x2zs+
     #    x12c+2./3.*x2zs)
      gg11c= gg11c+rs1wg(9)*bxpi*vvc*gtm2*ys*(2./3.*o*x12*x2z+2./
     #    3.*o*x12s+2./3.*x12*x2z-2./3.*x12*x2zs-4./3.*x2z*x12s
     #    -2./3.*x12c+2./3.*x2zs)
      gg11c= gg11c+rs1wg(9)*vvc*gtm2*bxp*ys*(2./3.+2./3.*o*x12
     #    -2*x12*x2z-2./3.*x12+4./3.*x2z-2*x12s)
      gg11c= gg11c+rs1wg(9)*vvc*gtm2*bxps*ys*(-2./3.+4./3.*x12
     #    )
      gg11c= gg11c+rs1wg(9)*vvc*gtm2*ys*(-2./3.*o*x12*x2z-2./
     #    3.*o*x12-2./3.*o*x12s+4./3.*x12*x2z+2./3.*x12*x2zs-2./
     #    3.*x12+4./3.*x2z*x12s-4./3.*x2z+2*x12s+2./3.*x12c-2.
     #    /3.*x2zs)
      gg11c= gg11c+rs1wg(10)*xx*vvc*gtm2*ys*(-1./6.*o*x12*x2zs
     #    +1./6.*o*x2zc+1./6.*os*x12*x2zs-1./6.*x12*x2zq+2./3.*
     #    x12*x2zc-1./3.*x12s*x2zc+1./2.*x12s*x2zs-1./6.*x12c*
     #    x2zs+1./6.*x2zq-1./6.*x2zc)
      gg11c= gg11c+rs1wg(10)*bxpi*vvc*gtm2*ys*(-1./3.*o*x12*x2z
     #    -1./2.*o*x12*x2zs-1./6.*o*x2z*x12s+1./2.*o*x2zs+1./3.
     #    *os*x12*x2z-1./2.*x12*x2zc+7./3.*x12*x2zs+x2z*x12s-1./
     #    2.*x2z*x12c-x12s*x2zs+2./3.*x2zc-1./2.*x2zs)
      gg11c= gg11c+rs1wg(10)*vvc*gtm2*bxp*bxps*ys*(1./3.-1./6.*o
     #    -1./6.*x12)
      gg11c= gg11c+rs1wg(10)*vvc*gtm2*bxp*ys*(-1./6.-7./3.*o*
     #    x12*x2z-2./3.*o*x12+5./6.*o*x2z-5./6.*o*x12s-1./2.*o*
     #    x2zs+1./6.*o-1./3.*os*x2z+11./3.*x12*x2z-x12*x2zs+
     #    x12-13./6.*x2z*x12s+1./3.*x12s-5./6.*x12c+3./2.*x2zs
     #    )
      gg11c= gg11c+rs1wg(10)*vvc*gtm2*bxps*ys*(1./12.+4./3.*o*
     #    x12+1./2.*o*x2z-1./3.*o+1./6.*os+2./3.*x12*x2z-5./3.
     #    *x12-7./6.*x2z+7./6.*x12s)
      gg11c= gg11c+rs1wg(10)*vvc*gtm2*ys*(4./3.*o*x12*x2z+o*x12
     #    *x2zs+1./6.*o*x12+2./3.*o*x2z*x12s-1./2.*o*x2z+1./6.*
     #    o*x12s+1./6.*o*x12c+1./6.*o*x2zc-2./3.*o*x2zs-1./6.*
     #    os*x12*x2z-1./6.*os*x12+1./12.*os*x12s+1./6.*os*x2zs-
     #    8./3.*x12*x2z+1./12.*x12*x12c+2./3.*x12*x2zc-7./3.*x12*
     #    x2zs-1./6.*x2z*x12s+5./6.*x2z*x12c+1./2.*x2z+17./12.*
     #    x12s*x2zs-1./2.*x12s+1./3.*x12c-5./6.*x2zc-5./12.*
     #    x2zs)
      gg11c= gg11c+rs1wg(11)*vvc*gtm2*bxp*bxps*ys*(-2./3.)
      gg11c= gg11c+rs1wg(11)*vvc*gtm2*bxp*ys*(-1./3.*o*x12-5./
     #    3.*x12*x2z-1./3.*x12-2./3.*x2z-x12s-2./3.*x2zs)
      gg11c= gg11c+rs1wg(11)*vvc*gtm2*bxps*ys*(1./3.+4./3.*x12
     #    +4./3.*x2z)
      gg11c= gg11c+rs1wg(11)*vvc*gtm2*ys*(1./3.*o*x12*x2z+1./3.
     #    *o*x12s+1./3.*x12*x2z+1./3.*x12*x2zs+2./3.*x2z*x12s+1.
     #    /3.*x12c+1./3.*x2zs)
      gg11c= gg11c+rs1wg(12)*xx*vvc*gtm2*ys*(-2./3.*o*x2z*x12s
     #    -2./3.*o*x12c-2./3.*x12*x12c-2./3.*x12*x2zs-2./3.*x2z
     #    *x12s-4./3.*x2z*x12c-2./3.*x12s*x2zs)
      gg11c= gg11c+rs1wg(12)*bxpi*vvc*gtm2*ys*(-2./3.*o*x12*x2z
     #    -4./3.*o*x12s-2*x12*x2z-2./3.*x12*x2zs-2*x2z*x12s-2.
     #    /3.*x12s-4./3.*x12c-2./3.*x2zs)
      gg11c= gg11c+rs1wg(12)*vvc*gtm2*bxp*ys*(-1+2./3.*o*x2z
     #    +1./3.*o-5./3.*x12-7./3.*x2z)
      gg11c= gg11c+rs1wg(12)*vvc*gtm2*bxps*ys*(4./3.-2./3.*o-2.
     #    /3.*x12)
      gg11c= gg11c+rs1wg(12)*vvc*gtm2*ys*(o*x12-1./3.*o*x2z+2.
     #    /3.*o*x12s-1./3.*os*x12+10./3.*x12*x2z+1./3.*x12*x2zs
     #    +4./3.*x12+4./3.*x2z*x12s+5./3.*x2z+5./3.*x12s+x12c
     #    +x2zs)
      gg11c= gg11c+rs1wg(13)*xx*vvc*gtm2*ys*(-1./3.*o*x12*x2zs
     #    -2./3.*o*x2z*x12s-1./3.*o*x12c-1./3.*x12*x12c+1./3.*
     #    x12*x2zc-2./3.*x12*x2zs-1./3.*x2z*x12s-1./3.*x2z*x12c
     #    +1./3.*x12s*x2zs-1./3.*x2zc)
      gg11c= gg11c+rs1wg(13)*bxpi*vvc*gtm2*ys*(-2./3.*o*x12*x2z
     #    -2./3.*o*x12s-4./3.*x12*x2z+2./3.*x12*x2zs-1./3.*x12s
     #    -2./3.*x12c-x2zs)
      gg11c= gg11c+rs1wg(13)*vvc*gtm2*bxp*ys*(-1./6.+1./6.*o*
     #    x12+1./3.*o*x2z-1./6.*o+5./6.*x12*x2z-5./3.*x12-3./
     #    2.*x2z+1./6.*x12s)
      gg11c= gg11c+rs1wg(13)*vvc*gtm2*bxps*ys*(1./2.)
      gg11c= gg11c+rs1wg(13)*vvc*gtm2*ys*(1./6.*o*x12*x2z+1./6.
     #    *o*x12+1./6.*o*x2z+1./2.*o*x12s-1./3.*o*x2zs+1./6.*os
     #    *x12+11./6.*x12*x2z-x12*x2zs+2./3.*x12-2./3.*x2z*x12s
     #    +5./6.*x2z+7./6.*x12s+1./3.*x12c+4./3.*x2zs)
      gg11c= gg11c+rs1wg(14)*xx*vvc*gtm2*ys*(1./3.*o*x12*x2zs+1.
     #    /3.*o*x2z*x12s-1./3.*x12*x2zc+1./3.*x12*x2zs-1./3.*x2z*
     #    x12c-2./3.*x12s*x2zs+1./3.*x2zc)
      gg11c= gg11c+rs1wg(14)*bxpi*vvc*gtm2*ys*(2./3.*o*x12*x2z+1.
     #    /3.*o*x12s+2./3.*x12*x2z-4./3.*x12*x2zs-5./3.*x2z*x12s
     #    -1./3.*x12c+x2zs)
      gg11c= gg11c+rs1wg(14)*vvc*gtm2*bxp*bxps*ys*(-1./3.)
      gg11c= gg11c+rs1wg(14)*vvc*gtm2*bxp*ys*(1./3.-1./3.*o*x12
     #    -2./3.*o*x2z-3*x12*x2z-1./3.*x12+x2z-2*x12s-1./3.
     #    *x2zs)
      gg11c= gg11c+rs1wg(14)*vvc*gtm2*bxps*ys*(-1./3.+1./3.*o
     #    +5./3.*x12+2./3.*x2z)
      gg11c= gg11c+rs1wg(14)*vvc*gtm2*ys*(-1./3.*o*x12+1./3.*
     #    o*x2zs+x12*x2z+5./3.*x12*x2zs-1./3.*x12+7./3.*x2z*
     #    x12s-x2z+x12s+2./3.*x12c-x2zs)
*
      gg21c= rs1wg(1)*xx*vvc*gtm2*ys*(-4*o*x12*x2zs-8*o*x2z*x12s-
     #    4*o*x12c-4*x12*x12c+4*x12*x2zc-8*x12*x2zs-4*x2z*x12s
     #    -4*x2z*x12c+4*x12s*x2zs-4*x2zc)
      gg21c= gg21c+rs1wg(1)*bxpi*vvc*gtm2*ys*(-12*o*x12*x2z-12
     #    *o*x12s-20*x12*x2z+12*x12*x2zs+8*x2z*x12s-4*x12s-4*
     #    x12c-16*x2zs)
      gg21c= gg21c+rs1wg(1)*vvc*gtm2*bxp*bxps*ys*(-4./3.)
      gg21c= gg21c+rs1wg(1)*vvc*gtm2*bxp*ys*(-26./3.-16./3.*o*
     #    x12+4*o*x2z+2./3.*o+16*x12*x2z-6*x12-74./3.*x2z+
     #    28./3.*x12s-4./3.*x2zs)
      gg21c= gg21c+rs1wg(1)*vvc*gtm2*bxps*ys*(32./3.-8./3.*o-8
     #    *x12+8./3.*x2z)
      gg21c= gg21c+rs1wg(1)*vvc*gtm2*ys*(28./3.*o*x12*x2z+26./3.
     #    *o*x12-2./3.*o*x2z+32./3.*o*x12s-4./3.*o*x2zs-2./3.*
     #    os*x12+20./3.*x12*x2z-38./3.*x12*x2zs+12*x12-28./3.*
     #    x2z*x12s+62./3.*x2z-10./3.*x12s+10./3.*x12c+18*x2zs)
      gg21c= gg21c+rs1wg(4)*xx*vvc*gtm2*ys*(2*o*x12*x2zs+2*o*
     #    x2z*x12c+2*o*x12s*x2zs+os*x2z*x12s+x12*x2z*x12c+x12s*
     #    x2zc+2*x12c*x2zs+x2zc)
      gg21c= gg21c+rs1wg(4)*bxpi*vvc*gtm2*ys*(4*o*x12*x2z+3*o*
     #    x12*x2zs+5*o*x2z*x12s+2*o*x12c+os*x12s+x12*x12c+x12
     #    *x2zc-x12*x2zs+5*x2z*x12c+5*x12s*x2zs+x2zc+3*x2zs)
      gg21c= gg21c+rs1wg(4)*vvc*gtm2*bxp*bxps*ys*(4./3.-1./3.*o
     #    -1./3.*x12)
      gg21c= gg21c+rs1wg(4)*vvc*gtm2*bxp*ys*(1+16./3.*o*x12*x2z
     #    +31./6.*o*x12-1./3.*o*x2z+8./3.*o*x12s-1./3.*o*x2zs
     #    -1./6.*os*x12-1./2.*x12*x2z+3./2.*x12*x2zs-x12+19./
     #    3.*x2z*x12s+19./3.*x2z+19./6.*x12s+17./6.*x12c+11./3.
     #    *x2zs)
      gg21c= gg21c+rs1wg(4)*vvc*gtm2*bxps*ys*(-13./6.-8./3.*o*
     #    x12+2./3.*o*x2z+1./6.*o-1./3.*x12*x2z+5./6.*x12-23./
     #    6.*x2z-8./3.*x12s)
      gg21c= gg21c+rs1wg(4)*vvc*gtm2*ys*(-61./6.*o*x12*x2z-8./
     #    3.*o*x12*x2zs-2*o*x12-14./3.*o*x2z*x12s-3*o*x12s-2*o*
     #    x12c+1./6.*o*x2zs+1./6.*os*x12*x2z-os*x12s+2*x12*x2z
     #    -x12*x12c-5./6.*x12*x2zc-4./3.*x12*x2zs-43./6.*x2z*
     #    x12s-29./6.*x2z*x12c-3*x2z-14./3.*x12s*x2zs-3*x12c-
     #    7./6.*x2zc-37./6.*x2zs)
      gg21c= gg21c+rs1wg(7)*xx*vvc*gtm2*ys*(1./2.*o*x12*x2zs-1./
     #    2.*o*x2zc-1./2.*os*x12*x2zs+1./2.*x12*x2zq-2*x12*x2zc
     #    +x12s*x2zc-3./2.*x12s*x2zs+1./2.*x12c*x2zs-1./2.*x2zq
     #    +1./2.*x2zc)
      gg21c= gg21c+rs1wg(7)*bxpi*vvc*gtm2*ys*(1./2.*o*x12*x2z+3./
     #    2.*o*x12*x2zs+1./2.*o*x2z*x12s-o*x2zs-1./2.*os*x12*x2z
     #    +x12*x2zc-5*x12*x2zs-3./2.*x2z*x12s+x2z*x12c+2*x12s
     #    *x2zs-3./2.*x2zc+x2zs)
      gg21c= gg21c+rs1wg(7)*vvc*gtm2*bxp*bxps*ys*(-1./6.+1./6.*
     #    o+1./6.*x12)
      gg21c= gg21c+rs1wg(7)*vvc*gtm2*bxp*ys*(17./6.*o*x12*x2z-5./
     #    6.*o*x2z+2./3.*o*x12s+1./2.*o*x2zs+1./6.*os*x12+1./3.
     #    *os*x2z-25./6.*x12*x2z+x12*x2zs+5./2.*x2z*x12s+1./6.*
     #    x2z-1./3.*x12s+1./2.*x12c-2*x2zs)
      gg21c= gg21c+rs1wg(7)*vvc*gtm2*bxps*ys*(-1./12.-5./6.*o*
     #    x12-1./2.*o*x2z+1./6.*o-1./6.*os-1./2.*x12*x2z+2./3.
     #    *x12+x2z-2./3.*x12s)
      gg21c= gg21c+rs1wg(7)*vvc*gtm2*ys*(-2*o*x12*x2z-2*o*x12
     #    *x2zs-o*x2z*x12s+1./2.*o*x2z-1./6.*o*x12c-1./6.*o*
     #    x2zc+7./6.*o*x2zs+1./3.*os*x12*x2z-1./12.*os*x12s-1./
     #    6.*os*x2zs+3*x12*x2z-1./12.*x12*x12c-7./6.*x12*x2zc+5
     #    *x12*x2zs+1./3.*x2z*x12s-4./3.*x2z*x12c-1./2.*x2z-29./
     #    12.*x12s*x2zs+5./3.*x2zc+5./12.*x2zs)
      gg21c= gg21c+rs1wg(8)*bxpi*vvc*gtm2*ys*(-2*o*x12*x2z-2*o
     #    *x2z*x12s-2*o*x12c-os*x12s-x12*x12c-2*x2z*x12c-x12s
     #    *x2zs-x2zs)
      gg21c= gg21c+rs1wg(8)*vvc*gtm2*bxp*bxps*ys*(-1)
      gg21c= gg21c+rs1wg(8)*vvc*gtm2*bxp*ys*(-1-3*o*x12*x2z-
     #    5*o*x12-3*o*x12s-x12*x2zs+x12-4*x2z*x12s-4*x2z-3*
     #    x12s-3*x12c-x2zs)
      gg21c= gg21c+rs1wg(8)*vvc*gtm2*bxps*ys*(2+3*o*x12+x12*
     #    x2z-x12+2*x2z+3*x12s)
      gg21c= gg21c+rs1wg(8)*vvc*gtm2*ys*(5*o*x12*x2z+2*o*x12+
     #    2*o*x2z*x12s+3*o*x12s+2*o*x12c+os*x12s-x12*x2z+x12*
     #    x12c+x12*x2zs+4*x2z*x12s+2*x2z*x12c+2*x2z+x12s*x2zs
     #    +3*x12c+2*x2zs)
      gg21c= gg21c+rs1wg(9)*bxpi*vvc*gtm2*ys*(2*o*x12*x2z+2*o*
     #    x12s+2*x12*x2z-2*x12*x2zs-4*x2z*x12s-2*x12c+2*x2zs
     #    )
      gg21c= gg21c+rs1wg(9)*vvc*gtm2*bxp*ys*(2+2*o*x12-6*x12*
     #    x2z-2*x12+4*x2z-6*x12s)
      gg21c= gg21c+rs1wg(9)*vvc*gtm2*bxps*ys*(-2+4*x12)
      gg21c= gg21c+rs1wg(9)*vvc*gtm2*ys*(-2*o*x12*x2z-2*o*x12
     #    -2*o*x12s+4*x12*x2z+2*x12*x2zs-2*x12+4*x2z*x12s-4
     #    *x2z+6*x12s+2*x12c-2*x2zs)
      gg21c= gg21c+rs1wg(10)*xx*vvc*gtm2*ys*(-1./2.*o*x12*x2zs
     #    +1./2.*o*x2zc+1./2.*os*x12*x2zs-1./2.*x12*x2zq+2*x12*
     #    x2zc-x12s*x2zc+3./2.*x12s*x2zs-1./2.*x12c*x2zs+1./2.*
     #    x2zq-1./2.*x2zc)
      gg21c= gg21c+rs1wg(10)*bxpi*vvc*gtm2*ys*(-o*x12*x2z-3./2.
     #    *o*x12*x2zs-1./2.*o*x2z*x12s+3./2.*o*x2zs+os*x12*x2z-
     #    3./2.*x12*x2zc+7*x12*x2zs+3*x2z*x12s-3./2.*x2z*x12c-3
     #    *x12s*x2zs+2*x2zc-3./2.*x2zs)
      gg21c= gg21c+rs1wg(10)*vvc*gtm2*bxp*bxps*ys*(2./3.-1./6.*o
     #    -1./6.*x12)
      gg21c= gg21c+rs1wg(10)*vvc*gtm2*bxp*ys*(-1./2.-13./3.*o*
     #    x12*x2z-2*o*x12+11./6.*o*x2z-7./6.*o*x12s-1./2.*o*
     #    x2zs+1./2.*o+1./3.*os*x12-1./3.*os*x2z+26./3.*x12*x2z
     #    -2*x12*x2zs+3*x12-9./2.*x2z*x12s+1./3.*x2z+1./3.*
     #    x12s-3./2.*x12c+7./2.*x2zs)
      gg21c= gg21c+rs1wg(10)*vvc*gtm2*bxps*ys*(1./12.+7./3.*o*
     #    x12+1./2.*o*x2z-2./3.*o+1./6.*os+x12*x2z-11./3.*x12
     #    -5./2.*x2z+13./6.*x12s)
      gg21c= gg21c+rs1wg(10)*vvc*gtm2*ys*(4*o*x12*x2z+2*o*x12*
     #    x2zs+1./2.*o*x12+o*x2z*x12s-3./2.*o*x2z+1./2.*o*x12s
     #    +1./6.*o*x12c+1./6.*o*x2zc-5./3.*o*x2zs-5./6.*os*x12*
     #    x2z-1./2.*os*x12+1./12.*os*x12s+1./6.*os*x2zs-8*x12*
     #    x2z+1./12.*x12*x12c+5./3.*x12*x2zc-6*x12*x2zs+1./6.*
     #    x2z*x12s+11./6.*x2z*x12c+3./2.*x2z+41./12.*x12s*x2zs-
     #    3./2.*x12s+x12c-13./6.*x2zc-17./12.*x2zs)
      gg21c= gg21c+rs1wg(11)*vvc*gtm2*bxp*bxps*ys*(-2./3.)
      gg21c= gg21c+rs1wg(11)*vvc*gtm2*bxp*ys*(-1./3.*o*x12-5./
     #    3.*x12*x2z-1./3.*x12-2./3.*x2z-x12s-2./3.*x2zs)
      gg21c= gg21c+rs1wg(11)*vvc*gtm2*bxps*ys*(1./3.+4./3.*x12
     #    +4./3.*x2z)
      gg21c= gg21c+rs1wg(11)*vvc*gtm2*ys*(1./3.*o*x12*x2z+1./3.
     #    *o*x12s+1./3.*x12*x2z+1./3.*x12*x2zs+2./3.*x2z*x12s+1.
     #    /3.*x12c+1./3.*x2zs)
      gg21c= gg21c+rs1wg(12)*xx*vvc*gtm2*ys*(-2*o*x2z*x12s-2*
     #    o*x12c-2*x12*x12c-2*x12*x2zs-2*x2z*x12s-4*x2z*x12c-
     #    2*x12s*x2zs)
      gg21c= gg21c+rs1wg(12)*bxpi*vvc*gtm2*ys*(-2*o*x12*x2z-4*
     #    o*x12s-6*x12*x2z-2*x12*x2zs-6*x2z*x12s-2*x12s-4*
     #    x12c-2*x2zs)
      gg21c= gg21c+rs1wg(12)*vvc*gtm2*bxp*ys*(-7./3.-4./3.*o*
     #    x12+2./3.*o*x2z+1./3.*o-4./3.*x12*x2z-13./3.*x12-5*
     #    x2z-4./3.*x12s)
      gg21c= gg21c+rs1wg(12)*vvc*gtm2*bxps*ys*(8./3.-2./3.*o-2.
     #    /3.*x12)
      gg21c= gg21c+rs1wg(12)*vvc*gtm2*ys*(4./3.*o*x12*x2z+7./3.
     #    *o*x12-1./3.*o*x2z+10./3.*o*x12s-1./3.*os*x12+26./3.*
     #    x12*x2z+5./3.*x12*x2zs+4*x12+16./3.*x2z*x12s+13./3.*
     #    x2z+13./3.*x12s+11./3.*x12c+7./3.*x2zs)
      gg21c= gg21c+rs1wg(13)*xx*vvc*gtm2*ys*(-o*x12*x2zs-2*o*
     #    x2z*x12s-o*x12c-x12*x12c+x12*x2zc-2*x12*x2zs-x2z*
     #    x12s-x2z*x12c+x12s*x2zs-x2zc)
      gg21c= gg21c+rs1wg(13)*bxpi*vvc*gtm2*ys*(-2*o*x12*x2z-2*
     #    o*x12s-4*x12*x2z+2*x12*x2zs-x12s-2*x12c-3*x2zs)
      gg21c= gg21c+rs1wg(13)*vvc*gtm2*bxp*ys*(-5./6.-1./2.*o*
     #    x12+1./3.*o*x2z-1./6.*o+3./2.*x12*x2z-3*x12-7./2.*
     #    x2z-1./2.*x12s)
      gg21c= gg21c+rs1wg(13)*vvc*gtm2*bxps*ys*(7./6.)
      gg21c= gg21c+rs1wg(13)*vvc*gtm2*ys*(3./2.*o*x12*x2z+5./6.
     #    *o*x12+1./6.*o*x2z+11./6.*o*x12s-1./3.*o*x2zs+1./6.*
     #    os*x12+23./6.*x12*x2z-7./3.*x12*x2zs+2*x12-2./3.*x2z*
     #    x12s+17./6.*x2z+5./2.*x12s+5./3.*x12c+10./3.*x2zs)
      gg21c= gg21c+rs1wg(14)*xx*vvc*gtm2*ys*(o*x12*x2zs+o*x2z*
     #    x12s-x12*x2zc+x12*x2zs-x2z*x12c-2*x12s*x2zs+x2zc)
      gg21c= gg21c+rs1wg(14)*bxpi*vvc*gtm2*ys*(2*o*x12*x2z+o*
     #    x12s+2*x12*x2z-4*x12*x2zs-5*x2z*x12s-x12c+3*x2zs)
      gg21c= gg21c+rs1wg(14)*vvc*gtm2*bxp*bxps*ys*(-1./3.)
      gg21c= gg21c+rs1wg(14)*vvc*gtm2*bxp*ys*(1+1./3.*o*x12-2./
     #    3.*o*x2z-19./3.*x12*x2z-x12+3*x2z-4*x12s-1./3.*x2zs
     #    )
      gg21c= gg21c+rs1wg(14)*vvc*gtm2*bxps*ys*(-1+1./3.*o+3*
     #    x12+2./3.*x2z)
      gg21c= gg21c+rs1wg(14)*vvc*gtm2*ys*(-4./3.*o*x12*x2z-o*
     #    x12-2./3.*o*x12s+1./3.*o*x2zs+3*x12*x2z+13./3.*x12*
     #    x2zs-x12+17./3.*x2z*x12s-3*x2z+3*x12s+4./3.*x12c-
     #    3*x2zs)
*
      gg12c= 0.d0
      gg22c= 0.d0
      gg12q= 0.d0
      gg22q= 0.d0
*
*---------------------------------------------------------------------
*
      endif
*
*---------------------------------------------------------------------
*
      if(jj.eq.1.or.jj.eq.4) then
       w1gg= gg10s+gg10c+gg10q*gstm2
       w2gg= gg20s+gg20c+gg20q*gstm2
      else if(jj.eq.2.or.jj.eq.5) then
       w1gg= gg11s+gg11c+gg11q*gstm2
       w2gg= gg21s+gg21c+gg21q*gstm2
      else if(jj.eq.3.or.jj.eq.6) then
       w1gg= gg12s+gg12c+gg12q*gstm2
       w2gg= gg22s+gg22c+gg22q*gstm2
      endif  
*
*-----Next the ZZ and GZ amplitude, only for ii = 4
*
      if(ii.eq.4) then
*
*----------------------------------------------------------------------
*
       if(jj.eq.1) then
*
*----------------------------------------------------------------------
*
      zz10s= xx*rl1*vvs*cqti*vut*y*(-1./4.*zi*o*
     #    x12*tx-1./8.*zi*o*x12+1./4.*zi*o*tx+1./8.*
     #    zi*o*txs+1./8.*zi*o+1./4.*zi*os*x12-1./4.
     #    *zi*os*tx-1./4.*zi*os+1./4.*zi*oc+1./8.*
     #    zi*x12*tx+1./8.*zi*x12*txs-1./8.*zi*tx-1.
     #    /8.*o*tx-1./8.*o+1./8.*os+1./8.*tx)
      zz10s= zz10s+xx*rl2*vvc*ys*csti*(zi*o*
     #    x12*txs-zi*o*txs+1./2.*zi*os*txs-zi*x12*
     #    txs+1./2.*zi*x12s*txs+1./2.*zi*txs+1./2.*o*
     #    txs+1./2.*x12*txs-1./2.*txs)
      zz10s= zz10s+xx*rl3*vvc*gtm2*ys*csti*vut*(
     #    -1./16.*o*x12*tx+1./16.*o*x2z*tx+1./16.*o*x2z+1./16.*
     #    o*txs+1./16.*os*x12-1./16.*os*x2z-1./16.*os*tx+1./16.
     #    *oc+1./16.*x12*txs-1./16.*x2z*tx)
      zz10s= zz10s+xx*vvs*gsm2*pwtm2*cqti*y*(
     #    zis*o*x12*txs-zis*o*txs+1./2.*zis*os*txs-
     #    zis*x12*txs+1./2.*zis*x12s*txs+1./2.*zis*txs
     #    +1./2.*zi*o*txs+1./2.*zi*x12*txs-1./2.*
     #    zi*txs)
      zz10s= zz10s+xx*vvs*gtm2*pwsm2*cqti*vdt*vut*y*
     #  zxi*(-1./16.*o*x12*tx-1./32.*o*x12+1./32.*o*tx-1./32.
     #    *o*txs+1./16.*os*x12-1./32.*os+1./32.*x12*tx+1./32.*
     #    x12*txs)
      zz10s= zz10s+xx*vvs*gtm2*pwsm2*cqti*vdt*vut*y
     # *(-1./32.*o*tx-1./32.*o+1./32.*os+1./32.*tx)
      zz10s= zz10s+xx*vvs*gtm2*pwsm2*cqti*vuts*y*(
     #    -1./32.*o*tx+1./16.*os)
      zz10s= zz10s+xx*vvq*gtm2*yc*(-1./8.*o*x2z*txs
     #    -1./8.*x12*x2z*txs+1./8.*x2z*txs)
      zz10s= zz10s+bxpi*rl1*vvs*cqti*vet*vut*y*(-
     #    1./32.*o*tx+1./32.*os)
      zz10s= zz10s+bxpi*rl1*vvs*cqti*vut*y*(1./16.*
     #    zi*o*x12*tx-1./16.*zi*o*txs+1./8.*zi*o+1.
     #    /16.*zi*os*tx+1./16.*zi*x12*tx-1./16.*zi*
     #    x12*txs-1./16.*zi*tx+3./16.*o*tx-1./8.*os-1./16.
     #    *tx)
      zz10s= zz10s+bxpi*rl2*vvc*ys*csti*vet*(1./32.
     #    *o*x2z*tx+1./32.*o*txs+1./32.*x12*txs-1./32.*x2z*tx)
      zz10s= zz10s+bxpi*rl2*vvc*ys*csti*(1./8.*
     #    zi*o*x12*tx-1./4.*zi*o*tx-5./8.*zi*o*txs
     #    +1./8.*zi*os*tx-1./8.*zi*x12*tx-5./8.*zi
     #    *x12*txs+1./8.*zi*tx+1./2.*zi*txs-1./4.*o*x2z
     #    *tx+1./8.*o*tx-1./4.*o*txs-1./4.*x12*txs+1./4.*x2z*tx
     #    -1./8.*tx)
      zz10s= zz10s+bxpi*rl3*vvc*gtm2*ys*csti*vut*(
     #    -1./16.*o*x12*tx-3./32.*o*x2z*tx+3./16.*o*tx-1./32.*o
     #    *txs+1./16.*o+1./16.*os*x12+1./16.*os*x2z-1./16.*os*
     #    tx-1./8.*os+1./16.*oc+1./16.*x12*tx-1./32.*x12*txs+
     #    1./32.*x2z*tx-1./16.*tx)
      zz10s= zz10s+bxpi*vvs*gsm2*pwtm2*cqti*vet*y*(
     #    -1./16.*zi*o*x12*tx+1./8.*zi*o*tx+1./16.*
     #    zi*o*txs-1./16.*zi*os*tx+1./16.*zi*x12*tx
     #    +1./16.*zi*x12*txs-1./16.*zi*tx-1./16.*o*tx
     #    +1./16.*tx)
      zz10s= zz10s+bxpi*vvs*gsm2*pwtm2*cqti*y*(-1.
     #    /2.*zis*o*txs-1./2.*zis*x12*txs+1./2.*zis*txs
     #    +1./4.*zi*o*x12*tx-1./2.*zi*o*tx-1./4.*
     #    zi*o*txs+1./4.*zi*os*tx-1./4.*zi*x12*tx-
     #    1./4.*zi*x12*txs+1./4.*zi*tx+1./4.*o*tx-1./4.
     #    *tx)
      zz10s= zz10s+bxpi*vvs*gtm2*pwsm2*cqti*vdt*vut*y*
     #  zxi*(1./64.*o*x12*tx-3./64.*o*tx+3./64.*o*txs-1./32.*o
     #    +1./64.*os*tx+1./64.*x12*tx-1./64.*x12*txs+1./32.*tx
     #    )
      zz10s= zz10s+bxpi*vvs*gtm2*pwsm2*cqti*vdt*vut*y
     # *(3./64.*o*tx-1./32.*os-1./64.*tx)
      zz10s= zz10s+bxpi*vvs*gtm2*pwsm2*cqti*vuts*y
     # *(1./32.*o*tx-1./32.*os)
      zz10s= zz10s+bxpi*vvq*gtm2*yc*(1./16.*o*x12*x2z*tx
     #    +1./8.*o*x12*txs-3./16.*o*x2z*tx+1./16.*o*x2z*txs+1./
     #    16.*o*tx*x2zs-1./4.*o*txs+1./16.*os*x2z*tx+1./16.*os*
     #    txs-1./16.*x12*x2z*tx+1./16.*x12*x2z*txs-1./4.*x12*txs
     #    +1./8.*x2z*tx-1./16.*tx*x2zs+1./16.*x12s*txs+1./8.*
     #    txs)
      zz10s= zz10s+rl1*vvs*cqti*vet*vut*y*(1./32.*
     #    o-1./32.*os)
      zz10s= zz10s+rl1*vvs*cqti*vut*y*bxp*(1./16.*
     #    zi*o+1./16.*zi*x12-1./16.*zi)
      zz10s= zz10s+rl1*vvs*cqti*vut*y*(-1./16.
     #    +1./16.*zi*o*x12-3./16.*zi*o-1./16.*zi*
     #    os-1./8.*zi*x12*tx-1./8.*zi*x12+1./16.*
     #    zi*tx+1./16.*zi+1./16.*o)
      zz10s= zz10s+rl2*vvc*bxps*ys*csti*vet*(1./32.
     #    -1./32.*o-1./32.*x12)
      zz10s= zz10s+rl2*vvc*bxps*ys*csti*(1./8.*
     #    zi*o+1./8.*zi*x12-1./8.*zi)
      zz10s= zz10s+rl2*vvc*ys*csti*vet*bxp*(-1./
     #    32.-1./32.*o*x12+1./32.*o*x2z+1./8.*o-3./32.*os+1./
     #    16.*x12*tx+1./32.*x12-1./32.*x2z-1./32.*tx)
      zz10s= zz10s+rl2*vvc*ys*csti*vet*(1./32.*o*
     #    x12*tx+1./32.*o*x2z*tx-1./16.*o*x2z-1./8.*o*tx-1./32.
     #    *o*txs+1./32.*os*x2z+1./32.*os*tx-1./16.*x12*tx-1./32.
     #    *x12*txs+1./32.*x2z*tx+1./32.*x2z+1./32.*tx)
      zz10s= zz10s+rl2*vvc*ys*csti*bxp*(-1./8.+
     #    1./4.*zi*o*x12-1./2.*zi*o+1./4.*zi*os-1./
     #    4.*zi*x12*tx-1./4.*zi*x12+1./8.*zi*tx+1./
     #    4.*zi*txs+1./4.*zi+1./8.*o+1./4.*tx)
      zz10s= zz10s+rl2*vvc*ys*csti*(1./8.-1./4.*
     #    zi*o*x12+1./4.*zi*o*tx+5./8.*zi*o*txs+3./
     #    8.*zi*o+1./8.*zi*os*x12-3./8.*zi*os+1./8.
     #    *zi*oc+3./8.*zi*x12*tx+5./8.*zi*x12*txs+
     #    1./8.*zi*x12-1./4.*zi*tx-3./4.*zi*txs-1./
     #    8.*zi+3./8.*o*tx-1./4.*o+1./8.*os-1./4.*x2z*tx
     #    -1./8.*tx+1./4.*txs)
      zz10s= zz10s+rl3*vvc*gtm2*ys*csti*vut*bxp*(
     #    -1./32.+1./32.*o+1./32.*x12)
      zz10s= zz10s+rl3*vvc*gtm2*ys*csti*vut*(-1./
     #    32.*o*x2z-3./32.*o-1./16.*x12*tx-1./32.*x12+1./32.*
     #    x2z+1./32.*tx)
      zz10s= zz10s+vvs*gsm2*pwtm2*bxps*cqti*vet*y*(
     #    -1./16.*zi*o-1./16.*zi*x12+1./16.*zi)
      zz10s= zz10s+vvs*gsm2*pwtm2*cqti*vet*y*bxp*(1.
     #    /16.-1./8.*zi*o*x12+1./4.*zi*o-1./8.*zi*
     #    os+1./8.*zi*x12*tx+1./8.*zi*x12-1./16.*
     #    zi*tx-1./8.*zi-1./16.*o)
      zz10s= zz10s+vvs*gsm2*pwtm2*cqti*vet*y*(-1.
     #    /16.+1./8.*zi*o*x12-1./8.*zi*o*tx-1./16.*
     #    zi*o*txs-3./16.*zi*o-1./16.*zi*os*x12+3./
     #    16.*zi*os-1./16.*zi*oc-3./16.*zi*x12*tx-
     #    1./16.*zi*x12*txs-1./16.*zi*x12+1./8.*zi*
     #    tx+1./16.*zi-1./16.*o*tx+1./8.*o-1./16.*os-1./
     #    16.*tx)
      zz10s= zz10s+vvs*gsm2*pwtm2*cqti*vets*y*bxp*(
     #    -1./64.*o+1./64.*os)
      zz10s= zz10s+vvs*gsm2*pwtm2*cqti*vets*y*(1./
     #    64.*o*tx)
      zz10s= zz10s+vvs*gsm2*pwtm2*cqti*y*bxp*(1./4.
     #    *zis*txs+1./4.*zi*tx)
      zz10s= zz10s+vvs*gsm2*pwtm2*cqti*y*(1./2.*
     #    zis*o*txs+1./2.*zis*x12*txs-3./4.*zis*txs+1.
     #    /2.*zi*o*tx+1./4.*zi*x12*tx-1./2.*zi*tx+
     #    1./4.*zi*txs+1./4.*tx)
      zz10s= zz10s+vvs*gtm2*pwsm2*cqti*vdt*vut*y*bxp*
     #  zxi*(1./64.-1./64.*o+1./64.*x12)
      zz10s= zz10s+vvs*gtm2*pwsm2*cqti*vdt*vut*y*zxi
     # *(1./64.*o*x12-1./32.*o*tx+1./32.*o+1./64.*os-1./32.*
     #    x12*tx-1./32.*x12-1./64.*tx)
      zz10s= zz10s+vvs*gtm2*pwsm2*cqti*vdt*vut*y*(
     #    -1./64.+1./64.*o)
      zz10s= zz10s+vvq*gtm2*bxps*yc*(-1./16.+1./16.*
     #    o+1./16.*x12)
      zz10s= zz10s+vvq*gtm2*yc*bxp*(1./16.+1./16.*o*
     #    x12-1./16.*o*x2z-1./16.*o*tx-3./16.*o+1./8.*os-3./
     #    16.*x12*tx-1./16.*x12-1./16.*x2z*tx+1./16.*x2z+1./8.*
     #    tx+1./16.*txs)
      zz10s= zz10s+vvq*gtm2*yc*(-1./8.*o*x12*tx-1./
     #    16.*o*x2z*tx+1./8.*o*x2z+5./16.*o*tx+1./8.*o*txs-1./
     #    16.*os*x2z-1./8.*os*tx+1./16.*x12*x2z*tx+3./16.*x12*tx
     #    +1./8.*x12*txs-1./16.*x2z*tx-1./16.*x2z*txs-1./16.*
     #    x2z+1./16.*tx*x2zs-1./8.*tx-1./8.*txs)
*
      zz20s= xx*rl1*vvs*cqti*vut*y*(-3./4.*zi*o*
     #    x12*tx-3./8.*zi*o*x12+3./4.*zi*o*tx+3./8.*
     #    zi*o*txs+3./8.*zi*o+3./4.*zi*os*x12-3./4.
     #    *zi*os*tx-3./4.*zi*os+3./4.*zi*oc+3./8.*
     #    zi*x12*tx+3./8.*zi*x12*txs-3./8.*zi*tx-3.
     #    /8.*o*tx-3./8.*o+3./8.*os+3./8.*tx)
      zz20s= zz20s+xx*rl2*vvc*ys*csti*(3*zi*o
     #    *x12*txs-3*zi*o*txs+3./2.*zi*os*txs-3*zi
     #    *x12*txs+3./2.*zi*x12s*txs+3./2.*zi*txs+3./2.
     #    *o*txs+3./2.*x12*txs-3./2.*txs)
      zz20s= zz20s+xx*rl3*vvc*gtm2*ys*csti*vut*(
     #    -3./16.*o*x12*tx+3./16.*o*x2z*tx+3./16.*o*x2z+3./16.*
     #    o*txs+3./16.*os*x12-3./16.*os*x2z-3./16.*os*tx+3./16.
     #    *oc+3./16.*x12*txs-3./16.*x2z*tx)
      zz20s= zz20s+xx*vvs*gsm2*pwtm2*cqti*y*(3*
     #    zis*o*x12*txs-3*zis*o*txs+3./2.*zis*os*txs-
     #    3*zis*x12*txs+3./2.*zis*x12s*txs+3./2.*zis*
     #    txs+3./2.*zi*o*txs+3./2.*zi*x12*txs-3./2.*
     #    zi*txs)
      zz20s= zz20s+xx*vvs*gtm2*pwsm2*cqti*vdt*vut*y*
     #  zxi*(-3./16.*o*x12*tx-3./32.*o*x12+3./32.*o*tx-3./32.
     #    *o*txs+3./16.*os*x12-3./32.*os+3./32.*x12*tx+3./32.*
     #    x12*txs)
      zz20s= zz20s+xx*vvs*gtm2*pwsm2*cqti*vdt*vut*y
     # *(-3./32.*o*tx-3./32.*o+3./32.*os+3./32.*tx)
      zz20s= zz20s+xx*vvs*gtm2*pwsm2*cqti*vuts*y*(
     #    -3./32.*o*tx+3./16.*os)
      zz20s= zz20s+xx*vvq*gtm2*yc*(-3./8.*o*x2z*txs
     #    -3./8.*x12*x2z*txs+3./8.*x2z*txs)
      zz20s= zz20s+bxpi*rl1*vvs*cqti*vet*vut*y*(-
     #    1./16.*o*tx+3./32.*os)
      zz20s= zz20s+bxpi*rl1*vvs*cqti*vut*y*(3./16.*
     #    zi*o*x12*tx-3./16.*zi*o*txs+3./8.*zi*o+3.
     #    /16.*zi*os*tx+3./16.*zi*x12*tx-3./16.*zi*
     #    x12*txs-3./16.*zi*tx+7./16.*o*tx-3./8.*os-3./16.
     #    *tx)
      zz20s= zz20s+bxpi*rl2*vvc*ys*csti*vet*(-1./
     #    16.*o*x12*tx+1./32.*o*x2z*tx+1./16.*o*tx+3./32.*o*txs
     #    -1./16.*os*tx+3./32.*x12*txs-3./32.*x2z*tx)
      zz20s= zz20s+bxpi*rl2*vvc*ys*csti*(3./8.*
     #    zi*o*x12*tx-3./4.*zi*o*tx-15./8.*zi*o*txs
     #    +3./8.*zi*os*tx-3./8.*zi*x12*tx-15./8.*
     #    zi*x12*txs+3./8.*zi*tx+3./2.*zi*txs+1./4.
     #    *o*x12*tx-1./2.*o*x2z*tx+1./8.*o*tx-3./4.*o*txs+1./4.
     #    *os*tx-3./4.*x12*txs+3./4.*x2z*tx-3./8.*tx)
      zz20s= zz20s+bxpi*rl3*vvc*gtm2*ys*csti*vut*(
     #    -1./8.*o*x12*tx-7./32.*o*x2z*tx+1./2.*o*tx-3./32.*o*
     #    txs+3./16.*o+3./16.*os*x12+3./16.*os*x2z-1./8.*os*tx
     #    -3./8.*os+3./16.*oc+3./16.*x12*tx-3./32.*x12*txs+3./
     #    32.*x2z*tx-3./16.*tx)
      zz20s= zz20s+bxpi*vvs*gsm2*pwtm2*cqti*vet*y*(
     #    -3./16.*zi*o*x12*tx+3./8.*zi*o*tx+3./16.*
     #    zi*o*txs-3./16.*zi*os*tx+3./16.*zi*x12*tx
     #    +3./16.*zi*x12*txs-3./16.*zi*tx-1./16.*o*tx
     #    +3./16.*tx)
      zz20s= zz20s+bxpi*vvs*gsm2*pwtm2*cqti*vets*y
     # *(-1./64.*o*tx)
      zz20s= zz20s+bxpi*vvs*gsm2*pwtm2*cqti*y*(-3.
     #    /2.*zis*o*txs-3./2.*zis*x12*txs+3./2.*zis*txs
     #    +3./4.*zi*o*x12*tx-3./2.*zi*o*tx-3./4.*
     #    zi*o*txs+3./4.*zi*os*tx-3./4.*zi*x12*tx-
     #    3./4.*zi*x12*txs+3./4.*zi*tx+1./2.*o*tx-3./4.
     #    *tx)
      zz20s= zz20s+bxpi*vvs*gtm2*pwsm2*cqti*vdt*vut*y*
     #  zxi*(3./64.*o*x12*tx-9./64.*o*tx+7./64.*o*txs-3./32.*o
     #    +1./64.*os*tx+3./64.*x12*tx-3./64.*x12*txs+3./32.*tx
     #    )
      zz20s= zz20s+bxpi*vvs*gtm2*pwsm2*cqti*vdt*vut*y
     # *(7./64.*o*tx-3./32.*os-3./64.*tx)
      zz20s= zz20s+bxpi*vvs*gtm2*pwsm2*cqti*vuts*y
     # *(5./64.*o*tx-3./32.*os)
      zz20s= zz20s+bxpi*vvq*gtm2*yc*(1./16.*o*x12*x2z*tx
     #    +1./8.*o*x12*tx+3./8.*o*x12*txs-7./16.*o*x2z*tx+3./16.
     #    *o*x2z*txs-1./16.*o*tx*x12s+1./8.*o*tx*x2zs-1./16.*o*tx
     #    -3./4.*o*txs-1./8.*os*x12*tx+1./16.*os*x2z*tx+1./8.*
     #    os*tx+3./16.*os*txs-1./16.*oc*tx-3./16.*x12*x2z*tx+3./
     #    16.*x12*x2z*txs-3./4.*x12*txs+3./8.*x2z*tx-3./16.*tx*
     #    x2zs+3./16.*x12s*txs+3./8.*txs)
      zz20s= zz20s+rl1*vvs*cqti*vet*vut*y*(1./32.*
     #    o-1./32.*os)
      zz20s= zz20s+rl1*vvs*cqti*vut*y*bxp*(1./16.*
     #    zi*o+1./16.*zi*x12-1./16.*zi)
      zz20s= zz20s+rl1*vvs*cqti*vut*y*(-1./16.
     #    +1./16.*zi*o*x12-1./8.*zi*o*tx-7./16.*zi
     #    *o-1./16.*zi*os-1./4.*zi*x12*tx-1./8.*zi
     #    *x12+3./16.*zi*tx+1./16.*zi+1./16.*o)
      zz20s= zz20s+rl2*vvc*bxps*ys*csti*vet*(1./32.
     #    -1./32.*o-1./32.*x12)
      zz20s= zz20s+rl2*vvc*bxps*ys*csti*(1./8.*
     #    zi*o+1./8.*zi*x12-1./8.*zi)
      zz20s= zz20s+rl2*vvc*ys*csti*vet*bxp*(-1./
     #    32.-1./32.*o*x12+1./32.*o*x2z+1./8.*o-3./32.*os+1./
     #    16.*x12*tx+1./32.*x12-1./32.*x2z-1./32.*tx)
      zz20s= zz20s+rl2*vvc*ys*csti*vet*(1./32.*o*
     #    x12*tx+1./32.*o*x2z*tx-1./16.*o*x2z-3./16.*o*tx-1./32.
     #    *o*txs+1./32.*os*x2z+1./32.*os*tx-1./8.*x12*tx-1./32.
     #    *x12*txs+1./32.*x2z*tx+1./32.*x2z+3./32.*tx)
      zz20s= zz20s+rl2*vvc*ys*csti*bxp*(-1./8.+
     #    1./4.*zi*o*x12-1./2.*zi*o+1./4.*zi*os-1./
     #    4.*zi*x12*tx-1./4.*zi*x12+1./8.*zi*tx+1./
     #    4.*zi*txs+1./4.*zi+1./8.*o+1./4.*tx)
      zz20s= zz20s+rl2*vvc*ys*csti*(1./8.-1./4.*
     #    zi*o*x12+1./2.*zi*o*tx+13./8.*zi*o*txs+3.
     #    /8.*zi*o+1./8.*zi*os*x12-3./8.*zi*os+1./
     #    8.*zi*oc+5./8.*zi*x12*tx+13./8.*zi*x12*txs
     #    +1./8.*zi*x12-1./2.*zi*tx-7./4.*zi*txs
     #    -1./8.*zi+7./8.*o*tx-1./4.*o+1./8.*os+1./2.*
     #    x12*tx-1./4.*x2z*tx-5./8.*tx+1./4.*txs)
      zz20s= zz20s+rl3*vvc*gtm2*ys*csti*vut*bxp*(
     #    -1./32.+1./32.*o+1./32.*x12)
      zz20s= zz20s+rl3*vvc*gtm2*ys*csti*vut*(-1./
     #    32.*o*x2z-1./16.*o*tx-7./32.*o-1./8.*x12*tx-1./32.*
     #    x12+1./32.*x2z+3./32.*tx)
      zz20s= zz20s+vvs*gsm2*pwtm2*bxps*cqti*vet*y*(
     #    -1./16.*zi*o-1./16.*zi*x12+1./16.*zi)
      zz20s= zz20s+vvs*gsm2*pwtm2*cqti*vet*y*bxp*(1.
     #    /16.-1./8.*zi*o*x12+1./4.*zi*o-1./8.*zi*
     #    os+1./8.*zi*x12*tx+1./8.*zi*x12-1./16.*
     #    zi*tx-1./8.*zi-1./16.*o)
      zz20s= zz20s+vvs*gsm2*pwtm2*cqti*vet*y*(-1.
     #    /16.+1./8.*zi*o*x12-1./4.*zi*o*tx-1./16.*
     #    zi*o*txs-3./16.*zi*o-1./16.*zi*os*x12+3./
     #    16.*zi*os-1./16.*zi*oc-5./16.*zi*x12*tx-
     #    1./16.*zi*x12*txs-1./16.*zi*x12+1./4.*zi*
     #    tx+1./16.*zi-1./16.*o*tx+1./8.*o-1./16.*os-1./
     #    16.*tx)
      zz20s= zz20s+vvs*gsm2*pwtm2*cqti*vets*y*bxp*(
     #    -1./64.*o+1./64.*os)
      zz20s= zz20s+vvs*gsm2*pwtm2*cqti*vets*y*(1./
     #    64.*o*tx)
      zz20s= zz20s+vvs*gsm2*pwtm2*cqti*y*bxp*(1./4.
     #    *zis*txs+1./4.*zi*tx)
      zz20s= zz20s+vvs*gsm2*pwtm2*cqti*y*(3./2.*
     #    zis*o*txs+3./2.*zis*x12*txs-7./4.*zis*txs+
     #    zi*o*tx+3./4.*zi*x12*tx-zi*tx+1./4.*
     #    zi*txs+1./4.*tx)
      zz20s= zz20s+vvs*gtm2*pwsm2*cqti*vdt*vut*y*bxp*
     #  zxi*(1./64.-1./64.*o+1./64.*x12)
      zz20s= zz20s+vvs*gtm2*pwsm2*cqti*vdt*vut*y*zxi
     # *(1./64.*o*x12-1./32.*o*tx+3./32.*o+1./64.*os-1./16.*
     #    x12*tx-1./32.*x12-3./64.*tx)
      zz20s= zz20s+vvs*gtm2*pwsm2*cqti*vdt*vut*y*(
     #    -1./64.+1./64.*o)
      zz20s= zz20s+vvq*gtm2*bxps*yc*(-1./16.+1./16.*
     #    o+1./16.*x12)
      zz20s= zz20s+vvq*gtm2*yc*bxp*(1./16.+1./16.*o*
     #    x12-1./16.*o*x2z-1./16.*o*tx-3./16.*o+1./8.*os-3./
     #    16.*x12*tx-1./16.*x12-1./16.*x2z*tx+1./16.*x2z+1./8.*
     #    tx+1./16.*txs)
      zz20s= zz20s+vvq*gtm2*yc*(-3./8.*o*x12*tx-3./
     #    16.*o*x2z*tx+1./8.*o*x2z+3./4.*o*tx+3./8.*o*txs-1./16.
     #    *os*x2z-1./4.*os*tx-1./16.*x12*x2z*tx+9./16.*x12*tx+3.
     #    /8.*x12*txs+1./16.*x2z*tx-1./16.*x2z*txs-1./16.*x2z-1.
     #    /8.*tx*x12s+1./16.*tx*x2zs-3./8.*tx-3./8.*txs)
*
      zz30s= bxpi*rl1*vvs*cqti*vet*vut*y*(-1./32.*o*tx
     #    +1./32.*os)
      zz30s= zz30s+bxpi*rl1*vvs*cqti*vut*y*(1./4.
     #    -5./32.*zi*o*x12+5./8.*zi*o-1./4.*zi*os
     #    +5./32.*zi*x12-1./8.*zi*tx+3./32.*zi*
     #    x12s-1./4.*zi-3./8.*o+3./32.*x12+1./8.*tx)
      zz30s= zz30s+bxpi*rl2*vvs*pwsc*cqti*vut*y*(
     #    -1./16.-5./32.*zi*o*x12+1./16.*zi*o*tx-1./8.
     #    *zi*o+1./16.*zi*x12*tx+3./32.*zi*x12-5./
     #    32.*zi*x12s+1./16.*zi+1./16.*o-5./32.*x12)
      zz30s= zz30s+bxpi*rl2*vvc*ys*csti*vet*(1./32.
     #    *o*x2z*tx+1./32.*o*txs+1./32.*x12*txs-1./32.*x2z*tx)
      zz30s= zz30s+bxpi*rl2*vvc*ys*csti*(1./2.*
     #    zi*o*x12*tx-1./2.*zi*o*tx-1./2.*zi*o*txs
     #    +1./4.*zi*os*tx-1./2.*zi*x12*tx-1./2.*zi
     #    *x12*txs+1./4.*zi*tx*x12s+1./4.*zi*tx+1./2.*
     #    zi*txs+1./4.*o*tx+1./4.*x12*tx-1./4.*tx-1./2.*
     #    txs)
      zz30s= zz30s+bxpi*rl3*vvc*gtm2*ys*csti*vut*(
     #    -1./64.*o*x12+1./8.*o*x2z+1./16.*o*tx-1./16.*os+1./
     #    64.*x12*x2z+1./64.*x12*tx-1./16.*x2z*tx-1./16.*x2z)
      zz30s= zz30s+bxpi*vvs*gs*gtc*pws*pwt*cqti*vut*y
     # *(-1./32.-5./64.*zi*o*x12+1./32.*zi*o*tx-1./
     #    16.*zi*o+1./32.*zi*x12*tx+3./64.*zi*x12-
     #    5./64.*zi*x12s+1./32.*zi+1./32.*o-5./64.*x12
     #    )
      zz30s= zz30s+bxpi*vvs*gsm2*pwtm2*cqti*vet*y*(
     #    1./32.-7./64.*zi*o*x12*tx-1./8.*zi*o*x12+3./
     #    32.*zi*o*tx+1./32.*zi*o*x12s+1./16.*zi*o*
     #    txs+3./32.*zi*o+1./16.*zi*os*x12-1./32.*
     #    zi*os*tx-3./32.*zi*os+1./32.*zi*oc+9./64.
     #    *zi*x12*tx+1./16.*zi*x12*txs+1./16.*zi*x12
     #    -5./64.*zi*tx*x12s-1./16.*zi*tx-1./32.*
     #    zi*x12s-1./32.*zi+1./32.*o*x12-1./32.*o*x2z
     #    -1./32.*o*tx-1./16.*o+1./32.*os-5./64.*x12*tx-1./32.
     #    *x12+1./32.*x2z+1./16.*tx)
      zz30s= zz30s+bxpi*vvs*gsm2*pwtm2*cqti*y*(1./4.
     #    *zis*o*x12*tx-1./2.*zis*o*txs-1./4.*zis*x12*
     #    tx-1./2.*zis*x12*txs+1./4.*zis*tx*x12s+1./2.*
     #    zis*txs+1./4.*zi*x12*tx-1./2.*zi*txs)
      zz30s= zz30s+bxpi*vvs*gtm2*pwsm2*cqti*vdt*vut*y*
     #  zxi*(-1./64.*o*x12+1./32.*o-1./64.*os+3./128.*x12*tx
     #    +1./32.*x12+3./128.*x12s)
      zz30s= zz30s+bxpi*vvs*gtm2*pwsm2*cqti*vdt*vut*y
     # *(1./32.-3./64.*o+3./128.*x12+1./32.*tx)
      zz30s= zz30s+bxpi*vvs*gtm2*pwsm2*cqti*vuts*y
     # *(-1./32.*o)
      zz30s= zz30s+bxpi*vvq*gtm2*yc*(-1./8.*o*x2zs-1.
     #    /8.*x12*x2z*tx-1./8.*x12*x2zs+1./8.*x2z*tx+1./8.*x2z*
     #    txs+1./8.*x2zs)
      zz30s= zz30s+rl1*vvs*cqti*vet*vut*y*(1./32.*
     #    o-1./32.*os)
      zz30s= zz30s+rl1*vvs*cqti*vut*y*bxp*(13./32.*
     #    zi*o+1./8.*zi*x12-17./64.*zi)
      zz30s= zz30s+rl1*vvs*cqti*vut*y*(-17./64.
     #    +7./64.*zi*o*x12+9./64.*zi*o*tx-33./32.*
     #    zi*o+3./16.*zi*os+9./64.*zi*x12*tx-17./
     #    64.*zi*x12+1./8.*zi*tx-5./64.*zi*x12s+33.
     #    /64.*zi+17./64.*o-1./32.*x12)
      zz30s= zz30s+rl2*vvs*pwsc*cqti*vut*y*bxp*(-
     #    7./32.*zi*o-1./16.*zi*x12+9./64.*zi)
      zz30s= zz30s+rl2*vvs*pwsc*cqti*vut*y*(9./64.
     #    +5./64.*zi*o*x12-9./64.*zi*o*tx+5./16.*
     #    zi*o-1./32.*zi*os-9./64.*zi*x12*tx-5./64.
     #    *zi*x12+7./64.*zi*x12s-13./64.*zi-9./64.
     #    *o+1./32.*x12)
      zz30s= zz30s+rl2*vvc*bxps*ys*csti*vet*(7./128.
     #    -7./128.*o-7./128.*x12)
      zz30s= zz30s+rl2*vvc*bxps*ys*csti*(1./4.*
     #    zi*o+1./4.*zi*x12-1./4.*zi)
      zz30s= zz30s+rl2*vvc*ys*csti*vet*bxp*(-1./
     #    32.*o*x12+9./128.*o*x2z-1./128.*o*tx+5./64.*o-5./64.*
     #    os+3./128.*x12*x2z+1./32.*x12*tx+5./128.*x12-9./128.*
     #    x2z-3./64.*tx-1./128.*x12s)
      zz30s= zz30s+rl2*vvc*ys*csti*vet*(3./64.*o*
     #    x12*tx+1./32.*o*x2z*tx-1./64.*o*x2z-5./32.*o*tx-1./64.
     #    *o*x2zs-1./64.*o*txs+1./64.*os*x2z+3./64.*os*tx+1./64.
     #    *x12*x2z*tx-1./64.*x12*x2z-5./64.*x12*tx-1./64.*x12*txs
     #    +3./64.*x2z*tx+1./32.*tx+1./64.*x2zs)
      zz30s= zz30s+rl2*vvc*ys*csti*bxp*(-9./32.
     #    +3./8.*zi*o*x12+3./32.*zi*o*tx-11./16.*
     #    zi*o+11./32.*zi*os-9./32.*zi*x12*tx-3./8.
     #    *zi*x12+5./32.*zi*tx+1./32.*zi*x12s+1./4.
     #    *zi*txs+11./32.*zi+9./32.*o+1./32.*x12+1./4.
     #    *tx)
      zz30s= zz30s+rl2*vvc*ys*csti*(3./32.-5./16.
     #    *zi*o*x12*tx+15./32.*zi*o*tx-5./32.*zi*o*
     #    x12s+19./32.*zi*o*txs+9./32.*zi*o-1./16.*
     #    zi*os*tx-9./32.*zi*os+3./32.*zi*oc+23./
     #    32.*zi*x12*tx+19./32.*zi*x12*txs-1./4.*zi*
     #    tx*x12s-13./32.*zi*tx+5./32.*zi*x12s-1./16.*
     #    zi*x12c-3./4.*zi*txs-3./32.*zi-3./32.*o*
     #    x12-1./32.*o*x2z+1./8.*o*tx-3./16.*o+3./32.*os+3./
     #    32.*x12*x2z+3./32.*x12-1./4.*x2z*tx+1./32.*x2z+5./32.
     #    *tx-1./16.*x12s+1./4.*txs)
      zz30s= zz30s+rl3*vvc*gtm2*ys*csti*vut*bxp*(
     #    -7./128.+11./128.*o+3./64.*x12)
      zz30s= zz30s+rl3*vvc*gtm2*ys*csti*vut*(1./16.
     #    +1./16.*o*x12-5./128.*o*x2z-1./128.*o*tx-15./64.*o+
     #    13./128.*os+1./64.*x12*x2z-1./128.*x12*tx-5./64.*x12+
     #    7./128.*x2z+1./16.*tx+1./128.*x12s)
      zz30s= zz30s+vvs*gs*gtc*pws*pwt*cqti*vut*y*bxp
     # *(-7./64.*zi*o-1./32.*zi*x12+9./128.*zi
     #    )
      zz30s= zz30s+vvs*gs*gtc*pws*pwt*cqti*vut*y*(
     #    9./128.+5./128.*zi*o*x12-9./128.*zi*o*tx+5./
     #    32.*zi*o-1./64.*zi*os-9./128.*zi*x12*tx-
     #    5./128.*zi*x12+7./128.*zi*x12s-13./128.*zi
     #    -9./128.*o+1./64.*x12)
      zz30s= zz30s+vvs*gsm2*pwtm2*bxps*cqti*vet*y*(
     #    -7./64.*zi*o-3./32.*zi*x12+7./64.*zi)
      zz30s= zz30s+vvs*gsm2*pwtm2*cqti*vet*y*bxp*(1.
     #    /8.-25./128.*zi*o*x12-3./64.*zi*o*tx+3./8.*
     #    zi*o-3./16.*zi*os+3./64.*zi*x12*tx+27./
     #    128.*zi*x12-1./16.*zi*tx-1./128.*zi*x12s
     #    -3./16.*zi-1./8.*o-1./32.*x12)
      zz30s= zz30s+vvs*gsm2*pwtm2*cqti*vet*y*(-7.
     #    /64.+7./128.*zi*o*x12*tx+15./64.*zi*o*x12-7./
     #    64.*zi*o*tx-5./128.*zi*o*x12s-1./16.*zi*o*
     #    txs-19./64.*zi*o-15./128.*zi*os*x12-1./64.*
     #    zi*os*tx+17./64.*zi*os-5./64.*zi*oc-17./
     #    64.*zi*x12*tx-1./16.*zi*x12*txs-15./128.*
     #    zi*x12+9./128.*zi*tx*x12s+1./8.*zi*tx+1./
     #    128.*zi*x12s+7./64.*zi-5./128.*o*x12+1./64.*o
     #    *x2z-5./64.*o*tx+3./16.*o-5./64.*os+1./32.*x12*tx+1.
     #    /128.*x12-1./64.*x2z-1./16.*tx)
      zz30s= zz30s+vvs*gsm2*pwtm2*cqti*vets*y*bxp*(
     #    -1./64.*o+1./64.*os)
      zz30s= zz30s+vvs*gsm2*pwtm2*cqti*vets*y*(1./
     #    64.*o*tx)
      zz30s= zz30s+vvs*gsm2*pwtm2*cqti*y*bxp*(-1./
     #    8.*zis*x12*tx+1./4.*zis*txs+1./4.*zi*tx)
      zz30s= zz30s+vvs*gsm2*pwtm2*cqti*y*(-1./4.
     #    *zis*o*x12*tx+1./2.*zis*o*txs+3./8.*zis*x12*
     #    tx+1./2.*zis*x12*txs-1./4.*zis*tx*x12s-3./4.*
     #    zis*txs+1./4.*zi*o*tx+1./8.*zi*x12*tx-1./
     #    4.*zi*tx+1./4.*zi*txs+1./4.*tx)
      zz30s= zz30s+vvs*gtm2*pwsm2*cqti*vdt*vut*y*bxp*
     #  zxi*(5./256.+5./128.*x12)
      zz30s= zz30s+vvs*gtm2*pwsm2*cqti*vdt*vut*y*zxi
     # *(-1./32.+5./256.*o*x12-3./256.*o*tx+1./256.*o+1./
     #    128.*os-3./256.*x12*tx-19./256.*x12-1./32.*tx-3./256.
     #    *x12s)
      zz30s= zz30s+vvs*gtm2*pwsm2*cqti*vdt*vut*y*(
     #    -5./256.+3./256.*o-1./128.*x12)
      zz30s= zz30s+vvq*gtm2*bxps*yc*(-1./8.+1./8.*o
     #    +1./8.*x12)
      zz30s= zz30s+vvq*gtm2*yc*bxp*(3./16.+5./16.*o*
     #    x12-3./16.*o*x2z-1./16.*o*tx-3./8.*o+3./16.*os-1./
     #    16.*x12*x2z-3./16.*x12*tx-3./8.*x12-1./16.*x2z*tx+3./
     #    16.*x2z+3./16.*tx+3./16.*x12s+1./16.*txs)
      zz30s= zz30s+vvq*gtm2*yc*(-1./4.*o*x12*x2z-1./
     #    16.*o*x12*tx+7./16.*o*x2z+1./8.*o*tx+1./16.*o*x2zs+1./
     #    16.*o*txs-1./8.*os*x2z+1./16.*x12*x2z*tx+7./16.*x12*x2z
     #    +1./4.*x12*tx+1./16.*x12*txs-3./16.*x2z*tx-1./8.*x2z*
     #    x12s-1./16.*x2z*txs-5./16.*x2z-1./16.*tx*x12s+1./16.*
     #    tx*x2zs-1./8.*tx-1./16.*x2zs-1./8.*txs)
      zz30s= zz30s+re(gs*gtc*pws*pwt)*bxpi*vvs*cqti*
     #  vut*y*(1./16.+5./32.*zi*o*x12-1./16.*zi*o*tx+
     #    1./8.*zi*o-1./16.*zi*x12*tx-3./32.*zi*x12
     #    +5./32.*zi*x12s-1./16.*zi-1./16.*o+5./32.*
     #    x12)
      zz30s= zz30s+re(gs*gtc*pws*pwt)*vvs*cqti*vut*y*
     # bxp*(7./32.*zi*o+1./16.*zi*x12-9./64.*zi)
      zz30s= zz30s+re(gs*gtc*pws*pwt)*vvs*cqti*vut*y
     # *(-9./64.-5./64.*zi*o*x12+9./64.*zi*o*tx-5./
     #    16.*zi*o+1./32.*zi*os+9./64.*zi*x12*tx+5.
     #    /64.*zi*x12-7./64.*zi*x12s+13./64.*zi+9./
     #    64.*o-1./32.*x12)
*
      zz40s= xx*rl1*vvs*cqti*vet*vut*y*(-1./16.*o*tx
     #    +1./16.*os)
      zz40s= zz40s+xx*rl1*vvs*cqti*vut*y*(1./8.*
     #    zi*o*x12*tx-1./4.*zi*o*tx-1./8.*zi*o*txs
     #    +1./8.*zi*os*tx-1./8.*zi*x12*tx-1./8.*zi
     #    *x12*txs+1./8.*zi*tx+3./8.*o*tx-1./4.*os-1./8.*
     #    tx)
      zz40s= zz40s+xx*rl2*vvc*ys*csti*vet*(1./16.*
     #    o*x2z*tx+1./16.*o*txs+1./16.*x12*txs-1./16.*x2z*tx)
      zz40s= zz40s+xx*rl2*vvc*ys*csti*(-1./2.*o*
     #    x2z*tx-1./2.*o*txs-1./2.*x12*txs+1./2.*x2z*tx)
      zz40s= zz40s+xx*rl3*vvc*gtm2*ys*csti*vut*(
     #    -1./8.*o*x12*tx-3./16.*o*x2z*tx+1./8.*o*tx-1./16.*o*
     #    txs+1./8.*os*x12+1./8.*os*x2z-1./8.*os*tx-1./8.*os+
     #    1./8.*oc-1./16.*x12*txs+1./16.*x2z*tx)
      zz40s= zz40s+xx*vvs*gsm2*pwtm2*cqti*vet*y*(
     #    -1./8.*zi*o*x12*tx+1./4.*zi*o*tx+1./8.*
     #    zi*o*txs-1./8.*zi*os*tx+1./8.*zi*x12*tx+
     #    1./8.*zi*x12*txs-1./8.*zi*tx-1./8.*o*tx+1./8.
     #    *tx)
      zz40s= zz40s+xx*vvs*gsm2*pwtm2*cqti*y*(1./2.
     #    *zi*o*x12*tx-zi*o*tx-1./2.*zi*o*txs+1./2.
     #    *zi*os*tx-1./2.*zi*x12*tx-1./2.*zi*x12*txs
     #    +1./2.*zi*tx+1./2.*o*tx-1./2.*tx)
      zz40s= zz40s+xx*vvs*gtm2*pwsm2*cqti*vdt*vut*y*
     #  zxi*(1./32.*o*x12*tx-1./32.*o*tx+3./32.*o*txs+1./32.*os
     #    *tx-1./32.*x12*tx-1./32.*x12*txs)
      zz40s= zz40s+xx*vvs*gtm2*pwsm2*cqti*vdt*vut*y
     # *(3./32.*o*tx-1./16.*os-1./32.*tx)
      zz40s= zz40s+xx*vvs*gtm2*pwsm2*cqti*vuts*y*(
     #    1./16.*o*tx-1./16.*os)
      zz40s= zz40s+xx*vvq*gtm2*yc*(1./8.*o*x12*x2z*tx
     #    +1./4.*o*x12*txs-1./4.*o*x2z*tx+1./8.*o*x2z*txs+1./8.
     #    *o*tx*x2zs-1./8.*o*txs+1./8.*os*x2z*tx+1./8.*os*txs-1.
     #    /8.*x12*x2z*tx+1./8.*x12*x2z*txs-1./8.*x12*txs+1./8.*
     #    x2z*tx-1./8.*tx*x2zs+1./8.*x12s*txs)
      zz40s= zz40s+bxpi*rl1*vvs*cqti*vet*vut*y*(1./
     #    16.*o*tx)
      zz40s= zz40s+bxpi*rl1*vvs*cqti*vut*y*(-1./8.
     #    *zi*o*tx-1./8.*zi*x12*tx+1./8.*zi*tx-1./
     #    4.*o*tx)
      zz40s= zz40s+bxpi*rl2*vvc*ys*csti*vet*(-1./
     #    8.*o*x12*tx-1./8.*o*x2z*tx+1./4.*o*tx-1./8.*os*tx+1./
     #    16.*x12*tx-1./16.*tx)
      zz40s= zz40s+bxpi*rl2*vvc*ys*csti*(-1./4.*
     #    zi*o*x12*tx+1./2.*zi*o*tx+1./4.*zi*o*txs
     #    -1./4.*zi*os*tx+1./4.*zi*x12*tx+1./4.*zi
     #    *x12*txs-1./4.*zi*tx+1./2.*o*x12*tx+1./2.*o*x2z*tx
     #    -3./2.*o*tx+1./2.*os*tx-1./2.*x12*tx+3./4.*tx)
      zz40s= zz40s+bxpi*rl3*vvc*gtm2*ys*csti*vut*(1.
     #    /8.*o*x12*tx+1./8.*o*x2z*tx-3./8.*o*tx+1./8.*os*tx+1./
     #    8.*os-1./16.*x12*tx+1./16.*tx)
      zz40s= zz40s+bxpi*vvs*gsm2*pwtm2*cqti*vet*y*(
     #    1./8.*zi*o*tx+1./8.*zi*x12*tx-1./8.*zi*tx
     #    +1./4.*o*tx)
      zz40s= zz40s+bxpi*vvs*gsm2*pwtm2*cqti*vets*y
     # *(-1./32.*o*tx)
      zz40s= zz40s+bxpi*vvs*gsm2*pwtm2*cqti*y*(-1.
     #    /2.*zi*o*tx-1./2.*zi*x12*tx+1./2.*zi*tx-
     #    1./2.*o*tx)
      zz40s= zz40s+bxpi*vvs*gtm2*pwsm2*cqti*vdt*vut*y*
     #  zxi*(3./32.*o*tx-1./16.*o*txs-1./16.*os*tx-1./32.*x12*
     #    tx-1./32.*tx)
      zz40s= zz40s+bxpi*vvs*gtm2*pwsm2*cqti*vdt*vut*y
     # *(-1./16.*o*tx)
      zz40s= zz40s+bxpi*vvs*gtm2*pwsm2*cqti*vuts*y
     # *(-1./32.*o*tx)
      zz40s= zz40s+bxpi*vvq*gtm2*yc*(-1./4.*o*x12*x2z*
     #    tx+5./8.*o*x12*tx+5./8.*o*x2z*tx-1./8.*o*tx*x12s-1./8.
     #    *o*tx*x2zs-1./2.*o*tx+1./8.*o*txs-1./4.*os*x12*tx-1./
     #    4.*os*x2z*tx+1./2.*os*tx-1./8.*oc*tx+1./8.*x12*x2z*tx
     #    -1./4.*x12*tx+1./8.*x12*txs-1./4.*x2z*tx+1./8.*tx*
     #    x12s+1./8.*tx)
      zz40s= zz40s+rl1*vvs*cqti*vut*y*(1./8.*
     #    zi*o*tx+1./8.*zi*x12*tx-1./8.*zi*tx)
      zz40s= zz40s+rl2*vvc*ys*csti*vet*(-1./16.*
     #    x12*tx+1./16.*tx)
      zz40s= zz40s+rl2*vvc*ys*csti*bxp*(1./4.*
     #    zi*o*tx+1./4.*zi*x12*tx-1./4.*zi*tx)
      zz40s= zz40s+rl2*vvc*ys*csti*(1./4.*zi*
     #    o*x12*tx-3./4.*zi*o*tx-1./4.*zi*o*txs+1./4.*
     #    zi*os*tx-1./2.*zi*x12*tx-1./4.*zi*x12*txs
     #    +1./2.*zi*tx+1./2.*o*tx+1./2.*x12*tx-3./4.*tx)
      zz40s= zz40s+rl3*vvc*gtm2*ys*csti*vut*(1./8.
     #    *o*tx-1./8.*os+1./16.*x12*tx-1./16.*tx)
      zz40s= zz40s+vvs*gsm2*pwtm2*cqti*vet*y*(-1.
     #    /8.*zi*o*tx-1./8.*zi*x12*tx+1./8.*zi*tx)
      zz40s= zz40s+vvs*gsm2*pwtm2*cqti*y*(1./2.*
     #    zi*o*tx+1./2.*zi*x12*tx-1./2.*zi*tx)
      zz40s= zz40s+vvs*gtm2*pwsm2*cqti*vdt*vut*y*zxi
     # *(-1./32.*o*tx+1./32.*x12*tx+1./32.*tx)
      zz40s= zz40s+vvq*gtm2*yc*bxp*(1./8.*o*tx+1./8.*
     #    x12*tx-1./8.*tx)
      zz40s= zz40s+vvq*gtm2*yc*(-1./8.*o*x12*tx-1./
     #    8.*o*x2z*tx-1./8.*o*tx-1./8.*o*txs-1./8.*x12*x2z*tx+1.
     #    /8.*x12*tx-1./8.*x12*txs+1./4.*x2z*tx-1./8.*tx*x12s)
      zz10c= rs1wz(1)*xx*vvc*gtm2*ys*csti*vut*(-1./8.*
     #    o*x12*tx+1./8.*o*x2z*tx+1./8.*o*x2z+1./8.*o*txs+1./8.
     #    *os*x12-1./8.*os*x2z-1./8.*os*tx+1./8.*oc+1./8.*x12*
     #    txs-1./8.*x2z*tx)
      zz10c= zz10c+rs1wz(1)*bxpi*vvc*gtm2*ys*csti*vut
     # *(-1./8.*o*x12*tx-3./16.*o*x2z*tx+3./8.*o*tx-1./16.*o
     #    *txs+1./8.*o+1./8.*os*x12+1./8.*os*x2z-1./8.*os*tx-
     #    1./4.*os+1./8.*oc+1./8.*x12*tx-1./16.*x12*txs+1./16.*
     #    x2z*tx-1./8.*tx)
      zz10c= zz10c+rs1wz(1)*vvc*gtm2*ys*csti*vut*bxp
     # *(-1./16.+1./16.*o+1./16.*x12)
      zz10c= zz10c+rs1wz(1)*vvc*gtm2*ys*csti*vut*(
     #    -1./16.*o*x2z-3./16.*o-1./8.*x12*tx-1./16.*x12+1./
     #    16.*x2z+1./16.*tx)
      zz10c= zz10c+rs1wz(4)*xx*vvc*gtm2*ys*csti*vut
     # *(-1./32.*o*x2z*txs+1./32.*o*tx*x2zs-1./16.*o*x2zs-1./
     #    32.*x12*x2z*txs+1./32.*tx*x2zs)
      zz10c= zz10c+rs1wz(4)*bxpi*vvc*gtm2*ys*csti*vut
     # *(1./16.*o*x12*x2z+1./32.*o*x12*txs-1./64.*o*x2z*tx+1./
     #    32.*o*x2z*txs-1./8.*o*x2z-1./32.*o*tx*x2zs+3./64.*o*
     #    x2zs-1./32.*o*txs+1./16.*os*x2z-1./64.*os*x2zs+1./64.
     #    *os*txs-3./64.*x12*x2z*tx+1./32.*x12*x2z*txs-1./32.*x12
     #    *txs+1./16.*x2z*tx-1./32.*tx*x2zs+1./64.*x12s*txs)
      zz10c= zz10c+rs1wz(4)*vvc*gtm2*ys*csti*vut*bxp
     # *(-1./64.*os-1./32.*x12+1./64.*x12s)
      zz10c= zz10c+rs1wz(4)*vvc*gtm2*ys*csti*vut*(
     #    1./64.*o*x12*x2z-1./16.*o*x12*tx-1./16.*o*x12+1./64.*o*
     #    x2z+3./64.*o*tx+1./64.*o*x12s+1./16.*o+1./32.*os*x12
     #    +1./64.*os*x2z-1./32.*os*tx-1./16.*os+1./64.*oc+1./
     #    32.*x12*x2z+3./64.*x12*tx-1./32.*tx*x12s-1./32.*tx)
      zz10c= zz10c+rs1wz(7)*xx*vvc*gtm2*ys*csti*vut
     # *(1./64.*o*x2z*txs+1./64.*o*tx*x2zs+1./64.*x12*x2z*txs-
     #    1./64.*tx*x2zs)
      zz10c= zz10c+rs1wz(7)*bxpi*vvc*gtm2*ys*csti*vut
     # *(-1./64.*o*x12*x2z*tx+1./64.*o*x12*x2z-1./64.*o*x12*
     #    txs+5./128.*o*x2z*tx-1./64.*o*x2z*txs-1./64.*o*tx*x2zs
     #    +1./128.*o*x2zs+1./64.*o*txs-1./64.*os*x2z*tx+1./64.*
     #    os*x2z-1./128.*os*x2zs-1./128.*os*txs+3./128.*x12*x2z*
     #    tx-1./64.*x12*x2z*txs+1./64.*x12*txs-1./32.*x2z*tx+1./
     #    64.*tx*x2zs-1./128.*x12s*txs)
      zz10c= zz10c+rs1wz(7)*vvc*gtm2*ys*csti*vut*bxp
     # *(1./128.*os+1./64.*x12-1./128.*x12s)
      zz10c= zz10c+rs1wz(7)*vvc*gtm2*ys*csti*vut*(
     #    1./32.*o*x12*tx-1./64.*o*x12-1./128.*o*x2z-3./128.*o*tx
     #    +1./64.*os*tx-1./64.*os-1./64.*x12*x2z-3./128.*x12*tx
     #    +1./64.*tx*x12s+1./64.*tx)
      zz10c= zz10c+rs1wz(10)*xx*vvc*gtm2*ys*csti*vut
     # *(-1./64.*o*x2z*txs-1./64.*o*tx*x2zs-1./64.*x12*x2z*txs
     #    +1./64.*tx*x2zs)
      zz10c= zz10c+rs1wz(10)*bxpi*vvc*gtm2*ys*csti*vut
     # *(1./64.*o*x12*x2z*tx-1./64.*o*x12*x2z+1./64.*o*x12*txs
     #    -5./128.*o*x2z*tx+1./64.*o*x2z*txs+1./64.*o*tx*x2zs-1.
     #    /128.*o*x2zs-1./64.*o*txs+1./64.*os*x2z*tx-1./64.*os*
     #    x2z+1./128.*os*x2zs+1./128.*os*txs-3./128.*x12*x2z*tx
     #    +1./64.*x12*x2z*txs-1./64.*x12*txs+1./32.*x2z*tx-1./
     #    64.*tx*x2zs+1./128.*x12s*txs)
      zz10c= zz10c+rs1wz(10)*vvc*gtm2*ys*csti*vut*bxp
     # *(-1./128.*os-1./64.*x12+1./128.*x12s)
      zz10c= zz10c+rs1wz(10)*vvc*gtm2*ys*csti*vut
     # *(-1./32.*o*x12*tx+1./64.*o*x12+1./128.*o*x2z+3./128.
     #    *o*tx-1./64.*os*tx+1./64.*os+1./64.*x12*x2z+3./128.*
     #    x12*tx-1./64.*tx*x12s-1./64.*tx)
      zz10c= zz10c+rs1wz(11)*bxpi*vvc*gtm2*ys*csti*vut
     # *(-1./32.*o*x2z*tx+1./16.*o*x2z+1./32.*o*txs+1./32.*
     #    x12*txs-1./32.*x2z*tx)
      zz10c= zz10c+rs1wz(11)*vvc*gtm2*ys*csti*vut*bxp
     # *(-1./32.+1./32.*o+1./32.*x12)
      zz10c= zz10c+rs1wz(11)*vvc*gtm2*ys*csti*vut
     # *(-1./32.*o*x2z-1./16.*o-1./16.*x12*tx+1./32.*x2z+1.
     #    /32.*tx)
      zz10c= zz10c+rs1wz(12)*xx*vvc*gtm2*ys*csti*vut
     # *(-1./16.*o*x12*tx-1./16.*o*x2z*tx+1./16.*o*x2z+1./16.
     #    *o*txs+1./16.*os*x12+1./16.*os*x2z-1./16.*os*tx+1./16.
     #    *oc+1./16.*x12*txs-1./16.*x2z*tx)
      zz10c= zz10c+rs1wz(12)*bxpi*vvc*gtm2*ys*csti*vut
     # *(1./16.*o*x2z*tx-1./16.*o*x2z+1./16.*o*tx-1./16.*o*txs
     #    +1./16.*o+1./16.*x12*tx-1./16.*x12*txs+1./16.*x2z*tx
     #    -1./16.*tx)
      zz10c= zz10c+rs1wz(12)*vvc*gtm2*ys*csti*vut
     # *(-1./32.*o*x12-1./32.*o-1./32.*os-1./32.*x12)
      zz10c= zz10c+rs1wz(13)*xx*vvc*gtm2*ys*csti*vut
     # *(-1./32.*o*x12*tx+1./32.*o*x2z*tx+1./32.*o*x2z+1./32.
     #    *o*txs+1./32.*os*x12-1./32.*os*x2z-1./32.*os*tx+1./32.
     #    *oc+1./32.*x12*txs-1./32.*x2z*tx)
      zz10c= zz10c+rs1wz(13)*bxpi*vvc*gtm2*ys*csti*vut
     # *(-1./32.*o*x2z*tx+1./32.*o*tx-1./32.*o*txs+1./32.*o
     #    +1./32.*x12*tx-1./32.*x12*txs+1./32.*x2z*tx-1./32.*tx
     #    )
      zz10c= zz10c+rs1wz(13)*vvc*gtm2*ys*csti*vut
     # *(-1./32.*o*x12+1./64.*o-1./32.*os-1./64.*x12)
      zz10c= zz10c+rs1wz(14)*xx*vvc*gtm2*ys*csti*vut
     # *(-1./16.*o*x2z*tx+1./16.*os*x2z)
      zz10c= zz10c+rs1wz(14)*bxpi*vvc*gtm2*ys*csti*vut
     # *(3./64.*o*x2z*tx-1./16.*o*tx+1./64.*o*txs+1./16.*os+
     #    1./64.*x12*txs-1./64.*x2z*tx)
      zz10c= zz10c+rs1wz(14)*vvc*gtm2*ys*csti*vut*bxp
     # *(-1./64.+1./64.*o+1./64.*x12)
      zz10c= zz10c+rs1wz(14)*vvc*gtm2*ys*csti*vut
     # *(1./64.*o*x12-1./64.*o*x2z-3./64.*os-1./32.*x12*tx+1.
     #    /64.*x2z+1./64.*tx)
      zz10c= zz10c+rs2wz(1)*xx*vvq*gtm2*yc*(-1./2.*o*
     #    x2z*txs-1./2.*x12*x2z*txs+1./2.*x2z*txs)
      zz10c= zz10c+rs2wz(1)*bxpi*vvq*gtm2*yc*(1./4.*o*
     #    x12*x2z*tx+1./2.*o*x12*txs-3./4.*o*x2z*tx+1./4.*o*x2z*
     #    txs+1./4.*o*tx*x2zs-o*txs+1./4.*os*x2z*tx+1./4.*os*
     #    txs-1./4.*x12*x2z*tx+1./4.*x12*x2z*txs-x12*txs+1./2.*
     #    x2z*tx-1./4.*tx*x2zs+1./4.*x12s*txs+1./2.*txs)
      zz10c= zz10c+rs2wz(1)*vvq*gtm2*bxps*yc*(-1./4.
     #    +1./4.*o+1./4.*x12)
      zz10c= zz10c+rs2wz(1)*vvq*gtm2*yc*bxp*(1./4.+1./
     #    4.*o*x12-1./4.*o*x2z-1./4.*o*tx-3./4.*o+1./2.*os-3./
     #    4.*x12*tx-1./4.*x12-1./4.*x2z*tx+1./4.*x2z+1./2.*tx
     #    +1./4.*txs)
      zz10c= zz10c+rs2wz(1)*vvq*gtm2*yc*(-1./2.*o*x12
     #    *tx-1./4.*o*x2z*tx+1./2.*o*x2z+5./4.*o*tx+1./2.*o*txs
     #    -1./4.*os*x2z-1./2.*os*tx+1./4.*x12*x2z*tx+3./4.*x12*
     #    tx+1./2.*x12*txs-1./4.*x2z*tx-1./4.*x2z*txs-1./4.*x2z
     #    +1./4.*tx*x2zs-1./2.*tx-1./2.*txs)
      zz10c= zz10c+rs2wz(4)*xx*vvq*gtm2*yc*(1./16.*o*
     #    x12*tx*x2zs-1./16.*o*tx*x2zc-1./16.*o*tx*x2zs+1./8.*o*
     #    x2zc+1./16.*o*x2zs*txs+1./16.*os*tx*x2zs-1./16.*os*x2zc
     #    +1./16.*x12*tx*x2zs+1./16.*x12*x2zs*txs+1./16.*tx*x2zc
     #    -1./16.*x2zc-1./8.*x2zs*txs)
      zz10c= zz10c+rs2wz(4)*bxpi*vvq*gtm2*yc*(1./8.*o*
     #    x12*x2z*tx-1./8.*o*x12*x2z*txs-7./32.*o*x12*x2zs-1./16.
     #    *o*x2z*tx*x12s-1./8.*o*x2z*tx+5./16.*o*x2z*txs+1./16.*o
     #    *tx*x2zc-5./32.*o*tx*x2zs-3./32.*o*x2zc-1./16.*o*x2zs*
     #    txs+15./32.*o*x2zs-1./8.*os*x12*x2z*tx+1./16.*os*x12*
     #    x2zs+7./32.*os*x2z*tx-1./16.*os*x2z*txs+1./16.*os*x2zc
     #    -11./32.*os*x2zs-1./16.*oc*x2z*tx+1./16.*oc*x2zs+1./8.
     #    *x12*x2z*tx+5./16.*x12*x2z*txs-3./32.*x12*tx*x2zs-1./16.
     #    *x12*x2zs*txs+5./32.*x12*x2zs-3./32.*x2z*tx*x12s-1./16.
     #    *x2z*x12s*txs-1./4.*x2z*txs+1./16.*tx*x2zs+1./32.*x2zc
     #    +1./16.*x2zs*txs-3./16.*x2zs)
      zz10c= zz10c+rs2wz(4)*vvq*gtm2*bxps*yc*(1./16.+1.
     #    /8.*o*x12-1./8.*o+1./16.*os-1./8.*x12+1./16.*x12s)
      zz10c= zz10c+rs2wz(4)*vvq*gtm2*yc*bxp*(-1./16.
     #    -1./8.*o*x12*x2z-1./8.*o*x12*tx-5./16.*o*x12-1./16.*o
     #    *x2z*tx+1./4.*o*x2z+1./16.*o*tx+3./32.*o*x12s+1./16.*
     #    o*txs+7./32.*o+5./32.*os*x12-3./32.*os*x2z-1./4.*os
     #    +3./32.*oc-1./16.*x12*x2z*tx+3./16.*x12*x2z+3./16.*
     #    x12*tx+1./16.*x12*txs+5./32.*x12+1./16.*x2z*tx-1./32.
     #    *x2z*x12s-5./32.*x2z-1./8.*tx*x12s-1./16.*tx-1./8.*
     #    x12s+1./32.*x12c-1./16.*txs)
      zz10c= zz10c+rs2wz(4)*vvq*gtm2*yc*(-1./16.*o*
     #    x12*x2z*tx+17./32.*o*x12*x2z-1./16.*o*x12*tx+1./32.*o*
     #    x12*x2zs+1./4.*o*x12*txs+3./32.*o*x2z*tx-3./32.*o*x2z*
     #    x12s-1./16.*o*x2z*txs-9./16.*o*x2z+1./32.*o*tx*x12s+1.
     #    /16.*o*tx*x2zs+1./16.*o*tx-5./32.*o*x2zs-1./4.*o*txs-
     #    1./4.*os*x12*x2z+5./32.*os*x12*tx-3./32.*os*x2z*tx+17./
     #    32.*os*x2z-5./32.*os*tx+1./32.*os*x2zs+1./8.*os*txs-5.
     #    /32.*oc*x2z+3./32.*oc*tx-5./32.*x12*x2z*tx-1./16.*x12*
     #    x2z*txs-5./16.*x12*x2z+1./16.*x12*tx*x2zs-1./16.*x12*tx
     #    -1./16.*x12*x2zs-1./4.*x12*txs+1./32.*x2z*tx*x12s+1./
     #    16.*x2z*tx+1./8.*x2z*x12s+1./8.*x2z*txs+3./16.*x2z+3./
     #    32.*tx*x12s-1./32.*tx*x12c-1./8.*tx*x2zs+1./8.*x12s*txs
     #    +1./8.*x2zs+1./8.*txs)
      zz10c= zz10c+rs2wz(7)*xx*vvq*gtm2*yc*(-1./16.*o
     #    *x12*x2z*txs+1./16.*o*x2zc-1./16.*o*x2zs*txs-1./32.*os*
     #    x2z*txs-1./32.*os*x2zc+1./16.*x12*tx*x2zs-1./16.*x12*
     #    x2zs*txs-1./32.*x2z*x12s*txs-1./32.*x2zc+1./16.*x2zs*
     #    txs)
      zz10c= zz10c+rs2wz(7)*bxpi*vvq*gtm2*yc*(-1./8.*o
     #    *x12*x2z*tx+1./8.*o*x12*x2z*txs+1./32.*o*x12*tx*x2zs-7./
     #    64.*o*x12*x2zs-1./16.*o*x12*txs+1./64.*o*x2z*tx*x12s-3./
     #    16.*o*x2z*txs+1./64.*o*tx*x2zc-3./64.*o*tx*x2zs+3./64.*
     #    o*x12s*txs-3./64.*o*x2zc+3./64.*o*x2zs*txs+15./64.*o*
     #    x2zs+1./32.*os*x12*x2z*tx+1./32.*os*x12*x2zs+3./64.*os*
     #    x12*txs-1./32.*os*x2z*tx+1./16.*os*x2z*txs+1./32.*os*tx
     #    *x2zs+1./32.*os*x2zc-11./64.*os*x2zs-1./32.*os*txs+1./
     #    64.*oc*x2z*tx+1./32.*oc*x2zs+1./64.*oc*txs+1./8.*x12*
     #    x2z*tx-3./16.*x12*x2z*txs-3./64.*x12*tx*x2zs+3./64.*x12
     #    *x2zs*txs+5./64.*x12*x2zs-3./32.*x2z*tx*x12s+1./16.*x2z
     #    *x12s*txs+1./8.*x2z*txs-1./64.*tx*x2zc+1./32.*tx*x2zs
     #    -1./32.*x12s*txs+1./64.*x12c*txs+1./64.*x2zc-1./32.*
     #    x2zs*txs-3./32.*x2zs)
      zz10c= zz10c+rs2wz(7)*vvq*gtm2*yc*bxp*(-1./32.
     #    -1./64.*o*x12*x2z+1./32.*o*x12*tx-11./64.*o*x12+1./64.
     #    *o*x2z*tx+1./64.*o*x2z-3./64.*o*tx+1./16.*o*x12s-1./
     #    32.*o*txs+7./64.*o+7./64.*os*x12+1./64.*os*tx-9./64.*
     #    os+1./16.*oc+1./64.*x12*x2z*tx+1./32.*x12*x2z-3./64.*
     #    x12*tx-1./32.*x12*txs+5./64.*x12-1./64.*x2z*tx-1./64.
     #    *x2z*x12s-1./64.*x2z+1./64.*tx*x12s+1./32.*tx-1./16.*
     #    x12s+1./64.*x12c+1./32.*txs)
      zz10c= zz10c+rs2wz(7)*vvq*gtm2*yc*(-1./32.*o*
     #    x12*x2z*tx+9./32.*o*x12*x2z+1./8.*o*x12*tx+1./64.*o*x12
     #    *x2zs-3./32.*o*x12*txs+3./32.*o*x2z*tx-3./64.*o*x2z*
     #    x12s+3./64.*o*x2z*txs-9./32.*o*x2z-5./64.*o*tx*x12s-1.
     #    /32.*o*tx*x2zs-1./32.*o*x2zs+1./8.*o*txs-9./64.*os*x12*
     #    x2z-1./16.*os*x12*tx-3./64.*os*x2z*tx+9./32.*os*x2z+1.
     #    /32.*os*tx-3./64.*os*txs-3./32.*oc*x2z-1./64.*oc*tx+1.
     #    /32.*x12*x2z*tx+3./64.*x12*x2z*txs-5./32.*x12*x2z-1./64.
     #    *x12*tx*x2zs-1./16.*x12*tx-1./32.*x12*x2zs+1./8.*x12*
     #    txs+1./64.*x2z*tx*x12s-1./16.*x2z*tx+1./16.*x2z*x12s-
     #    1./16.*x2z*txs+3./32.*x2z+3./32.*tx*x12s-1./32.*tx*x12c
     #    +1./32.*tx*x2zs-3./64.*x12s*txs+1./32.*x2zs-1./16.*
     #    txs)
      zz10c= zz10c+rs2wz(10)*xx*vvq*gtm2*yc*(1./16.*o*
     #    x12*x2z*txs-1./16.*o*x2zc+1./16.*o*x2zs*txs+1./32.*os*
     #    x2z*txs+1./32.*os*x2zc-1./16.*x12*tx*x2zs+1./16.*x12*
     #    x2zs*txs+1./32.*x2z*x12s*txs+1./32.*x2zc-1./16.*x2zs*
     #    txs)
      zz10c= zz10c+rs2wz(10)*bxpi*vvq*gtm2*yc*(1./8.*o*
     #    x12*x2z*tx-1./8.*o*x12*x2z*txs-1./32.*o*x12*tx*x2zs+7./
     #    64.*o*x12*x2zs+1./16.*o*x12*txs-1./64.*o*x2z*tx*x12s+3./
     #    16.*o*x2z*txs-1./64.*o*tx*x2zc+3./64.*o*tx*x2zs-3./64.*
     #    o*x12s*txs+3./64.*o*x2zc-3./64.*o*x2zs*txs-15./64.*o*
     #    x2zs-1./32.*os*x12*x2z*tx-1./32.*os*x12*x2zs-3./64.*os*
     #    x12*txs+1./32.*os*x2z*tx-1./16.*os*x2z*txs-1./32.*os*tx
     #    *x2zs-1./32.*os*x2zc+11./64.*os*x2zs+1./32.*os*txs-1./
     #    64.*oc*x2z*tx-1./32.*oc*x2zs-1./64.*oc*txs-1./8.*x12*
     #    x2z*tx+3./16.*x12*x2z*txs+3./64.*x12*tx*x2zs-3./64.*x12
     #    *x2zs*txs-5./64.*x12*x2zs+3./32.*x2z*tx*x12s-1./16.*x2z
     #    *x12s*txs-1./8.*x2z*txs+1./64.*tx*x2zc-1./32.*tx*x2zs
     #    +1./32.*x12s*txs-1./64.*x12c*txs-1./64.*x2zc+1./32.*
     #    x2zs*txs+3./32.*x2zs)
      zz10c= zz10c+rs2wz(10)*vvq*gtm2*yc*bxp*(1./32.+1.
     #    /64.*o*x12*x2z-1./32.*o*x12*tx+11./64.*o*x12-1./64.*o*
     #    x2z*tx-1./64.*o*x2z+3./64.*o*tx-1./16.*o*x12s+1./32.*
     #    o*txs-7./64.*o-7./64.*os*x12-1./64.*os*tx+9./64.*os
     #    -1./16.*oc-1./64.*x12*x2z*tx-1./32.*x12*x2z+3./64.*
     #    x12*tx+1./32.*x12*txs-5./64.*x12+1./64.*x2z*tx+1./64.
     #    *x2z*x12s+1./64.*x2z-1./64.*tx*x12s-1./32.*tx+1./16.*
     #    x12s-1./64.*x12c-1./32.*txs)
      zz10c= zz10c+rs2wz(10)*vvq*gtm2*yc*(1./32.*o*x12*
     #    x2z*tx-9./32.*o*x12*x2z-1./8.*o*x12*tx-1./64.*o*x12*
     #    x2zs+3./32.*o*x12*txs-3./32.*o*x2z*tx+3./64.*o*x2z*x12s
     #    -3./64.*o*x2z*txs+9./32.*o*x2z+5./64.*o*tx*x12s+1./32.
     #    *o*tx*x2zs+1./32.*o*x2zs-1./8.*o*txs+9./64.*os*x12*x2z
     #    +1./16.*os*x12*tx+3./64.*os*x2z*tx-9./32.*os*x2z-1./
     #    32.*os*tx+3./64.*os*txs+3./32.*oc*x2z+1./64.*oc*tx-1./
     #    32.*x12*x2z*tx-3./64.*x12*x2z*txs+5./32.*x12*x2z+1./64.
     #    *x12*tx*x2zs+1./16.*x12*tx+1./32.*x12*x2zs-1./8.*x12*
     #    txs-1./64.*x2z*tx*x12s+1./16.*x2z*tx-1./16.*x2z*x12s+
     #    1./16.*x2z*txs-3./32.*x2z-3./32.*tx*x12s+1./32.*tx*x12c
     #    -1./32.*tx*x2zs+3./64.*x12s*txs-1./32.*x2zs+1./16.*
     #    txs)
      zz10c= zz10c+rs2wz(11)*bxpi*vvq*gtm2*yc*(-1./16.
     #    *o*x12*x2z*tx+1./16.*o*x2z*tx-1./16.*o*x2z*txs+1./16.*o
     #    *tx*x2zs-1./8.*o*x2zs-1./16.*os*x2z*tx+1./16.*os*x2zs
     #    -1./16.*x12*x2z*tx-1./16.*x12*x2z*txs+1./8.*x2z*txs-1.
     #    /16.*tx*x2zs+1./16.*x2zs)
      zz10c= zz10c+rs2wz(11)*vvq*gtm2*bxps*yc*(-1./8.
     #    +1./8.*o+1./8.*x12)
      zz10c= zz10c+rs2wz(11)*vvq*gtm2*yc*bxp*(1./16.-3.
     #    /16.*o*x2z-3./16.*o+1./8.*os-1./16.*x12*x2z-1./4.*x12
     #    *tx-1./16.*x12-1./8.*x2z*tx+3./16.*x2z+1./8.*tx+1./
     #    8.*txs)
      zz10c= zz10c+rs2wz(11)*vvq*gtm2*yc*(-1./16.*o*
     #    x12*x2z+1./8.*o*x12*tx-1./8.*o*x2z*tx+5./16.*o*x2z-1./
     #    16.*o*tx+1./16.*o*x2zs+1./8.*o*txs-3./16.*os*x2z+1./8.
     #    *os*tx+1./8.*x12*x2z*tx+1./16.*x12*x2z+1./16.*x12*tx+
     #    1./8.*x12*txs-1./16.*x2z*tx-1./8.*x2z*txs-1./8.*x2z+1.
     #    /8.*tx*x2zs-1./16.*x2zs-1./8.*txs)
      zz10c= zz10c+rs2wz(12)*xx*vvq*gtm2*yc*(-1./8.*o
     #    *x2z*txs+1./8.*o*tx*x2zs-1./8.*x12*x2z*txs+1./4.*x2z*
     #    txs-1./8.*tx*x2zs)
      zz10c= zz10c+rs2wz(12)*bxpi*vvq*gtm2*yc*(1./8.*o*
     #    x12*txs+1./8.*o*x2z*tx+1./8.*o*x2z*txs-1./8.*o*tx*x2zs
     #    +1./8.*o*x2zs-3./8.*o*txs-1./16.*os*x2zs+1./16.*os*
     #    txs+1./8.*x12*x2z*tx+1./8.*x12*x2z*txs-3./8.*x12*txs-
     #    1./8.*x2z*txs+1./16.*x12s*txs-1./16.*x2zs+1./4.*txs)
      zz10c= zz10c+rs2wz(12)*vvq*gtm2*yc*bxp*(1./16.+1.
     #    /16.*o*x12+1./16.*o*x2z-1./16.*o*tx-1./8.*o+1./16.*os
     #    +1./16.*x12*x2z-1./16.*x12*tx-1./16.*x12-1./16.*x2z
     #    +1./16.*tx)
      zz10c= zz10c+rs2wz(12)*vvq*gtm2*yc*(1./16.*o*x12*
     #    x2z-1./16.*o*x12*tx-1./8.*o*x2z+1./4.*o*tx-1./16.*o*
     #    x2zs+1./16.*o*txs+1./8.*os*x2z-1./8.*os*tx-1./16.*x12
     #    *x2z*tx-1./16.*x12*x2z+1./8.*x12*tx+1./16.*x12*txs+1./
     #    16.*x2z*tx+1./16.*tx*x12s-1./8.*tx+1./16.*x2zs-1./8.*
     #    txs)
      zz10c= zz10c+rs2wz(13)*xx*vvq*gtm2*yc*(-1./8.*o
     #    *x2z*txs-1./8.*x12*x2z*txs+1./8.*x2z*txs)
      zz10c= zz10c+rs2wz(13)*bxpi*vvq*gtm2*yc*(1./32.*o*
     #    x12*x2z*tx+1./8.*o*x12*txs-3./32.*o*x2z*tx+3./32.*o*x2z
     #    *txs+1./32.*o*tx*x2zs-1./16.*o*x2zs-3./16.*o*txs+1./
     #    32.*os*x2z*tx+1./32.*os*x2zs+1./16.*os*txs-3./32.*x12*
     #    x2z*tx+3./32.*x12*x2z*txs-3./16.*x12*txs+1./16.*x2z*tx
     #    -1./16.*x2z*txs-1./32.*tx*x2zs+1./16.*x12s*txs+1./32.
     #    *x2zs+1./8.*txs)
      zz10c= zz10c+rs2wz(13)*vvq*gtm2*yc*bxp*(1./32.-1.
     #    /32.*o*x2z-1./32.*o-1./32.*x12*x2z-1./32.*x12+1./32.*
     #    x2z)
      zz10c= zz10c+rs2wz(13)*vvq*gtm2*yc*(-1./32.*o*
     #    x12*x2z+5./32.*o*x2z+1./32.*o*tx+1./32.*o*x2zs-3./32.
     #    *os*x2z+1./16.*x12*x2z*tx+1./32.*x12*x2z+3./32.*x12*tx
     #    +1./32.*x2z*tx-1./16.*x2z-1./16.*tx-1./32.*x2zs-1./
     #    16.*txs)
      zz10c= zz10c+rs2wz(14)*xx*vvq*gtm2*yc*(1./16.*o*
     #    x2z*txs+1./16.*o*tx*x2zs+1./16.*x12*x2z*txs-1./16.*tx*
     #    x2zs)
      zz10c= zz10c+rs2wz(14)*bxpi*vvq*gtm2*yc*(-1./16.
     #    *o*x12*x2z*tx-1./16.*o*x12*txs+1./4.*o*x2z*tx-1./16.*o*
     #    x2z*txs-1./16.*o*tx*x2zs+1./16.*o*x2zs+1./16.*o*txs-1.
     #    /16.*os*x2z*tx-1./32.*os*x2zs-1./32.*os*txs+1./8.*x12*
     #    x2z*tx-1./16.*x12*x2z*txs+1./16.*x12*txs-1./8.*x2z*tx
     #    +1./16.*x2z*txs-1./32.*x12s*txs-1./32.*x2zs)
      zz10c= zz10c+rs2wz(14)*vvq*gtm2*yc*bxp*(-1./32.
     #    -1./32.*o*x12+1./32.*o*x2z-1./32.*o*tx+1./8.*o-3./
     #    32.*os+1./32.*x12*x2z-1./32.*x12*tx+1./32.*x12-1./16.
     #    *x2z*tx-1./32.*x2z+1./32.*tx+1./16.*txs)
      zz10c= zz10c+rs2wz(14)*vvq*gtm2*yc*(1./32.*o*x12*
     #    x2z+3./32.*o*x12*tx-3./16.*o*x2z-3./16.*o*tx-1./32.*o
     #    *x2zs+1./32.*o*txs+1./8.*os*x2z+1./16.*os*tx-1./32.*
     #    x12*x2z*tx-1./32.*x12*x2z-1./8.*x12*tx+1./32.*x12*txs
     #    +1./32.*x2z*tx-1./16.*x2z*txs+1./16.*x2z+1./32.*tx*
     #    x12s+1./16.*tx*x2zs+1./16.*tx+1./32.*x2zs-1./16.*txs
     #    )
      zz10c= zz10c+rt1wz(1)*xx*vvc*gsm2*ys*csti*(2
     #    *zi*o*x12*txs-2*zi*o*txs+zi*os*txs-2*
     #    zi*x12*txs+zi*x12s*txs+zi*txs+o*txs+
     #    x12*txs-txs)
      zz10c= zz10c+rt1wz(1)*bxpi*vvc*gsm2*ys*csti*vet
     # *(1./16.*o*x2z*tx+1./16.*o*txs+1./16.*x12*txs-1./16.*
     #    x2z*tx)
      zz10c= zz10c+rt1wz(1)*bxpi*vvc*gsm2*ys*csti*(
     #    1./4.*zi*o*x12*tx-1./2.*zi*o*tx-5./4.*zi*o
     #    *txs+1./4.*zi*os*tx-1./4.*zi*x12*tx-5./4.*
     #    zi*x12*txs+1./4.*zi*tx+zi*txs-1./2.*o*
     #    x2z*tx+1./4.*o*tx-1./2.*o*txs-1./2.*x12*txs+1./2.*x2z
     #    *tx-1./4.*tx)
      zz10c= zz10c+rt1wz(1)*vvc*gsm2*bxps*ys*csti*vet
     # *(1./16.-1./16.*o-1./16.*x12)
      zz10c= zz10c+rt1wz(1)*vvc*gsm2*bxps*ys*csti*(
     #    1./4.*zi*o+1./4.*zi*x12-1./4.*zi)
      zz10c= zz10c+rt1wz(1)*vvc*gsm2*ys*csti*vet*bxp
     # *(-1./16.-1./16.*o*x12+1./16.*o*x2z+1./4.*o-3./16.*
     #    os+1./8.*x12*tx+1./16.*x12-1./16.*x2z-1./16.*tx)
      zz10c= zz10c+rt1wz(1)*vvc*gsm2*ys*csti*vet*(
     #    1./16.*o*x12*tx+1./16.*o*x2z*tx-1./8.*o*x2z-1./4.*o*tx
     #    -1./16.*o*txs+1./16.*os*x2z+1./16.*os*tx-1./8.*x12*tx
     #    -1./16.*x12*txs+1./16.*x2z*tx+1./16.*x2z+1./16.*tx)
      zz10c= zz10c+rt1wz(1)*vvc*gsm2*ys*csti*bxp*(
     #    -1./4.+1./2.*zi*o*x12-zi*o+1./2.*zi*os
     #    -1./2.*zi*x12*tx-1./2.*zi*x12+1./4.*zi*
     #    tx+1./2.*zi*txs+1./2.*zi+1./4.*o+1./2.*tx)
      zz10c= zz10c+rt1wz(1)*vvc*gsm2*ys*csti*(1./4.
     #    -1./2.*zi*o*x12+1./2.*zi*o*tx+5./4.*zi*o
     #    *txs+3./4.*zi*o+1./4.*zi*os*x12-3./4.*zi
     #    *os+1./4.*zi*oc+3./4.*zi*x12*tx+5./4.*zi
     #    *x12*txs+1./4.*zi*x12-1./2.*zi*tx-3./2.*
     #    zi*txs-1./4.*zi+3./4.*o*tx-1./2.*o+1./4.*os
     #    -1./2.*x2z*tx-1./4.*tx+1./2.*txs)
      zz10c= zz10c+rt1wz(4)*xx*vvc*gsm2*ys*csti*(1.
     #    /8.+1./8.*zi*o*oq+5./4.*zi*o*x12*tx-zi*o
     #    *x12*txs-3./2.*zi*o*x12-7./8.*zi*o*tx*x12s+1./
     #    4.*zi*o*tx*x12c-5./8.*zi*o*tx+3./8.*zi*o*
     #    x12s*txs+9./8.*zi*o*x12s-1./4.*zi*o*x12c+5./8.
     #    *zi*o*txs+5./8.*zi*o-7./4.*zi*os*x12*tx+
     #    3./8.*zi*os*x12*txs+9./4.*zi*os*x12+3./4.*
     #    zi*os*tx*x12s+9./8.*zi*os*tx-9./8.*zi*os*
     #    x12s+1./8.*zi*os*x12c-1./2.*zi*os*txs-5./4.*
     #    zi*os+3./4.*zi*oc*x12*tx-3./2.*zi*oc*x12
     #    -7./8.*zi*oc*tx+3./8.*zi*oc*x12s+1./8.*
     #    zi*oc*txs+5./4.*zi*oc+3./8.*zi*oq*x12+1./
     #    4.*zi*oq*tx-5./8.*zi*oq-1./4.*zi*x12*tx+
     #    5./8.*zi*x12*txs+3./8.*zi*x12+1./8.*zi*tx*
     #    x12s+1./8.*zi*tx-1./2.*zi*x12s*txs-3./8.*
     #    zi*x12s)
      zz10c= zz10c+rt1wz(4)*xx*vvc*gsm2*ys*csti*(1.
     #    /8.*zi*x12c*txs+1./8.*zi*x12c-1./4.*zi*txs
     #    -1./8.*zi-1./4.*o*x12*x2z*tx+1./4.*o*x12*x2z-5./
     #    8.*o*x12*tx+1./4.*o*x12*txs+3./4.*o*x12+3./8.*o*x2z*tx
     #    -1./8.*o*x2z*txs-3./8.*o*x2z+1./4.*o*tx*x12s+1./8.*o*
     #    tx*x2zs+1./2.*o*tx-1./4.*o*x12s-1./4.*o*x2zs-3./8.*o*
     #    txs-1./2.*o-1./8.*os*x12*x2z+1./2.*os*x12*tx-3./4.*os
     #    *x12-1./4.*os*x2z*tx+3./8.*os*x2z-5./8.*os*tx+1./8.*
     #    os*x12s+1./8.*os*x2zs+1./8.*os*txs+3./4.*os+1./4.*oc*
     #    x12-1./8.*oc*x2z+1./4.*oc*tx-1./2.*oc+1./8.*oq-1./8.
     #    *x12*x2z*txs-1./8.*x12*x2z+1./8.*x12*tx-3./8.*x12*txs
     #    -1./4.*x12-1./8.*x2z*tx+1./4.*x2z*txs+1./8.*x2z-1./
     #    8.*tx*x2zs-1./8.*tx+1./8.*x12s*txs+1./8.*x12s+1./8.*
     #    x2zs+1./4.*txs)
      zz10c= zz10c+rt1wz(4)*bxpi*vvc*gsm2*ys*csti*vet
     # *(-1./64.*o*x12*x2z*tx-1./64.*o*x2z*txs+1./64.*o*tx*
     #    x2zs-1./64.*o*x2zs-1./64.*os*x2z*tx+1./64.*os*x2zs-1./
     #    64.*x12*x2z*txs+1./64.*tx*x2zs)
      zz10c= zz10c+rt1wz(4)*bxpi*vvc*gsm2*ys*csti*(
     #    5./16.+17./16.*zi*o*x12*tx-5./8.*zi*o*x12*txs
     #    -21./8.*zi*o*x12-3./8.*zi*o*tx*x12s-3./4.*
     #    zi*o*tx+13./8.*zi*o*x12s-1./4.*zi*o*x12c
     #    +11./16.*zi*o*txs+5./4.*zi*o-3./4.*zi*os
     #    *x12*tx+21./8.*zi*os*x12+15./16.*zi*os*tx-13./
     #    16.*zi*os*x12s-5./16.*zi*os*txs-15./8.*zi*
     #    os-7./8.*zi*oc*x12-3./8.*zi*oc*tx+5./4.*
     #    zi*oc-5./16.*zi*oq-5./16.*zi*x12*tx+11./
     #    16.*zi*x12*txs+7./8.*zi*x12+1./8.*zi*tx*
     #    x12s+3./16.*zi*tx-5./16.*zi*x12s*txs-13./16.*
     #    zi*x12s+1./4.*zi*x12c-3./8.*zi*txs-5./16.
     #    *zi+1./8.*o*x12*x2z*tx+1./4.*o*x12*x2z-3./8.*o*x12
     #    *tx+9./8.*o*x12+1./8.*o*x2z*tx+1./8.*o*x2z*txs-5./8.*
     #    o*x2z-1./8.*o*tx*x2zs+9./16.*o*tx-1./4.*o*x12s+3./16.
     #    *o*x2zs)
      zz10c= zz10c+rt1wz(4)*bxpi*vvc*gsm2*ys*csti*(
     #    -5./16.*o*txs-15./16.*o-9./16.*os*x12+1./8.*os*x2z*tx
     #    +5./16.*os*x2z-3./8.*os*tx-1./8.*os*x2zs+15./16.*os
     #    -5./16.*oc+3./16.*x12*x2z*tx+1./8.*x12*x2z*txs-1./4.*
     #    x12*x2z+1./8.*x12*tx-5./16.*x12*txs-9./16.*x12-3./16.
     #    *x2z*tx-1./8.*x2z*txs+5./16.*x2z-3./16.*tx+1./4.*x12s
     #    -1./16.*x2zs+3./8.*txs)
      zz10c= zz10c+rt1wz(4)*vvc*gsm2*bxps*ys*csti*vet
     # *(-1./64.-1./32.*o*x12+1./32.*o-1./64.*os+1./32.*
     #    x12-1./64.*x12s)
      zz10c= zz10c+rt1wz(4)*vvc*gsm2*bxps*ys*csti*(
     #    1./8.*zi*o*x12-1./8.*zi*o+1./16.*zi*os-1.
     #    /8.*zi*x12+1./16.*zi*x12s+1./16.*zi)
      zz10c= zz10c+rt1wz(4)*vvc*gsm2*ys*csti*vet*bxp
     # *(1./64.*o*x12*x2z+1./32.*o*x12*tx-3./64.*o*x2z-1./64.*
     #    o*tx+1./64.*o*x12s-1./64.*o+1./64.*os*x2z+1./32.*os
     #    -1./64.*oc-1./32.*x12*x2z-3./64.*x12*tx+1./32.*x2z+
     #    1./32.*tx*x12s+1./64.*tx)
      zz10c= zz10c+rt1wz(4)*vvc*gsm2*ys*csti*vet*(
     #    1./64.*o*x12*x2z*tx+1./64.*o*x12*tx-1./32.*o*x12*txs+1./
     #    32.*o*x2z-1./64.*o*tx*x12s+1./64.*o*x2zs+1./64.*o*txs
     #    +1./64.*os*x12*x2z-1./32.*os*x12*tx+1./64.*os*x2z*tx-
     #    3./64.*os*x2z+1./64.*os*tx-1./64.*os*txs+1./64.*oc*x2z
     #    -1./64.*oc*tx+3./64.*x12*x2z*tx+1./64.*x12*txs-1./32.
     #    *x2z*tx-1./64.*x12s*txs-1./64.*x2zs)
      zz10c= zz10c+rt1wz(4)*vvc*gsm2*ys*csti*bxp*(3.
     #    /16.+1./8.*zi*o*x12*tx-11./8.*zi*o*x12-3./16.
     #    *zi*o*tx+1./2.*zi*o*x12s+1./8.*zi*o*txs+
     #    7./8.*zi*o+5./8.*zi*os*x12+1./8.*zi*os*tx
     #    -13./16.*zi*os+1./4.*zi*oc-1./16.*zi*x12
     #    *tx+1./8.*zi*x12*txs+3./4.*zi*x12+1./16.*
     #    zi*tx-9./16.*zi*x12s+1./8.*zi*x12c-1./8.
     #    *zi*txs-5./16.*zi+3./16.*o*x12+1./8.*o*tx-5.
     #    /16.*o+1./8.*os+1./8.*x12*tx-1./4.*x12-1./8.*tx+1./
     #    16.*x12s)
      zz10c= zz10c+rt1wz(4)*vvc*gsm2*ys*csti*(-9.
     #    /16.-19./16.*zi*o*x12*tx+5./8.*zi*o*x12*txs+
     #    31./8.*zi*o*x12+3./8.*zi*o*tx*x12s+15./16.*
     #    zi*o*tx-17./8.*zi*o*x12s+1./4.*zi*o*x12c
     #    -13./16.*zi*o*txs-2*zi*o+3./4.*zi*os*x12
     #    *tx-13./4.*zi*os*x12-17./16.*zi*os*tx+13./16.
     #    *zi*os*x12s+5./16.*zi*os*txs+21./8.*zi*os
     #    +7./8.*zi*oc*x12+3./8.*zi*oc*tx-3./2.*zi
     #    *oc+5./16.*zi*oq+3./8.*zi*x12*tx-13./16.*
     #    zi*x12*txs-3./2.*zi*x12-1./8.*zi*tx*x12s
     #    -1./4.*zi*tx+5./16.*zi*x12s*txs+21./16.*
     #    zi*x12s-3./8.*zi*x12c+1./2.*zi*txs+9./16.
     #    *zi-1./16.*o*x12*x2z+5./16.*o*x12*tx-3./2.*o*x12
     #    -1./8.*o*x2z*tx+1./4.*o*x2z-9./16.*o*tx+1./4.*o*x12s
     #    +1./8.*o*txs+23./16.*o+9./16.*os*x12-1./16.*os*x2z+
     #    1./4.*os*tx)
      zz10c= zz10c+rt1wz(4)*vvc*gsm2*ys*csti*(-
     #    19./16.*os+5./16.*oc-1./8.*x12*x2z*tx+1./8.*x12*x2z-1.
     #    /4.*x12*tx+1./8.*x12*txs+15./16.*x12+1./4.*x2z*tx-3./
     #    16.*x2z+1./16.*tx*x12s+1./4.*tx-3./8.*x12s-1./4.*txs
     #    )
      zz10c= zz10c+rt1wz(7)*xx*vvc*gsm2*ys*csti*(1.
     #    /16.+1./16.*zi*o*oq-1./4.*zi*o*x12*tx+5./8.*
     #    zi*o*x12*txs-3./4.*zi*o*x12+1./4.*zi*o*tx*
     #    x12s-3./16.*zi*o*x12s*txs+9./16.*zi*o*x12s-1./
     #    8.*zi*o*x12c-3./8.*zi*o*txs+5./16.*zi*o+
     #    1./8.*zi*os*x12*tx-3./16.*zi*os*x12*txs+9./8.*
     #    zi*os*x12-9./16.*zi*os*x12s+1./16.*zi*os*
     #    x12c+5./16.*zi*os*txs-5./8.*zi*os-3./4.*
     #    zi*oc*x12+3./16.*zi*oc*x12s-1./16.*zi*oc*
     #    txs+5./8.*zi*oc+3./16.*zi*oq*x12-5./16.*
     #    zi*oq+1./8.*zi*x12*tx-3./8.*zi*x12*txs+3.
     #    /16.*zi*x12-1./4.*zi*tx*x12s+1./8.*zi*tx*
     #    x12c+5./16.*zi*x12s*txs-3./16.*zi*x12s-1./16.
     #    *zi*x12c*txs+1./16.*zi*x12c+1./8.*zi*txs
     #    -1./16.*zi+1./8.*o*x12*x2z+1./8.*o*x12*tx-1./8.*
     #    o*x12*txs)
      zz10c= zz10c+rt1wz(7)*xx*vvc*gsm2*ys*csti*(3.
     #    /8.*o*x12+1./8.*o*x2z*txs-3./16.*o*x2z-1./8.*o*x12s-1.
     #    /8.*o*x2zs+1./4.*o*txs-1./4.*o-1./16.*os*x12*x2z-3./8.
     #    *os*x12+3./16.*os*x2z+1./16.*os*x12s+1./16.*os*x2zs-1.
     #    /16.*os*txs+3./8.*os+1./8.*oc*x12-1./16.*oc*x2z-1./4.
     #    *oc+1./16.*oq-1./8.*x12*x2z*tx+1./8.*x12*x2z*txs-1./
     #    16.*x12*x2z-1./8.*x12*tx+1./4.*x12*txs-1./8.*x12-1./8.
     #    *x2z*txs+1./16.*x2z+1./8.*tx*x12s-1./16.*x12s*txs+1./
     #    16.*x12s+1./16.*x2zs-1./8.*txs)
      zz10c= zz10c+rt1wz(7)*bxpi*vvc*gsm2*ys*csti*vet
     # *(1./128.*o*x12*x2z*tx+1./128.*o*x2z*txs+1./128.*o*tx*
     #    x2zs-1./128.*o*x2zs+1./128.*os*x2z*tx+1./128.*os*x2zs
     #    +1./128.*x12*x2z*txs-1./128.*tx*x2zs)
      zz10c= zz10c+rt1wz(7)*bxpi*vvc*gsm2*ys*csti*(
     #    5./32.-5./16.*zi*o*x12*tx+5./16.*zi*o*x12*txs
     #    -21./16.*zi*o*x12+1./4.*zi*o*tx*x12s+13./16.*
     #    zi*o*x12s-1./8.*zi*o*x12c-3./8.*zi*o*txs
     #    +5./8.*zi*o+1./8.*zi*os*x12*tx+21./16.*
     #    zi*os*x12-13./32.*zi*os*x12s+5./32.*zi*os*
     #    txs-15./16.*zi*os-7./16.*zi*oc*x12+5./8.*
     #    zi*oc-5./32.*zi*oq+3./16.*zi*x12*tx-3./8.
     #    *zi*x12*txs+7./16.*zi*x12-5./16.*zi*tx*
     #    x12s+1./8.*zi*tx*x12c+5./32.*zi*x12s*txs-13./
     #    32.*zi*x12s+1./8.*zi*x12c+3./16.*zi*txs-
     #    5./32.*zi-1./32.*o*x12*x2z*tx+1./8.*o*x12*x2z+1./8.
     #    *o*x12*tx-1./16.*o*x12*txs+9./16.*o*x12-3./32.*o*x2z*
     #    txs-5./16.*o*x2z-1./32.*o*tx*x2zs-1./8.*o*x12s+3./32.
     #    *o*x2zs+3./16.*o*txs-15./32.*o-9./32.*os*x12-1./32.*
     #    os*x2z*tx)
      zz10c= zz10c+rt1wz(7)*bxpi*vvc*gsm2*ys*csti*(
     #    5./32.*os*x2z-1./16.*os*x2zs-1./32.*os*txs+15./32.*os
     #    -5./32.*oc+1./16.*x12*x2z*tx-3./32.*x12*x2z*txs-1./8.
     #    *x12*x2z-3./16.*x12*tx+3./16.*x12*txs-9./32.*x12+1./
     #    16.*x2z*txs+5./32.*x2z+1./8.*tx*x12s+1./32.*tx*x2zs-1.
     #    /32.*x12s*txs+1./8.*x12s-1./32.*x2zs-3./16.*txs)
      zz10c= zz10c+rt1wz(7)*vvc*gsm2*bxps*ys*csti*vet
     # *(1./128.+1./64.*o*x12-1./64.*o+1./128.*os-1./64.*x12
     #    +1./128.*x12s)
      zz10c= zz10c+rt1wz(7)*vvc*gsm2*bxps*ys*csti*(
     #    1./16.*zi*o*x12-1./16.*zi*o+1./32.*zi*os
     #    -1./16.*zi*x12+1./32.*zi*x12s+1./32.*zi
     #    )
      zz10c= zz10c+rt1wz(7)*vvc*gsm2*ys*csti*vet*bxp
     # *(-1./64.*o*x12*x2z-1./64.*o*x12*tx+1./128.*o*x12+1./
     #    32.*o*x2z+1./128.*o*tx-1./128.*o-1./64.*os*x12-1./64.
     #    *os*x2z+3./128.*os-1./64.*oc+1./64.*x12*x2z+3./128.*
     #    x12*tx-1./64.*x2z-1./64.*tx*x12s-1./128.*tx)
      zz10c= zz10c+rt1wz(7)*vvc*gsm2*ys*csti*vet*(
     #    -1./128.*o*x12*x2z-1./128.*o*x12*tx+1./64.*o*x12*txs-
     #    1./64.*o*x2z*tx+1./64.*o*x2z-1./64.*o*x2zs-1./128.*o*
     #    txs+1./64.*os*x12*x2z-1./32.*os*x2z-1./128.*os*tx+1./
     #    128.*os*x2zs+1./128.*os*txs+1./64.*oc*x2z-3./128.*x12*
     #    x2z*tx-1./128.*x12*txs+1./64.*x2z*tx+1./128.*x12s*txs
     #    +1./128.*x2zs)
      zz10c= zz10c+rt1wz(7)*vvc*gsm2*ys*csti*bxp*(3.
     #    /32.-1./16.*zi*o*x12*tx-11./16.*zi*o*x12+1./4.
     #    *zi*o*x12s-1./16.*zi*o*txs+7./16.*zi*o+5.
     #    /16.*zi*os*x12-13./32.*zi*os+1./8.*zi*oc
     #    +1./16.*zi*x12*tx-1./16.*zi*x12*txs+3./8.*
     #    zi*x12-1./16.*zi*tx*x12s-9./32.*zi*x12s+
     #    1./16.*zi*x12c+1./16.*zi*txs-5./32.*zi+3.
     #    /32.*o*x12-1./32.*o*tx-5./32.*o+1./16.*os-1./32.*x12*
     #    tx-1./8.*x12+1./32.*tx+1./32.*x12s)
      zz10c= zz10c+rt1wz(7)*vvc*gsm2*ys*csti*(-9.
     #    /32.+3./8.*zi*o*x12*tx-5./16.*zi*o*x12*txs+31.
     #    /16.*zi*o*x12-1./4.*zi*o*tx*x12s-17./16.*
     #    zi*o*x12s+1./8.*zi*o*x12c+7./16.*zi*o*txs
     #    -zi*o-1./8.*zi*os*x12*tx-13./8.*zi*os*
     #    x12+13./32.*zi*os*x12s-5./32.*zi*os*txs+21./
     #    16.*zi*os+7./16.*zi*oc*x12-3./4.*zi*oc+5.
     #    /32.*zi*oq-1./4.*zi*x12*tx+7./16.*zi*x12*
     #    txs-3./4.*zi*x12+3./8.*zi*tx*x12s-1./8.*
     #    zi*tx*x12c-5./32.*zi*x12s*txs+21./32.*zi*
     #    x12s-3./16.*zi*x12c-1./4.*zi*txs+9./32.*
     #    zi-1./32.*o*x12*x2z-1./32.*o*x12*tx-3./4.*o*x12+
     #    1./16.*o*x2z*tx+1./8.*o*x2z+1./8.*o*x12s-3./32.*o*txs
     #    +23./32.*o+9./32.*os*x12-1./32.*os*x2z+1./32.*os*tx
     #    -19./32.*os+5./32.*oc+1./32.*x12*x2z*tx+1./16.*x12*
     #    x2z)
      zz10c= zz10c+rt1wz(7)*vvc*gsm2*ys*csti*(1./8.
     #    *x12*tx-3./32.*x12*txs+15./32.*x12-1./16.*x2z*tx-3./
     #    32.*x2z-1./16.*tx*x12s-3./16.*x12s+1./8.*txs)
      zz10c= zz10c+rt1wz(10)*xx*vvc*gsm2*ys*csti*(
     #    -1./16.-1./16.*zi*o*oq+1./4.*zi*o*x12*tx-5./
     #    8.*zi*o*x12*txs+3./4.*zi*o*x12-1./4.*zi*o*
     #    tx*x12s+3./16.*zi*o*x12s*txs-9./16.*zi*o*x12s
     #    +1./8.*zi*o*x12c+3./8.*zi*o*txs-5./16.*
     #    zi*o-1./8.*zi*os*x12*tx+3./16.*zi*os*x12*
     #    txs-9./8.*zi*os*x12+9./16.*zi*os*x12s-1./16.*
     #    zi*os*x12c-5./16.*zi*os*txs+5./8.*zi*os+
     #    3./4.*zi*oc*x12-3./16.*zi*oc*x12s+1./16.*
     #    zi*oc*txs-5./8.*zi*oc-3./16.*zi*oq*x12+5.
     #    /16.*zi*oq-1./8.*zi*x12*tx+3./8.*zi*x12*
     #    txs-3./16.*zi*x12+1./4.*zi*tx*x12s-1./8.*
     #    zi*tx*x12c-5./16.*zi*x12s*txs+3./16.*zi*
     #    x12s+1./16.*zi*x12c*txs-1./16.*zi*x12c-1./8.*
     #    zi*txs+1./16.*zi-1./8.*o*x12*x2z-1./8.*o*x12*
     #    tx)
      zz10c= zz10c+rt1wz(10)*xx*vvc*gsm2*ys*csti*(
     #    1./8.*o*x12*txs-3./8.*o*x12-1./8.*o*x2z*txs+3./16.*o*
     #    x2z+1./8.*o*x12s+1./8.*o*x2zs-1./4.*o*txs+1./4.*o+1.
     #    /16.*os*x12*x2z+3./8.*os*x12-3./16.*os*x2z-1./16.*os*
     #    x12s-1./16.*os*x2zs+1./16.*os*txs-3./8.*os-1./8.*oc*
     #    x12+1./16.*oc*x2z+1./4.*oc-1./16.*oq+1./8.*x12*x2z*tx
     #    -1./8.*x12*x2z*txs+1./16.*x12*x2z+1./8.*x12*tx-1./4.*
     #    x12*txs+1./8.*x12+1./8.*x2z*txs-1./16.*x2z-1./8.*tx*
     #    x12s+1./16.*x12s*txs-1./16.*x12s-1./16.*x2zs+1./8.*
     #    txs)
      zz10c= zz10c+rt1wz(10)*bxpi*vvc*gsm2*ys*csti*vet
     # *(-1./128.*o*x12*x2z*tx-1./128.*o*x2z*txs-1./128.*o*tx*
     #    x2zs+1./128.*o*x2zs-1./128.*os*x2z*tx-1./128.*os*x2zs
     #    -1./128.*x12*x2z*txs+1./128.*tx*x2zs)
      zz10c= zz10c+rt1wz(10)*bxpi*vvc*gsm2*ys*csti
     # *(-5./32.+5./16.*zi*o*x12*tx-5./16.*zi*o*x12*
     #    txs+21./16.*zi*o*x12-1./4.*zi*o*tx*x12s-13./
     #    16.*zi*o*x12s+1./8.*zi*o*x12c+3./8.*zi*o*
     #    txs-5./8.*zi*o-1./8.*zi*os*x12*tx-21./16.*
     #    zi*os*x12+13./32.*zi*os*x12s-5./32.*zi*os*
     #    txs+15./16.*zi*os+7./16.*zi*oc*x12-5./8.*
     #    zi*oc+5./32.*zi*oq-3./16.*zi*x12*tx+3./8.
     #    *zi*x12*txs-7./16.*zi*x12+5./16.*zi*tx*
     #    x12s-1./8.*zi*tx*x12c-5./32.*zi*x12s*txs+13./
     #    32.*zi*x12s-1./8.*zi*x12c-3./16.*zi*txs+
     #    5./32.*zi+1./32.*o*x12*x2z*tx-1./8.*o*x12*x2z-1./8.
     #    *o*x12*tx+1./16.*o*x12*txs-9./16.*o*x12+3./32.*o*x2z*
     #    txs+5./16.*o*x2z+1./32.*o*tx*x2zs+1./8.*o*x12s-3./32.
     #    *o*x2zs-3./16.*o*txs+15./32.*o+9./32.*os*x12+1./32.*
     #    os*x2z*tx)
      zz10c= zz10c+rt1wz(10)*bxpi*vvc*gsm2*ys*csti
     # *(-5./32.*os*x2z+1./16.*os*x2zs+1./32.*os*txs-15./32.
     #    *os+5./32.*oc-1./16.*x12*x2z*tx+3./32.*x12*x2z*txs+1./
     #    8.*x12*x2z+3./16.*x12*tx-3./16.*x12*txs+9./32.*x12-1./
     #    16.*x2z*txs-5./32.*x2z-1./8.*tx*x12s-1./32.*tx*x2zs+1.
     #    /32.*x12s*txs-1./8.*x12s+1./32.*x2zs+3./16.*txs)
      zz10c= zz10c+rt1wz(10)*vvc*gsm2*bxps*ys*csti*vet
     # *(-1./128.-1./64.*o*x12+1./64.*o-1./128.*os+1./64.*
     #    x12-1./128.*x12s)
      zz10c= zz10c+rt1wz(10)*vvc*gsm2*bxps*ys*csti
     # *(-1./16.*zi*o*x12+1./16.*zi*o-1./32.*zi
     #    *os+1./16.*zi*x12-1./32.*zi*x12s-1./32.*
     #    zi)
      zz10c= zz10c+rt1wz(10)*vvc*gsm2*ys*csti*vet*bxp
     # *(1./64.*o*x12*x2z+1./64.*o*x12*tx-1./128.*o*x12-1./32.
     #    *o*x2z-1./128.*o*tx+1./128.*o+1./64.*os*x12+1./64.*os
     #    *x2z-3./128.*os+1./64.*oc-1./64.*x12*x2z-3./128.*x12*
     #    tx+1./64.*x2z+1./64.*tx*x12s+1./128.*tx)
      zz10c= zz10c+rt1wz(10)*vvc*gsm2*ys*csti*vet
     # *(1./128.*o*x12*x2z+1./128.*o*x12*tx-1./64.*o*x12*txs+1.
     #    /64.*o*x2z*tx-1./64.*o*x2z+1./64.*o*x2zs+1./128.*o*txs
     #    -1./64.*os*x12*x2z+1./32.*os*x2z+1./128.*os*tx-1./128.
     #    *os*x2zs-1./128.*os*txs-1./64.*oc*x2z+3./128.*x12*x2z*
     #    tx+1./128.*x12*txs-1./64.*x2z*tx-1./128.*x12s*txs-1./
     #    128.*x2zs)
      zz10c= zz10c+rt1wz(10)*vvc*gsm2*ys*csti*bxp*(
     #    -3./32.+1./16.*zi*o*x12*tx+11./16.*zi*o*x12
     #    -1./4.*zi*o*x12s+1./16.*zi*o*txs-7./16.*
     #    zi*o-5./16.*zi*os*x12+13./32.*zi*os-1./8.
     #    *zi*oc-1./16.*zi*x12*tx+1./16.*zi*x12*txs
     #    -3./8.*zi*x12+1./16.*zi*tx*x12s+9./32.*
     #    zi*x12s-1./16.*zi*x12c-1./16.*zi*txs+5./
     #    32.*zi-3./32.*o*x12+1./32.*o*tx+5./32.*o-1./16.*
     #    os+1./32.*x12*tx+1./8.*x12-1./32.*tx-1./32.*x12s)
      zz10c= zz10c+rt1wz(10)*vvc*gsm2*ys*csti*(9./
     #    32.-3./8.*zi*o*x12*tx+5./16.*zi*o*x12*txs-31./
     #    16.*zi*o*x12+1./4.*zi*o*tx*x12s+17./16.*zi
     #    *o*x12s-1./8.*zi*o*x12c-7./16.*zi*o*txs+
     #    zi*o+1./8.*zi*os*x12*tx+13./8.*zi*os*x12
     #    -13./32.*zi*os*x12s+5./32.*zi*os*txs-21./16.*
     #    zi*os-7./16.*zi*oc*x12+3./4.*zi*oc-5./32.
     #    *zi*oq+1./4.*zi*x12*tx-7./16.*zi*x12*txs
     #    +3./4.*zi*x12-3./8.*zi*tx*x12s+1./8.*zi*
     #    tx*x12c+5./32.*zi*x12s*txs-21./32.*zi*x12s+3./
     #    16.*zi*x12c+1./4.*zi*txs-9./32.*zi+1./32.
     #    *o*x12*x2z+1./32.*o*x12*tx+3./4.*o*x12-1./16.*o*x2z*tx
     #    -1./8.*o*x2z-1./8.*o*x12s+3./32.*o*txs-23./32.*o-9./
     #    32.*os*x12+1./32.*os*x2z-1./32.*os*tx+19./32.*os-5./
     #    32.*oc-1./32.*x12*x2z*tx-1./16.*x12*x2z-1./8.*x12*tx+
     #    3./32.*x12*txs)
      zz10c= zz10c+rt1wz(10)*vvc*gsm2*ys*csti*(-
     #    15./32.*x12+1./16.*x2z*tx+3./32.*x2z+1./16.*tx*x12s+3.
     #    /16.*x12s-1./8.*txs)
      zz10c= zz10c+rt1wz(11)*bxpi*vvc*gsm2*ys*csti
     # *(-1./8.-5./8.*zi*o*x12*tx+1./4.*zi*o*x12*txs
     #    +3./4.*zi*o*x12+1./4.*zi*o*tx*x12s+1./2.*
     #    zi*o*tx-1./4.*zi*o*x12s-3./8.*zi*o*txs-1.
     #    /2.*zi*o+1./2.*zi*os*x12*tx-3./4.*zi*os*
     #    x12-5./8.*zi*os*tx+1./8.*zi*os*x12s+1./8.*
     #    zi*os*txs+3./4.*zi*os+1./4.*zi*oc*x12+1./
     #    4.*zi*oc*tx-1./2.*zi*oc+1./8.*zi*oq+1./8.
     #    *zi*x12*tx-3./8.*zi*x12*txs-1./4.*zi*x12
     #    -1./8.*zi*tx+1./8.*zi*x12s*txs+1./8.*zi*
     #    x12s+1./4.*zi*txs+1./8.*zi+1./4.*o*x12*tx-1.
     #    /4.*o*x12-1./8.*o*x2z*tx+1./4.*o*x2z-3./8.*o*tx+1./8.
     #    *o*txs+3./8.*o+1./8.*os*x12-1./8.*os*x2z+1./4.*os*tx
     #    -3./8.*os+1./8.*oc+1./8.*x12*txs+1./8.*x12+1./8.*
     #    x2z*tx-1./8.*x2z+1./8.*tx-1./4.*txs)
      zz10c= zz10c+rt1wz(11)*vvc*gsm2*bxps*ys*csti*vet
     # *(1./32.-1./32.*o-1./32.*x12)
      zz10c= zz10c+rt1wz(11)*vvc*gsm2*bxps*ys*csti
     # *(1./8.*zi*o+1./8.*zi*x12-1./8.*zi)
      zz10c= zz10c+rt1wz(11)*vvc*gsm2*ys*csti*vet*bxp
     # *(1./32.*o*x12+1./32.*o*x2z+1./32.*o-1./32.*os+1./16.
     #    *x12*tx-1./32.*x2z-1./32.*tx)
      zz10c= zz10c+rt1wz(11)*vvc*gsm2*ys*csti*vet
     # *(-1./32.*o*x12*tx+1./32.*o*x2z*tx-1./32.*o*x2z-1./32.
     #    *o*txs+1./32.*os*x2z-1./32.*os*tx-1./32.*x12*txs+1./
     #    32.*x2z*tx)
      zz10c= zz10c+rt1wz(11)*vvc*gsm2*ys*csti*bxp*(
     #    -1./4.+1./2.*zi*o*x12+1./4.*zi*o*tx-3./4.*
     #    zi*o+3./8.*zi*os-1./2.*zi*x12-1./8.*
     #    zi*tx+1./8.*zi*x12s+1./4.*zi*txs+3./8.*
     #    zi+1./4.*o+1./8.*x12+1./4.*tx)
      zz10c= zz10c+rt1wz(11)*vvc*gsm2*ys*csti*(3./
     #    8.+1./2.*zi*o*x12*tx-5./4.*zi*o*x12-3./4.*
     #    zi*o*tx+1./4.*zi*o*x12s+3./8.*zi*o*txs+9.
     #    /8.*zi*o+5./8.*zi*os*x12+1./2.*zi*os*tx-
     #    9./8.*zi*os+3./8.*zi*oc-1./8.*zi*x12*tx+
     #    3./8.*zi*x12*txs+5./8.*zi*x12+1./4.*zi*tx
     #    -1./4.*zi*x12s-1./2.*zi*txs-3./8.*zi+1.
     #    /4.*o*x12-1./8.*o*x2z+3./8.*o*tx-3./4.*o+3./8.*os-1.
     #    /4.*x12-1./4.*x2z*tx+1./8.*x2z-1./4.*tx+1./4.*txs)
      zz10c= zz10c+rt1wz(12)*xx*vvc*gsm2*ys*csti*(
     #    -zi*o*x12*tx+1./2.*zi*o*x12*txs+1./4.*zi
     #    *o*tx*x12s+3./4.*zi*o*tx-3./4.*zi*o*txs+1./2.
     #    *zi*os*x12*tx-3./4.*zi*os*tx+1./4.*zi*os*
     #    txs+1./4.*zi*oc*tx+1./2.*zi*x12*tx-3./4.*
     #    zi*x12*txs-1./4.*zi*tx*x12s-1./4.*zi*tx+
     #    1./4.*zi*x12s*txs+1./2.*zi*txs+1./4.*o*x12*tx
     #    -1./4.*o*x2z*tx-1./2.*o*tx+1./4.*o*txs+1./4.*os*tx-
     #    1./4.*x12*tx+1./4.*x12*txs+1./4.*x2z*tx+1./4.*tx-1./2.
     #    *txs)
      zz10c= zz10c+rt1wz(12)*bxpi*vvc*gsm2*ys*csti*vet
     # *(-1./32.*o*x2z*tx+1./32.*o*txs+1./32.*x12*txs-1./32.
     #    *x2z*tx)
      zz10c= zz10c+rt1wz(12)*bxpi*vvc*gsm2*ys*csti
     # *(1./8.+1./8.*zi*o*x12*tx-1./4.*zi*o*x12*txs-
     #    3./4.*zi*o*x12-1./4.*zi*o*tx*x12s+1./4.*zi
     #    *o*x12s-1./8.*zi*o*txs+1./2.*zi*o-1./2.*
     #    zi*os*x12*tx+3./4.*zi*os*x12+3./8.*zi*os*
     #    tx-1./8.*zi*os*x12s-1./8.*zi*os*txs-3./4.*
     #    zi*os-1./4.*zi*oc*x12-1./4.*zi*oc*tx+1./
     #    2.*zi*oc-1./8.*zi*oq+3./8.*zi*x12*tx-1./
     #    8.*zi*x12*txs+1./4.*zi*x12-1./4.*zi*tx*
     #    x12s-1./8.*zi*tx-1./8.*zi*x12s*txs-1./8.*
     #    zi*x12s+1./4.*zi*txs-1./8.*zi-1./4.*o*
     #    x12*tx+1./4.*o*x12+1./4.*o*x2z*tx-1./4.*o*x2z+1./8.*o
     #    *tx-1./4.*o*txs-3./8.*o-1./8.*os*x12+1./8.*os*x2z-1.
     #    /4.*os*tx+3./8.*os-1./8.*oc-1./4.*x12*tx-1./4.*x12*
     #    txs-1./8.*x12+1./8.*x2z+1./8.*tx+1./4.*txs)
      zz10c= zz10c+rt1wz(12)*vvc*gsm2*ys*csti*vet*bxp
     # *(-1./32.-1./32.*o*x12+1./16.*o-1./32.*os+1./32.*
     #    x12)
      zz10c= zz10c+rt1wz(12)*vvc*gsm2*ys*csti*vet
     # *(1./32.*o*x12*tx-1./16.*o*tx-1./32.*os*x2z+1./32.*os*
     #    tx-1./16.*x12*tx+1./32.*x2z+1./32.*tx)
      zz10c= zz10c+rt1wz(12)*vvc*gsm2*ys*csti*bxp*(
     #    1./8.-1./4.*zi*o*x12-1./8.*zi*o*tx+1./4.*
     #    zi*o-1./8.*zi*os-1./8.*zi*x12*tx+1./4.*
     #    zi*x12+1./8.*zi*tx-1./8.*zi*x12s-1./8.*
     #    zi-1./8.*o-1./8.*x12)
      zz10c= zz10c+rt1wz(12)*vvc*gsm2*ys*csti*(-
     #    1./4.+1./8.*zi*o*x12*tx+zi*o*x12+1./8.*
     #    zi*o*tx-1./4.*zi*o*x12s+1./8.*zi*o*txs-3.
     #    /4.*zi*o-1./2.*zi*os*x12-1./8.*zi*os*tx+
     #    3./4.*zi*os-1./4.*zi*oc-1./4.*zi*x12*tx+
     #    1./8.*zi*x12*txs-1./2.*zi*x12+1./4.*zi*tx*
     #    x12s+1./4.*zi*x12s-1./4.*zi*txs+1./4.*zi
     #    -1./4.*o*x12+1./8.*o*x2z+1./2.*o-1./4.*os+1./8.*x12
     #    *tx+1./4.*x12-1./8.*x2z-1./8.*tx)
      zz10c= zz10c+rt1wz(13)*xx*vvc*gsm2*ys*csti*(
     #    1./2.*zi*o*x12*txs-1./2.*zi*o*txs+1./4.*zi
     #    *os*txs-1./2.*zi*x12*txs+1./4.*zi*x12s*txs+1./
     #    4.*zi*txs+1./4.*o*txs+1./4.*x12*txs-1./4.*txs)
      zz10c= zz10c+rt1wz(13)*bxpi*vvc*gsm2*ys*csti*vet
     # *(1./64.*o*x2z*tx+1./64.*o*txs+1./64.*x12*txs-1./64.*
     #    x2z*tx)
      zz10c= zz10c+rt1wz(13)*bxpi*vvc*gsm2*ys*csti
     # *(-1./16.+1./8.*zi*o*x12*tx-1./8.*zi*o*x12*
     #    txs+3./8.*zi*o*x12-1./8.*zi*o*x12s-1./4.*
     #    zi*o-3./8.*zi*os*x12+1./16.*zi*os*x12s-1.
     #    /16.*zi*os*txs+3./8.*zi*os+1./8.*zi*oc*x12
     #    -1./4.*zi*oc+1./16.*zi*oq-1./8.*zi*x12*
     #    tx-1./8.*zi*x12+1./8.*zi*tx*x12s-1./16.*
     #    zi*x12s*txs+1./16.*zi*x12s+1./8.*zi*txs+
     #    1./16.*zi-1./8.*o*x12-1./16.*o*x2z*tx+1./8.*o*x2z
     #    -3./16.*o*txs+3./16.*o+1./16.*os*x12-1./16.*os*x2z-
     #    3./16.*os+1./16.*oc+1./8.*x12*tx-3./16.*x12*txs+1./16.
     #    *x12+1./16.*x2z*tx-1./16.*x2z+1./8.*txs)
      zz10c= zz10c+rt1wz(13)*vvc*gsm2*ys*csti*vet*bxp
     # *(-1./64.+1./64.*o+1./64.*x12)
      zz10c= zz10c+rt1wz(13)*vvc*gsm2*ys*csti*vet
     # *(-3./64.*o*x2z+1./32.*os*x2z-1./32.*x12*tx+1./64.*
     #    x2z+1./64.*tx)
      zz10c= zz10c+rt1wz(13)*vvc*gsm2*ys*csti*bxp*(
     #    -1./16.+1./8.*zi*o*x12-1./8.*zi*o+1./16.*
     #    zi*os-1./8.*zi*x12+1./16.*zi*x12s+1./16.
     #    *zi+1./16.*o+1./16.*x12)
      zz10c= zz10c+rt1wz(13)*vvc*gsm2*ys*csti*(1./
     #    8.-1./8.*zi*o*x12*tx-1./2.*zi*o*x12+1./8.*
     #    zi*o*x12s+3./8.*zi*o+1./4.*zi*os*x12-3./
     #    8.*zi*os+1./8.*zi*oc+1./8.*zi*x12*tx+1./
     #    4.*zi*x12-1./8.*zi*tx*x12s-1./8.*zi*x12s
     #    -1./8.*zi*txs-1./8.*zi+1./8.*o*x12-1./16.*o
     #    *x2z-1./4.*o+1./8.*os-1./8.*x12*tx-1./8.*x12+1./16.
     #    *x2z-1./16.*tx)
      zz10c= zz10c+rt1wz(14)*xx*vvc*gsm2*ys*csti*(
     #    -1./2.*zi*o*x12*tx-1./4.*zi*o*x12*txs+1./8.*
     #    zi*o*tx*x12s+3./8.*zi*o*tx+1./8.*zi*o*txs
     #    +1./4.*zi*os*x12*tx-3./8.*zi*os*tx-1./8.*
     #    zi*os*txs+1./8.*zi*oc*tx+1./4.*zi*x12*tx
     #    +1./8.*zi*x12*txs-1./8.*zi*tx*x12s-1./8.*
     #    zi*tx-1./8.*zi*x12s*txs+1./8.*o*x12*tx-1./8.*
     #    o*x2z*tx-1./4.*o*tx-1./8.*o*txs+1./8.*os*tx-1./8.*x12
     #    *tx-1./8.*x12*txs+1./8.*x2z*tx+1./8.*tx)
      zz10c= zz10c+rt1wz(14)*bxpi*vvc*gsm2*ys*csti*vet
     # *(-1./32.*o*x2z*tx)
      zz10c= zz10c+rt1wz(14)*bxpi*vvc*gsm2*ys*csti
     # *(1./16.-1./2.*zi*o*x12*tx+1./8.*zi*o*x12*txs
     #    -3./8.*zi*o*x12+1./2.*zi*o*tx+1./8.*zi*o
     #    *x12s-1./8.*zi*o*txs+1./4.*zi*o+3./8.*zi
     #    *os*x12-1./4.*zi*os*tx-1./16.*zi*os*x12s+1./
     #    16.*zi*os*txs-3./8.*zi*os-1./8.*zi*oc*x12
     #    +1./4.*zi*oc-1./16.*zi*oq+1./2.*zi*x12*
     #    tx-1./8.*zi*x12*txs+1./8.*zi*x12-1./4.*
     #    zi*tx*x12s-1./4.*zi*tx+1./16.*zi*x12s*txs
     #    -1./16.*zi*x12s+1./8.*zi*txs-1./16.*zi
     #    +1./8.*o*x12+1./8.*o*x2z*tx-1./8.*o*x2z-1./4.*o*tx+
     #    1./8.*o*txs-3./16.*o-1./16.*os*x12+1./16.*os*x2z+3./
     #    16.*os-1./16.*oc-1./4.*x12*tx+1./8.*x12*txs-1./16.*
     #    x12+1./16.*x2z+1./4.*tx-1./8.*txs)
      zz10c= zz10c+rt1wz(14)*vvc*gsm2*bxps*ys*csti*vet
     # *(1./64.-1./64.*o-1./64.*x12)
      zz10c= zz10c+rt1wz(14)*vvc*gsm2*bxps*ys*csti
     # *(-1./16.*zi*o-1./16.*zi*x12+1./16.*zi)
      zz10c= zz10c+rt1wz(14)*vvc*gsm2*ys*csti*vet*bxp
     # *(1./64.*o*x2z-1./32.*o+1./32.*os+1./32.*x12*tx-1./64.
     #    *x2z-1./64.*tx)
      zz10c= zz10c+rt1wz(14)*vvc*gsm2*ys*csti*vet
     # *(1./64.*o*x2z*tx+1./32.*o*x2z+1./32.*o*tx-1./64.*o*txs
     #    -1./32.*os*x2z-1./64.*x12*txs+1./64.*x2z*tx)
      zz10c= zz10c+rt1wz(14)*vvc*gsm2*ys*csti*bxp*(
     #    1./8.-1./4.*zi*o*x12+1./16.*zi*o*tx+3./8.*
     #    zi*o-3./16.*zi*os+3./16.*zi*x12*tx+1./4.
     #    *zi*x12-1./8.*zi*tx-1./16.*zi*x12s+1./8.
     #    *zi*txs-3./16.*zi-1./8.*o-1./16.*x12+1./8.*
     #    tx)
      zz10c= zz10c+rt1wz(14)*vvc*gsm2*ys*csti*(-
     #    3./16.+7./16.*zi*o*x12*tx+5./8.*zi*o*x12-9./
     #    16.*zi*o*tx-1./8.*zi*o*x12s+1./8.*zi*o*txs
     #    -9./16.*zi*o-5./16.*zi*os*x12+3./16.*zi*
     #    os*tx+9./16.*zi*os-3./16.*zi*oc-11./16.*
     #    zi*x12*tx+1./8.*zi*x12*txs-5./16.*zi*x12
     #    +1./4.*zi*tx*x12s+3./8.*zi*tx+1./8.*zi*
     #    x12s-1./4.*zi*txs+3./16.*zi-1./8.*o*x12+1./
     #    16.*o*x2z+1./16.*o*tx+3./8.*o-3./16.*os+3./16.*x12*tx
     #    +1./8.*x12-1./8.*x2z*tx-1./16.*x2z-1./4.*tx+1./8.*
     #    txs)
*
      zz20c= rs1wz(1)*xx*vvc*gtm2*ys*csti*vut*(-3./8.*
     #    o*x12*tx+3./8.*o*x2z*tx+3./8.*o*x2z+3./8.*o*txs+3./8.
     #    *os*x12-3./8.*os*x2z-3./8.*os*tx+3./8.*oc+3./8.*x12*
     #    txs-3./8.*x2z*tx)
      zz20c= zz20c+rs1wz(1)*bxpi*vvc*gtm2*ys*csti*vut
     # *(-1./4.*o*x12*tx-7./16.*o*x2z*tx+9./8.*o*tx-3./16.*o
     #    *txs+3./8.*o+3./8.*os*x12+3./8.*os*x2z-1./4.*os*tx-
     #    3./4.*os+3./8.*oc+3./8.*x12*tx-3./16.*x12*txs+3./16.*
     #    x2z*tx-3./8.*tx)
      zz20c= zz20c+rs1wz(1)*vvc*gtm2*ys*csti*vut*bxp
     # *(-1./16.+1./16.*o+1./16.*x12)
      zz20c= zz20c+rs1wz(1)*vvc*gtm2*ys*csti*vut*(
     #    -1./16.*o*x2z-1./8.*o*tx-7./16.*o-1./4.*x12*tx-1./
     #    16.*x12+1./16.*x2z+3./16.*tx)
      zz20c= zz20c+rs1wz(4)*xx*vvc*gtm2*ys*csti*vut
     # *(-3./32.*o*x2z*txs+3./32.*o*tx*x2zs-3./16.*o*x2zs-3./
     #    32.*x12*x2z*txs+3./32.*tx*x2zs)
      zz20c= zz20c+rs1wz(4)*bxpi*vvc*gtm2*ys*csti*vut
     # *(11./64.*o*x12*x2z+1./16.*o*x12*txs-1./32.*o*x2z*tx+5./
     #    64.*o*x2z*txs-3./8.*o*x2z-1./64.*o*tx*x12s-5./64.*o*tx*
     #    x2zs+1./8.*o*x2zs-3./32.*o*txs+1./64.*os*x12*x2z-1./
     #    32.*os*x12*tx+11./64.*os*x2z-1./32.*os*x2zs+1./32.*os*
     #    txs+1./64.*oc*x2z-1./64.*oc*tx-1./8.*x12*x2z*tx+5./64.
     #    *x12*x2z*txs-3./32.*x12*txs+3./16.*x2z*tx-5./64.*tx*
     #    x2zs+1./32.*x12s*txs)
      zz20c= zz20c+rs1wz(4)*vvc*gtm2*ys*csti*vut*bxp
     # *(-1./64.*os-1./32.*x12+1./64.*x12s)
      zz20c= zz20c+rs1wz(4)*vvc*gtm2*ys*csti*vut*(
     #    -3./32.*o*x12*tx-11./64.*o*x12+1./64.*o*x2z*tx+1./16.
     #    *o*x2z+1./8.*o*tx+1./32.*o*x12s+3./16.*o+1./16.*os*
     #    x12-3./64.*os*tx-11./64.*os+1./32.*oc+1./64.*x12*x2z*
     #    tx+1./32.*x12*x2z+1./8.*x12*tx-1./64.*x2z*tx-3./64.*
     #    tx*x12s-3./32.*tx)
      zz20c= zz20c+rs1wz(7)*xx*vvc*gtm2*ys*csti*vut
     # *(3./64.*o*x2z*txs+3./64.*o*tx*x2zs+3./64.*x12*x2z*txs-
     #    3./64.*tx*x2zs)
      zz20c= zz20c+rs1wz(7)*bxpi*vvc*gtm2*ys*csti*vut
     # *(-1./32.*o*x12*x2z*tx+5./128.*o*x12*x2z-1./64.*o*x12*
     #    tx-1./32.*o*x12*txs+3./32.*o*x2z*tx-5./128.*o*x2z*txs
     #    +1./64.*o*x2z+1./128.*o*tx*x12s-5./128.*o*tx*x2zs+1./
     #    64.*o*x2zs+1./32.*o*txs+1./128.*os*x12*x2z+1./64.*os*
     #    x12*tx-1./32.*os*x2z*tx+3./128.*os*x2z-1./64.*os*tx-1.
     #    /64.*os*x2zs-1./64.*os*txs+1./128.*oc*x2z+1./128.*oc*tx
     #    +1./16.*x12*x2z*tx-5./128.*x12*x2z*txs+1./32.*x12*txs
     #    -5./64.*x2z*tx+5./128.*tx*x2zs-1./64.*x12s*txs)
      zz20c= zz20c+rs1wz(7)*vvc*gtm2*ys*csti*vut*bxp
     # *(1./128.*os+1./64.*x12-1./128.*x12s)
      zz20c= zz20c+rs1wz(7)*vvc*gtm2*ys*csti*vut*(
     #    -1./128.*o*x12*x2z+3./64.*o*x12*tx-3./128.*o*x12-1./
     #    128.*o*x2z*tx-1./64.*o*x2z-3./64.*o*tx+1./128.*o*x12s
     #    -1./64.*o+1./64.*os*x12-1./128.*os*x2z+3./128.*os*tx
     #    -3./128.*os+1./128.*oc-1./128.*x12*x2z*tx-1./64.*x12*
     #    x2z-3./64.*x12*tx+1./128.*x2z*tx+3./128.*tx*x12s+1./
     #    32.*tx)
      zz20c= zz20c+rs1wz(8)*bxpi*vvc*gtm2*ys*csti*vut
     # *(1./32.*o*x12*tx-1./32.*o*x2z*tx+1./32.*o*x2z+1./32.*o
     #    *txs-1./32.*os*x2z+1./32.*os*tx+1./32.*x12*txs-1./32.
     #    *x2z*tx)
      zz20c= zz20c+rs1wz(8)*vvc*gtm2*ys*csti*vut*(
     #    1./32.*o*x12-1./32.*o*tx-1./32.*o+1./32.*os-1./32.*
     #    x12*tx+1./32.*tx)
      zz20c= zz20c+rs1wz(9)*bxpi*vvc*gtm2*ys*csti*vut
     # *(-1./8.*o*tx)
      zz20c= zz20c+rs1wz(10)*xx*vvc*gtm2*ys*csti*vut
     # *(-3./64.*o*x2z*txs-3./64.*o*tx*x2zs-3./64.*x12*x2z*txs
     #    +3./64.*tx*x2zs)
      zz20c= zz20c+rs1wz(10)*bxpi*vvc*gtm2*ys*csti*vut
     # *(1./32.*o*x12*x2z*tx-5./128.*o*x12*x2z+1./32.*o*x12*txs
     #    -7./64.*o*x2z*tx+5./128.*o*x2z*txs-1./128.*o*tx*x12s+
     #    5./128.*o*tx*x2zs-1./64.*o*x2zs-3./64.*o*txs-1./128.*os
     #    *x12*x2z-1./64.*os*x12*tx+1./32.*os*x2z*tx-5./128.*os*
     #    x2z+1./64.*os*x2zs+1./64.*os*txs-1./128.*oc*x2z-1./
     #    128.*oc*tx-1./16.*x12*x2z*tx+5./128.*x12*x2z*txs-3./64.
     #    *x12*txs+3./32.*x2z*tx-5./128.*tx*x2zs+1./64.*x12s*txs
     #    )
      zz20c= zz20c+rs1wz(10)*vvc*gtm2*ys*csti*vut*bxp
     # *(-1./128.*os-1./64.*x12+1./128.*x12s)
      zz20c= zz20c+rs1wz(10)*vvc*gtm2*ys*csti*vut
     # *(1./128.*o*x12*x2z-3./64.*o*x12*tx+5./128.*o*x12+1./
     #    128.*o*x2z*tx+1./64.*o*x2z+1./16.*o*tx-1./128.*o*x12s
     #    -1./64.*os*x12+1./128.*os*x2z-3./128.*os*tx+5./128.*
     #    os-1./128.*oc+1./128.*x12*x2z*tx+1./64.*x12*x2z+1./16.
     #    *x12*tx-1./128.*x2z*tx-3./128.*tx*x12s-3./64.*tx)
      zz20c= zz20c+rs1wz(11)*bxpi*vvc*gtm2*ys*csti*vut
     # *(-1./32.*o*x12*tx-1./16.*o*x2z*tx+5./32.*o*x2z+1./16.
     #    *o*txs+1./32.*os*x2z-1./32.*os*tx+1./16.*x12*txs-1./
     #    16.*x2z*tx)
      zz20c= zz20c+rs1wz(11)*vvc*gtm2*ys*csti*vut*bxp
     # *(-1./32.+1./32.*o+1./32.*x12)
      zz20c= zz20c+rs1wz(11)*vvc*gtm2*ys*csti*vut
     # *(1./32.*o*x12-1./32.*o*x2z-1./32.*o*tx-5./32.*o+1./
     #    32.*os-3./32.*x12*tx+1./32.*x2z+1./16.*tx)
      zz20c= zz20c+rs1wz(12)*xx*vvc*gtm2*ys*csti*vut
     # *(-3./16.*o*x12*tx-3./16.*o*x2z*tx+3./16.*o*x2z+3./16.
     #    *o*txs+3./16.*os*x12+3./16.*os*x2z-3./16.*os*tx+3./16.
     #    *oc+3./16.*x12*txs-3./16.*x2z*tx)
      zz20c= zz20c+rs1wz(12)*bxpi*vvc*gtm2*ys*csti*vut
     # *(1./32.*o*x12*tx+5./32.*o*x2z*tx-5./32.*o*x2z+3./16.*o
     #    *tx-5./32.*o*txs+3./16.*o-1./32.*os*x2z+1./32.*os*tx
     #    +3./16.*x12*tx-5./32.*x12*txs+5./32.*x2z*tx-3./16.*tx
     #    )
      zz20c= zz20c+rs1wz(12)*vvc*gtm2*ys*csti*vut
     # *(-1./16.*o*x12-1./32.*o*tx-1./16.*o-1./16.*os-1./
     #    32.*x12*tx-1./32.*x12+1./32.*tx)
      zz20c= zz20c+rs1wz(13)*xx*vvc*gtm2*ys*csti*vut
     # *(-3./32.*o*x12*tx+3./32.*o*x2z*tx+3./32.*o*x2z+3./32.
     #    *o*txs+3./32.*os*x12-3./32.*os*x2z-3./32.*os*tx+3./32.
     #    *oc+3./32.*x12*txs-3./32.*x2z*tx)
      zz20c= zz20c+rs1wz(13)*bxpi*vvc*gtm2*ys*csti*vut
     # *(1./64.*o*x12*tx-5./64.*o*x2z*tx-1./64.*o*x2z+3./32.*o
     #    *tx-5./64.*o*txs+3./32.*o+1./64.*os*x2z+1./64.*os*tx
     #    +3./32.*x12*tx-5./64.*x12*txs+5./64.*x2z*tx-3./32.*tx
     #    )
      zz20c= zz20c+rs1wz(13)*vvc*gtm2*ys*csti*vut
     # *(-1./64.*o*x12-1./64.*o*tx-1./32.*o-1./64.*os-1./
     #    64.*x12*tx-1./64.*x12+1./64.*tx)
      zz20c= zz20c+rs1wz(14)*xx*vvc*gtm2*ys*csti*vut
     # *(-3./16.*o*x2z*tx+3./16.*os*x2z)
      zz20c= zz20c+rs1wz(14)*bxpi*vvc*gtm2*ys*csti*vut
     # *(-1./64.*o*x12*tx+1./8.*o*x2z*tx+1./64.*o*x2z-3./16.
     #    *o*tx+1./32.*o*txs-1./64.*os*x2z-1./64.*os*tx+3./16.*
     #    os+1./32.*x12*txs-1./32.*x2z*tx)
      zz20c= zz20c+rs1wz(14)*vvc*gtm2*ys*csti*vut*bxp
     # *(-1./64.+1./64.*o+1./64.*x12)
      zz20c= zz20c+rs1wz(14)*vvc*gtm2*ys*csti*vut
     # *(-1./64.*o*x2z+3./64.*o*tx-1./64.*o-3./16.*os-3./
     #    64.*x12*tx+1./64.*x2z+1./32.*tx)
      zz20c= zz20c+rs2wz(1)*xx*vvq*gtm2*yc*(-3./2.*o*
     #    x2z*txs-3./2.*x12*x2z*txs+3./2.*x2z*txs)
      zz20c= zz20c+rs2wz(1)*bxpi*vvq*gtm2*yc*(1./4.*o*
     #    x12*x2z*tx+1./4.*o*x12*tx+3./2.*o*x12*txs-2*o*x2z*tx+
     #    3./4.*o*x2z*txs-1./4.*o*tx*x12s+1./2.*o*tx*x2zs-3*o*txs
     #    -1./2.*os*x12*tx+1./4.*os*x2z*tx+1./4.*os*tx+3./4.*os
     #    *txs-1./4.*oc*tx-3./4.*x12*x2z*tx+3./4.*x12*x2z*txs-3
     #    *x12*txs+3./2.*x2z*tx-3./4.*tx*x2zs+3./4.*x12s*txs+3./
     #    2.*txs)
      zz20c= zz20c+rs2wz(1)*vvq*gtm2*bxps*yc*(-1./4.
     #    +1./4.*o+1./4.*x12)
      zz20c= zz20c+rs2wz(1)*vvq*gtm2*yc*bxp*(1./4.+1./
     #    4.*o*x12-1./4.*o*x2z-1./4.*o*tx-3./4.*o+1./2.*os-3./
     #    4.*x12*tx-1./4.*x12-1./4.*x2z*tx+1./4.*x2z+1./2.*tx
     #    +1./4.*txs)
      zz20c= zz20c+rs2wz(1)*vvq*gtm2*yc*(-3./2.*o*x12
     #    *tx-3./4.*o*x2z*tx+1./2.*o*x2z+13./4.*o*tx+3./2.*o*
     #    txs-1./4.*os*x2z-os*tx-1./4.*x12*x2z*tx+9./4.*x12*tx
     #    +3./2.*x12*txs+1./4.*x2z*tx-1./4.*x2z*txs-1./4.*x2z
     #    -1./2.*tx*x12s+1./4.*tx*x2zs-3./2.*tx-3./2.*txs)
      zz20c= zz20c+rs2wz(4)*xx*vvq*gtm2*yc*(3./16.*o*
     #    x12*tx*x2zs-3./16.*o*tx*x2zc-3./16.*o*tx*x2zs+3./8.*o*
     #    x2zc+3./16.*o*x2zs*txs+3./16.*os*tx*x2zs-3./16.*os*x2zc
     #    +3./16.*x12*tx*x2zs+3./16.*x12*x2zs*txs+3./16.*tx*x2zc
     #    -3./16.*x2zc-3./8.*x2zs*txs)
      zz20c= zz20c+rs2wz(4)*bxpi*vvq*gtm2*yc*(5./16.*o*
     #    x12*x2z*tx-1./4.*o*x12*x2z*txs-1./32.*o*x12*x2z-1./32.*
     #    o*x12*tx*x2zs-19./32.*o*x12*x2zs-1./16.*o*x12*txs-5./32.
     #    *o*x2z*tx*x12s-11./32.*o*x2z*tx+1./32.*o*x2z*x12s+29./
     #    32.*o*x2z*txs-1./32.*o*tx*x12s+1./32.*o*tx*x12c+5./32.*
     #    o*tx*x2zc-1./2.*o*tx*x2zs+3./32.*o*x12s*txs-1./4.*o*
     #    x2zc-5./32.*o*x2zs*txs+11./8.*o*x2zs-5./16.*os*x12*x2z*
     #    tx+3./32.*os*x12*x2z-1./16.*os*x12*tx+1./8.*os*x12*x2zs
     #    +3./32.*os*x12*txs+5./8.*os*x2z*tx-1./32.*os*x2z*x12s
     #    -1./8.*os*x2z*txs-1./32.*os*x2z+3./32.*os*tx*x12s-1./
     #    32.*os*tx*x2zs+5./32.*os*x2zc-15./16.*os*x2zs-1./32.*os
     #    *txs-1./16.*oc*x12*x2z+3./32.*oc*x12*tx-5./32.*oc*x2z*
     #    tx+1./16.*oc*x2z-1./32.*oc*tx+1./8.*oc*x2zs+1./32.*oc
     #    *txs-1./32.*oq*x2z+1./32.*oq*tx+13./32.*x12*x2z*tx+29.
     #    /32.*x12*x2z*txs-11./32.*x12*tx*x2zs-5./32.*x12*x2zs*txs
     #    +15./32.*x12*x2zs)
      zz20c= zz20c+rs2wz(4)*bxpi*vvq*gtm2*yc*(-5./16.*
     #    x2z*tx*x12s-1./8.*x2z*x12s*txs-3./4.*x2z*txs-1./32.*tx*
     #    x2zc+7./32.*tx*x2zs-1./32.*x12s*txs+1./32.*x12c*txs+3.
     #    /32.*x2zc+3./16.*x2zs*txs-9./16.*x2zs)
      zz20c= zz20c+rs2wz(4)*vvq*gtm2*bxps*yc*(1./16.+1.
     #    /8.*o*x12-1./8.*o+1./16.*os-1./8.*x12+1./16.*x12s)
      zz20c= zz20c+rs2wz(4)*vvq*gtm2*yc*bxp*(-3./16.
     #    -1./4.*o*x12*x2z-1./8.*o*x12*tx-7./8.*o*x12-1./16.*o*
     #    x2z*tx+3./8.*o*x2z+1./8.*o*tx+9./32.*o*x12s+1./16.*o*
     #    txs+19./32.*o+11./32.*os*x12-5./32.*os*x2z-9./16.*os
     #    +5./32.*oc-1./16.*x12*x2z*tx+5./16.*x12*x2z+1./4.*x12
     #    *tx+1./16.*x12*txs+15./32.*x12+1./16.*x2z*tx-3./32.*
     #    x2z*x12s-7./32.*x2z-1./8.*tx*x12s-1./8.*tx-3./8.*x12s
     #    +3./32.*x12c-1./16.*txs)
      zz20c= zz20c+rs2wz(4)*vvq*gtm2*yc*(-3./16.*o*
     #    x12*x2z*tx+3./2.*o*x12*x2z+1./8.*o*x12*x2zs+1./2.*o*x12
     #    *txs+1./32.*o*x12+5./16.*o*x2z*tx-7./32.*o*x2z*x12s-3.
     #    /16.*o*x2z*txs-51./32.*o*x2z-1./8.*o*tx*x12s+5./32.*o*
     #    tx*x2zs+5./32.*o*tx-1./16.*o*x12s+1./32.*o*x12c-3./8.
     #    *o*x2zs-11./16.*o*txs-1./2.*os*x12*x2z+1./8.*os*x12*tx
     #    -1./8.*os*x12-7./32.*os*x2z*tx+21./16.*os*x2z-11./32.
     #    *os*tx+3./32.*os*x12s+1./8.*os*x2zs+1./4.*os*txs+1./
     #    32.*os+3./32.*oc*x12-9./32.*oc*x2z+1./8.*oc*tx-1./16.
     #    *oc+1./32.*oq-1./8.*x12*x2z*tx-3./16.*x12*x2z*txs-15./
     #    16.*x12*x2z+5./32.*x12*tx*x2zs-7./32.*x12*tx-3./16.*x12
     #    *x2zs-11./16.*x12*txs+1./32.*x2z*tx*x12s+3./32.*x2z*tx
     #    +3./8.*x2z*x12s+1./4.*x2z*txs+9./16.*x2z+11./32.*tx*
     #    x12s-1./8.*tx*x12c-7./32.*tx*x2zs+1./4.*x12s*txs+1./4.
     #    *x2zs+3./8.*txs)
      zz20c= zz20c+rs2wz(7)*xx*vvq*gtm2*yc*(-3./16.*o
     #    *x12*x2z*txs+3./16.*o*x2zc-3./16.*o*x2zs*txs-3./32.*os*
     #    x2z*txs-3./32.*os*x2zc+3./16.*x12*tx*x2zs-3./16.*x12*
     #    x2zs*txs-3./32.*x2z*x12s*txs-3./32.*x2zc+3./16.*x2zs*
     #    txs)
      zz20c= zz20c+rs2wz(7)*bxpi*vvq*gtm2*yc*(-1./4.*o
     #    *x12*x2z*tx+5./16.*o*x12*x2z*txs-3./64.*o*x12*x2z+3./64.
     #    *o*x12*tx*x2zs-1./32.*o*x12*tx-19./64.*o*x12*x2zs-3./32.
     #    *o*x12*txs-5./64.*o*x2z*tx+1./64.*o*x2z*x12s-33./64.*o*
     #    x2z*txs+1./32.*o*x2z+3./64.*o*tx*x12s-1./64.*o*tx*x12c
     #    +1./32.*o*tx*x2zc-1./16.*o*tx*x2zs+3./32.*o*x12s*txs-
     #    1./8.*o*x2zc+1./8.*o*x2zs*txs+21./32.*o*x2zs-1./32.*o*
     #    txs+5./64.*os*x12*x2z+3./32.*os*x12*tx+1./16.*os*x12*
     #    x2zs+3./32.*os*x12*txs+1./64.*os*x2z*tx-1./64.*os*x2z*
     #    x12s+5./32.*os*x2z*txs-5./64.*os*x2z-3./64.*os*tx*x12s
     #    +3./64.*os*tx*x2zs-1./32.*os*tx+5./64.*os*x2zc-7./16.
     #    *os*x2zs-3./64.*os*txs-1./32.*oc*x12*x2z-3./64.*oc*x12*
     #    tx+1./16.*oc*x2z+3./64.*oc*tx+1./16.*oc*x2zs+1./32.*
     #    oc*txs-1./64.*oq*x2z-1./64.*oq*tx+21./64.*x12*x2z*tx-
     #    33./64.*x12*x2z*txs-7./64.*x12*tx*x2zs+1./8.*x12*x2zs*txs
     #    +15./64.*x12*x2zs)
      zz20c= zz20c+rs2wz(7)*bxpi*vvq*gtm2*yc*(-1./32.*
     #    x12*txs-17./64.*x2z*tx*x12s+1./32.*x2z*tx+5./32.*x2z*
     #    x12s*txs+3./8.*x2z*txs-1./32.*tx*x2zc+3./64.*tx*x2zs-
     #    3./64.*x12s*txs+1./32.*x12c*txs+3./64.*x2zc-3./32.*x2zs
     #    *txs-9./32.*x2zs)
      zz20c= zz20c+rs2wz(7)*vvq*gtm2*yc*bxp*(-3./32.
     #    -5./64.*o*x12*x2z+1./32.*o*x12*tx-27./64.*o*x12+1./64.
     #    *o*x2z*tx+5./64.*o*x2z-3./64.*o*tx+5./32.*o*x12s-1./
     #    32.*o*txs+17./64.*o+13./64.*os*x12-1./32.*os*x2z+1./
     #    64.*os*tx-17./64.*os+3./32.*oc+1./64.*x12*x2z*tx+3./
     #    32.*x12*x2z-3./64.*x12*tx-1./32.*x12*txs+15./64.*x12-
     #    1./64.*x2z*tx-3./64.*x2z*x12s-3./64.*x2z+1./64.*tx*x12s
     #    +1./32.*tx-3./16.*x12s+3./64.*x12c+1./32.*txs)
      zz20c= zz20c+rs2wz(7)*vvq*gtm2*yc*(1./32.*o*x12*
     #    x2z*tx+47./64.*o*x12*x2z+3./16.*o*x12*tx+1./16.*o*x12*
     #    x2zs-7./32.*o*x12*txs+5./64.*o*x12+7./64.*o*x2z*tx-7./
     #    64.*o*x2z*x12s+7./64.*o*x2z*txs-47./64.*o*x2z-5./32.*o*
     #    tx*x12s-3./64.*o*tx*x2zs+5./64.*o*tx-1./16.*o*x12s+1./
     #    64.*o*x12c-9./64.*o*x2zs+5./16.*o*txs-1./32.*o-17./64.
     #    *os*x12*x2z-5./64.*os*x12*tx-1./8.*os*x12-3./64.*os*x2z
     #    *tx+39./64.*os*x2z-1./32.*os*tx+3./64.*os*x12s+3./64.
     #    *os*x2zs-7./64.*os*txs+5./64.*os+3./64.*oc*x12-5./32.
     #    *oc*x2z-1./16.*oc+1./64.*oq-1./64.*x12*x2z*tx+7./64.*
     #    x12*x2z*txs-15./32.*x12*x2z-1./32.*x12*tx*x2zs-7./64.*
     #    x12*tx-3./32.*x12*x2zs+5./16.*x12*txs+5./64.*x2z*tx*
     #    x12s-5./64.*x2z*tx+3./16.*x2z*x12s-1./8.*x2z*txs+9./
     #    32.*x2z+7./32.*tx*x12s-5./64.*tx*x12c+3./64.*tx*x2zs-
     #    1./32.*tx-7./64.*x12s*txs+3./32.*x2zs-3./16.*txs)
      zz20c= zz20c+rs2wz(8)*bxpi*vvq*gtm2*yc*(-1./16.*
     #    o*x12*x2z+1./16.*o*x12*tx-1./8.*o*x12*txs-1./16.*o*x2z*
     #    txs+1./16.*o*x2z-1./16.*o*tx*x12s+1./16.*o*tx*x2zs-1./
     #    16.*o*x2zs+1./16.*o*txs+1./16.*os*x12*x2z-1./8.*os*x12*
     #    tx-1./8.*os*x2z+1./16.*os*tx+1./16.*os*x2zs-1./16.*os
     #    *txs+1./16.*oc*x2z-1./16.*oc*tx+1./16.*x12*x2z*tx-1./
     #    16.*x12*x2z*txs+1./16.*x12*txs-1./16.*x2z*tx+1./16.*tx*
     #    x2zs-1./16.*x12s*txs)
      zz20c= zz20c+rs2wz(8)*vvq*gtm2*yc*bxp*(1./16.*o*
     #    x12-1./16.*o*tx-1./16.*o+1./16.*os-1./16.*x12*tx+1./
     #    16.*tx)
      zz20c= zz20c+rs2wz(8)*vvq*gtm2*yc*(-1./16.*o*
     #    x12*x2z+3./16.*o*x12*tx+1./8.*o*x12+1./8.*o*x2z-1./8.
     #    *o*tx-1./16.*o*x12s+1./16.*o*txs-1./16.*o-1./8.*os*
     #    x12-1./8.*os*x2z+1./8.*os*tx+1./8.*os-1./16.*oc+1./
     #    16.*x12*x2z*tx-1./8.*x12*tx+1./16.*x12*txs-1./8.*x2z*tx
     #    +1./16.*tx*x12s+1./16.*tx)
      zz20c= zz20c+rs2wz(9)*bxpi*vvq*gtm2*yc*(1./4.*o*
     #    x12*tx+1./4.*o*x2z*tx-1./4.*o*tx+1./4.*os*tx)
      zz20c= zz20c+rs2wz(9)*vvq*gtm2*yc*(-1./4.*o*tx
     #    )
      zz20c= zz20c+rs2wz(10)*xx*vvq*gtm2*yc*(3./16.*o*
     #    x12*x2z*txs-3./16.*o*x2zc+3./16.*o*x2zs*txs+3./32.*os*
     #    x2z*txs+3./32.*os*x2zc-3./16.*x12*tx*x2zs+3./16.*x12*
     #    x2zs*txs+3./32.*x2z*x12s*txs+3./32.*x2zc-3./16.*x2zs*
     #    txs)
      zz20c= zz20c+rs2wz(10)*bxpi*vvq*gtm2*yc*(5./16.*o*
     #    x12*x2z*tx-5./16.*o*x12*x2z*txs+1./64.*o*x12*x2z-3./64.
     #    *o*x12*tx*x2zs+19./64.*o*x12*x2zs+5./32.*o*x12*txs+1./
     #    64.*o*x2z*tx-1./64.*o*x2z*x12s+35./64.*o*x2z*txs-1./64.
     #    *o*tx*x12s+1./64.*o*tx*x12c-1./32.*o*tx*x2zc+3./32.*o*
     #    tx*x2zs-3./32.*o*x12s*txs+1./8.*o*x2zc-1./8.*o*x2zs*txs
     #    -11./16.*o*x2zs-3./64.*os*x12*x2z-1./32.*os*x12*tx-1./
     #    16.*os*x12*x2zs-3./32.*os*x12*txs+3./64.*os*x2z*tx+1./
     #    64.*os*x2z*x12s-5./32.*os*x2z*txs+1./64.*os*x2z+3./64.*
     #    os*tx*x12s-3./64.*os*tx*x2zs-5./64.*os*x2zc+15./32.*os*
     #    x2zs+5./64.*os*txs+1./32.*oc*x12*x2z+3./64.*oc*x12*tx
     #    -1./32.*oc*x2z-1./64.*oc*tx-1./16.*oc*x2zs-1./32.*oc*
     #    txs+1./64.*oq*x2z+1./64.*oq*tx-23./64.*x12*x2z*tx+35./
     #    64.*x12*x2z*txs+7./64.*x12*tx*x2zs-1./8.*x12*x2zs*txs-
     #    15./64.*x12*x2zs+17./64.*x2z*tx*x12s-5./32.*x2z*x12s*txs
     #    -3./8.*x2z*txs)
      zz20c= zz20c+rs2wz(10)*bxpi*vvq*gtm2*yc*(1./32.*tx
     #    *x2zc-5./64.*tx*x2zs+5./64.*x12s*txs-1./32.*x12c*txs-
     #    3./64.*x2zc+3./32.*x2zs*txs+9./32.*x2zs)
      zz20c= zz20c+rs2wz(10)*vvq*gtm2*yc*bxp*(3./32.+5.
     #    /64.*o*x12*x2z-1./32.*o*x12*tx+29./64.*o*x12-1./64.*o*
     #    x2z*tx-5./64.*o*x2z+5./64.*o*tx-5./32.*o*x12s+1./32.*
     #    o*txs-19./64.*o-13./64.*os*x12+1./32.*os*x2z-1./64.*
     #    os*tx+19./64.*os-3./32.*oc-1./64.*x12*x2z*tx-3./32.*
     #    x12*x2z+5./64.*x12*tx+1./32.*x12*txs-15./64.*x12+1./
     #    64.*x2z*tx+3./64.*x2z*x12s+3./64.*x2z-1./64.*tx*x12s-
     #    1./16.*tx+3./16.*x12s-3./64.*x12c-1./32.*txs)
      zz20c= zz20c+rs2wz(10)*vvq*gtm2*yc*(-1./32.*o*
     #    x12*x2z*tx-49./64.*o*x12*x2z-9./32.*o*x12*tx-1./16.*o*
     #    x12*x2zs+7./32.*o*x12*txs-1./64.*o*x12-11./64.*o*x2z*tx
     #    +7./64.*o*x2z*x12s-7./64.*o*x2z*txs+51./64.*o*x2z+5./
     #    32.*o*tx*x12s+3./64.*o*tx*x2zs-1./64.*o*tx+1./32.*o*
     #    x12s-1./64.*o*x12c+9./64.*o*x2zs-11./32.*o*txs+17./64.
     #    *os*x12*x2z+5./64.*os*x12*tx+1./16.*os*x12+3./64.*os*
     #    x2z*tx-43./64.*os*x2z-1./32.*os*tx-3./64.*os*x12s-3./
     #    64.*os*x2zs+7./64.*os*txs-1./64.*os-3./64.*oc*x12+5./
     #    32.*oc*x2z+1./32.*oc-1./64.*oq-1./64.*x12*x2z*tx-7./
     #    64.*x12*x2z*txs+15./32.*x12*x2z+1./32.*x12*tx*x2zs+11./
     #    64.*x12*tx+3./32.*x12*x2zs-11./32.*x12*txs-5./64.*x2z*
     #    tx*x12s+9./64.*x2z*tx-3./16.*x2z*x12s+1./8.*x2z*txs-9.
     #    /32.*x2z-1./4.*tx*x12s+5./64.*tx*x12c-3./64.*tx*x2zs+
     #    7./64.*x12s*txs-3./32.*x2zs+3./16.*txs)
      zz20c= zz20c+rs2wz(11)*bxpi*vvq*gtm2*yc*(-3./16.
     #    *o*x12*x2z*tx+1./16.*o*x12*x2z-1./16.*o*x12*tx+1./8.*o*
     #    x12*txs+3./16.*o*x2z*tx-1./8.*o*x2z*txs-1./16.*o*x2z+
     #    1./16.*o*tx*x12s+1./8.*o*tx*x2zs-5./16.*o*x2zs-1./16.*o
     #    *txs-1./16.*os*x12*x2z+1./8.*os*x12*tx-3./16.*os*x2z*tx
     #    +1./8.*os*x2z-1./16.*os*tx+1./8.*os*x2zs+1./16.*os*
     #    txs-1./16.*oc*x2z+1./16.*oc*tx-1./4.*x12*x2z*tx-1./8.
     #    *x12*x2z*txs-1./16.*x12*txs+1./16.*x2z*tx+3./8.*x2z*txs
     #    -1./4.*tx*x2zs+1./16.*x12s*txs+3./16.*x2zs)
      zz20c= zz20c+rs2wz(11)*vvq*gtm2*bxps*yc*(-1./8.
     #    +1./8.*o+1./8.*x12)
      zz20c= zz20c+rs2wz(11)*vvq*gtm2*yc*bxp*(3./16.+1.
     #    /4.*o*x12-3./16.*o*x2z-7./16.*o+1./4.*os-1./16.*x12*
     #    x2z-1./4.*x12*tx-5./16.*x12-1./8.*x2z*tx+3./16.*x2z
     #    +1./8.*tx+1./8.*x12s+1./8.*txs)
      zz20c= zz20c+rs2wz(11)*vvq*gtm2*yc*(-1./4.*o*
     #    x12*x2z-1./8.*o*x12-5./16.*o*x2z*tx+3./4.*o*x2z-1./16.
     #    *o*tx+1./16.*o*x12s+1./16.*o*x2zs+3./8.*o*txs+1./16.*
     #    o+1./8.*os*x12-3./8.*os*x2z+3./16.*os*tx-1./8.*os+1.
     #    /16.*oc-1./16.*x12*x2z*tx+5./16.*x12*x2z+5./16.*x12*tx
     #    +3./8.*x12*txs+1./8.*x2z*tx-1./8.*x2z*txs-3./8.*x2z
     #    -3./16.*tx*x12s+1./8.*tx*x2zs-1./16.*tx-1./16.*x2zs
     #    -3./8.*txs)
      zz20c= zz20c+rs2wz(12)*xx*vvq*gtm2*yc*(-3./8.*o
     #    *x2z*txs+3./8.*o*tx*x2zs-3./8.*x12*x2z*txs+3./4.*x2z*
     #    txs-3./8.*tx*x2zs)
      zz20c= zz20c+rs2wz(12)*bxpi*vvq*gtm2*yc*(-1./16.
     #    *o*x12*x2z+1./16.*o*x12*tx+1./4.*o*x12*txs+3./8.*o*x2z*
     #    tx+5./16.*o*x2z*txs+1./16.*o*x2z-1./16.*o*tx*x12s-5./
     #    16.*o*tx*x2zs+5./16.*o*x2zs-17./16.*o*txs+1./16.*os*x12
     #    *x2z-1./8.*os*x12*tx-1./8.*os*x2z+1./16.*os*tx-1./8.*
     #    os*x2zs+1./8.*os*txs+1./16.*oc*x2z-1./16.*oc*tx+7./16.
     #    *x12*x2z*tx+5./16.*x12*x2z*txs-17./16.*x12*txs-1./16.*
     #    x2z*tx-3./8.*x2z*txs+1./16.*tx*x2zs+1./8.*x12s*txs-3./
     #    16.*x2zs+3./4.*txs)
      zz20c= zz20c+rs2wz(12)*vvq*gtm2*yc*bxp*(-1./16.
     #    -3./16.*o*x12+1./16.*o*x2z-1./16.*o*tx+1./8.*o-1./
     #    16.*os+1./16.*x12*x2z-1./16.*x12*tx+3./16.*x12-1./16.
     #    *x2z+1./16.*tx-1./8.*x12s)
      zz20c= zz20c+rs2wz(12)*vvq*gtm2*yc*(1./4.*o*x12*
     #    x2z-3./16.*o*x12*tx+1./8.*o*x12-3./16.*o*x2z*tx-9./16.
     #    *o*x2z+5./8.*o*tx-1./16.*o*x12s-1./16.*o*x2zs+5./16.*
     #    o*txs-1./16.*o-1./8.*os*x12+5./16.*os*x2z-5./16.*os*
     #    tx+1./8.*os-1./16.*oc-1./4.*x12*x2z*tx-5./16.*x12*x2z
     #    +1./4.*x12*tx+5./16.*x12*txs+1./4.*x2z*tx+1./4.*x2z
     #    +1./8.*tx*x12s-5./16.*tx+1./16.*x2zs-3./8.*txs)
      zz20c= zz20c+rs2wz(13)*xx*vvq*gtm2*yc*(-3./8.*o
     #    *x2z*txs-3./8.*x12*x2z*txs+3./8.*x2z*txs)
      zz20c= zz20c+rs2wz(13)*bxpi*vvq*gtm2*yc*(1./32.*o*
     #    x12*x2z*tx+1./32.*o*x12*x2z+1./32.*o*x12*tx+5./16.*o*
     #    x12*txs-7./32.*o*x2z*tx+1./4.*o*x2z*txs-1./32.*o*x2z-
     #    1./32.*o*tx*x12s+1./16.*o*tx*x2zs-5./32.*o*x2zs-17./32.
     #    *o*txs-1./32.*os*x12*x2z-1./16.*os*x12*tx+1./32.*os*x2z
     #    *tx+1./16.*os*x2z+1./32.*os*tx+1./16.*os*x2zs+5./32.*
     #    os*txs-1./32.*oc*x2z-1./32.*oc*tx-1./4.*x12*x2z*tx+1./
     #    4.*x12*x2z*txs-17./32.*x12*txs+5./32.*x2z*tx-3./16.*x2z
     #    *txs-1./16.*tx*x2zs+5./32.*x12s*txs+3./32.*x2zs+3./8.
     #    *txs)
      zz20c= zz20c+rs2wz(13)*vvq*gtm2*yc*bxp*(3./32.+1.
     #    /8.*o*x12-1./32.*o*x2z-5./32.*o+1./16.*os-1./32.*x12*
     #    x2z-5./32.*x12+1./32.*x2z+1./16.*x12s)
      zz20c= zz20c+rs2wz(13)*vvq*gtm2*yc*(-1./8.*o*
     #    x12*x2z-3./16.*o*x12*tx-1./16.*o*x12-1./32.*o*x2z*tx+
     #    3./8.*o*x2z+5./32.*o*tx+1./32.*o*x12s+1./32.*o*x2zs+1.
     #    /8.*o*txs+1./32.*o+1./16.*os*x12-3./16.*os*x2z-1./32.
     #    *os*tx-1./16.*os+1./32.*oc+1./32.*x12*x2z*tx+5./32.*
     #    x12*x2z+11./32.*x12*tx+1./8.*x12*txs+1./16.*x2z*tx-3./
     #    16.*x2z-5./32.*tx*x12s-5./32.*tx-1./32.*x2zs-3./16.*
     #    txs)
      zz20c= zz20c+rs2wz(14)*xx*vvq*gtm2*yc*(3./16.*o*
     #    x2z*txs+3./16.*o*tx*x2zs+3./16.*x12*x2z*txs-3./16.*tx*
     #    x2zs)
      zz20c= zz20c+rs2wz(14)*bxpi*vvq*gtm2*yc*(-1./8.*
     #    o*x12*x2z*tx-1./32.*o*x12*x2z-1./32.*o*x12*tx-1./8.*o*
     #    x12*txs+11./16.*o*x2z*tx-5./32.*o*x2z*txs+1./32.*o*x2z
     #    +1./32.*o*tx*x12s-5./32.*o*tx*x2zs+5./32.*o*x2zs+5./
     #    32.*o*txs+1./32.*os*x12*x2z+1./16.*os*x12*tx-1./8.*os*
     #    x2z*tx-1./16.*os*x2z-1./32.*os*tx-1./16.*os*x2zs-1./
     #    16.*os*txs+1./32.*oc*x2z+1./32.*oc*tx+11./32.*x12*x2z*
     #    tx-5./32.*x12*x2z*txs+5./32.*x12*txs-11./32.*x2z*tx+3.
     #    /16.*x2z*txs-1./32.*tx*x2zs-1./16.*x12s*txs-3./32.*x2zs
     #    )
      zz20c= zz20c+rs2wz(14)*vvq*gtm2*yc*bxp*(-3./32.
     #    -5./32.*o*x12+1./32.*o*x2z+3./32.*o*tx+1./4.*o-5./
     #    32.*os+1./32.*x12*x2z+3./32.*x12*tx+5./32.*x12-1./16.
     #    *x2z*tx-1./32.*x2z-3./32.*tx-1./16.*x12s+1./16.*txs)
      zz20c= zz20c+rs2wz(14)*vvq*gtm2*yc*(1./8.*o*x12*
     #    x2z+9./32.*o*x12*tx+1./16.*o*x12-5./32.*o*x2z*tx-13./
     #    32.*o*x2z-1./2.*o*tx-1./32.*o*x12s-1./32.*o*x2zs+1./
     #    32.*o*txs-1./32.*o-1./16.*os*x12+7./32.*os*x2z+5./32.
     #    *os*tx+1./16.*os-1./32.*oc-3./16.*x12*x2z*tx-5./32.*
     #    x12*x2z-5./16.*x12*tx+1./32.*x12*txs+5./16.*x2z*tx-1./
     #    16.*x2z*txs+3./16.*x2z+1./8.*tx*x12s+1./16.*tx*x2zs+5.
     #    /32.*tx+1./32.*x2zs-3./16.*txs)
      zz20c= zz20c+rt1wz(1)*xx*vvc*gsm2*ys*csti*(6
     #    *zi*o*x12*txs-6*zi*o*txs+3*zi*os*txs-6*
     #    zi*x12*txs+3*zi*x12s*txs+3*zi*txs+3*o*
     #    txs+3*x12*txs-3*txs)
      zz20c= zz20c+rt1wz(1)*bxpi*vvc*gsm2*ys*csti*vet
     # *(-1./8.*o*x12*tx+1./16.*o*x2z*tx+3./16.*o*txs-1./8.*
     #    os*tx+3./16.*x12*txs-3./16.*x2z*tx)
      zz20c= zz20c+rt1wz(1)*bxpi*vvc*gsm2*ys*csti*(
     #    3./4.*zi*o*x12*tx-3./2.*zi*o*tx-15./4.*zi*
     #    o*txs+3./4.*zi*os*tx-3./4.*zi*x12*tx-15./4.*
     #    zi*x12*txs+3./4.*zi*tx+3*zi*txs+1./2.*o*
     #    x12*tx-o*x2z*tx+3./4.*o*tx-3./2.*o*txs+1./2.*os*tx-
     #    3./2.*x12*txs+3./2.*x2z*tx-3./4.*tx)
      zz20c= zz20c+rt1wz(1)*vvc*gsm2*bxps*ys*csti*vet
     # *(1./16.-1./16.*o-1./16.*x12)
      zz20c= zz20c+rt1wz(1)*vvc*gsm2*bxps*ys*csti*(
     #    1./4.*zi*o+1./4.*zi*x12-1./4.*zi)
      zz20c= zz20c+rt1wz(1)*vvc*gsm2*ys*csti*vet*bxp
     # *(-1./16.-1./16.*o*x12+1./16.*o*x2z+1./4.*o-3./16.*
     #    os+1./8.*x12*tx+1./16.*x12-1./16.*x2z-1./16.*tx)
      zz20c= zz20c+rt1wz(1)*vvc*gsm2*ys*csti*vet*(
     #    1./16.*o*x12*tx+1./16.*o*x2z*tx-1./8.*o*x2z-3./8.*o*tx
     #    -1./16.*o*txs+1./16.*os*x2z+1./16.*os*tx-1./4.*x12*tx
     #    -1./16.*x12*txs+1./16.*x2z*tx+1./16.*x2z+3./16.*tx)
      zz20c= zz20c+rt1wz(1)*vvc*gsm2*ys*csti*bxp*(
     #    -1./4.+1./2.*zi*o*x12-zi*o+1./2.*zi*os
     #    -1./2.*zi*x12*tx-1./2.*zi*x12+1./4.*zi*
     #    tx+1./2.*zi*txs+1./2.*zi+1./4.*o+1./2.*tx)
      zz20c= zz20c+rt1wz(1)*vvc*gsm2*ys*csti*(1./4.
     #    -1./2.*zi*o*x12+zi*o*tx+13./4.*zi*o*txs
     #    +3./4.*zi*o+1./4.*zi*os*x12-3./4.*zi*os
     #    +1./4.*zi*oc+5./4.*zi*x12*tx+13./4.*zi*
     #    x12*txs+1./4.*zi*x12-zi*tx-7./2.*zi*txs
     #    -1./4.*zi+7./4.*o*tx-1./2.*o+1./4.*os+x12*tx
     #    -1./2.*x2z*tx-5./4.*tx+1./2.*txs)
      zz20c= zz20c+rt1wz(4)*xx*vvc*gsm2*ys*csti*(3.
     #    /8.+3./8.*zi*o*oq+15./4.*zi*o*x12*tx-3*
     #    zi*o*x12*txs-9./2.*zi*o*x12-21./8.*zi*o*tx
     #    *x12s+3./4.*zi*o*tx*x12c-15./8.*zi*o*tx+9./8.
     #    *zi*o*x12s*txs+27./8.*zi*o*x12s-3./4.*zi*o
     #    *x12c+15./8.*zi*o*txs+15./8.*zi*o-21./4.*
     #    zi*os*x12*tx+9./8.*zi*os*x12*txs+27./4.*zi
     #    *os*x12+9./4.*zi*os*tx*x12s+27./8.*zi*os*tx-
     #    27./8.*zi*os*x12s+3./8.*zi*os*x12c-3./2.*
     #    zi*os*txs-15./4.*zi*os+9./4.*zi*oc*x12*tx
     #    -9./2.*zi*oc*x12-21./8.*zi*oc*tx+9./8.*
     #    zi*oc*x12s+3./8.*zi*oc*txs+15./4.*zi*oc+
     #    9./8.*zi*oq*x12+3./4.*zi*oq*tx-15./8.*zi*
     #    oq-3./4.*zi*x12*tx+15./8.*zi*x12*txs+9./8.*
     #    zi*x12+3./8.*zi*tx*x12s+3./8.*zi*tx-3./2.
     #    *zi*x12s*txs)
      zz20c= zz20c+rt1wz(4)*xx*vvc*gsm2*ys*csti*(
     #    -9./8.*zi*x12s+3./8.*zi*x12c*txs+3./8.*
     #    zi*x12c-3./4.*zi*txs-3./8.*zi-3./4.*o*
     #    x12*x2z*tx+3./4.*o*x12*x2z-15./8.*o*x12*tx+3./4.*o*x12*
     #    txs+9./4.*o*x12+9./8.*o*x2z*tx-3./8.*o*x2z*txs-9./8.*
     #    o*x2z+3./4.*o*tx*x12s+3./8.*o*tx*x2zs+3./2.*o*tx-3./4.
     #    *o*x12s-3./4.*o*x2zs-9./8.*o*txs-3./2.*o-3./8.*os*x12
     #    *x2z+3./2.*os*x12*tx-9./4.*os*x12-3./4.*os*x2z*tx+9./
     #    8.*os*x2z-15./8.*os*tx+3./8.*os*x12s+3./8.*os*x2zs+3./
     #    8.*os*txs+9./4.*os+3./4.*oc*x12-3./8.*oc*x2z+3./4.*oc
     #    *tx-3./2.*oc+3./8.*oq-3./8.*x12*x2z*txs-3./8.*x12*x2z
     #    +3./8.*x12*tx-9./8.*x12*txs-3./4.*x12-3./8.*x2z*tx+
     #    3./4.*x2z*txs+3./8.*x2z-3./8.*tx*x2zs-3./8.*tx+3./8.*
     #    x12s*txs+3./8.*x12s+3./8.*x2zs+3./4.*txs)
      zz20c= zz20c+rt1wz(4)*bxpi*vvc*gsm2*ys*csti*vet
     # *(-3./64.*o*x12*x2z*tx+1./64.*o*x12*x2z+1./32.*o*x12*
     #    txs-1./64.*o*x2z*tx-1./32.*o*x2z*txs+1./64.*o*tx*x12s
     #    +1./32.*o*tx*x2zs-1./32.*o*x2zs-1./64.*os*x12*x2z+1./
     #    32.*os*x12*tx-3./64.*os*x2z*tx+1./64.*os*x2z+1./32.*os*
     #    x2zs+1./64.*os*txs-1./64.*oc*x2z+1./64.*oc*tx-1./64.*
     #    x12*x2z*tx-1./32.*x12*x2z*txs+1./32.*tx*x2zs+1./64.*
     #    x12s*txs)
      zz20c= zz20c+rt1wz(4)*bxpi*vvc*gsm2*ys*csti*(
     #    15./16.+51./16.*zi*o*x12*tx-15./8.*zi*o*x12*txs
     #    -63./8.*zi*o*x12-9./8.*zi*o*tx*x12s-9./4.*
     #    zi*o*tx+39./8.*zi*o*x12s-3./4.*zi*o*x12c
     #    +33./16.*zi*o*txs+15./4.*zi*o-9./4.*zi*
     #    os*x12*tx+63./8.*zi*os*x12+45./16.*zi*os*tx-
     #    39./16.*zi*os*x12s-15./16.*zi*os*txs-45./8.*
     #    zi*os-21./8.*zi*oc*x12-9./8.*zi*oc*tx+15.
     #    /4.*zi*oc-15./16.*zi*oq-15./16.*zi*x12*tx
     #    +33./16.*zi*x12*txs+21./8.*zi*x12+3./8.*
     #    zi*tx*x12s+9./16.*zi*tx-15./16.*zi*x12s*
     #    txs-39./16.*zi*x12s+3./4.*zi*x12c-9./8.*
     #    zi*txs-15./16.*zi+3./8.*o*x12*x2z*tx+11./16.*
     #    o*x12*x2z-9./8.*o*x12*tx-1./8.*o*x12*txs+27./8.*o*x12
     #    +7./16.*o*x2z*tx+5./16.*o*x2z*txs-15./8.*o*x2z-1./16.
     #    *o*tx*x12s)
      zz20c= zz20c+rt1wz(4)*bxpi*vvc*gsm2*ys*csti*(
     #    -5./16.*o*tx*x2zs+27./16.*o*tx-3./4.*o*x12s+1./2.*o*
     #    x2zs-15./16.*o*txs-45./16.*o+1./16.*os*x12*x2z-1./8.*
     #    os*x12*tx-27./16.*os*x12+3./8.*os*x2z*tx+7./8.*os*x2z
     #    -9./8.*os*tx-5./16.*os*x2zs-1./16.*os*txs+45./16.*os
     #    +1./16.*oc*x2z-1./16.*oc*tx-15./16.*oc+5./8.*x12*x2z*
     #    tx+5./16.*x12*x2z*txs-3./4.*x12*x2z+3./8.*x12*tx-15./
     #    16.*x12*txs-27./16.*x12-9./16.*x2z*tx-3./8.*x2z*txs+
     #    15./16.*x2z+1./16.*tx*x2zs-9./16.*tx-1./16.*x12s*txs+
     #    3./4.*x12s-3./16.*x2zs+9./8.*txs)
      zz20c= zz20c+rt1wz(4)*vvc*gsm2*bxps*ys*csti*vet
     # *(-1./64.-1./32.*o*x12+1./32.*o-1./64.*os+1./32.*
     #    x12-1./64.*x12s)
      zz20c= zz20c+rt1wz(4)*vvc*gsm2*bxps*ys*csti*(
     #    1./8.*zi*o*x12-1./8.*zi*o+1./16.*zi*os-1.
     #    /8.*zi*x12+1./16.*zi*x12s+1./16.*zi)
      zz20c= zz20c+rt1wz(4)*vvc*gsm2*ys*csti*vet*bxp
     # *(1./64.*o*x12*x2z+1./32.*o*x12*tx-3./64.*o*x2z-1./64.*
     #    o*tx+1./64.*o*x12s-1./64.*o+1./64.*os*x2z+1./32.*os
     #    -1./64.*oc-1./32.*x12*x2z-3./64.*x12*tx+1./32.*x2z+
     #    1./32.*tx*x12s+1./64.*tx)
      zz20c= zz20c+rt1wz(4)*vvc*gsm2*ys*csti*vet*(
     #    1./64.*o*x12*x2z*tx-1./64.*o*x12*x2z-1./64.*o*x12*tx-1./
     #    32.*o*x12*txs-1./64.*o*x12+1./64.*o*x2z*tx+3./64.*o*x2z
     #    -1./64.*o*tx*x12s+1./64.*o*tx+1./64.*o*x12s+1./64.*o*
     #    x2zs+1./64.*o*txs+1./64.*os*x12*x2z-1./32.*os*x12*tx+
     #    1./32.*os*x12+1./64.*os*x2z*tx-1./16.*os*x2z-1./64.*os*
     #    txs-1./64.*os+1./64.*oc*x2z-1./64.*oc*tx+1./64.*oc+
     #    1./16.*x12*x2z*tx+1./64.*x12*tx+1./64.*x12*txs-3./64.*
     #    x2z*tx-1./64.*tx*x12s-1./64.*x12s*txs-1./64.*x2zs)
      zz20c= zz20c+rt1wz(4)*vvc*gsm2*ys*csti*bxp*(5.
     #    /16.+1./8.*zi*o*x12*tx-25./8.*zi*o*x12-3./16.
     #    *zi*o*tx+5./4.*zi*o*x12s+1./8.*zi*o*txs+
     #    15./8.*zi*o+11./8.*zi*os*x12+1./8.*zi*os*
     #    tx-27./16.*zi*os+1./2.*zi*oc-1./16.*zi*
     #    x12*tx+1./8.*zi*x12*txs+7./4.*zi*x12+1./16.*
     #    zi*tx-23./16.*zi*x12s+3./8.*zi*x12c-1./8.
     #    *zi*txs-11./16.*zi+7./16.*o*x12+1./8.*o*tx-
     #    9./16.*o+1./4.*os+1./8.*x12*tx-1./2.*x12-1./8.*tx+3.
     #    /16.*x12s)
      zz20c= zz20c+rt1wz(4)*vvc*gsm2*ys*csti*(-
     #    25./16.-47./16.*zi*o*x12*tx+13./8.*zi*o*x12*txs
     #    +87./8.*zi*o*x12+7./8.*zi*o*tx*x12s+37./16.*
     #    zi*o*tx-49./8.*zi*o*x12s+3./4.*zi*o*x12c
     #    -33./16.*zi*o*txs-11./2.*zi*o+7./4.*zi*
     #    os*x12*tx-9*zi*os*x12-41./16.*zi*os*tx+37./16.
     #    *zi*os*x12s+13./16.*zi*os*txs+57./8.*zi*os
     #    +19./8.*zi*oc*x12+7./8.*zi*oc*tx-4*zi*oc
     #    +13./16.*zi*oq+zi*x12*tx-33./16.*zi*x12*
     #    txs-17./4.*zi*x12-3./8.*zi*tx*x12s-5./8.*
     #    zi*tx+13./16.*zi*x12s*txs+61./16.*zi*x12s
     #    -9./8.*zi*x12c+5./4.*zi*txs+25./16.*zi
     #    -1./4.*o*x12*x2z+15./16.*o*x12*tx-67./16.*o*x12-5./16.
     #    *o*x2z*tx+11./16.*o*x2z-11./8.*o*tx+11./16.*o*x12s+3./
     #    8.*o*txs+63./16.*o+23./16.*os*x12-1./4.*os*x2z+11./16.
     #    *os*tx)
      zz20c= zz20c+rt1wz(4)*vvc*gsm2*ys*csti*(-
     #    25./8.*os+3./4.*oc-5./16.*x12*x2z*tx+3./8.*x12*x2z-13.
     #    /16.*x12*tx+3./8.*x12*txs+43./16.*x12+7./16.*x2z*tx-7.
     #    /16.*x2z+1./4.*tx*x12s+5./8.*tx-9./8.*x12s-1./2.*txs
     #    )
      zz20c= zz20c+rt1wz(7)*xx*vvc*gsm2*ys*csti*(3.
     #    /16.+3./16.*zi*o*oq-3./4.*zi*o*x12*tx+15./8.*
     #    zi*o*x12*txs-9./4.*zi*o*x12+3./4.*zi*o*tx*
     #    x12s-9./16.*zi*o*x12s*txs+27./16.*zi*o*x12s-3.
     #    /8.*zi*o*x12c-9./8.*zi*o*txs+15./16.*zi*o
     #    +3./8.*zi*os*x12*tx-9./16.*zi*os*x12*txs+27./
     #    8.*zi*os*x12-27./16.*zi*os*x12s+3./16.*zi*
     #    os*x12c+15./16.*zi*os*txs-15./8.*zi*os-9./4.*
     #    zi*oc*x12+9./16.*zi*oc*x12s-3./16.*zi*oc*
     #    txs+15./8.*zi*oc+9./16.*zi*oq*x12-15./16.*
     #    zi*oq+3./8.*zi*x12*tx-9./8.*zi*x12*txs+9.
     #    /16.*zi*x12-3./4.*zi*tx*x12s+3./8.*zi*tx*
     #    x12c+15./16.*zi*x12s*txs-9./16.*zi*x12s-3./16.
     #    *zi*x12c*txs+3./16.*zi*x12c+3./8.*zi*txs
     #    -3./16.*zi+3./8.*o*x12*x2z+3./8.*o*x12*tx-3./8.*
     #    o*x12*txs)
      zz20c= zz20c+rt1wz(7)*xx*vvc*gsm2*ys*csti*(9.
     #    /8.*o*x12+3./8.*o*x2z*txs-9./16.*o*x2z-3./8.*o*x12s-3.
     #    /8.*o*x2zs+3./4.*o*txs-3./4.*o-3./16.*os*x12*x2z-9./8.
     #    *os*x12+9./16.*os*x2z+3./16.*os*x12s+3./16.*os*x2zs-3.
     #    /16.*os*txs+9./8.*os+3./8.*oc*x12-3./16.*oc*x2z-3./4.
     #    *oc+3./16.*oq-3./8.*x12*x2z*tx+3./8.*x12*x2z*txs-3./
     #    16.*x12*x2z-3./8.*x12*tx+3./4.*x12*txs-3./8.*x12-3./8.
     #    *x2z*txs+3./16.*x2z+3./8.*tx*x12s-3./16.*x12s*txs+3./
     #    16.*x12s+3./16.*x2zs-3./8.*txs)
      zz20c= zz20c+rt1wz(7)*bxpi*vvc*gsm2*ys*csti*vet
     # *(1./128.*o*x12*x2z*tx+1./128.*o*x12*x2z+1./64.*o*x12*tx
     #    -1./64.*o*x12*txs+3./128.*o*x2z*tx+1./64.*o*x2z*txs-1.
     #    /64.*o*x2z-1./128.*o*tx*x12s+1./64.*o*tx*x2zs-1./64.*o*
     #    x2zs+1./64.*o*txs-1./128.*os*x12*x2z-1./64.*os*x12*tx
     #    +1./128.*os*x2z*tx+3./128.*os*x2z+1./64.*os*tx+1./64.
     #    *os*x2zs-1./128.*os*txs-1./128.*oc*x2z-1./128.*oc*tx+
     #    1./128.*x12*x2z*tx+1./64.*x12*x2z*txs+1./64.*x12*txs-1./
     #    64.*x2z*tx-1./64.*tx*x2zs-1./128.*x12s*txs)
      zz20c= zz20c+rt1wz(7)*bxpi*vvc*gsm2*ys*csti*(
     #    15./32.-15./16.*zi*o*x12*tx+15./16.*zi*o*x12*
     #    txs-63./16.*zi*o*x12+3./4.*zi*o*tx*x12s+39./
     #    16.*zi*o*x12s-3./8.*zi*o*x12c-9./8.*zi*o*
     #    txs+15./8.*zi*o+3./8.*zi*os*x12*tx+63./16.*
     #    zi*os*x12-39./32.*zi*os*x12s+15./32.*zi*os
     #    *txs-45./16.*zi*os-21./16.*zi*oc*x12+15./8.*
     #    zi*oc-15./32.*zi*oq+9./16.*zi*x12*tx-9./
     #    8.*zi*x12*txs+21./16.*zi*x12-15./16.*zi*tx
     #    *x12s+3./8.*zi*tx*x12c+15./32.*zi*x12s*txs-39.
     #    /32.*zi*x12s+3./8.*zi*x12c+9./16.*zi*txs
     #    -15./32.*zi-1./32.*o*x12*x2z*tx+11./32.*o*x12*x2z
     #    +5./16.*o*x12*tx-1./8.*o*x12*txs+27./16.*o*x12-3./32.
     #    *o*x2z*tx-1./4.*o*x2z*txs-7./8.*o*x2z+1./32.*o*tx*x12s
     #    -1./16.*o*tx*x2zs-3./8.*o*x12s+1./4.*o*x2zs+1./2.*o*
     #    txs)
      zz20c= zz20c+rt1wz(7)*bxpi*vvc*gsm2*ys*csti*(
     #    -45./32.*o+1./32.*os*x12*x2z+1./16.*os*x12*tx-27./32.
     #    *os*x12-1./32.*os*x2z*tx+3./8.*os*x2z-1./16.*os*tx-5./
     #    32.*os*x2zs-1./16.*os*txs+45./32.*os+1./32.*oc*x2z+1./
     #    32.*oc*tx-15./32.*oc+5./32.*x12*x2z*tx-1./4.*x12*x2z*
     #    txs-3./8.*x12*x2z-9./16.*x12*tx+1./2.*x12*txs-27./32.
     #    *x12+1./16.*x2z*tx+3./16.*x2z*txs+15./32.*x2z+3./8.*
     #    tx*x12s+1./16.*tx*x2zs-1./16.*x12s*txs+3./8.*x12s-3./
     #    32.*x2zs-9./16.*txs)
      zz20c= zz20c+rt1wz(7)*vvc*gsm2*bxps*ys*csti*vet
     # *(1./128.+1./64.*o*x12-1./64.*o+1./128.*os-1./64.*x12
     #    +1./128.*x12s)
      zz20c= zz20c+rt1wz(7)*vvc*gsm2*bxps*ys*csti*(
     #    1./16.*zi*o*x12-1./16.*zi*o+1./32.*zi*os
     #    -1./16.*zi*x12+1./32.*zi*x12s+1./32.*zi
     #    )
      zz20c= zz20c+rt1wz(7)*vvc*gsm2*ys*csti*vet*bxp
     # *(-1./64.*o*x12*x2z-1./64.*o*x12*tx+1./128.*o*x12+1./
     #    32.*o*x2z+1./128.*o*tx-1./128.*o-1./64.*os*x12-1./64.
     #    *os*x2z+3./128.*os-1./64.*oc+1./64.*x12*x2z+3./128.*
     #    x12*tx-1./64.*x2z-1./64.*tx*x12s-1./128.*tx)
      zz20c= zz20c+rt1wz(7)*vvc*gsm2*ys*csti*vet*(
     #    -1./64.*o*x12*x2z+1./128.*o*x12*tx+1./64.*o*x12*txs-3.
     #    /128.*o*x12-3./128.*o*x2z*tx+3./128.*o*x2z-3./128.*o*tx
     #    +1./128.*o*x12s-1./64.*o*x2zs-1./128.*o*txs+1./64.*o
     #    +1./64.*os*x12*x2z+1./64.*os*x12-5./128.*os*x2z+1./
     #    128.*os*x2zs+1./128.*os*txs-3./128.*os+1./64.*oc*x2z+
     #    1./128.*oc-1./32.*x12*x2z*tx-3./128.*x12*tx-1./128.*x12
     #    *txs+3./128.*x2z*tx+1./128.*tx*x12s+1./64.*tx+1./128.
     #    *x12s*txs+1./128.*x2zs)
      zz20c= zz20c+rt1wz(7)*vvc*gsm2*ys*csti*bxp*(5.
     #    /32.-1./16.*zi*o*x12*tx-25./16.*zi*o*x12+5./8.
     #    *zi*o*x12s-1./16.*zi*o*txs+15./16.*zi*o+
     #    11./16.*zi*os*x12-27./32.*zi*os+1./4.*zi*
     #    oc+1./16.*zi*x12*tx-1./16.*zi*x12*txs+7./8.*
     #    zi*x12-1./16.*zi*tx*x12s-23./32.*zi*x12s
     #    +3./16.*zi*x12c+1./16.*zi*txs-11./32.*zi
     #    +7./32.*o*x12-1./32.*o*tx-9./32.*o+1./8.*os-1./32.*
     #    x12*tx-1./4.*x12+1./32.*tx+3./32.*x12s)
      zz20c= zz20c+rt1wz(7)*vvc*gsm2*ys*csti*(-
     #    25./32.+zi*o*x12*tx-13./16.*zi*o*x12*txs+87./
     #    16.*zi*o*x12-3./4.*zi*o*tx*x12s-49./16.*zi
     #    *o*x12s+3./8.*zi*o*x12c+17./16.*zi*o*txs-11./
     #    4.*zi*o-3./8.*zi*os*x12*tx-9./2.*zi*os*x12
     #    +37./32.*zi*os*x12s-13./32.*zi*os*txs+57./16.
     #    *zi*os+19./16.*zi*oc*x12-2*zi*oc+13./32.
     #    *zi*oq-5./8.*zi*x12*tx+17./16.*zi*x12*txs
     #    -17./8.*zi*x12+zi*tx*x12s-3./8.*zi*tx*
     #    x12c-13./32.*zi*x12s*txs+61./32.*zi*x12s-9./
     #    16.*zi*x12c-5./8.*zi*txs+25./32.*zi-1./8.
     #    *o*x12*x2z-7./32.*o*x12*tx-65./32.*o*x12+3./32.*o*x2z*
     #    tx+11./32.*o*x2z+3./32.*o*tx+11./32.*o*x12s-7./32.*o*
     #    txs+61./32.*o+23./32.*os*x12-1./8.*os*x2z-3./2.*os+
     #    3./8.*oc+1./16.*x12*x2z*tx+3./16.*x12*x2z+11./32.*x12*
     #    tx)
      zz20c= zz20c+rt1wz(7)*vvc*gsm2*ys*csti*(-7.
     #    /32.*x12*txs+43./32.*x12-3./32.*x2z*tx-7./32.*x2z-7./
     #    32.*tx*x12s-1./16.*tx-9./16.*x12s+1./4.*txs)
      zz20c= zz20c+rt1wz(8)*bxpi*vvc*gsm2*ys*csti*vet
     # *(-1./32.*o*x12*tx+1./32.*o*x2z*tx-1./32.*o*x2z-1./32.
     #    *o*txs+1./32.*os*x2z-1./32.*os*tx-1./32.*x12*txs+1./
     #    32.*x2z*tx)
      zz20c= zz20c+rt1wz(8)*bxpi*vvc*gsm2*ys*csti*(
     #    1./8.*o*x12*tx-1./8.*o*x2z*tx+1./8.*o*x2z+1./8.*o*txs
     #    -1./8.*os*x2z+1./8.*os*tx+1./8.*x12*txs-1./8.*x2z*tx
     #    )
      zz20c= zz20c+rt1wz(8)*vvc*gsm2*ys*csti*vet*(
     #    -1./32.*o*x12+1./32.*o*tx+1./32.*o-1./32.*os+1./32.
     #    *x12*tx-1./32.*tx)
      zz20c= zz20c+rt1wz(8)*vvc*gsm2*ys*csti*(1./8.
     #    *o*x12-1./8.*o*tx-1./8.*o+1./8.*os-1./8.*x12*tx+1./
     #    8.*tx)
      zz20c= zz20c+rt1wz(9)*bxpi*vvc*gsm2*ys*csti*vet
     # *(1./8.*o*tx)
      zz20c= zz20c+rt1wz(9)*bxpi*vvc*gsm2*ys*csti*(
     #    -1./2.*o*tx)
      zz20c= zz20c+rt1wz(10)*xx*vvc*gsm2*ys*csti*(
     #    -3./16.-3./16.*zi*o*oq+3./4.*zi*o*x12*tx-15.
     #    /8.*zi*o*x12*txs+9./4.*zi*o*x12-3./4.*zi*o
     #    *tx*x12s+9./16.*zi*o*x12s*txs-27./16.*zi*o*x12s
     #    +3./8.*zi*o*x12c+9./8.*zi*o*txs-15./16.*
     #    zi*o-3./8.*zi*os*x12*tx+9./16.*zi*os*x12*
     #    txs-27./8.*zi*os*x12+27./16.*zi*os*x12s-3./16.
     #    *zi*os*x12c-15./16.*zi*os*txs+15./8.*zi*os
     #    +9./4.*zi*oc*x12-9./16.*zi*oc*x12s+3./16.*
     #    zi*oc*txs-15./8.*zi*oc-9./16.*zi*oq*x12+
     #    15./16.*zi*oq-3./8.*zi*x12*tx+9./8.*zi*x12
     #    *txs-9./16.*zi*x12+3./4.*zi*tx*x12s-3./8.*
     #    zi*tx*x12c-15./16.*zi*x12s*txs+9./16.*zi*
     #    x12s+3./16.*zi*x12c*txs-3./16.*zi*x12c-3./8.*
     #    zi*txs+3./16.*zi-3./8.*o*x12*x2z-3./8.*o*x12*
     #    tx)
      zz20c= zz20c+rt1wz(10)*xx*vvc*gsm2*ys*csti*(
     #    3./8.*o*x12*txs-9./8.*o*x12-3./8.*o*x2z*txs+9./16.*o*
     #    x2z+3./8.*o*x12s+3./8.*o*x2zs-3./4.*o*txs+3./4.*o+3.
     #    /16.*os*x12*x2z+9./8.*os*x12-9./16.*os*x2z-3./16.*os*
     #    x12s-3./16.*os*x2zs+3./16.*os*txs-9./8.*os-3./8.*oc*
     #    x12+3./16.*oc*x2z+3./4.*oc-3./16.*oq+3./8.*x12*x2z*tx
     #    -3./8.*x12*x2z*txs+3./16.*x12*x2z+3./8.*x12*tx-3./4.*
     #    x12*txs+3./8.*x12+3./8.*x2z*txs-3./16.*x2z-3./8.*tx*
     #    x12s+3./16.*x12s*txs-3./16.*x12s-3./16.*x2zs+3./8.*
     #    txs)
      zz20c= zz20c+rt1wz(10)*bxpi*vvc*gsm2*ys*csti*vet
     # *(-1./128.*o*x12*x2z*tx-1./128.*o*x12*x2z+1./64.*o*x12*
     #    txs-1./128.*o*x2z*tx-1./64.*o*x2z*txs+1./128.*o*tx*x12s
     #    -1./64.*o*tx*x2zs+1./64.*o*x2zs+1./128.*os*x12*x2z+1./
     #    64.*os*x12*tx-1./128.*os*x2z*tx-1./128.*os*x2z-1./64.*
     #    os*x2zs+1./128.*os*txs+1./128.*oc*x2z+1./128.*oc*tx-1.
     #    /128.*x12*x2z*tx-1./64.*x12*x2z*txs+1./64.*tx*x2zs+1./
     #    128.*x12s*txs)
      zz20c= zz20c+rt1wz(10)*bxpi*vvc*gsm2*ys*csti
     # *(-15./32.+15./16.*zi*o*x12*tx-15./16.*zi*o*
     #    x12*txs+63./16.*zi*o*x12-3./4.*zi*o*tx*x12s-
     #    39./16.*zi*o*x12s+3./8.*zi*o*x12c+9./8.*zi
     #    *o*txs-15./8.*zi*o-3./8.*zi*os*x12*tx-63./16.
     #    *zi*os*x12+39./32.*zi*os*x12s-15./32.*zi*
     #    os*txs+45./16.*zi*os+21./16.*zi*oc*x12-15./8.
     #    *zi*oc+15./32.*zi*oq-9./16.*zi*x12*tx+9./
     #    8.*zi*x12*txs-21./16.*zi*x12+15./16.*zi*tx
     #    *x12s-3./8.*zi*tx*x12c-15./32.*zi*x12s*txs+39.
     #    /32.*zi*x12s-3./8.*zi*x12c-9./16.*zi*txs
     #    +15./32.*zi+1./32.*o*x12*x2z*tx-11./32.*o*x12*x2z
     #    -3./8.*o*x12*tx+1./8.*o*x12*txs-27./16.*o*x12+1./32.*
     #    o*x2z*tx+1./4.*o*x2z*txs+15./16.*o*x2z-1./32.*o*tx*x12s
     #    +1./16.*o*tx*x2zs+3./8.*o*x12s-1./4.*o*x2zs-9./16.*o*
     #    txs)
      zz20c= zz20c+rt1wz(10)*bxpi*vvc*gsm2*ys*csti
     # *(45./32.*o-1./32.*os*x12*x2z-1./16.*os*x12*tx+27./32.*
     #    os*x12+1./32.*os*x2z*tx-7./16.*os*x2z+5./32.*os*x2zs+
     #    1./16.*os*txs-45./32.*os-1./32.*oc*x2z-1./32.*oc*tx+
     #    15./32.*oc-5./32.*x12*x2z*tx+1./4.*x12*x2z*txs+3./8.*
     #    x12*x2z+9./16.*x12*tx-9./16.*x12*txs+27./32.*x12-3./
     #    16.*x2z*txs-15./32.*x2z-3./8.*tx*x12s-1./16.*tx*x2zs+
     #    1./16.*x12s*txs-3./8.*x12s+3./32.*x2zs+9./16.*txs)
      zz20c= zz20c+rt1wz(10)*vvc*gsm2*bxps*ys*csti*vet
     # *(-1./128.-1./64.*o*x12+1./64.*o-1./128.*os+1./64.*
     #    x12-1./128.*x12s)
      zz20c= zz20c+rt1wz(10)*vvc*gsm2*bxps*ys*csti
     # *(-1./16.*zi*o*x12+1./16.*zi*o-1./32.*zi
     #    *os+1./16.*zi*x12-1./32.*zi*x12s-1./32.*
     #    zi)
      zz20c= zz20c+rt1wz(10)*vvc*gsm2*ys*csti*vet*bxp
     # *(1./64.*o*x12*x2z+1./64.*o*x12*tx-1./128.*o*x12-1./32.
     #    *o*x2z-1./128.*o*tx+1./128.*o+1./64.*os*x12+1./64.*os
     #    *x2z-3./128.*os+1./64.*oc-1./64.*x12*x2z-3./128.*x12*
     #    tx+1./64.*x2z+1./64.*tx*x12s+1./128.*tx)
      zz20c= zz20c+rt1wz(10)*vvc*gsm2*ys*csti*vet
     # *(1./64.*o*x12*x2z-1./128.*o*x12*tx-1./64.*o*x12*txs+1./
     #    128.*o*x12+3./128.*o*x2z*tx-3./128.*o*x2z+1./128.*o*tx
     #    -1./128.*o*x12s+1./64.*o*x2zs+1./128.*o*txs-1./64.*os
     #    *x12*x2z-1./64.*os*x12+5./128.*os*x2z-1./128.*os*x2zs
     #    -1./128.*os*txs+1./128.*os-1./64.*oc*x2z-1./128.*oc
     #    +1./32.*x12*x2z*tx+1./128.*x12*tx+1./128.*x12*txs-3./
     #    128.*x2z*tx-1./128.*tx*x12s-1./128.*x12s*txs-1./128.*
     #    x2zs)
      zz20c= zz20c+rt1wz(10)*vvc*gsm2*ys*csti*bxp*(
     #    -5./32.+1./16.*zi*o*x12*tx+25./16.*zi*o*x12
     #    -5./8.*zi*o*x12s+1./16.*zi*o*txs-15./16.*
     #    zi*o-11./16.*zi*os*x12+27./32.*zi*os-1./
     #    4.*zi*oc-1./16.*zi*x12*tx+1./16.*zi*x12*
     #    txs-7./8.*zi*x12+1./16.*zi*tx*x12s+23./32.*
     #    zi*x12s-3./16.*zi*x12c-1./16.*zi*txs+11./
     #    32.*zi-7./32.*o*x12+1./32.*o*tx+9./32.*o-1./8.*
     #    os+1./32.*x12*tx+1./4.*x12-1./32.*tx-3./32.*x12s)
      zz20c= zz20c+rt1wz(10)*vvc*gsm2*ys*csti*(25./
     #    32.-zi*o*x12*tx+13./16.*zi*o*x12*txs-87./16.*
     #    zi*o*x12+3./4.*zi*o*tx*x12s+49./16.*zi*o*
     #    x12s-3./8.*zi*o*x12c-17./16.*zi*o*txs+11./4.*
     #    zi*o+3./8.*zi*os*x12*tx+9./2.*zi*os*x12-
     #    37./32.*zi*os*x12s+13./32.*zi*os*txs-57./16.*
     #    zi*os-19./16.*zi*oc*x12+2*zi*oc-13./32.*
     #    zi*oq+5./8.*zi*x12*tx-17./16.*zi*x12*txs
     #    +17./8.*zi*x12-zi*tx*x12s+3./8.*zi*tx*
     #    x12c+13./32.*zi*x12s*txs-61./32.*zi*x12s+9./
     #    16.*zi*x12c+5./8.*zi*txs-25./32.*zi+1./8.
     #    *o*x12*x2z+7./32.*o*x12*tx+67./32.*o*x12-3./32.*o*x2z*
     #    tx-11./32.*o*x2z-1./32.*o*tx-11./32.*o*x12s+7./32.*o*
     #    txs-63./32.*o-23./32.*os*x12+1./8.*os*x2z+25./16.*os
     #    -3./8.*oc-1./16.*x12*x2z*tx-3./16.*x12*x2z-9./32.*x12
     #    *tx)
      zz20c= zz20c+rt1wz(10)*vvc*gsm2*ys*csti*(7./
     #    32.*x12*txs-43./32.*x12+3./32.*x2z*tx+7./32.*x2z+7./
     #    32.*tx*x12s+9./16.*x12s-1./4.*txs)
      zz20c= zz20c+rt1wz(11)*bxpi*vvc*gsm2*ys*csti*vet
     # *(1./32.*o*x12*tx-1./32.*o*x2z*tx+1./32.*o*x2z+1./32.*o
     #    *txs-1./32.*os*x2z+1./32.*os*tx+1./32.*x12*txs-1./32.
     #    *x2z*tx)
      zz20c= zz20c+rt1wz(11)*bxpi*vvc*gsm2*ys*csti
     # *(-3./8.-15./8.*zi*o*x12*tx+3./4.*zi*o*x12*
     #    txs+9./4.*zi*o*x12+3./4.*zi*o*tx*x12s+3./2.*
     #    zi*o*tx-3./4.*zi*o*x12s-9./8.*zi*o*txs-3.
     #    /2.*zi*o+3./2.*zi*os*x12*tx-9./4.*zi*os*
     #    x12-15./8.*zi*os*tx+3./8.*zi*os*x12s+3./8.*
     #    zi*os*txs+9./4.*zi*os+3./4.*zi*oc*x12+3./
     #    4.*zi*oc*tx-3./2.*zi*oc+3./8.*zi*oq+3./8.
     #    *zi*x12*tx-9./8.*zi*x12*txs-3./4.*zi*x12
     #    -3./8.*zi*tx+3./8.*zi*x12s*txs+3./8.*zi*
     #    x12s+3./4.*zi*txs+3./8.*zi+5./8.*o*x12*tx-3.
     #    /4.*o*x12-1./4.*o*x2z*tx+5./8.*o*x2z-9./8.*o*tx+1./4.
     #    *o*txs+9./8.*o+3./8.*os*x12-1./4.*os*x2z+5./8.*os*tx
     #    -9./8.*os+3./8.*oc+1./4.*x12*txs+3./8.*x12+1./2.*
     #    x2z*tx-3./8.*x2z+3./8.*tx-3./4.*txs)
      zz20c= zz20c+rt1wz(11)*vvc*gsm2*bxps*ys*csti*vet
     # *(1./32.-1./32.*o-1./32.*x12)
      zz20c= zz20c+rt1wz(11)*vvc*gsm2*bxps*ys*csti
     # *(1./8.*zi*o+1./8.*zi*x12-1./8.*zi)
      zz20c= zz20c+rt1wz(11)*vvc*gsm2*ys*csti*vet*bxp
     # *(1./32.*o*x12+1./32.*o*x2z+1./32.*o-1./32.*os+1./16.
     #    *x12*tx-1./32.*x2z-1./32.*tx)
      zz20c= zz20c+rt1wz(11)*vvc*gsm2*ys*csti*vet
     # *(-1./32.*o*x12*tx+1./32.*o*x12+1./32.*o*x2z*tx-1./32.
     #    *o*x2z-1./32.*o*tx-1./32.*o*txs-1./32.*o+1./32.*os*
     #    x2z-1./32.*os*tx+1./32.*os-1./32.*x12*tx-1./32.*x12*
     #    txs+1./32.*x2z*tx+1./32.*tx)
      zz20c= zz20c+rt1wz(11)*vvc*gsm2*ys*csti*bxp*(
     #    -1./4.+zi*o*x12+1./4.*zi*o*tx-5./4.*zi
     #    *o+5./8.*zi*os-zi*x12-1./8.*zi*tx+3./8.
     #    *zi*x12s+1./4.*zi*txs+5./8.*zi+1./4.*o
     #    +1./8.*x12+1./4.*tx)
      zz20c= zz20c+rt1wz(11)*vvc*gsm2*ys*csti*(7./
     #    8.+zi*o*x12*tx-13./4.*zi*o*x12-3./2.*zi*
     #    o*tx+3./4.*zi*o*x12s+7./8.*zi*o*txs+21./8.*
     #    zi*o+13./8.*zi*os*x12+zi*os*tx-21./8.*
     #    zi*os+7./8.*zi*oc-3./8.*zi*x12*tx+7./8.*
     #    zi*x12*txs+13./8.*zi*x12+1./2.*zi*tx-3./
     #    4.*zi*x12s-zi*txs-7./8.*zi+5./8.*o*x12
     #    -1./8.*o*x2z+3./4.*o*tx-13./8.*o+3./4.*os+3./8.*x12
     #    *tx-3./4.*x12-1./4.*x2z*tx+1./8.*x2z-5./8.*tx+1./4.
     #    *txs)
      zz20c= zz20c+rt1wz(12)*xx*vvc*gsm2*ys*csti*(
     #    -3*zi*o*x12*tx+3./2.*zi*o*x12*txs+3./4.*
     #    zi*o*tx*x12s+9./4.*zi*o*tx-9./4.*zi*o*txs
     #    +3./2.*zi*os*x12*tx-9./4.*zi*os*tx+3./4.*
     #    zi*os*txs+3./4.*zi*oc*tx+3./2.*zi*x12*tx
     #    -9./4.*zi*x12*txs-3./4.*zi*tx*x12s-3./4.*
     #    zi*tx+3./4.*zi*x12s*txs+3./2.*zi*txs+3./
     #    4.*o*x12*tx-3./4.*o*x2z*tx-3./2.*o*tx+3./4.*o*txs+3./
     #    4.*os*tx-3./4.*x12*tx+3./4.*x12*txs+3./4.*x2z*tx+3./4.
     #    *tx-3./2.*txs)
      zz20c= zz20c+rt1wz(12)*bxpi*vvc*gsm2*ys*csti*vet
     # *(-1./32.*o*x12*tx-1./16.*o*x2z*tx-1./32.*o*x2z+1./16.
     #    *o*txs+1./32.*os*x2z-1./32.*os*tx+1./16.*x12*txs-1./
     #    16.*x2z*tx)
      zz20c= zz20c+rt1wz(12)*bxpi*vvc*gsm2*ys*csti
     # *(3./8.+3./8.*zi*o*x12*tx-3./4.*zi*o*x12*txs-
     #    9./4.*zi*o*x12-3./4.*zi*o*tx*x12s+3./4.*zi
     #    *o*x12s-3./8.*zi*o*txs+3./2.*zi*o-3./2.*
     #    zi*os*x12*tx+9./4.*zi*os*x12+9./8.*zi*os*
     #    tx-3./8.*zi*os*x12s-3./8.*zi*os*txs-9./4.*
     #    zi*os-3./4.*zi*oc*x12-3./4.*zi*oc*tx+3./
     #    2.*zi*oc-3./8.*zi*oq+9./8.*zi*x12*tx-3./
     #    8.*zi*x12*txs+3./4.*zi*x12-3./4.*zi*tx*
     #    x12s-3./8.*zi*tx-3./8.*zi*x12s*txs-3./8.*
     #    zi*x12s+3./4.*zi*txs-3./8.*zi-5./8.*o*
     #    x12*tx+3./4.*o*x12+5./8.*o*x2z*tx-5./8.*o*x2z+3./8.*o
     #    *tx-5./8.*o*txs-9./8.*o-3./8.*os*x12+1./4.*os*x2z-5.
     #    /8.*os*tx+9./8.*os-3./8.*oc-3./4.*x12*tx-5./8.*x12*
     #    txs-3./8.*x12-1./8.*x2z*tx+3./8.*x2z+3./8.*tx+3./4.
     #    *txs)
      zz20c= zz20c+rt1wz(12)*vvc*gsm2*ys*csti*vet*bxp
     # *(-1./32.-1./32.*o*x12+1./16.*o-1./32.*os+1./32.*
     #    x12)
      zz20c= zz20c+rt1wz(12)*vvc*gsm2*ys*csti*vet
     # *(1./32.*o*x12*tx-1./32.*o*x12-3./32.*o*tx+1./32.*o-1.
     #    /32.*os*x2z+1./32.*os*tx-1./32.*os-3./32.*x12*tx+1./
     #    32.*x2z+1./16.*tx)
      zz20c= zz20c+rt1wz(12)*vvc*gsm2*ys*csti*bxp*(
     #    1./8.-3./4.*zi*o*x12-1./8.*zi*o*tx+3./4.*
     #    zi*o-3./8.*zi*os-1./8.*zi*x12*tx+3./4.*
     #    zi*x12+1./8.*zi*tx-3./8.*zi*x12s-3./8.*
     #    zi-1./8.*o-1./8.*x12)
      zz20c= zz20c+rt1wz(12)*vvc*gsm2*ys*csti*(-
     #    3./4.+5./8.*zi*o*x12*tx+3*zi*o*x12-1./8.*
     #    zi*o*tx-3./4.*zi*o*x12s+5./8.*zi*o*txs-9.
     #    /4.*zi*o-3./2.*zi*os*x12-1./8.*zi*os*tx+
     #    9./4.*zi*os-3./4.*zi*oc-zi*x12*tx+5./8.*
     #    zi*x12*txs-3./2.*zi*x12+3./4.*zi*tx*x12s
     #    +1./4.*zi*tx+3./4.*zi*x12s-3./4.*zi*txs
     #    +3./4.*zi-5./8.*o*x12+1./8.*o*x2z+3./8.*o*tx+
     #    11./8.*o-5./8.*os+1./2.*x12*tx+3./4.*x12-1./8.*x2z-
     #    1./2.*tx)
      zz20c= zz20c+rt1wz(13)*xx*vvc*gsm2*ys*csti*(
     #    3./2.*zi*o*x12*txs-3./2.*zi*o*txs+3./4.*zi
     #    *os*txs-3./2.*zi*x12*txs+3./4.*zi*x12s*txs+3./
     #    4.*zi*txs+3./4.*o*txs+3./4.*x12*txs-3./4.*txs)
      zz20c= zz20c+rt1wz(13)*bxpi*vvc*gsm2*ys*csti*vet
     # *(-1./64.*o*x12*tx+1./32.*o*x2z*tx+1./64.*o*x2z+1./32.
     #    *o*txs-1./64.*os*x2z-1./64.*os*tx+1./32.*x12*txs-1./
     #    32.*x2z*tx)
      zz20c= zz20c+rt1wz(13)*bxpi*vvc*gsm2*ys*csti
     # *(-3./16.+3./8.*zi*o*x12*tx-3./8.*zi*o*x12*
     #    txs+9./8.*zi*o*x12-3./8.*zi*o*x12s-3./4.*
     #    zi*o-9./8.*zi*os*x12+3./16.*zi*os*x12s-3.
     #    /16.*zi*os*txs+9./8.*zi*os+3./8.*zi*oc*x12
     #    -3./4.*zi*oc+3./16.*zi*oq-3./8.*zi*x12*
     #    tx-3./8.*zi*x12+3./8.*zi*tx*x12s-3./16.*
     #    zi*x12s*txs+3./16.*zi*x12s+3./8.*zi*txs+
     #    3./16.*zi+1./16.*o*x12*tx-3./8.*o*x12-1./8.*o*x2z*
     #    tx+5./16.*o*x2z-1./2.*o*txs+9./16.*o+3./16.*os*x12-
     #    1./8.*os*x2z+1./16.*os*tx-9./16.*os+3./16.*oc+3./8.*
     #    x12*tx-1./2.*x12*txs+3./16.*x12+1./8.*x2z*tx-3./16.*
     #    x2z+3./8.*txs)
      zz20c= zz20c+rt1wz(13)*vvc*gsm2*ys*csti*vet*bxp
     # *(-1./64.+1./64.*o+1./64.*x12)
      zz20c= zz20c+rt1wz(13)*vvc*gsm2*ys*csti*vet
     # *(1./64.*o*x12-3./64.*o*x2z-1./64.*o*tx-1./64.*o+1./
     #    32.*os*x2z+1./64.*os-3./64.*x12*tx+1./64.*x2z+1./32.*
     #    tx)
      zz20c= zz20c+rt1wz(13)*vvc*gsm2*ys*csti*bxp*(
     #    -1./16.+3./8.*zi*o*x12-3./8.*zi*o+3./16.*
     #    zi*os-3./8.*zi*x12+3./16.*zi*x12s+3./16.
     #    *zi+1./16.*o+1./16.*x12)
      zz20c= zz20c+rt1wz(13)*vvc*gsm2*ys*csti*(3./
     #    8.-3./8.*zi*o*x12*tx-3./2.*zi*o*x12+3./8.*
     #    zi*o*x12s+1./4.*zi*o*txs+9./8.*zi*o+3./4.
     #    *zi*os*x12-9./8.*zi*os+3./8.*zi*oc+3./8.
     #    *zi*x12*tx+1./4.*zi*x12*txs+3./4.*zi*x12
     #    -3./8.*zi*tx*x12s-3./8.*zi*x12s-3./8.*zi
     #    *txs-3./8.*zi+5./16.*o*x12-1./16.*o*x2z+1./16.*o
     #    *tx-11./16.*o+5./16.*os-1./16.*x12*tx-3./8.*x12+1./
     #    16.*x2z-1./8.*tx)
      zz20c= zz20c+rt1wz(14)*xx*vvc*gsm2*ys*csti*(
     #    -3./2.*zi*o*x12*tx-3./4.*zi*o*x12*txs+3./8.*
     #    zi*o*tx*x12s+9./8.*zi*o*tx+3./8.*zi*o*txs
     #    +3./4.*zi*os*x12*tx-9./8.*zi*os*tx-3./8.*
     #    zi*os*txs+3./8.*zi*oc*tx+3./4.*zi*x12*tx
     #    +3./8.*zi*x12*txs-3./8.*zi*tx*x12s-3./8.*
     #    zi*tx-3./8.*zi*x12s*txs+3./8.*o*x12*tx-3./8.*
     #    o*x2z*tx-3./4.*o*tx-3./8.*o*txs+3./8.*os*tx-3./8.*x12
     #    *tx-3./8.*x12*txs+3./8.*x2z*tx+3./8.*tx)
      zz20c= zz20c+rt1wz(14)*bxpi*vvc*gsm2*ys*csti*vet
     # *(1./64.*o*x12*tx-5./64.*o*x2z*tx-1./64.*o*x2z+1./64.*o
     #    *txs+1./64.*os*x2z+1./64.*os*tx+1./64.*x12*txs-1./64.
     #    *x2z*tx)
      zz20c= zz20c+rt1wz(14)*bxpi*vvc*gsm2*ys*csti
     # *(3./16.-3./2.*zi*o*x12*tx+3./8.*zi*o*x12*txs
     #    -9./8.*zi*o*x12+3./2.*zi*o*tx+3./8.*zi*o
     #    *x12s-3./8.*zi*o*txs+3./4.*zi*o+9./8.*zi
     #    *os*x12-3./4.*zi*os*tx-3./16.*zi*os*x12s+3./
     #    16.*zi*os*txs-9./8.*zi*os-3./8.*zi*oc*x12
     #    +3./4.*zi*oc-3./16.*zi*oq+3./2.*zi*x12*
     #    tx-3./8.*zi*x12*txs+3./8.*zi*x12-3./4.*
     #    zi*tx*x12s-3./4.*zi*tx+3./16.*zi*x12s*txs
     #    -3./16.*zi*x12s+3./8.*zi*txs-3./16.*zi
     #    -1./16.*o*x12*tx+3./8.*o*x12+5./16.*o*x2z*tx-5./16.*o
     #    *x2z-3./4.*o*tx+5./16.*o*txs-9./16.*o-3./16.*os*x12
     #    +1./8.*os*x2z-1./16.*os*tx+9./16.*os-3./16.*oc-3./4.
     #    *x12*tx+5./16.*x12*txs-3./16.*x12+1./16.*x2z*tx+3./16.
     #    *x2z+3./4.*tx-3./8.*txs)
      zz20c= zz20c+rt1wz(14)*vvc*gsm2*bxps*ys*csti*vet
     # *(1./64.-1./64.*o-1./64.*x12)
      zz20c= zz20c+rt1wz(14)*vvc*gsm2*bxps*ys*csti
     # *(-1./16.*zi*o-1./16.*zi*x12+1./16.*zi)
      zz20c= zz20c+rt1wz(14)*vvc*gsm2*ys*csti*vet*bxp
     # *(1./64.*o*x2z-1./32.*o+1./32.*os+1./32.*x12*tx-1./64.
     #    *x2z-1./64.*tx)
      zz20c= zz20c+rt1wz(14)*vvc*gsm2*ys*csti*vet
     # *(-1./64.*o*x12+1./64.*o*x2z*tx+1./32.*o*x2z+5./64.*o
     #    *tx-1./64.*o*txs+1./64.*o-1./32.*os*x2z-1./64.*os-1.
     #    /64.*x12*tx-1./64.*x12*txs+1./64.*x2z*tx+1./64.*tx)
      zz20c= zz20c+rt1wz(14)*vvc*gsm2*ys*csti*bxp*(
     #    1./8.-1./2.*zi*o*x12+5./16.*zi*o*tx+5./8.*
     #    zi*o-5./16.*zi*os+7./16.*zi*x12*tx+1./2.
     #    *zi*x12-3./8.*zi*tx-3./16.*zi*x12s+1./8.
     #    *zi*txs-5./16.*zi-1./8.*o-1./16.*x12+1./8.*
     #    tx)
      zz20c= zz20c+rt1wz(14)*vvc*gsm2*ys*csti*(-
     #    7./16.+23./16.*zi*o*x12*tx+13./8.*zi*o*x12-29.
     #    /16.*zi*o*tx-3./8.*zi*o*x12s+1./8.*zi*o*
     #    txs-21./16.*zi*o-13./16.*zi*os*x12+11./16.*
     #    zi*os*tx+21./16.*zi*os-7./16.*zi*oc-31./
     #    16.*zi*x12*tx+1./8.*zi*x12*txs-13./16.*zi*
     #    x12+3./4.*zi*tx*x12s+9./8.*zi*tx+3./8.*
     #    zi*x12s-1./2.*zi*txs+7./16.*zi-5./16.*o*
     #    x12+1./16.*o*x2z+3./8.*o*tx+13./16.*o-3./8.*os+1./2.
     #    *x12*tx+3./8.*x12-1./8.*x2z*tx-1./16.*x2z-13./16.*tx
     #    +1./8.*txs)
*
      zz30c= rs1wz(1)*bxpi*vvc*gtm2*ys*csti*vut*(1./4.*o*
     #    x2z+1./8.*o*tx-1./8.*os+1./16.*x12*x2z-1./8.*x2z*tx
     #    -1./8.*x2z)
      zz30c= zz30c+rs1wz(1)*vvc*gtm2*ys*csti*vut*bxp
     # *(-3./32.+1./8.*o+1./16.*x12)
      zz30c= zz30c+rs1wz(1)*vvc*gtm2*ys*csti*vut*(
     #    1./8.+1./8.*o*x12-1./32.*o*x2z-1./32.*o*tx-1./2.*o+
     #    7./32.*os+1./16.*x12*x2z-1./32.*x12*tx-3./16.*x12+3./
     #    32.*x2z+1./8.*tx+1./32.*x12s)
      zz30c= zz30c+rs1wz(4)*bxpi*vvc*gtm2*ys*csti*vut
     # *(-1./64.*o*x2z*tx+1./64.*o*x2zs-1./64.*x12*x2z*tx+1./
     #    64.*x2zs)
      zz30c= zz30c+rs1wz(4)*vvc*gtm2*bxps*ys*csti*vut
     # *(1./128.-1./64.*o-1./64.*x12)
      zz30c= zz30c+rs1wz(4)*vvc*gtm2*ys*csti*vut*bxp
     # *(1./64.+1./64.*o*x12+3./128.*o*x2z-1./128.*o*tx-1./
     #    128.*o+1./64.*x12*x2z-1./128.*x12*tx-3./128.*x12-1./
     #    64.*x2z+1./64.*x12s)
      zz30c= zz30c+rs1wz(4)*vvc*gtm2*ys*csti*vut*(
     #    1./128.*o*x12*x2z-1./64.*o*x12*tx+1./128.*o*x2z*tx-1./
     #    128.*o*x2z+1./64.*o*tx-1./128.*o*x2zs+1./128.*os*x2z-
     #    1./128.*os*tx+1./128.*x12*x2z*tx+3./128.*x12*x2z+1./64.
     #    *x12*tx-1./32.*x2z-1./128.*tx*x12s+1./128.*x2zs)
      zz30c= zz30c+rs1wz(7)*bxpi*vvc*gtm2*ys*csti*vut
     # *(-1./128.*o*x12*x2z+1./128.*o*x2z*tx-1./128.*os*x2z+
     #    1./128.*x12*x2z*tx+1./128.*x12*x2zs-1./128.*x2zs)
      zz30c= zz30c+rs1wz(7)*vvc*gtm2*ys*csti*vut*bxp
     # *(-1./128.-1./64.*o*x12-1./256.*os+1./64.*x12-3./
     #    256.*x12s)
      zz30c= zz30c+rs1wz(7)*vvc*gtm2*ys*csti*vut*(
     #    1./64.*o*x12*x2z+1./128.*o*x12*tx+1./128.*o*x12-1./128.
     #    *o*tx-1./256.*o*x12s-1./128.*os*x12+1./128.*os*x2z+1./
     #    256.*os*tx+1./128.*os-1./256.*oc-3./128.*x12*x2z-1./
     #    128.*x12*tx+1./128.*x2z*x12s+1./64.*x2z+1./256.*tx*x12s
     #    )
      zz30c= zz30c+rs1wz(10)*bxpi*vvc*gtm2*ys*csti*vut
     # *(1./128.*o*x12*x2z-1./128.*o*x2z*tx+1./128.*os*x2z-1./
     #    128.*x12*x2z*tx-1./128.*x12*x2zs+1./128.*x2zs)
      zz30c= zz30c+rs1wz(10)*vvc*gtm2*ys*csti*vut*bxp
     # *(1./128.+1./64.*o*x12+1./256.*os-1./64.*x12+3./256.*
     #    x12s)
      zz30c= zz30c+rs1wz(10)*vvc*gtm2*ys*csti*vut
     # *(-1./64.*o*x12*x2z-1./128.*o*x12*tx-1./128.*o*x12+1./
     #    128.*o*tx+1./256.*o*x12s+1./128.*os*x12-1./128.*os*x2z
     #    -1./256.*os*tx-1./128.*os+1./256.*oc+3./128.*x12*x2z
     #    +1./128.*x12*tx-1./128.*x2z*x12s-1./64.*x2z-1./256.*
     #    tx*x12s)
      zz30c= zz30c+rs1wz(11)*bxpi*vvc*gtm2*ys*csti*vut
     # *(1./32.*o*x12+1./16.*o*x2z-1./32.*x12*tx-1./16.*x2z*tx
     #    )
      zz30c= zz30c+rs1wz(11)*vvc*gtm2*ys*csti*vut*bxp
     # *(-1./16.+3./32.*o+3./64.*x12)
      zz30c= zz30c+rs1wz(11)*vvc*gtm2*ys*csti*vut
     # *(-1./32.*o*x12-1./16.*o*x2z-3./32.*o+1./16.*x2z+1./
     #    16.*tx)
      zz30c= zz30c+rs1wz(12)*bxpi*vvc*gtm2*ys*csti*vut
     # *(-1./32.*o*x12+1./16.*o*tx-1./16.*os+1./32.*x12*x2z
     #    +1./32.*x12*tx-1./16.*x2z)
      zz30c= zz30c+rs1wz(12)*vvc*gtm2*ys*csti*vut*bxp
     # *(1./64.-1./32.*o-1./64.*x12)
      zz30c= zz30c+rs1wz(12)*vvc*gtm2*ys*csti*vut
     # *(1./16.+1./16.*o*x12+3./64.*o*x2z-1./64.*o*tx-3./32.
     #    *o+5./64.*os+1./32.*x12*x2z-1./64.*x12*tx-3./32.*x12
     #    -1./64.*x2z+1./64.*x12s)
      zz30c= zz30c+rs1wz(13)*bxpi*vvc*gtm2*ys*csti*vut
     # *(-1./64.*o*x12-1./64.*o*tx+1./64.*os+1./64.*x12*x2z
     #    +1./64.*x12*tx-1./64.*x2z)
      zz30c= zz30c+rs1wz(13)*vvc*gtm2*ys*csti*vut
     # *(1./64.+3./128.*o*x12+3./128.*o-1./64.*os-3./128.*
     #    x12+1./128.*x12s)
      zz30c= zz30c+rs1wz(14)*bxpi*vvc*gtm2*ys*csti*vut
     # *(1./64.*o*x2z-1./64.*x12*x2z-1./32.*x2z*tx)
      zz30c= zz30c+rs1wz(14)*vvc*gtm2*ys*csti*vut*bxp
     # *(-1./128.+1./64.*x12)
      zz30c= zz30c+rs1wz(14)*vvc*gtm2*ys*csti*vut
     # *(1./128.*o*x12-1./128.*o*x2z-3./128.*o*tx-1./64.*o+1.
     #    /64.*os-3./128.*x12*tx+1./64.*x12+1./128.*x2z+1./32.*
     #    tx-1./128.*x12s)
      zz30c= zz30c+rs2wz(1)*bxpi*vvq*gtm2*yc*(-1./2.*o
     #    *x2zs-1./2.*x12*x2z*tx-1./2.*x12*x2zs+1./2.*x2z*tx+1./
     #    2.*x2z*txs+1./2.*x2zs)
      zz30c= zz30c+rs2wz(1)*vvq*gtm2*bxps*yc*(-1./2.
     #    +1./2.*o+1./2.*x12)
      zz30c= zz30c+rs2wz(1)*vvq*gtm2*yc*bxp*(3./4.+5./
     #    4.*o*x12-3./4.*o*x2z-1./4.*o*tx-3./2.*o+3./4.*os-1./
     #    4.*x12*x2z-3./4.*x12*tx-3./2.*x12-1./4.*x2z*tx+3./4.*
     #    x2z+3./4.*tx+3./4.*x12s+1./4.*txs)
      zz30c= zz30c+rs2wz(1)*vvq*gtm2*yc*(-o*x12*x2z
     #    -1./4.*o*x12*tx+7./4.*o*x2z+1./2.*o*tx+1./4.*o*x2zs
     #    +1./4.*o*txs-1./2.*os*x2z+1./4.*x12*x2z*tx+7./4.*x12*
     #    x2z+x12*tx+1./4.*x12*txs-3./4.*x2z*tx-1./2.*x2z*x12s
     #    -1./4.*x2z*txs-5./4.*x2z-1./4.*tx*x12s+1./4.*tx*x2zs
     #    -1./2.*tx-1./4.*x2zs-1./2.*txs)
      zz30c= zz30c+rs2wz(4)*bxpi*vvq*gtm2*yc*(1./16.*o*
     #    x12*x2zs-1./16.*o*tx*x2zs+1./16.*o*x2zc+1./16.*x12*tx*
     #    x2zs+1./16.*tx*x2zc-1./16.*tx*x2zs-1./16.*x2zc-1./16.
     #    *x2zs*txs)
      zz30c= zz30c+rs2wz(4)*vvq*gtm2*bxps*yc*(3./32.+3.
     #    /16.*o*x12-3./16.*o+3./32.*os-3./16.*x12+3./32.*x12s
     #    )
      zz30c= zz30c+rs2wz(4)*vvq*gtm2*yc*bxp*(-7./32.*o
     #    *x12*x2z-1./16.*o*x12*tx+1./16.*o*x12-1./16.*o*x2z*tx
     #    +13./32.*o*x2z+1./32.*o*tx-1./16.*o*x12s+1./16.*o*txs
     #    -1./16.*os*x12-5./32.*os*x2z+1./32.*os*tx-1./16.*x12*
     #    x2z*tx+5./16.*x12*x2z+5./32.*x12*tx+1./16.*x12*txs+1./
     #    16.*x2z*tx-1./16.*x2z*x12s-1./4.*x2z-3./32.*tx*x12s-1.
     #    /16.*tx-1./16.*txs)
      zz30c= zz30c+rs2wz(4)*vvq*gtm2*yc*(-1./8.*o*x12
     #    *x2z+1./16.*o*x12*x2zs+1./32.*o*x2z*tx+1./16.*o*x2z*
     #    x12s-1./16.*o*x2z*txs+1./16.*o*tx*x2zs-9./32.*o*x2zs+
     #    1./16.*os*x12*x2z-1./16.*os*x2z*tx+1./16.*os*x2zs-7./32.
     #    *x12*x2z*tx-1./16.*x12*x2z*txs+1./16.*x12*tx*x2zs-1./8.
     #    *x12*x2zs+1./16.*x2z*tx*x12s+1./8.*x2z*tx+1./8.*x2z*txs
     #    -1./8.*tx*x2zs+7./32.*x2zs)
      zz30c= zz30c+rs2wz(7)*bxpi*vvq*gtm2*yc*(-1./32.*
     #    o*x12*x2zs+1./32.*o*x2zs-1./32.*os*x2zs-1./32.*x12*tx*
     #    x2zs+1./32.*tx*x2zs+1./32.*x2zs*txs)
      zz30c= zz30c+rs2wz(7)*vvq*gtm2*bxps*yc*(1./64.*o*
     #    x12+1./64.*o*tx-1./64.*o+1./64.*os+1./64.*x12*tx-1./
     #    64.*tx)
      zz30c= zz30c+rs2wz(7)*vvq*gtm2*yc*bxp*(-1./64.*o
     #    *x12*x2z+3./64.*o*x12*tx-1./16.*o*x12-1./32.*o*x2z*tx
     #    +1./32.*o*x2z-1./32.*o*tx+1./32.*o*x12s-1./64.*o*txs
     #    +1./32.*o+1./16.*os*x12-1./32.*os*x2z+1./64.*os*tx-
     #    1./16.*os+1./32.*oc-1./64.*x12*x2z*tx-1./16.*x12*tx-1.
     #    /64.*x12*txs+1./32.*x2z*tx+1./32.*tx*x12s+1./32.*tx+1.
     #    /32.*txs)
      zz30c= zz30c+rs2wz(7)*vvq*gtm2*yc*(-3./64.*o*
     #    x12*x2z*tx+3./32.*o*x12*x2z+1./32.*o*x2z*tx-1./32.*o*
     #    x2z*x12s+1./64.*o*x2z*txs-1./16.*o*x2z+1./64.*o*tx*x2zs
     #    -1./64.*o*x2zs-1./16.*os*x12*x2z-1./64.*os*x2z*tx+3./
     #    32.*os*x2z+1./64.*os*x2zs-1./32.*oc*x2z+3./32.*x12*x2z*
     #    tx+1./64.*x12*x2z*txs-1./32.*x2z*tx*x12s-1./16.*x2z*tx
     #    -1./16.*x2z*txs-1./64.*tx*x2zs)
      zz30c= zz30c+rs2wz(10)*bxpi*vvq*gtm2*yc*(1./32.*o*
     #    x12*x2zs-1./32.*o*x2zs+1./32.*os*x2zs+1./32.*x12*tx*
     #    x2zs-1./32.*tx*x2zs-1./32.*x2zs*txs)
      zz30c= zz30c+rs2wz(10)*vvq*gtm2*bxps*yc*(-1./64.
     #    *o*x12-1./64.*o*tx+1./64.*o-1./64.*os-1./64.*x12*tx
     #    +1./64.*tx)
      zz30c= zz30c+rs2wz(10)*vvq*gtm2*yc*bxp*(1./64.*o*
     #    x12*x2z-3./64.*o*x12*tx+1./16.*o*x12+1./32.*o*x2z*tx-
     #    1./32.*o*x2z+1./32.*o*tx-1./32.*o*x12s+1./64.*o*txs-1.
     #    /32.*o-1./16.*os*x12+1./32.*os*x2z-1./64.*os*tx+1./16.
     #    *os-1./32.*oc+1./64.*x12*x2z*tx+1./16.*x12*tx+1./64.*
     #    x12*txs-1./32.*x2z*tx-1./32.*tx*x12s-1./32.*tx-1./32.
     #    *txs)
      zz30c= zz30c+rs2wz(10)*vvq*gtm2*yc*(3./64.*o*x12*
     #    x2z*tx-3./32.*o*x12*x2z-1./32.*o*x2z*tx+1./32.*o*x2z*
     #    x12s-1./64.*o*x2z*txs+1./16.*o*x2z-1./64.*o*tx*x2zs+1.
     #    /64.*o*x2zs+1./16.*os*x12*x2z+1./64.*os*x2z*tx-3./32.*
     #    os*x2z-1./64.*os*x2zs+1./32.*oc*x2z-3./32.*x12*x2z*tx
     #    -1./64.*x12*x2z*txs+1./32.*x2z*tx*x12s+1./16.*x2z*tx+
     #    1./16.*x2z*txs+1./64.*tx*x2zs)
      zz30c= zz30c+rs2wz(11)*bxpi*vvq*gtm2*yc*(1./16.*o*
     #    x2z*tx-1./16.*o*x2zs-1./16.*x12*x2z*tx-1./16.*x12*x2zs
     #    +1./8.*x2z*txs+1./16.*x2zs)
      zz30c= zz30c+rs2wz(11)*vvq*gtm2*bxps*yc*(-3./16.
     #    +3./16.*o+3./16.*x12)
      zz30c= zz30c+rs2wz(11)*vvq*gtm2*yc*bxp*(1./16.-5.
     #    /16.*o*x2z-3./32.*o+1./32.*os-1./8.*x12*x2z-1./4.*x12
     #    *tx-5./32.*x12-1./8.*x2z*tx+5./16.*x2z+3./16.*tx+3./
     #    32.*x12s+1./8.*txs)
      zz30c= zz30c+rs2wz(11)*vvq*gtm2*yc*(-1./32.*o*
     #    x12*x2z-1./16.*o*x2z*tx+5./32.*o*x2z-1./16.*o*tx+1./8.
     #    *o*x2zs+1./16.*o*txs-1./32.*os*x2z+1./32.*os*tx+1./8.
     #    *x12*x2z*tx+7./32.*x12*x2z+1./16.*x12*tx+1./16.*x12*txs
     #    -3./16.*x2z*tx-1./16.*x2z*x12s-1./8.*x2z*txs-1./8.*
     #    x2z-1./32.*tx*x12s+1./8.*tx*x2zs-1./8.*x2zs-1./8.*txs
     #    )
      zz30c= zz30c+rs2wz(12)*bxpi*vvq*gtm2*yc*(-1./8.*
     #    o*x2zs-1./8.*x12*x2z*tx-1./16.*x12*x2zs+1./4.*x2z*tx+
     #    1./8.*x2z*txs-1./8.*tx*x2zs+1./8.*x2zs)
      zz30c= zz30c+rs2wz(12)*vvq*gtm2*bxps*yc*(-1./32.
     #    +1./32.*o+1./32.*x12)
      zz30c= zz30c+rs2wz(12)*vvq*gtm2*yc*bxp*(1./4.+3./
     #    8.*o*x12-1./32.*o*tx-1./2.*o+1./4.*os+1./32.*x12*x2z
     #    -1./32.*x12*tx-3./8.*x12+1./16.*tx+1./8.*x12s)
      zz30c= zz30c+rs2wz(12)*vvq*gtm2*yc*(-1./4.*o*
     #    x12*x2z-1./16.*o*x12*tx-1./32.*o*x2z*tx+1./2.*o*x2z+1.
     #    /4.*o*tx-1./32.*o*x2zs+1./16.*o*txs-1./8.*os*x2z-3./
     #    32.*x12*x2z*tx+5./16.*x12*x2z+3./8.*x12*tx+1./16.*x12*
     #    txs+1./16.*x2z*tx-1./16.*x2z*x12s-3./8.*x2z-1./16.*tx
     #    *x12s-1./4.*tx+1./32.*x2zs-1./8.*txs)
      zz30c= zz30c+rs2wz(13)*bxpi*vvq*gtm2*yc*(-1./32.
     #    *o*x2z*tx-1./32.*o*x2zs+1./16.*o*txs-5./32.*x12*x2z*tx
     #    +1./16.*x12*txs+1./16.*x2z*tx+1./16.*x2z*txs+1./32.*
     #    x2zs)
      zz30c= zz30c+rs2wz(13)*vvq*gtm2*bxps*yc*(1./64.-
     #    1./64.*o-1./64.*x12)
      zz30c= zz30c+rs2wz(13)*vvq*gtm2*yc*bxp*(-3./64.*
     #    o*tx+5./64.*o-5./64.*os-1./64.*x12*x2z+1./64.*x12*tx
     #    -1./64.*x12+1./32.*tx+1./64.*x12s)
      zz30c= zz30c+rs2wz(13)*vvq*gtm2*yc*(-3./64.*o*
     #    x12*x2z-3./32.*o*x12*tx+5./64.*o*x2z*tx+1./64.*o*x2z+
     #    1./64.*o*x2zs-1./32.*o*txs+1./64.*os*x2z-1./64.*os*tx
     #    +3./64.*x12*x2z*tx+3./64.*x12*x2z+1./8.*x12*tx-1./32.
     #    *x12*txs-1./32.*x2z*tx-1./32.*x2z-5./64.*tx*x12s-1./
     #    16.*tx-1./64.*x2zs-1./16.*txs)
      zz30c= zz30c+rs2wz(14)*bxpi*vvq*gtm2*yc*(1./32.*o*
     #    x2z*tx+1./32.*o*x2zs+1./32.*x12*x2z*tx+1./16.*x2z*txs
     #    -1./16.*tx*x2zs-1./32.*x2zs)
      zz30c= zz30c+rs2wz(14)*vvq*gtm2*bxps*yc*(-1./64.
     #    +1./64.*o+1./64.*x12)
      zz30c= zz30c+rs2wz(14)*vvq*gtm2*yc*bxp*(-1./32.
     #    -1./16.*o*x12-3./64.*o*tx+5./64.*o-3./64.*os+1./64.
     #    *x12*x2z-3./64.*x12*tx+3./64.*x12-1./16.*x2z*tx+1./16.
     #    *tx-1./64.*x12s+1./16.*txs)
      zz30c= zz30c+rs2wz(14)*vvq*gtm2*yc*(3./64.*o*x12*
     #    x2z+1./32.*o*x12*tx+1./64.*o*x2z*tx-7./64.*o*x2z-1./
     #    32.*o*tx-1./64.*o*x2zs+3./64.*os*x2z+1./64.*os*tx+1./
     #    64.*x12*x2z*tx-3./64.*x12*x2z-1./32.*x12*tx-1./16.*x2z*
     #    txs+1./16.*x2z+1./64.*tx*x12s+1./16.*tx*x2zs+1./64.*
     #    x2zs-1./16.*txs)
      zz30c= zz30c+rt1wz(1)*bxpi*vvc*gsm2*ys*csti*vet
     # *(1./16.*o*x2z*tx+1./16.*o*txs+1./16.*x12*txs-1./16.*
     #    x2z*tx)
      zz30c= zz30c+rt1wz(1)*bxpi*vvc*gsm2*ys*csti*(
     #    5./8.*zi*o*x12*tx-3./4.*zi*o*tx-9./8.*zi*o
     #    *txs+3./8.*zi*os*tx-5./8.*zi*x12*tx-9./8.*
     #    zi*x12*txs+1./4.*zi*tx*x12s+3./8.*zi*tx+
     #    zi*txs+3./8.*o*tx+1./4.*x12*tx-3./8.*tx-txs)
      zz30c= zz30c+rt1wz(1)*vvc*gsm2*bxps*ys*csti*vet
     # *(3./32.-3./32.*o-3./32.*x12)
      zz30c= zz30c+rt1wz(1)*vvc*gsm2*bxps*ys*csti*(
     #    7./16.*zi*o+7./16.*zi*x12-7./16.*zi)
      zz30c= zz30c+rt1wz(1)*vvc*gsm2*ys*csti*vet*bxp
     # *(1./32.-1./32.*o*x12+1./8.*o*x2z+1./8.*o-5./32.*os
     #    +1./32.*x12*x2z+1./16.*x12*tx+1./32.*x12-1./8.*x2z-
     #    3./32.*tx)
      zz30c= zz30c+rt1wz(1)*vvc*gsm2*ys*csti*vet*(
     #    3./32.*o*x12*tx+1./16.*o*x2z*tx-11./32.*o*tx-1./32.*o*
     #    x2zs-1./32.*o*txs+1./32.*os*x2z+3./32.*os*tx+1./32.*
     #    x12*x2z*tx-5./32.*x12*tx-1./32.*x12*txs+3./32.*x2z*tx
     #    -1./32.*x2z+1./16.*tx+1./32.*x2zs)
      zz30c= zz30c+rt1wz(1)*vvc*gsm2*ys*csti*bxp*(
     #    -1./2.+3./8.*zi*o*x12+1./4.*zi*o*tx-9./8.*
     #    zi*o+9./16.*zi*os-1./2.*zi*x12*tx-3./8.*
     #    zi*x12+3./16.*zi*tx-3./16.*zi*x12s+1./2.
     #    *zi*txs+9./16.*zi+1./2.*o-1./16.*x12+1./2.*
     #    tx)
      zz30c= zz30c+rt1wz(1)*vvc*gsm2*ys*csti*(1./8.
     #    -1./4.*zi*o*x12*tx+5./8.*zi*o*x12+5./8.*
     #    zi*o*tx-11./16.*zi*o*x12s+21./16.*zi*o*txs
     #    +3./8.*zi*o-5./16.*zi*os*x12-1./16.*zi*
     #    os*tx-3./8.*zi*os+1./8.*zi*oc+15./16.*zi
     #    *x12*tx+21./16.*zi*x12*txs-5./16.*zi*x12-3./
     #    16.*zi*tx*x12s-9./16.*zi*tx+11./16.*zi*
     #    x12s-1./4.*zi*x12c-3./2.*zi*txs-1./8.*zi
     #    -7./16.*o*x12-1./16.*o*x2z+3./8.*o*tx-1./4.*o+1./8.
     #    *os+1./4.*x12*x2z+3./16.*x12*tx+7./16.*x12-1./2.*x2z*
     #    tx+1./16.*x2z+3./16.*tx-1./4.*x12s+1./2.*txs)
      zz30c= zz30c+rt1wz(4)*bxpi*vvc*gsm2*ys*csti*vet
     # *(-1./64.*o*x12*x2z*tx-1./64.*o*x2z*txs+1./64.*o*tx*
     #    x2zs-1./64.*o*x2zs-1./64.*os*x2z*tx+1./64.*os*x2zs-1./
     #    64.*x12*x2z*txs+1./64.*tx*x2zs)
      zz30c= zz30c+rt1wz(4)*bxpi*vvc*gsm2*ys*csti*(
     #    3./32.+11./32.*zi*o*x12*tx-1./16.*zi*o*x12*txs
     #    -33./32.*zi*o*x12-3./16.*zi*o*tx*x12s-3./16.*
     #    zi*o*tx+15./16.*zi*o*x12s-9./32.*zi*o*x12c
     #    +5./32.*zi*o*txs+3./8.*zi*o-9./32.*zi*os
     #    *x12*tx+33./32.*zi*os*x12+9./32.*zi*os*tx-15./
     #    32.*zi*os*x12s-1./32.*zi*os*txs-9./16.*zi*
     #    os-11./32.*zi*oc*x12-1./8.*zi*oc*tx+3./8.*
     #    zi*oc-3./32.*zi*oq-1./16.*zi*x12*tx-1./
     #    16.*zi*x12*x12c+5./32.*zi*x12*txs+11./32.*
     #    zi*x12+1./16.*zi*tx*x12s-1./32.*zi*tx*x12c
     #    +1./32.*zi*tx-1./32.*zi*x12s*txs-15./32.*
     #    zi*x12s+9./32.*zi*x12c-1./8.*zi*txs-3./
     #    32.*zi+5./32.*o*x12*x2z-5./32.*o*x12*tx+1./2.*o*
     #    x12+5./32.*o*x2z*tx-3./16.*o*x2z+5./32.*o*tx-7./32.*o
     #    *x12s)
      zz30c= zz30c+rt1wz(4)*bxpi*vvc*gsm2*ys*csti*(
     #    -1./8.*o*x2zs-1./32.*o*txs-9./32.*o-1./4.*os*x12+3./
     #    32.*os*x2z-1./8.*os*tx+9./32.*os-3./32.*oc-1./32.*x12
     #    *x2z*tx-5./32.*x12*x2z+1./32.*x12*tx-1./16.*x12*x2zs-
     #    1./32.*x12*txs-1./4.*x12-1./32.*x2z*tx+1./16.*x2z*x12s
     #    +1./8.*x2z*txs+3./32.*x2z-1./32.*tx*x12s-1./8.*tx*
     #    x2zs-1./32.*tx+7./32.*x12s-1./16.*x12c+1./8.*x2zs+1.
     #    /8.*txs)
      zz30c= zz30c+rt1wz(4)*vvc*gsm2*bxps*ys*csti*vet
     # *(-1./64.-5./128.*o*x12-1./128.*o*tx+5./128.*o-3./
     #    128.*os-1./128.*x12*tx+1./32.*x12+1./128.*tx-1./64.*
     #    x12s)
      zz30c= zz30c+rt1wz(4)*vvc*gsm2*bxps*ys*csti*(
     #    3./16.*zi*o*x12-1./64.*zi*o*tx-11./64.*zi*
     #    o+3./32.*zi*os-1./64.*zi*x12*tx-11./64.*
     #    zi*x12+1./64.*zi*tx+3./32.*zi*x12s+5./64.
     #    *zi)
      zz30c= zz30c+rt1wz(4)*vvc*gsm2*ys*csti*vet*bxp
     # *(3./128.*o*x12*x2z+3./128.*o*x12*tx+1./128.*o*x12+1./
     #    64.*o*x2z*tx-1./16.*o*x2z-3./128.*o*tx+1./128.*o*x12s
     #    -1./128.*o*txs-1./64.*o+1./32.*os*x2z+3./128.*os-1./
     #    128.*oc+1./128.*x12*x2z*tx-1./32.*x12*x2z-5./128.*x12*
     #    tx-1./128.*x12*txs-1./64.*x2z*tx+1./32.*x2z+3./128.*
     #    tx*x12s+1./64.*tx)
      zz30c= zz30c+rt1wz(4)*vvc*gsm2*ys*csti*vet*(
     #    1./64.*o*x12*x2z*tx-1./128.*o*x12*x2z+1./64.*o*x12*tx-1.
     #    /64.*o*x12*txs+1./128.*o*x2z*tx+1./128.*o*x2z*txs+1./32.
     #    *o*x2z-1./128.*o*tx*x12s-1./128.*o*tx*x2zs+3./128.*o*
     #    x2zs+1./64.*o*txs+1./128.*os*x12*x2z-1./64.*os*x12*tx
     #    +1./64.*os*x2z*tx-5./128.*os*x2z+1./64.*os*tx-1./128.
     #    *os*x2zs-1./128.*os*txs+1./128.*oc*x2z-1./128.*oc*tx+
     #    5./128.*x12*x2z*tx+1./128.*x12*x2z*txs+1./64.*x12*txs-1.
     #    /32.*x2z*tx+1./128.*tx*x2zs-1./128.*x12s*txs-1./64.*
     #    x2zs)
      zz30c= zz30c+rt1wz(4)*vvc*gsm2*ys*csti*bxp*(9.
     #    /32.+13./64.*zi*o*x12*tx-39./32.*zi*o*x12-1./
     #    8.*zi*o*tx+15./32.*zi*o*x12s+7./64.*zi*o*
     #    txs+23./32.*zi*o+9./16.*zi*os*x12+9./64.*
     #    zi*os*tx-11./16.*zi*os+7./32.*zi*oc-3./
     #    64.*zi*x12*tx+7./64.*zi*x12*txs+21./32.*zi
     #    *x12+1./16.*zi*tx*x12s-17./32.*zi*x12s+1./8.*
     #    zi*x12c-1./8.*zi*txs-1./4.*zi+25./64.*o*
     #    x12+3./32.*o*tx-33./64.*o+15./64.*os+7./64.*x12*tx-
     #    29./64.*x12-3./32.*tx+5./32.*x12s)
      zz30c= zz30c+rt1wz(4)*vvc*gsm2*ys*csti*(-
     #    17./64.-5./8.*zi*o*x12*tx+1./8.*zi*o*x12*txs+
     #    67./32.*zi*o*x12+5./16.*zi*o*tx*x12s+21./64.*
     #    zi*o*tx-47./32.*zi*o*x12s+5./16.*zi*o*x12c
     #    -17./64.*zi*o*txs-59./64.*zi*o+7./16.*zi
     #    *os*x12*tx-109./64.*zi*os*x12-15./32.*zi*os*tx
     #    +9./16.*zi*os*x12s+1./16.*zi*os*txs+75./64.*
     #    zi*os+7./16.*zi*oc*x12+3./16.*zi*oc*tx-
     #    41./64.*zi*oc+1./8.*zi*oq+1./8.*zi*x12*tx
     #    +1./16.*zi*x12*x12c-17./64.*zi*x12*txs-53./64.
     #    *zi*x12-5./32.*zi*tx*x12s+1./16.*zi*tx*
     #    x12c-3./64.*zi*tx+1./16.*zi*x12s*txs+29./32.*
     #    zi*x12s-13./32.*zi*x12c+1./4.*zi*txs+17./
     #    64.*zi-1./4.*o*x12*x2z+15./64.*o*x12*tx-7./8.*o*
     #    x12-7./64.*o*x2z*tx+15./32.*o*x2z-5./16.*o*tx+1./4.*o
     #    *x12s)
      zz30c= zz30c+rt1wz(4)*vvc*gsm2*ys*csti*(7./
     #    64.*o*txs+21./32.*o+5./16.*os*x12-9./64.*os*x2z+13./
     #    64.*os*tx-33./64.*os+1./8.*oc-1./8.*x12*x2z*tx+11./32.
     #    *x12*x2z-3./64.*x12*tx+7./64.*x12*txs+9./16.*x12+15./
     #    64.*x2z*tx-1./16.*x2z*x12s-21./64.*x2z+1./32.*tx*x12s
     #    +3./64.*tx-11./32.*x12s+1./16.*x12c-1./4.*txs)
      zz30c= zz30c+rt1wz(7)*bxpi*vvc*gsm2*ys*csti*vet
     # *(1./64.*o*x12*x2zs+1./128.*o*x2z*txs+1./128.*o*x2zc-1./
     #    64.*o*x2zs+1./64.*os*x2zs+1./128.*x12*x2z*txs+1./128.*
     #    x12*tx*x2zs-1./128.*tx*x2zs-1./128.*x2zc)
      zz30c= zz30c+rt1wz(7)*bxpi*vvc*gsm2*ys*csti*(
     #    1./32.+1./8.*zi*o*x12*tx+1./16.*zi*o*x12*txs-
     #    9./32.*zi*o*x12-1./16.*zi*o*tx*x12s-1./16.*
     #    zi*o*tx+3./16.*zi*o*x12s-1./32.*zi*o*x12c
     #    -3./32.*zi*o*txs+1./8.*zi*o-1./32.*zi*os
     #    *x12*tx+9./32.*zi*os*x12+1./32.*zi*os*tx-3./
     #    32.*zi*os*x12s+1./32.*zi*os*txs-3./16.*zi*
     #    os-3./32.*zi*oc*x12+1./8.*zi*oc-1./32.*
     #    zi*oq-3./32.*zi*x12*tx-3./32.*zi*x12*txs
     #    +3./32.*zi*x12+3./32.*zi*tx*x12s-1./32.*
     #    zi*tx*x12c+1./32.*zi*tx+1./32.*zi*x12s*txs
     #    -3./32.*zi*x12s+1./32.*zi*x12c+1./16.*zi
     #    *txs-1./32.*zi+1./32.*o*x12*x2z-1./32.*o*x12*tx+
     #    1./8.*o*x12-1./16.*o*x2z+1./32.*o*tx-1./32.*o*x12s-1./
     #    32.*o*x2zs+1./32.*o*txs-3./32.*o-1./16.*os*x12+1./32.
     #    *os*x2z)
      zz30c= zz30c+rt1wz(7)*bxpi*vvc*gsm2*ys*csti*(
     #    3./32.*os-1./32.*oc+1./32.*x12*x2z*tx-1./32.*x12*x2z+
     #    1./16.*x12*tx+1./32.*x12*txs-1./16.*x12-1./32.*x2z*tx
     #    -1./16.*x2z*txs+1./32.*x2z-1./32.*tx*x12s-1./32.*tx
     #    +1./32.*x12s+1./32.*x2zs-1./16.*txs)
      zz30c= zz30c+rt1wz(7)*vvc*gsm2*bxps*ys*csti*vet
     # *(3./256.+1./64.*o*x12-1./64.*o+1./256.*os-3./128.*
     #    x12+3./256.*x12s)
      zz30c= zz30c+rt1wz(7)*vvc*gsm2*bxps*ys*csti*(
     #    3./32.*zi*o*x12+1./32.*zi*o*tx-3./32.*zi*o
     #    +3./64.*zi*os+1./32.*zi*x12*tx-3./32.*zi
     #    *x12-1./32.*zi*tx+3./64.*zi*x12s+3./64.*
     #    zi)
      zz30c= zz30c+rt1wz(7)*vvc*gsm2*ys*csti*vet*bxp
     # *(-3./128.*o*x12*x2z-3./128.*o*x12*tx+1./32.*o*x12+5./
     #    128.*o*x2z+1./128.*o*tx-1./64.*o*x12s-1./64.*o-1./32.
     #    *os*x12-1./128.*os*x2z-1./128.*os*tx+1./32.*os-1./64.
     #    *oc+5./128.*x12*x2z+3./128.*x12*tx-1./128.*x2z*x12s-1.
     #    /32.*x2z-1./64.*tx*x12s-1./128.*tx)
      zz30c= zz30c+rt1wz(7)*vvc*gsm2*ys*csti*vet*(
     #    1./64.*o*x12*x2z*tx-3./64.*o*x12*x2z+1./128.*o*x12*x2zs
     #    +1./128.*o*x12*txs-1./128.*o*x2z*tx+1./64.*o*x2z*x12s
     #    +1./32.*o*x2z-1./32.*o*x2zs-1./128.*o*txs+1./32.*os*
     #    x12*x2z+1./128.*os*x2z*tx-3./64.*os*x2z+1./256.*os*x2zs
     #    +1./256.*os*txs+1./64.*oc*x2z-1./32.*x12*x2z*tx-1./64.
     #    *x12*x2zs-1./128.*x12*txs+1./128.*x2z*tx*x12s+1./64.*
     #    x2z*tx+1./256.*x12s*txs+7./256.*x2zs)
      zz30c= zz30c+rt1wz(7)*vvc*gsm2*ys*csti*bxp*(1.
     #    /8.+3./32.*zi*o*x12*tx-1./2.*zi*o*x12-5./32.*
     #    zi*o*tx+5./32.*zi*o*x12s-1./32.*zi*o*txs
     #    +11./32.*zi*o+7./32.*zi*os*x12+1./16.*zi
     #    *os*tx-5./16.*zi*os+3./32.*zi*oc-1./8.*
     #    zi*x12*tx-1./32.*zi*x12*txs+9./32.*zi*x12
     #    +1./32.*zi*tx*x12s+3./32.*zi*tx-3./16.*
     #    zi*x12s+1./32.*zi*x12c+1./16.*zi*txs-1./
     #    8.*zi+1./8.*o*x12+1./16.*o*tx-7./32.*o+3./32.*os
     #    +1./32.*x12*tx-5./32.*x12-1./16.*tx+1./32.*x12s)
      zz30c= zz30c+rt1wz(7)*vvc*gsm2*ys*csti*(-7.
     #    /64.-1./4.*zi*o*x12*tx-1./32.*zi*o*x12*txs+11.
     #    /16.*zi*o*x12+3./32.*zi*o*tx*x12s+3./16.*
     #    zi*o*tx-11./32.*zi*o*x12s+1./32.*zi*o*x12c
     #    +1./8.*zi*o*txs-3./8.*zi*o+3./32.*zi*os*
     #    x12*tx-17./32.*zi*os*x12-1./8.*zi*os*tx+7./64.
     #    *zi*os*x12s-1./64.*zi*os*txs+15./32.*zi*os
     #    +1./8.*zi*oc*x12+1./32.*zi*oc*tx-1./4.*
     #    zi*oc+3./64.*zi*oq+3./16.*zi*x12*tx+1./8.
     #    *zi*x12*txs-9./32.*zi*x12-1./8.*zi*tx*x12s
     #    +1./32.*zi*tx*x12c-3./32.*zi*tx-1./64.*
     #    zi*x12s*txs+15./64.*zi*x12s-1./16.*zi*x12c
     #    -1./8.*zi*txs+7./64.*zi-1./32.*o*x12*x2z+1./
     #    16.*o*x12*tx-1./4.*o*x12-1./32.*o*x2z*tx+5./32.*o*x2z
     #    -3./32.*o*tx+1./32.*o*x12s-1./32.*o*txs+17./64.*o+5.
     #    /64.*os*x12)
      zz30c= zz30c+rt1wz(7)*vvc*gsm2*ys*csti*(-3.
     #    /64.*os*x2z+1./32.*os*tx-13./64.*os+3./64.*oc+1./16.*
     #    x12*x2z-3./32.*x12*tx-1./32.*x12*txs+11./64.*x12+1./
     #    32.*x2z*tx-7./64.*x2z+1./32.*tx*x12s+3./32.*tx-1./16.
     #    *x12s+1./8.*txs)
      zz30c= zz30c+rt1wz(10)*bxpi*vvc*gsm2*ys*csti*vet
     # *(-1./64.*o*x12*x2zs-1./128.*o*x2z*txs-1./128.*o*x2zc
     #    +1./64.*o*x2zs-1./64.*os*x2zs-1./128.*x12*x2z*txs-1./
     #    128.*x12*tx*x2zs+1./128.*tx*x2zs+1./128.*x2zc)
      zz30c= zz30c+rt1wz(10)*bxpi*vvc*gsm2*ys*csti
     # *(-1./32.-1./8.*zi*o*x12*tx-1./16.*zi*o*x12*
     #    txs+9./32.*zi*o*x12+1./16.*zi*o*tx*x12s+1./16.
     #    *zi*o*tx-3./16.*zi*o*x12s+1./32.*zi*o*x12c
     #    +3./32.*zi*o*txs-1./8.*zi*o+1./32.*zi*os
     #    *x12*tx-9./32.*zi*os*x12-1./32.*zi*os*tx+3./
     #    32.*zi*os*x12s-1./32.*zi*os*txs+3./16.*zi*
     #    os+3./32.*zi*oc*x12-1./8.*zi*oc+1./32.*
     #    zi*oq+3./32.*zi*x12*tx+3./32.*zi*x12*txs
     #    -3./32.*zi*x12-3./32.*zi*tx*x12s+1./32.*
     #    zi*tx*x12c-1./32.*zi*tx-1./32.*zi*x12s*txs
     #    +3./32.*zi*x12s-1./32.*zi*x12c-1./16.*zi
     #    *txs+1./32.*zi-1./32.*o*x12*x2z+1./32.*o*x12*tx-
     #    1./8.*o*x12+1./16.*o*x2z-1./32.*o*tx+1./32.*o*x12s+1./
     #    32.*o*x2zs-1./32.*o*txs+3./32.*o+1./16.*os*x12-1./32.
     #    *os*x2z)
      zz30c= zz30c+rt1wz(10)*bxpi*vvc*gsm2*ys*csti
     # *(-3./32.*os+1./32.*oc-1./32.*x12*x2z*tx+1./32.*x12*
     #    x2z-1./16.*x12*tx-1./32.*x12*txs+1./16.*x12+1./32.*
     #    x2z*tx+1./16.*x2z*txs-1./32.*x2z+1./32.*tx*x12s+1./32.
     #    *tx-1./32.*x12s-1./32.*x2zs+1./16.*txs)
      zz30c= zz30c+rt1wz(10)*vvc*gsm2*bxps*ys*csti*vet
     # *(-3./256.-1./64.*o*x12+1./64.*o-1./256.*os+3./128.
     #    *x12-3./256.*x12s)
      zz30c= zz30c+rt1wz(10)*vvc*gsm2*bxps*ys*csti
     # *(-3./32.*zi*o*x12-1./32.*zi*o*tx+3./32.*
     #    zi*o-3./64.*zi*os-1./32.*zi*x12*tx+3./32.
     #    *zi*x12+1./32.*zi*tx-3./64.*zi*x12s-3./
     #    64.*zi)
      zz30c= zz30c+rt1wz(10)*vvc*gsm2*ys*csti*vet*bxp
     # *(3./128.*o*x12*x2z+3./128.*o*x12*tx-1./32.*o*x12-5./
     #    128.*o*x2z-1./128.*o*tx+1./64.*o*x12s+1./64.*o+1./32.
     #    *os*x12+1./128.*os*x2z+1./128.*os*tx-1./32.*os+1./64.
     #    *oc-5./128.*x12*x2z-3./128.*x12*tx+1./128.*x2z*x12s+1.
     #    /32.*x2z+1./64.*tx*x12s+1./128.*tx)
      zz30c= zz30c+rt1wz(10)*vvc*gsm2*ys*csti*vet
     # *(-1./64.*o*x12*x2z*tx+3./64.*o*x12*x2z-1./128.*o*x12*
     #    x2zs-1./128.*o*x12*txs+1./128.*o*x2z*tx-1./64.*o*x2z*
     #    x12s-1./32.*o*x2z+1./32.*o*x2zs+1./128.*o*txs-1./32.*
     #    os*x12*x2z-1./128.*os*x2z*tx+3./64.*os*x2z-1./256.*os*
     #    x2zs-1./256.*os*txs-1./64.*oc*x2z+1./32.*x12*x2z*tx+1.
     #    /64.*x12*x2zs+1./128.*x12*txs-1./128.*x2z*tx*x12s-1./64.
     #    *x2z*tx-1./256.*x12s*txs-7./256.*x2zs)
      zz30c= zz30c+rt1wz(10)*vvc*gsm2*ys*csti*bxp*(
     #    -1./8.-3./32.*zi*o*x12*tx+1./2.*zi*o*x12+5./
     #    32.*zi*o*tx-5./32.*zi*o*x12s+1./32.*zi*o*
     #    txs-11./32.*zi*o-7./32.*zi*os*x12-1./16.*
     #    zi*os*tx+5./16.*zi*os-3./32.*zi*oc+1./8.
     #    *zi*x12*tx+1./32.*zi*x12*txs-9./32.*zi*x12
     #    -1./32.*zi*tx*x12s-3./32.*zi*tx+3./16.*
     #    zi*x12s-1./32.*zi*x12c-1./16.*zi*txs+1./
     #    8.*zi-1./8.*o*x12-1./16.*o*tx+7./32.*o-3./32.*os
     #    -1./32.*x12*tx+5./32.*x12+1./16.*tx-1./32.*x12s)
      zz30c= zz30c+rt1wz(10)*vvc*gsm2*ys*csti*(7./
     #    64.+1./4.*zi*o*x12*tx+1./32.*zi*o*x12*txs-11./
     #    16.*zi*o*x12-3./32.*zi*o*tx*x12s-3./16.*zi
     #    *o*tx+11./32.*zi*o*x12s-1./32.*zi*o*x12c-1./8.
     #    *zi*o*txs+3./8.*zi*o-3./32.*zi*os*x12*tx
     #    +17./32.*zi*os*x12+1./8.*zi*os*tx-7./64.*
     #    zi*os*x12s+1./64.*zi*os*txs-15./32.*zi*os
     #    -1./8.*zi*oc*x12-1./32.*zi*oc*tx+1./4.*
     #    zi*oc-3./64.*zi*oq-3./16.*zi*x12*tx-1./8.
     #    *zi*x12*txs+9./32.*zi*x12+1./8.*zi*tx*x12s
     #    -1./32.*zi*tx*x12c+3./32.*zi*tx+1./64.*
     #    zi*x12s*txs-15./64.*zi*x12s+1./16.*zi*x12c
     #    +1./8.*zi*txs-7./64.*zi+1./32.*o*x12*x2z-1./
     #    16.*o*x12*tx+1./4.*o*x12+1./32.*o*x2z*tx-5./32.*o*x2z
     #    +3./32.*o*tx-1./32.*o*x12s+1./32.*o*txs-17./64.*o-5.
     #    /64.*os*x12)
      zz30c= zz30c+rt1wz(10)*vvc*gsm2*ys*csti*(3./
     #    64.*os*x2z-1./32.*os*tx+13./64.*os-3./64.*oc-1./16.*
     #    x12*x2z+3./32.*x12*tx+1./32.*x12*txs-11./64.*x12-1./
     #    32.*x2z*tx+7./64.*x2z-1./32.*tx*x12s-3./32.*tx+1./16.
     #    *x12s-1./8.*txs)
      zz30c= zz30c+rt1wz(11)*bxpi*vvc*gsm2*ys*csti
     # *(-1./8.*zi*o*x12*tx+1./4.*zi*o*tx-3./8.*
     #    zi*o*txs-1./8.*zi*os*tx+1./8.*zi*x12*tx-
     #    3./8.*zi*x12*txs-1./8.*zi*tx+1./4.*zi*txs
     #    -1./8.*o*tx+1./8.*tx-1./4.*txs)
      zz30c= zz30c+rt1wz(11)*vvc*gsm2*bxps*ys*csti*vet
     # *(1./32.-1./32.*o-1./32.*x12)
      zz30c= zz30c+rt1wz(11)*vvc*gsm2*bxps*ys*csti
     # *(1./8.*zi*o+1./8.*zi*x12-1./8.*zi)
      zz30c= zz30c+rt1wz(11)*vvc*gsm2*ys*csti*vet*bxp
     # *(1./32.+3./64.*o*x12+1./32.*o*x2z+1./32.*o*tx-1./32.
     #    *o+3./64.*x12*tx-1./64.*x12-1./32.*x2z-1./16.*tx)
      zz30c= zz30c+rt1wz(11)*vvc*gsm2*ys*csti*vet
     # *(1./32.*o*x2z-1./32.*o*tx+1./16.*x2z*tx-1./32.*x2z)
      zz30c= zz30c+rt1wz(11)*vvc*gsm2*ys*csti*bxp*(
     #    -5./16.+5./16.*zi*o*x12+5./16.*zi*o*tx-1./2.
     #    *zi*o+1./4.*zi*os-5./16.*zi*x12-3./16.*
     #    zi*tx+1./16.*zi*x12s+1./4.*zi*txs+1./4.*
     #    zi+5./16.*o+1./8.*x12+1./4.*tx)
      zz30c= zz30c+rt1wz(11)*vvc*gsm2*ys*csti*(1./
     #    8.+3./8.*zi*o*x12*tx-3./8.*zi*o*x12-5./8.*
     #    zi*o*tx+1./16.*zi*o*x12s+7./16.*zi*o*txs
     #    +3./8.*zi*o+3./16.*zi*os*x12+5./16.*zi*
     #    os*tx-3./8.*zi*os+1./8.*zi*oc-3./16.*zi*
     #    x12*tx+7./16.*zi*x12*txs+3./16.*zi*x12+1./16.
     #    *zi*tx*x12s+5./16.*zi*tx-1./16.*zi*x12s-
     #    1./2.*zi*txs-1./8.*zi+1./16.*o*x12-3./16.*o*
     #    x2z+3./8.*o*tx-1./4.*o+1./8.*os+1./16.*x12*tx-1./16.
     #    *x12-1./4.*x2z*tx+3./16.*x2z-3./16.*tx+1./4.*txs)
      zz30c= zz30c+rt1wz(12)*bxpi*vvc*gsm2*ys*csti*vet
     # *(-1./32.*o*x2z*tx+1./32.*o*txs+1./32.*x12*txs-1./32.
     #    *x2z*tx)
      zz30c= zz30c+rt1wz(12)*bxpi*vvc*gsm2*ys*csti
     # *(-1./8.*zi*o*tx-3./16.*zi*o*txs+1./16.*
     #    zi*os*tx-3./16.*zi*x12*txs-1./16.*zi*tx*
     #    x12s+1./16.*zi*tx+1./4.*zi*txs+1./16.*o*tx-
     #    1./16.*x12*tx+1./4.*x2z*tx-1./16.*tx-1./4.*txs)
      zz30c= zz30c+rt1wz(12)*vvc*gsm2*bxps*ys*csti
     # *(1./16.*zi*o+1./16.*zi*x12-1./16.*zi)
      zz30c= zz30c+rt1wz(12)*vvc*gsm2*ys*csti*vet*bxp
     # *(-1./64.-1./32.*o*x12-1./64.*o*tx+1./16.*o-3./64.*
     #    os+1./32.*x12+1./64.*tx)
      zz30c= zz30c+rt1wz(12)*vvc*gsm2*ys*csti*vet
     # *(1./64.*o*x12*tx+1./64.*o*x2z*tx-5./64.*o*tx-1./64.*o*
     #    txs-1./64.*os*x2z+1./64.*os*tx-5./64.*x12*tx-1./64.*
     #    x12*txs-1./64.*x2z*tx+1./64.*x2z+1./32.*tx)
      zz30c= zz30c+rt1wz(12)*vvc*gsm2*ys*csti*bxp*(
     #    1./8.-3./16.*zi*o*x12+1./32.*zi*o*tx+1./16.*
     #    zi*o-1./32.*zi*os-1./32.*zi*x12*tx+3./16.
     #    *zi*x12+1./32.*zi*tx-5./32.*zi*x12s-1./
     #    32.*zi-1./8.*o-3./16.*x12)
      zz30c= zz30c+rt1wz(12)*vvc*gsm2*ys*csti*(-
     #    3./32.-3./32.*zi*o*x12*tx+3./4.*zi*o*x12+7./
     #    32.*zi*o*tx-13./32.*zi*o*x12s+7./32.*zi*o*
     #    txs-9./32.*zi*o-3./8.*zi*os*x12-1./8.*zi
     #    *os*tx+9./32.*zi*os-3./32.*zi*oc+7./32.*
     #    zi*x12*txs-3./8.*zi*x12+1./32.*zi*tx*x12s
     #    -3./32.*zi*tx+13./32.*zi*x12s-1./8.*zi*
     #    x12c-1./4.*zi*txs+3./32.*zi-9./32.*o*x12+3./
     #    16.*o*x2z+1./32.*o*tx+3./16.*o-3./32.*os+1./8.*x12*
     #    x2z+1./4.*x12*tx+9./32.*x12-3./16.*x2z-7./32.*tx-1./
     #    8.*x12s)
      zz30c= zz30c+rt1wz(13)*bxpi*vvc*gsm2*ys*csti*vet
     # *(1./64.*o*x2zs+1./64.*o*txs+1./64.*x12*x2z*tx+1./64.*
     #    x12*txs-1./64.*x2z*tx-1./64.*x2zs)
      zz30c= zz30c+rt1wz(13)*bxpi*vvc*gsm2*ys*csti
     # *(5./16.*zi*o*x12*tx-1./8.*zi*o*tx+1./16.*
     #    zi*o*txs+1./16.*zi*os*tx-5./16.*zi*x12*tx
     #    +1./16.*zi*x12*txs+1./4.*zi*tx*x12s+1./16.*
     #    zi*tx+1./8.*zi*txs+1./16.*o*tx+1./4.*x12*tx
     #    -1./16.*tx-1./8.*txs)
      zz30c= zz30c+rt1wz(13)*vvc*gsm2*bxps*ys*csti
     # *(-1./32.*zi*o-1./32.*zi*x12+1./32.*zi)
      zz30c= zz30c+rt1wz(13)*vvc*gsm2*ys*csti*vet*bxp
     # *(-3./128.-3./128.*o*x12+1./128.*o+1./64.*os+1./32.
     #    *x12-1./128.*x12s)
      zz30c= zz30c+rt1wz(13)*vvc*gsm2*ys*csti*vet
     # *(3./128.*o*x12*x2z+3./128.*o*x12*tx-7./128.*o*x2z+1./
     #    128.*o*tx+1./64.*os*x2z+1./64.*os*tx-3./128.*x12*x2z-
     #    5./128.*x12*tx+5./128.*x2z+1./128.*tx*x12s+1./64.*tx)
      zz30c= zz30c+rt1wz(13)*vvc*gsm2*ys*csti*bxp*(
     #    -1./16.*zi*o*x12-3./32.*zi*o*tx+3./16.*
     #    zi*o-3./32.*zi*os+1./32.*zi*x12*tx+1./16.
     #    *zi*x12+1./16.*zi*tx+1./32.*zi*x12s-3./
     #    32.*zi+1./32.*x12)
      zz30c= zz30c+rt1wz(13)*vvc*gsm2*ys*csti*(-
     #    1./16.-11./32.*zi*o*x12*tx+1./16.*zi*o*x12+1./
     #    4.*zi*o*tx+1./32.*zi*o*x12s-1./16.*zi*o*
     #    txs-3./16.*zi*o-1./32.*zi*os*x12-1./8.*
     #    zi*os*tx+3./16.*zi*os-1./16.*zi*oc+1./4.
     #    *zi*x12*tx-1./16.*zi*x12*txs-1./32.*zi*x12
     #    -7./32.*zi*tx*x12s-1./8.*zi*tx-1./32.*zi
     #    *x12s-1./8.*zi*txs+1./16.*zi+1./32.*o*x12-1.
     #    /32.*o*x2z-5./32.*o*tx+1./8.*o-1./16.*os-3./32.*x12*
     #    tx-1./32.*x12+1./32.*x2z+1./16.*tx)
      zz30c= zz30c+rt1wz(14)*bxpi*vvc*gsm2*ys*csti*vet
     # *(-1./64.*o*x2z*tx-1./64.*o*x2zs-1./64.*x12*x2z*tx+1./
     #    64.*x2zs)
      zz30c= zz30c+rt1wz(14)*bxpi*vvc*gsm2*ys*csti
     # *(-1./4.*zi*o*x12*tx+1./4.*zi*o*tx-1./8.*
     #    zi*o*txs-1./8.*zi*os*tx+1./4.*zi*x12*tx-
     #    1./8.*zi*x12*txs-1./8.*zi*tx*x12s-1./8.*zi
     #    *tx+1./8.*zi*txs-1./8.*o*tx-1./8.*x12*tx+1./8.*
     #    x2z*tx+1./8.*tx-1./8.*txs)
      zz30c= zz30c+rt1wz(14)*vvc*gsm2*bxps*ys*csti*vet
     # *(1./64.-1./64.*o-1./64.*x12)
      zz30c= zz30c+rt1wz(14)*vvc*gsm2*bxps*ys*csti
     # *(-1./32.*zi*o-1./32.*zi*x12+1./32.*zi)
      zz30c= zz30c+rt1wz(14)*vvc*gsm2*ys*csti*vet*bxp
     # *(1./64.+1./32.*o*x12+1./64.*o*x2z+1./128.*o*tx-5./
     #    128.*o+3./128.*os+3./128.*x12*tx-3./128.*x12-1./64.*
     #    x2z-3./128.*tx+1./128.*x12s)
      zz30c= zz30c+rt1wz(14)*vvc*gsm2*ys*csti*vet
     # *(-3./128.*o*x12*x2z-1./64.*o*x12*tx+1./128.*o*x2z*tx
     #    +7./128.*o*x2z+1./64.*o*tx-1./128.*o*txs-3./128.*os*
     #    x2z-1./128.*os*tx+3./128.*x12*x2z+1./64.*x12*tx-1./
     #    128.*x12*txs+3./128.*x2z*tx-1./32.*x2z-1./128.*tx*x12s
     #    )
      zz30c= zz30c+rt1wz(14)*vvc*gsm2*ys*csti*bxp*(
     #    1./16.-3./32.*zi*o*x12+1./16.*zi*o*tx+1./8.*
     #    zi*o-1./16.*zi*os+1./8.*zi*x12*tx+3./32.
     #    *zi*x12-3./32.*zi*tx-1./32.*zi*x12s+1./8.
     #    *zi*txs-1./16.*zi-1./16.*o-1./32.*x12+1./8.
     #    *tx)
      zz30c= zz30c+rt1wz(14)*vvc*gsm2*ys*csti*(-
     #    1./32.+5./32.*zi*o*x12*tx+1./8.*zi*o*x12-9./
     #    32.*zi*o*tx-1./32.*zi*o*x12s+3./32.*zi*o*
     #    txs-3./32.*zi*o-1./16.*zi*os*x12+1./16.*
     #    zi*os*tx+3./32.*zi*os-1./32.*zi*oc-5./16.
     #    *zi*x12*tx+3./32.*zi*x12*txs-1./16.*zi*x12
     #    +3./32.*zi*tx*x12s+7./32.*zi*tx+1./32.*
     #    zi*x12s-1./4.*zi*txs+1./32.*zi-1./32.*o*
     #    x12+1./32.*o*x2z+1./16.*o*tx+1./16.*o-1./32.*os+3./
     #    32.*x12*tx+1./32.*x12-1./8.*x2z*tx-1./32.*x2z-7./32.*
     #    tx+1./8.*txs)

      zz40c= rs1wz(1)*xx*vvc*gtm2*ys*csti*vut*(-1./4.*
     #    o*x12*tx-3./8.*o*x2z*tx-1./8.*o*txs+1./4.*os*x12+1./4.
     #    *os*x2z-1./4.*os*tx+1./4.*oc-1./8.*x12*txs+1./8.*x2z*
     #    tx)
      zz40c= zz40c+rs1wz(1)*bxpi*vvc*gtm2*ys*csti*vut
     # *(1./4.*o*x12*tx+1./4.*o*x2z*tx-7./8.*o*tx+1./4.*os*tx
     #    +1./2.*os-1./8.*x12*tx+1./8.*tx)
      zz40c= zz40c+rs1wz(1)*vvc*gtm2*ys*csti*vut*(
     #    3./8.*o*tx-1./2.*os+1./8.*x12*tx-1./8.*tx)
      zz40c= zz40c+rs1wz(4)*xx*vvc*gtm2*ys*csti*vut
     # *(1./16.*o*x12*x2z+1./16.*o*x12*txs-1./32.*o*x2z*tx+1./
     #    16.*o*x2z*txs-1./16.*o*tx*x2zs+3./32.*o*x2zs+1./16.*os*
     #    x2z-1./32.*os*x2zs+1./32.*os*txs-1./32.*x12*x2z*tx+1./
     #    16.*x12*x2z*txs-1./16.*tx*x2zs+1./32.*x12s*txs)
      zz40c= zz40c+rs1wz(4)*bxpi*vvc*gtm2*ys*csti*vut
     # *(-3./32.*o*x12*x2z+3./32.*o*x12*tx-1./16.*o*x12*txs+
     #    1./16.*o*x12-1./32.*o*x2z*txs+1./4.*o*x2z-1./32.*o*tx*
     #    x12s+1./32.*o*tx*x2zs-1./32.*o*tx-1./32.*o*x12s-1./32.
     #    *o*x2zs+3./32.*o*txs+1./32.*os*x12*x2z-1./16.*os*x12*tx
     #    -1./16.*os*x12-1./8.*os*x2z+1./16.*os*tx+1./32.*os*
     #    x2zs-1./32.*os*txs+1./16.*os+1./32.*oc*x2z-1./32.*oc*
     #    tx-1./32.*oc+3./32.*x12*x2z*tx-1./32.*x12*x2z*txs-1./
     #    32.*x12*tx+3./32.*x12*txs-5./32.*x2z*tx+1./32.*tx*x12s
     #    +1./32.*tx*x2zs-1./32.*x12s*txs)
      zz40c= zz40c+rs1wz(4)*vvc*gtm2*ys*csti*vut*bxp
     # *(-1./32.*o*x12+1./32.*o*tx+3./32.*o-1./32.*os+1./
     #    32.*x12*tx-1./32.*tx)
      zz40c= zz40c+rs1wz(4)*vvc*gtm2*ys*csti*vut*(
     #    1./32.*o*x12*x2z+1./32.*o*x12*tx+1./16.*o*x12-5./32.*o*
     #    x2z-3./32.*o*tx-1./32.*o*txs-5./32.*o+1./32.*os*tx+
     #    1./16.*os-1./32.*x12*x2z*tx-3./32.*x12*tx-1./32.*x12*
     #    txs+1./16.*x2z*tx+3./32.*tx)
      zz40c= zz40c+rs1wz(7)*xx*vvc*gtm2*ys*csti*vut
     # *(-1./32.*o*x12*x2z*tx-1./32.*o*x12*txs+3./64.*o*x2z*tx
     #    -1./32.*o*x2z*txs-1./32.*o*tx*x2zs+1./64.*o*x2zs+1./
     #    32.*o*txs-1./32.*os*x2z*tx-1./64.*os*x2zs-1./64.*os*txs
     #    +1./64.*x12*x2z*tx-1./32.*x12*x2z*txs+1./32.*x12*txs-
     #    1./32.*x2z*tx+1./32.*tx*x2zs-1./64.*x12s*txs)
      zz40c= zz40c+rs1wz(7)*bxpi*vvc*gtm2*ys*csti*vut
     # *(1./32.*o*x12*x2z*tx-3./64.*o*x12*x2z-1./16.*o*x12*tx+
     #    1./32.*o*x12*txs+1./32.*o*x12-5./64.*o*x2z*tx+1./64.*o*
     #    x2z*txs+3./64.*o*x2z+1./64.*o*tx*x12s+1./64.*o*tx*x2zs
     #    +3./64.*o*tx-1./64.*o*x12s-1./64.*o*x2zs-1./32.*o*txs
     #    +1./64.*os*x12*x2z+1./32.*os*x12*tx-1./32.*os*x12+1./
     #    32.*os*x2z*tx-5./64.*os*x2z-3./64.*os*tx+1./64.*os*x2zs
     #    +1./64.*os*txs+1./32.*os+1./64.*oc*x2z+1./64.*oc*tx
     #    -1./64.*oc-3./64.*x12*x2z*tx+1./64.*x12*x2z*txs+3./64.
     #    *x12*tx-1./32.*x12*txs+1./16.*x2z*tx-1./64.*tx*x12s-1.
     #    /64.*tx*x2zs-1./32.*tx+1./64.*x12s*txs)
      zz40c= zz40c+rs1wz(7)*vvc*gtm2*ys*csti*vut*(
     #    1./64.*o*x12*x2z+1./64.*o*x12+1./64.*o*x2z*tx-1./32.*o
     #    +1./64.*os*x2z+1./64.*os+1./64.*x12*x2z*tx-1./64.*x2z
     #    *tx)
      zz40c= zz40c+rs1wz(8)*xx*vvc*gtm2*ys*csti*vut
     # *(1./16.*o*x2z*tx-1./8.*o*x2z-1./16.*o*txs-1./16.*x12*
     #    txs+1./16.*x2z*tx)
      zz40c= zz40c+rs1wz(8)*bxpi*vvc*gtm2*ys*csti*vut
     # *(1./32.*o*x12*tx+1./16.*o*x12+1./32.*o*x2z*tx-3./32.*o
     #    *x2z-1./16.*o*tx-1./32.*o*txs-1./8.*o-1./32.*os*x2z
     #    +1./32.*os*tx+1./16.*os-1./16.*x12*tx-1./32.*x12*txs
     #    +1./32.*x2z*tx+1./16.*tx)
      zz40c= zz40c+rs1wz(8)*vvc*gtm2*ys*csti*vut*bxp
     # *(1./32.*o*x12-1./32.*o*tx-3./32.*o+1./32.*os-1./32.*
     #    x12*tx+1./32.*tx)
      zz40c= zz40c+rs1wz(8)*vvc*gtm2*ys*csti*vut*(
     #    -1./32.*o*x12*tx-3./32.*o*x12-1./32.*o*x2z*tx+3./32.*
     #    o*x2z+3./32.*o*tx+1./32.*o*txs+7./32.*o+1./32.*os*x2z
     #    -1./32.*os*tx-3./32.*os+3./32.*x12*tx+1./32.*x12*txs
     #    -1./32.*x2z*tx-3./32.*tx)
      zz40c= zz40c+rs1wz(9)*xx*vvc*gtm2*ys*csti*vut
     # *(1./4.*o*tx-1./4.*os)
      zz40c= zz40c+rs1wz(9)*bxpi*vvc*gtm2*ys*csti*vut
     # *(1./8.*o*tx-1./4.*os)
      zz40c= zz40c+rs1wz(9)*vvc*gtm2*ys*csti*vut*(
     #    -1./8.*o*tx+1./4.*os)
      zz40c= zz40c+rs1wz(10)*xx*vvc*gtm2*ys*csti*vut
     # *(1./32.*o*x12*x2z*tx+1./32.*o*x12*txs-1./64.*o*x2z*tx+
     #    1./32.*o*x2z*txs+1./32.*o*tx*x2zs-1./64.*o*x2zs+1./32.*
     #    os*x2z*tx+1./64.*os*x2zs+1./64.*os*txs-1./64.*x12*x2z*
     #    tx+1./32.*x12*x2z*txs-1./32.*tx*x2zs+1./64.*x12s*txs)
      zz40c= zz40c+rs1wz(10)*bxpi*vvc*gtm2*ys*csti*vut
     # *(-1./32.*o*x12*x2z*tx+3./64.*o*x12*x2z+3./64.*o*x12*tx
     #    -1./32.*o*x12*txs+3./32.*o*x2z*tx-1./64.*o*x2z*txs-1./
     #    32.*o*x2z-1./64.*o*tx*x12s-1./64.*o*tx*x2zs-1./64.*o*tx
     #    +1./64.*o*x12s+1./64.*o*x2zs+3./64.*o*txs-1./64.*os*
     #    x12*x2z-1./32.*os*x12*tx+1./32.*os*x12-1./32.*os*x2z*tx
     #    +1./16.*os*x2z+1./32.*os*tx-1./64.*os*x2zs-1./64.*os*
     #    txs-1./64.*oc*x2z-1./64.*oc*tx+1./64.*oc+3./64.*x12*
     #    x2z*tx-1./64.*x12*x2z*txs-1./64.*x12*tx+3./64.*x12*txs
     #    -5./64.*x2z*tx+1./64.*tx*x12s+1./64.*tx*x2zs-1./64.*
     #    x12s*txs)
      zz40c= zz40c+rs1wz(10)*vvc*gtm2*ys*csti*vut*bxp
     # *(1./64.*o*x12+1./64.*o*tx+1./64.*o+1./64.*os+1./64.*
     #    x12*tx-1./64.*tx)
      zz40c= zz40c+rs1wz(10)*vvc*gtm2*ys*csti*vut
     # *(-1./64.*o*x12*x2z+1./64.*o*x12*tx-1./16.*o*x12-1./
     #    32.*o*x2z*tx-1./64.*o*x2z-3./64.*o*tx-1./64.*o*txs+1./
     #    64.*o+1./64.*os*tx-1./16.*os-1./64.*x12*x2z*tx-3./64.
     #    *x12*tx-1./64.*x12*txs+1./32.*x2z*tx+3./64.*tx)
      zz40c= zz40c+rs1wz(11)*xx*vvc*gtm2*ys*csti*vut
     # *(-1./16.*o*x2z*tx+1./8.*o*x2z+1./16.*o*txs+1./16.*
     #    x12*txs-1./16.*x2z*tx)
      zz40c= zz40c+rs1wz(11)*bxpi*vvc*gtm2*ys*csti*vut
     # *(-1./16.*o*x12*tx-1./16.*o*x12+1./16.*o*x2z*tx-1./16.
     #    *o*x2z+1./16.*o*tx-1./16.*o*txs+1./8.*o+1./16.*os*x2z
     #    -1./16.*os*tx-1./16.*os+1./16.*x12*tx-1./16.*x12*txs
     #    +1./16.*x2z*tx-1./16.*tx)
      zz40c= zz40c+rs1wz(11)*vvc*gtm2*ys*csti*vut
     # *(-1./16.*o)
      zz40c= zz40c+rs1wz(12)*xx*vvc*gtm2*ys*csti*vut
     # *(1./8.*o*x2z*tx-1./8.*o*x2z-1./8.*o*txs-1./8.*x12*txs
     #    +1./8.*x2z*tx)
      zz40c= zz40c+rs1wz(12)*bxpi*vvc*gtm2*ys*csti*vut
     # *(1./16.*o*x12*tx+1./16.*o*x12-1./16.*o*x2z*tx+1./16.*o
     #    *x2z-1./8.*o*tx+1./16.*o*txs-1./8.*o-1./16.*os*x2z+
     #    1./16.*os*tx+1./16.*os-1./8.*x12*tx+1./16.*x12*txs-1./
     #    16.*x2z*tx+1./8.*tx)
      zz40c= zz40c+rs1wz(12)*vvc*gtm2*ys*csti*vut
     # *(1./16.*o*tx+1./16.*o+1./16.*x12*tx-1./16.*tx)
      zz40c= zz40c+rs1wz(13)*xx*vvc*gtm2*ys*csti*vut
     # *(-1./16.*o*x2z*tx-1./16.*o*txs-1./16.*x12*txs+1./16.
     #    *x2z*tx)
      zz40c= zz40c+rs1wz(13)*bxpi*vvc*gtm2*ys*csti*vut
     # *(1./32.*o*x12*tx-1./32.*o*x12+1./32.*o*x2z*tx-1./32.*o
     #    *x2z-1./16.*o*tx+1./32.*o*txs+1./32.*os*x2z+1./32.*os
     #    *tx-1./32.*os-1./16.*x12*tx+1./32.*x12*txs-1./32.*x2z
     #    *tx+1./16.*tx)
      zz40c= zz40c+rs1wz(13)*vvc*gtm2*ys*csti*vut
     # *(1./32.*o*tx+1./32.*o+1./32.*x12*tx-1./32.*tx)
      zz40c= zz40c+rs1wz(14)*xx*vvc*gtm2*ys*csti*vut
     # *(3./32.*o*x2z*tx+1./32.*o*txs+1./32.*x12*txs-1./32.*
     #    x2z*tx)
      zz40c= zz40c+rs1wz(14)*bxpi*vvc*gtm2*ys*csti*vut
     # *(-1./32.*o*x12*tx+1./32.*o*x12-1./32.*o*x2z*tx+1./32.
     #    *o*x2z+3./32.*o*tx-1./32.*o*txs-1./32.*os*x2z-1./32.*
     #    os*tx+1./32.*os+1./32.*x12*tx-1./32.*x12*txs+1./32.*
     #    x2z*tx-1./32.*tx)
      zz40c= zz40c+rs1wz(14)*vvc*gtm2*ys*csti*vut
     # *(-1./16.*o*tx-1./32.*o)
      zz40c= zz40c+rs2wz(1)*xx*vvq*gtm2*yc*(1./2.*o*x12
     #    *x2z*tx+o*x12*txs-3./4.*o*x2z*tx+1./2.*o*x2z*txs+1./2.
     #    *o*tx*x2zs-1./4.*o*txs+1./2.*os*x2z*tx+1./2.*os*txs-1.
     #    /2.*x12*x2z*tx+1./2.*x12*x2z*txs-1./4.*x12*txs+1./4.*
     #    x2z*tx-1./2.*tx*x2zs+1./2.*x12s*txs)
      zz40c= zz40c+rs2wz(1)*bxpi*vvq*gtm2*yc*(-o*x12*
     #    x2z*tx+9./4.*o*x12*tx+5./2.*o*x2z*tx-1./2.*o*tx*x12s-
     #    1./2.*o*tx*x2zs-5./4.*o*tx+3./4.*o*txs-os*x12*tx-os*
     #    x2z*tx+7./4.*os*tx-1./2.*oc*tx+1./2.*x12*x2z*tx-3./4.
     #    *x12*tx+3./4.*x12*txs-5./4.*x2z*tx+1./2.*tx*x12s+1./4.
     #    *tx)
      zz40c= zz40c+rs2wz(1)*vvq*gtm2*yc*bxp*(3./4.*o*tx
     #    +3./4.*x12*tx-3./4.*tx)
      zz40c= zz40c+rs2wz(1)*vvq*gtm2*yc*(-1./4.*o*x12
     #    *tx-1./2.*o*x2z*tx-3./2.*o*tx-3./4.*o*txs+1./4.*os*tx
     #    -1./2.*x12*x2z*tx-3./4.*x12*txs+5./4.*x2z*tx-1./2.*tx
     #    *x12s+1./2.*tx)
      zz40c= zz40c+rs2wz(4)*xx*vvq*gtm2*yc*(1./16.*o*
     #    x12*x2z*tx-1./4.*o*x12*x2z*txs-3./16.*o*x12*x2zs-1./8.*
     #    o*x2z*tx*x12s+3./16.*o*x2z*txs+1./8.*o*tx*x2zc-3./16.*o
     #    *x2zc-1./8.*o*x2zs*txs+1./8.*o*x2zs-1./4.*os*x12*x2z*tx
     #    +1./8.*os*x12*x2zs+1./8.*os*x2z*tx-1./8.*os*x2z*txs+1.
     #    /8.*os*x2zc-1./4.*os*x2zs-1./8.*oc*x2z*tx+1./8.*oc*x2zs
     #    +3./16.*x12*x2z*txs-1./16.*x12*tx*x2zs-1./8.*x12*x2zs*
     #    txs+1./16.*x12*x2zs-1./16.*x2z*tx*x12s-1./8.*x2z*x12s*
     #    txs-1./16.*tx*x2zs+1./16.*x2zc+1./8.*x2zs*txs)
      zz40c= zz40c+rs2wz(4)*bxpi*vvq*gtm2*yc*(-5./16.*
     #    o*x12*x2z*tx+1./4.*o*x12*x2z*txs-21./32.*o*x12*x2z-1./
     #    16.*o*x12*tx*x2zs+1./16.*o*x12*tx+5./16.*o*x12*x2zs-9./
     #    16.*o*x12*txs+1./16.*o*x2z*tx*x12s+11./32.*o*x2z*tx+1./
     #    4.*o*x2z*x12s-15./32.*o*x2z*txs+1./4.*o*x2z-3./32.*o*tx
     #    *x12s+1./16.*o*tx*x12c-1./16.*o*tx*x2zc+7./32.*o*tx*
     #    x2zs+3./16.*o*x12s*txs+1./16.*o*x2zc+1./16.*o*x2zs*txs
     #    -25./32.*o*x2zs+3./16.*o*txs+1./8.*os*x12*x2z*tx+21./
     #    32.*os*x12*x2z-3./8.*os*x12*tx-1./8.*os*x12*x2zs+3./16.
     #    *os*x12*txs-5./16.*os*x2z*tx-1./16.*os*x2z*x12s+1./8.*
     #    os*x2z*txs-19./32.*os*x2z+3./16.*os*tx*x12s-1./16.*os*
     #    tx*x2zs+1./8.*os*tx-1./16.*os*x2zc+21./32.*os*x2zs-9./
     #    32.*os*txs-1./8.*oc*x12*x2z+3./16.*oc*x12*tx+1./16.*oc*
     #    x2z*tx+13./32.*oc*x2z-7./32.*oc*tx-1./8.*oc*x2zs+1./
     #    16.*oc*txs-1./16.*oq*x2z+1./16.*oq*tx+1./32.*x12*x2z*tx
     #    -15./32.*x12*x2z*txs)
      zz40c= zz40c+rs2wz(4)*bxpi*vvq*gtm2*yc*(1./8.*x12*
     #    x2z-1./8.*x12*tx*x2zs+1./16.*x12*x2zs*txs-1./8.*x12*
     #    x2zs+3./16.*x12*txs-1./8.*x2z*tx+1./8.*x2z*x12s*txs-1.
     #    /8.*x2z*x12s+3./8.*x2z*txs-1./16.*tx*x12s+1./16.*tx*
     #    x12c-1./16.*tx*x2zc+3./32.*tx*x2zs-9./32.*x12s*txs+1./
     #    16.*x12c*txs+1./4.*x2zs)
      zz40c= zz40c+rs2wz(4)*vvq*gtm2*bxps*yc*(-1./8.
     #    -1./4.*o*x12+1./4.*o-1./8.*os+1./4.*x12-1./8.*x12s
     #    )
      zz40c= zz40c+rs2wz(4)*vvq*gtm2*yc*bxp*(1./8.+11./
     #    32.*o*x12*x2z+3./16.*o*x12*tx+9./32.*o*x12+5./32.*o*x2z
     #    *tx-19./32.*o*x2z-5./32.*o*tx+3./32.*o*x12s-1./4.*o*
     #    txs-3./8.*o+9./32.*os*x2z-1./32.*os*tx+9./32.*os-1./
     #    32.*oc+5./32.*x12*x2z*tx-3./8.*x12*x2z-13./32.*x12*tx
     #    -1./4.*x12*txs-3./16.*x12-5./32.*x2z*tx+1./16.*x2z*
     #    x12s+5./16.*x2z+7./32.*tx*x12s+3./16.*tx+1./16.*x12c
     #    +1./4.*txs)
      zz40c= zz40c+rs2wz(4)*vvq*gtm2*yc*(-1./16.*o*
     #    x12*x2z*tx-5./16.*o*x12*x2z+5./8.*o*x12*tx-1./8.*o*x12*
     #    x2zs+1./16.*o*x12*txs+15./32.*o*x12-1./8.*o*x2z*tx-1./
     #    16.*o*x2z*x12s+7./32.*o*x2z*txs+27./32.*o*x2z-11./32.*o
     #    *tx*x12s-5./32.*o*tx*x2zs-11./32.*o*tx-13./32.*o*x12s
     #    +1./16.*o*x12c+15./32.*o*x2zs+5./16.*o*txs-1./8.*o-
     #    1./32.*os*x12*x2z-5./16.*os*x12*tx-5./8.*os*x12+1./8.*
     #    os*x2z*tx-9./16.*os*x2z+15./32.*os*tx+3./16.*os*x12s-
     #    7./32.*os*x2zs+1./32.*os*txs+11./32.*os+3./16.*oc*x12
     #    +1./32.*oc*x2z-3./32.*oc*tx-9./32.*oc+1./16.*oq+7./
     #    16.*x12*x2z*tx+7./32.*x12*x2z*txs+1./4.*x12*x2z-1./16.*
     #    x12*tx*x2zs-3./32.*x12*tx+1./8.*x12*x2zs+5./16.*x12*txs
     #    -1./16.*x12-3./16.*x2z*tx*x12s-7./32.*x2z*tx+1./16.*
     #    x2z*x12s-3./8.*x2z*txs-5./16.*x2z+5./32.*tx*x12s-1./8.
     #    *tx*x12c+7./32.*tx*x2zs+1./16.*tx+1./32.*x12s*txs+1./
     #    8.*x12s)
      zz40c= zz40c+rs2wz(4)*vvq*gtm2*yc*(-1./16.*x12c
     #    -1./4.*x2zs-1./4.*txs)
      zz40c= zz40c+rs2wz(7)*xx*vvq*gtm2*yc*(-3./32.*o
     #    *x12*x2z*tx+1./4.*o*x12*x2z*txs+1./16.*o*x12*tx*x2zs-3./
     #    32.*o*x12*x2zs-1./8.*o*x12*txs+1./32.*o*x2z*tx*x12s-7./
     #    32.*o*x2z*txs+1./32.*o*tx*x2zc-1./16.*o*tx*x2zs+3./32.*
     #    o*x12s*txs-3./32.*o*x2zc+3./32.*o*x2zs*txs+3./16.*o*
     #    x2zs+1./16.*os*x12*x2z*tx+1./16.*os*x12*x2zs+3./32.*os*
     #    x12*txs-1./32.*os*x2z*tx+1./8.*os*x2z*txs+1./16.*os*tx*
     #    x2zs+1./16.*os*x2zc-3./16.*os*x2zs-1./16.*os*txs+1./
     #    32.*oc*x2z*tx+1./16.*oc*x2zs+1./32.*oc*txs+1./8.*x12*
     #    x2z*tx-7./32.*x12*x2z*txs-3./32.*x12*tx*x2zs+3./32.*x12
     #    *x2zs*txs+1./32.*x12*x2zs-1./16.*x2z*tx*x12s+1./8.*x2z*
     #    x12s*txs+1./8.*x2z*txs-1./32.*tx*x2zc+1./32.*tx*x2zs-
     #    1./16.*x12s*txs+1./32.*x12c*txs+1./32.*x2zc-1./16.*x2zs
     #    *txs-1./16.*x2zs)
      zz40c= zz40c+rs2wz(7)*bxpi*vvq*gtm2*yc*(7./16.*o*
     #    x12*x2z*tx-1./8.*o*x12*x2z*txs-31./64.*o*x12*x2z-3./32.
     #    *o*x12*tx*x2zs-9./32.*o*x12*tx+5./32.*o*x12*x2zs+11./32.
     #    *o*x12*txs-3./32.*o*x2z*tx*x12s-17./64.*o*x2z*tx+1./8.*
     #    o*x2z*x12s+13./64.*o*x2z*txs+7./16.*o*x2z+15./64.*o*tx*
     #    x12s-1./32.*o*tx*x12c-1./32.*o*tx*x2zc+15./64.*o*tx*
     #    x2zs-3./32.*o*x12s*txs+1./32.*o*x2zc-1./32.*o*x2zs*txs
     #    -19./64.*o*x2zs-9./32.*o*txs-3./16.*os*x12*x2z*tx+23./
     #    64.*os*x12*x2z+9./32.*os*x12*tx-1./16.*os*x12*x2zs-3./
     #    32.*os*x12*txs+5./16.*os*x2z*tx-1./32.*os*x2z*x12s-1./
     #    16.*os*x2z*txs-33./64.*os*x2z-3./32.*os*tx*x12s-3./32.*
     #    os*tx*x2zs-3./32.*os*tx-1./32.*os*x2zc+19./64.*os*x2zs
     #    +11./64.*os*txs-1./16.*oc*x12*x2z-3./32.*oc*x12*tx-3./
     #    32.*oc*x2z*tx+15./64.*oc*x2z+7./64.*oc*tx-1./16.*oc*
     #    x2zs-1./32.*oc*txs-1./32.*oq*x2z-1./32.*oq*tx-15./64.
     #    *x12*x2z*tx)
      zz40c= zz40c+rs2wz(7)*bxpi*vvq*gtm2*yc*(13./64.*
     #    x12*x2z*txs+3./16.*x12*x2z+3./32.*x12*tx*x2zs+1./8.*x12
     #    *tx-1./32.*x12*x2zs*txs-1./16.*x12*x2zs-9./32.*x12*txs
     #    +1./8.*x2z*tx*x12s+1./8.*x2z*tx-1./16.*x2z*x12s*txs-1.
     #    /16.*x2z*x12s-1./16.*x2z*txs-1./8.*x2z-3./16.*tx*x12s
     #    +1./16.*tx*x12c+1./32.*tx*x2zc-11./64.*tx*x2zs+11./64.
     #    *x12s*txs-1./32.*x12c*txs+1./16.*x2zs+1./8.*txs)
      zz40c= zz40c+rs2wz(7)*vvq*gtm2*yc*bxp*(-1./16.
     #    +5./64.*o*x12*x2z-1./32.*o*x12*tx-13./64.*o*x12+1./64.
     #    *o*x2z*tx-5./64.*o*x2z+3./64.*o*tx+5./64.*o*x12s+1./8.
     #    *o+1./16.*os*x12+3./64.*os*x2z-1./64.*os*tx-5./64.*os
     #    +1./64.*oc+1./64.*x12*x2z*tx-1./16.*x12*x2z+3./64.*
     #    x12*tx+5./32.*x12-1./64.*x2z*tx+1./32.*x2z*x12s+1./32.
     #    *x2z-1./64.*tx*x12s-1./32.*tx-1./8.*x12s+1./32.*x12c
     #    )
      zz40c= zz40c+rs2wz(7)*vvq*gtm2*yc*(1./16.+3./32.
     #    *o*x12*x2z-1./8.*o*x12*tx-1./16.*o*x12*x2zs-3./32.*o*
     #    x12*txs+29./64.*o*x12-3./16.*o*x2z*tx-1./32.*o*x2z*x12s
     #    -5./64.*o*x2z*txs-7./64.*o*x2z-1./64.*o*tx*x12s-1./64.
     #    *o*tx*x2zs+13./64.*o*tx-15./64.*o*x12s+1./32.*o*x12c+
     #    9./64.*o*x2zs+5./32.*o*txs-1./4.*o-3./64.*os*x12*x2z+
     #    1./16.*os*x12*tx-3./8.*os*x12+1./32.*os*x2z*tx+1./32.*
     #    os*x2z-11./64.*os*tx+3./32.*os*x12s-5./64.*os*x2zs-3./
     #    64.*os*txs+21./64.*os+3./32.*oc*x12-1./64.*oc*x2z+3./
     #    64.*oc*tx-11./64.*oc+1./32.*oq-3./32.*x12*x2z*tx-5./
     #    64.*x12*x2z*txs-1./8.*x12*x2z+5./64.*x12*tx+1./16.*x12*
     #    x2zs+5./32.*x12*txs-5./32.*x12-1./32.*x2z*tx*x12s+9./
     #    64.*x2z*tx+1./32.*x2z*x12s+1./16.*x2z*txs+3./32.*x2z+
     #    3./64.*tx*x12s-1./32.*tx*x12c+1./64.*tx*x2zs-3./32.*tx
     #    -3./64.*x12s*txs+1./8.*x12s-1./32.*x12c-1./16.*x2zs
     #    -1./8.*txs)
      zz40c= zz40c+rs2wz(8)*xx*vvq*gtm2*yc*(1./8.*o*x12
     #    *x2z*tx-1./8.*o*x2z*tx+1./8.*o*x2z*txs-1./8.*o*tx*x2zs
     #    +1./4.*o*x2zs+1./8.*os*x2z*tx-1./8.*os*x2zs+1./8.*x12
     #    *x2z*tx+1./8.*x12*x2z*txs-1./4.*x2z*txs+1./8.*tx*x2zs
     #    -1./8.*x2zs)
      zz40c= zz40c+rs2wz(8)*bxpi*vvq*gtm2*yc*(1./8.*o*
     #    x12*x2z*tx-5./16.*o*x12*x2z+1./8.*o*x12*tx-1./8.*o*x12*
     #    txs-5./16.*o*x2z*tx+1./16.*o*x2z*txs+5./8.*o*x2z-1./
     #    16.*o*tx*x12s-1./16.*o*tx*x2zs-1./8.*o*tx+3./16.*o*x2zs
     #    +3./8.*o*txs+1./16.*os*x12*x2z-1./8.*os*x12*tx+1./8.*
     #    os*x2z*tx-7./16.*os*x2z+1./4.*os*tx-1./16.*os*x2zs-1./
     #    16.*os*txs+1./16.*oc*x2z-1./16.*oc*tx+1./16.*x12*x2z*tx
     #    +1./16.*x12*x2z*txs+1./4.*x12*x2z+1./8.*x12*tx+3./8.*
     #    x12*txs-1./4.*x2z*txs-1./4.*x2z-1./8.*tx*x12s+3./16.*
     #    tx*x2zs-1./16.*x12s*txs-1./8.*x2zs-1./4.*txs)
      zz40c= zz40c+rs2wz(8)*vvq*gtm2*bxps*yc*(1./8.+1./
     #    4.*o*x12-1./4.*o+1./8.*os-1./4.*x12+1./8.*x12s)
      zz40c= zz40c+rs2wz(8)*vvq*gtm2*yc*bxp*(-1./4.-
     #    3./16.*o*x12*x2z-1./8.*o*x12*tx-11./16.*o*x12-3./16.*o*
     #    x2z*tx+7./16.*o*x2z+1./16.*o*tx+1./16.*o*x12s+1./4.*o
     #    *txs+5./8.*o+1./8.*os*x12-3./16.*os*x2z+1./16.*os*tx
     #    -7./16.*os+1./16.*oc-3./16.*x12*x2z*tx+1./4.*x12*x2z
     #    +5./16.*x12*tx+1./4.*x12*txs+1./2.*x12+3./16.*x2z*tx
     #    -1./4.*x2z-3./16.*tx*x12s-1./8.*tx-1./4.*x12s-1./4.
     #    *txs)
      zz40c= zz40c+rs2wz(8)*vvq*gtm2*yc*(1./8.-1./8.*
     #    o*x12*x2z*tx+1./2.*o*x12*x2z+1./8.*o*x12*txs+7./16.*o*
     #    x12+1./2.*o*x2z*tx-1./16.*o*x2z*txs-17./16.*o*x2z+1./
     #    16.*o*tx*x12s+1./16.*o*tx*x2zs+1./16.*o*tx-1./16.*o*
     #    x12s-3./16.*o*x2zs-5./8.*o*txs-3./8.*o-1./16.*os*x12*
     #    x2z+1./8.*os*x12*tx-1./8.*os*x12-1./8.*os*x2z*tx+5./8.
     #    *os*x2z-5./16.*os*tx+1./16.*os*x2zs+1./16.*os*txs+5./
     #    16.*os-1./16.*oc*x2z+1./16.*oc*tx-1./16.*oc+1./8.*x12
     #    *x2z*tx-1./16.*x12*x2z*txs-1./2.*x12*x2z-7./16.*x12*tx
     #    -5./8.*x12*txs-1./4.*x12-3./16.*x2z*tx+1./4.*x2z*txs
     #    +1./2.*x2z+5./16.*tx*x12s-3./16.*tx*x2zs+1./8.*tx+1.
     #    /16.*x12s*txs+1./8.*x12s+1./8.*x2zs+1./2.*txs)
      zz40c= zz40c+rs2wz(9)*xx*vvq*gtm2*yc*(-1./4.*o*
     #    x2z*tx-1./4.*o*txs-1./4.*x12*txs+1./4.*x2z*tx)
      zz40c= zz40c+rs2wz(9)*bxpi*vvq*gtm2*yc*(1./4.*o*
     #    x12*tx-3./4.*o*tx-1./4.*o*txs+1./4.*os*tx-1./4.*x12*
     #    tx-1./4.*x12*txs+1./4.*x2z*tx+1./4.*tx)
      zz40c= zz40c+rs2wz(9)*vvq*gtm2*yc*bxp*(-1./4.*o*
     #    tx-1./4.*x12*tx+1./4.*tx)
      zz40c= zz40c+rs2wz(9)*vvq*gtm2*yc*(-1./4.*o*x12
     #    *tx+o*tx+1./4.*o*txs-1./4.*os*tx+1./2.*x12*tx+1./4.
     #    *x12*txs-1./4.*x2z*tx-1./2.*tx)
      zz40c= zz40c+rs2wz(10)*xx*vvq*gtm2*yc*(3./32.*o*
     #    x12*x2z*tx-1./4.*o*x12*x2z*txs-1./16.*o*x12*tx*x2zs+3./
     #    32.*o*x12*x2zs-1./32.*o*x2z*tx*x12s+3./32.*o*x2z*txs-1./
     #    32.*o*tx*x2zc+1./16.*o*tx*x2zs-3./32.*o*x12s*txs+3./32.
     #    *o*x2zc-3./32.*o*x2zs*txs-1./16.*o*x2zs-1./16.*os*x12*
     #    x2z*tx-1./16.*os*x12*x2zs-3./32.*os*x12*txs+1./32.*os*
     #    x2z*tx-1./8.*os*x2z*txs-1./16.*os*tx*x2zs-1./16.*os*
     #    x2zc+1./8.*os*x2zs-1./32.*oc*x2z*tx-1./16.*oc*x2zs-1./
     #    32.*oc*txs+3./32.*x12*x2z*txs+3./32.*x12*tx*x2zs-3./32.
     #    *x12*x2zs*txs-1./32.*x12*x2zs+1./16.*x2z*tx*x12s-1./8.*
     #    x2z*x12s*txs+1./32.*tx*x2zc-1./32.*tx*x2zs-1./32.*x12c*
     #    txs-1./32.*x2zc+1./16.*x2zs*txs)
      zz40c= zz40c+rs2wz(10)*bxpi*vvq*gtm2*yc*(-3./8.*
     #    o*x12*x2z*tx+1./8.*o*x12*x2z*txs+21./64.*o*x12*x2z+3./
     #    32.*o*x12*tx*x2zs+3./32.*o*x12*tx-5./32.*o*x12*x2zs-13./
     #    32.*o*x12*txs+3./32.*o*x2z*tx*x12s+11./64.*o*x2z*tx-1./
     #    8.*o*x2z*x12s-19./64.*o*x2z*txs-1./8.*o*x2z-13./64.*o*
     #    tx*x12s+1./32.*o*tx*x12c+1./32.*o*tx*x2zc-13./64.*o*tx*
     #    x2zs+3./32.*o*x12s*txs-1./32.*o*x2zc+1./32.*o*x2zs*txs
     #    +25./64.*o*x2zs+3./32.*o*txs+3./16.*os*x12*x2z*tx-21./
     #    64.*os*x12*x2z-7./32.*os*x12*tx+1./16.*os*x12*x2zs+3./
     #    32.*os*x12*txs-1./4.*os*x2z*tx+1./32.*os*x2z*x12s+1./16.
     #    *os*x2z*txs+19./64.*os*x2z+3./32.*os*tx*x12s+3./32.*os*
     #    tx*x2zs+1./32.*os*tx+1./32.*os*x2zc-21./64.*os*x2zs-
     #    13./64.*os*txs+1./16.*oc*x12*x2z+3./32.*oc*x12*tx+3./32.
     #    *oc*x2z*tx-13./64.*oc*x2z-5./64.*oc*tx+1./16.*oc*x2zs
     #    +1./32.*oc*txs+1./32.*oq*x2z+1./32.*oq*tx+21./64.*x12
     #    *x2z*tx)
      zz40c= zz40c+rs2wz(10)*bxpi*vvq*gtm2*yc*(-19./64.
     #    *x12*x2z*txs-1./16.*x12*x2z-3./32.*x12*tx*x2zs+1./32.*
     #    x12*x2zs*txs+1./16.*x12*x2zs+3./32.*x12*txs-1./8.*x2z*
     #    tx*x12s-1./16.*x2z*tx+1./16.*x2z*x12s*txs+1./16.*x2z*
     #    x12s+3./16.*x2z*txs+1./16.*tx*x12s-1./16.*tx*x12c-1./
     #    32.*tx*x2zc+9./64.*tx*x2zs-13./64.*x12s*txs+1./32.*x12c
     #    *txs-1./8.*x2zs)
      zz40c= zz40c+rs2wz(10)*vvq*gtm2*bxps*yc*(1./16.+
     #    1./8.*o*x12-1./8.*o+1./16.*os-1./8.*x12+1./16.*x12s)
      zz40c= zz40c+rs2wz(10)*vvq*gtm2*yc*bxp*(-1./16.
     #    -11./64.*o*x12*x2z-1./32.*o*x12*tx-9./64.*o*x12+1./64.
     #    *o*x2z*tx+19./64.*o*x2z-9./64.*o*tx-3./64.*o*x12s-1./
     #    8.*o*txs+3./16.*o-9./64.*os*x2z+3./64.*os*tx-9./64.*
     #    os+1./64.*oc+1./64.*x12*x2z*tx+3./16.*x12*x2z-1./64.*
     #    x12*tx-1./8.*x12*txs+3./32.*x12-1./64.*x2z*tx-1./32.*
     #    x2z*x12s-5./32.*x2z-5./64.*tx*x12s+3./32.*tx-1./32.*
     #    x12c+1./8.*txs)
      zz40c= zz40c+rs2wz(10)*vvq*gtm2*yc*(-1./16.*o*
     #    x12*x2z*tx+5./32.*o*x12*x2z+3./8.*o*x12*tx+1./16.*o*x12
     #    *x2zs+5./32.*o*x12*txs-15./64.*o*x12+1./4.*o*x2z*tx+1.
     #    /32.*o*x2z*x12s+11./64.*o*x2z*txs-27./64.*o*x2z-1./64.*
     #    o*tx*x12s-1./64.*o*tx*x2zs-7./64.*o*tx+13./64.*o*x12s
     #    -1./32.*o*x12c-15./64.*o*x2zs+5./32.*o*txs+1./16.*o
     #    +1./64.*os*x12*x2z-1./8.*os*x12*tx+5./16.*os*x12-3./
     #    32.*os*x2z*tx+9./32.*os*x2z+13./64.*os*tx-3./32.*os*
     #    x12s+7./64.*os*x2zs+5./64.*os*txs-11./64.*os-3./32.*
     #    oc*x12-1./64.*oc*x2z-5./64.*oc*tx+9./64.*oc-1./32.*oq
     #    -1./32.*x12*x2z*tx+11./64.*x12*x2z*txs-1./8.*x12*x2z-
     #    15./64.*x12*tx-1./16.*x12*x2zs+5./32.*x12*txs+1./32.*
     #    x12+1./32.*x2z*tx*x12s-11./64.*x2z*tx-1./32.*x2z*x12s
     #    -3./16.*x2z*txs+5./32.*x2z+11./64.*tx*x12s+1./32.*tx*
     #    x12c+1./64.*tx*x2zs+1./32.*tx+5./64.*x12s*txs-1./16.*
     #    x12s)
      zz40c= zz40c+rs2wz(10)*vvq*gtm2*yc*(1./32.*x12c
     #    +1./8.*x2zs-1./8.*txs)
      zz40c= zz40c+rs2wz(11)*xx*vvq*gtm2*yc*(-1./8.*o
     #    *x12*x2z*tx+1./8.*o*x2z*tx-1./8.*o*x2z*txs+1./8.*o*tx*
     #    x2zs-1./4.*o*x2zs-1./8.*os*x2z*tx+1./8.*os*x2zs-1./8.
     #    *x12*x2z*tx-1./8.*x12*x2z*txs+1./4.*x2z*txs-1./8.*tx*
     #    x2zs+1./8.*x2zs)
      zz40c= zz40c+rs2wz(11)*bxpi*vvq*gtm2*yc*(3./8.*o*
     #    x12*x2z-3./16.*o*x12*tx+1./4.*o*x12*txs+3./16.*o*x2z*tx
     #    +1./8.*o*x2z*txs-11./16.*o*x2z+1./8.*o*tx*x12s-1./8.*
     #    o*tx*x2zs+1./8.*o*tx+1./8.*o*x2zs-7./16.*o*txs-1./8.*
     #    os*x12*x2z+1./4.*os*x12*tx+9./16.*os*x2z-5./16.*os*tx
     #    -1./8.*os*x2zs+1./8.*os*txs-1./8.*oc*x2z+1./8.*oc*tx
     #    +1./8.*x12*x2z*txs-1./4.*x12*x2z-1./8.*x12*tx-7./16.*
     #    x12*txs+1./16.*x2z*tx+1./4.*x2z+1./8.*tx*x12s-1./8.*
     #    tx*x2zs+1./8.*x12s*txs+1./4.*txs)
      zz40c= zz40c+rs2wz(11)*vvq*gtm2*yc*bxp*(1./8.+3./
     #    16.*o*x12+1./16.*o*tx-3./16.*o+1./16.*os+1./16.*x12*
     #    tx-1./4.*x12-1./16.*tx+1./8.*x12s)
      zz40c= zz40c+rs2wz(11)*vvq*gtm2*yc*(-1./8.-1./
     #    8.*o*x12*x2z-5./16.*o*x12*tx-9./16.*o*x12-3./16.*o*x2z*
     #    tx+5./16.*o*x2z+3./16.*o*tx+1./8.*o*x12s+3./16.*o*txs
     #    +7./16.*o+1./4.*os*x12-1./16.*os*x2z-1./16.*os*tx-7.
     #    /16.*os+1./8.*oc-1./4.*x12*x2z*tx+1./4.*x12*x2z+7./16.
     #    *x12*tx+3./16.*x12*txs+1./4.*x12+5./16.*x2z*tx-1./4.*
     #    x2z-1./4.*tx*x12s-3./16.*tx-1./8.*x12s-1./4.*txs)
      zz40c= zz40c+rs2wz(12)*xx*vvq*gtm2*yc*(1./4.*o*
     #    x12*txs-1./8.*o*x2z*tx+1./4.*o*x2z*txs-1./4.*o*tx*x2zs
     #    +1./4.*o*x2zs-1./8.*o*txs-1./8.*os*x2zs+1./8.*os*txs
     #    +1./4.*x12*x2z*txs-1./8.*x12*txs+1./8.*x2z*tx-1./4.*
     #    x2z*txs+1./8.*x12s*txs-1./8.*x2zs)
      zz40c= zz40c+rs2wz(12)*bxpi*vvq*gtm2*yc*(-3./8.*
     #    o*x12*x2z+7./16.*o*x12*tx-1./4.*o*x12*txs-3./16.*o*x2z*
     #    tx-1./8.*o*x2z*txs+11./16.*o*x2z-1./8.*o*tx*x12s+1./8.
     #    *o*tx*x2zs-3./8.*o*tx-1./8.*o*x2zs+9./16.*o*txs+1./8.
     #    *os*x12*x2z-1./4.*os*x12*tx-9./16.*os*x2z+7./16.*os*tx
     #    +1./8.*os*x2zs-1./8.*os*txs+1./8.*oc*x2z-1./8.*oc*tx
     #    +1./8.*x12*x2z*tx-1./8.*x12*x2z*txs+1./4.*x12*x2z-1./
     #    8.*x12*tx+9./16.*x12*txs-5./16.*x2z*tx-1./4.*x2z+1./8.
     #    *tx*x2zs+1./8.*tx-1./8.*x12s*txs-1./4.*txs)
      zz40c= zz40c+rs2wz(12)*vvq*gtm2*yc*bxp*(-1./8.
     #    -3./16.*o*x12+1./16.*o*tx+3./16.*o-1./16.*os+1./16.
     #    *x12*tx+1./4.*x12-1./16.*tx-1./8.*x12s)
      zz40c= zz40c+rs2wz(12)*vvq*gtm2*yc*(1./8.+1./8.
     #    *o*x12*x2z+1./16.*o*x12*tx+9./16.*o*x12+3./16.*o*x2z*tx
     #    -5./16.*o*x2z-1./16.*o*tx-1./8.*o*x12s-5./16.*o*txs
     #    -7./16.*o-1./4.*os*x12+1./16.*os*x2z-1./16.*os*tx+7.
     #    /16.*os-1./8.*oc+1./8.*x12*x2z*tx-1./4.*x12*x2z-5./16.
     #    *x12*tx-5./16.*x12*txs-1./4.*x12-1./16.*x2z*tx+1./4.*
     #    x2z+1./8.*tx*x12s+3./16.*tx+1./8.*x12s+1./4.*txs)
      zz40c= zz40c+rs2wz(13)*xx*vvq*gtm2*yc*(1./16.*o*
     #    x12*x2z*tx+1./4.*o*x12*txs-1./8.*o*x2z*tx+3./16.*o*x2z*
     #    txs+1./16.*o*tx*x2zs-1./8.*o*x2zs-1./16.*o*txs+1./16.
     #    *os*x2z*tx+1./16.*os*x2zs+1./8.*os*txs-3./16.*x12*x2z*
     #    tx+3./16.*x12*x2z*txs-1./16.*x12*txs+1./16.*x2z*tx-1./
     #    8.*x2z*txs-1./16.*tx*x2zs+1./8.*x12s*txs+1./16.*x2zs)
      zz40c= zz40c+rs2wz(13)*bxpi*vvq*gtm2*yc*(-1./8.*
     #    o*x12*x2z*tx+3./16.*o*x12*x2z+11./32.*o*x12*tx-1./8.*o*
     #    x12*txs+9./32.*o*x2z*tx-1./16.*o*x2z*txs-11./32.*o*x2z
     #    -1./16.*o*tx*x12s-1./16.*o*tx*x2zs-1./8.*o*tx+1./16.*
     #    o*x2zs+9./32.*o*txs-1./16.*os*x12*x2z-1./8.*os*x12*tx
     #    -1./8.*os*x2z*tx+9./32.*os*x2z+5./32.*os*tx-1./16.*os
     #    *x2zs-1./16.*os*txs-1./16.*oc*x2z-1./16.*oc*tx+1./8.*
     #    x12*x2z*tx-1./16.*x12*x2z*txs-1./8.*x12*x2z-1./4.*x12*
     #    tx+9./32.*x12*txs-7./32.*x2z*tx+1./8.*x2z+3./16.*tx*
     #    x12s+1./16.*tx*x2zs+1./16.*tx-1./16.*x12s*txs-1./8.*
     #    txs)
      zz40c= zz40c+rs2wz(13)*vvq*gtm2*yc*bxp*(1./16.+3.
     #    /32.*o*x12+1./32.*o*tx-3./32.*o+1./32.*os+1./32.*x12*
     #    tx-1./8.*x12-1./32.*tx+1./16.*x12s)
      zz40c= zz40c+rs2wz(13)*vvq*gtm2*yc*(-1./16.-1.
     #    /16.*o*x12*x2z-3./32.*o*x12*tx-9./32.*o*x12-1./32.*o*
     #    x2z*tx+5./32.*o*x2z-3./32.*o*tx+1./16.*o*x12s-5./32.*
     #    o*txs+7./32.*o+1./8.*os*x12-1./32.*os*x2z+1./32.*os*
     #    tx-7./32.*os+1./16.*oc+1./8.*x12*x2z+1./32.*x12*tx-
     #    5./32.*x12*txs+1./8.*x12+1./32.*x2z*tx-1./8.*x2z-1./8.
     #    *tx*x12s+3./32.*tx-1./16.*x12s+1./8.*txs)
      zz40c= zz40c+rs2wz(14)*xx*vvq*gtm2*yc*(-1./8.*o
     #    *x12*x2z*tx-1./8.*o*x12*txs+1./8.*o*x2z*tx-1./8.*o*x2z*
     #    txs-1./8.*o*tx*x2zs+1./8.*o*x2zs-1./8.*os*x2z*tx-1./
     #    16.*os*x2zs-1./16.*os*txs+1./8.*x12*x2z*tx-1./8.*x12*
     #    x2z*txs+1./8.*x2z*txs-1./16.*x12s*txs-1./16.*x2zs)
      zz40c= zz40c+rs2wz(14)*bxpi*vvq*gtm2*yc*(1./8.*o*
     #    x12*x2z*tx-3./16.*o*x12*x2z-11./32.*o*x12*tx+1./8.*o*
     #    x12*txs-13./32.*o*x2z*tx+1./16.*o*x2z*txs+11./32.*o*x2z
     #    +1./16.*o*tx*x12s+1./16.*o*tx*x2zs+1./8.*o*tx-1./16.*
     #    o*x2zs-7./32.*o*txs+1./16.*os*x12*x2z+1./8.*os*x12*tx
     #    +1./8.*os*x2z*tx-9./32.*os*x2z-7./32.*os*tx+1./16.*os
     #    *x2zs+1./16.*os*txs+1./16.*oc*x2z+1./16.*oc*tx-1./16.
     #    *x12*x2z*tx+1./16.*x12*x2z*txs+1./8.*x12*x2z+1./8.*x12*
     #    tx-7./32.*x12*txs+3./32.*x2z*tx-1./8.*x2z-1./8.*tx*
     #    x12s-1./16.*tx*x2zs+1./16.*x12s*txs+1./8.*txs)
      zz40c= zz40c+rs2wz(14)*vvq*gtm2*yc*bxp*(-1./16.
     #    -3./32.*o*x12-3./32.*o*tx+3./32.*o-1./32.*os+1./32.
     #    *x12*tx+1./8.*x12-1./32.*tx-1./16.*x12s)
      zz40c= zz40c+rs2wz(14)*vvq*gtm2*yc*(1./16.+1./
     #    16.*o*x12*x2z+3./32.*o*x12*tx+9./32.*o*x12+5./32.*o*x2z
     #    *tx-5./32.*o*x2z+5./32.*o*tx-1./16.*o*x12s+3./32.*o*
     #    txs-7./32.*o-1./8.*os*x12+1./32.*os*x2z+1./32.*os*tx
     #    +7./32.*os-1./16.*oc-1./16.*x12*x2z*tx-1./8.*x12*x2z
     #    +1./32.*x12*tx+3./32.*x12*txs-1./8.*x12+3./32.*x2z*tx
     #    +1./8.*x2z+1./16.*tx*x12s-3./32.*tx+1./16.*x12s-1./
     #    8.*txs)
      zz40c= zz40c+rt1wz(1)*xx*vvc*gsm2*ys*csti*vet
     # *(1./8.*o*x2z*tx+1./8.*o*txs+1./8.*x12*txs-1./8.*x2z*tx
     #    )
      zz40c= zz40c+rt1wz(1)*xx*vvc*gsm2*ys*csti*(
     #    -1./2.*zi*o*x12*tx+zi*o*tx+1./2.*zi*o*
     #    txs-1./2.*zi*os*tx+1./2.*zi*x12*tx+1./2.*
     #    zi*x12*txs-1./2.*zi*tx-o*x2z*tx-1./2.*o*tx-
     #    o*txs-x12*txs+x2z*tx+1./2.*tx)
      zz40c= zz40c+rt1wz(1)*bxpi*vvc*gsm2*ys*csti*vet
     # *(-1./4.*o*x12*tx-1./4.*o*x2z*tx+3./8.*o*tx-1./4.*os*
     #    tx+1./8.*x12*tx-1./8.*tx)
      zz40c= zz40c+rt1wz(1)*bxpi*vvc*gsm2*ys*csti*(
     #    -zi*o*x12*tx+5./2.*zi*o*tx+zi*o*txs-
     #    zi*os*tx+3./2.*zi*x12*tx+zi*x12*txs-3./2.
     #    *zi*tx+o*x12*tx+o*x2z*tx-3*o*tx+os*tx-x12*tx
     #    +2*tx)
      zz40c= zz40c+rt1wz(1)*vvc*gsm2*ys*csti*vet*(
     #    1./8.*o*tx-1./8.*x12*tx+1./8.*tx)
      zz40c= zz40c+rt1wz(1)*vvc*gsm2*ys*csti*bxp*(
     #    zi*o*tx+zi*x12*tx-zi*tx)
      zz40c= zz40c+rt1wz(1)*vvc*gsm2*ys*csti*(
     #    zi*o*x12*tx-7./2.*zi*o*tx-zi*o*txs+
     #    zi*os*tx-5./2.*zi*x12*tx-zi*x12*txs+5./2.
     #    *zi*tx+o*tx+x12*tx-2*tx)
      zz40c= zz40c+rt1wz(4)*xx*vvc*gsm2*ys*csti*vet
     # *(-1./32.*o*x12*x2z*tx-1./32.*o*x2z*txs+1./32.*o*tx*
     #    x2zs-1./32.*o*x2zs-1./32.*os*x2z*tx+1./32.*os*x2zs-1./
     #    32.*x12*x2z*txs+1./32.*tx*x2zs)
      zz40c= zz40c+rt1wz(4)*xx*vvc*gsm2*ys*csti*(
     #    -1./8.-5./8.*zi*o*x12*tx+1./4.*zi*o*x12*txs
     #    +3./4.*zi*o*x12+1./4.*zi*o*tx*x12s+1./2.*
     #    zi*o*tx-1./4.*zi*o*x12s-3./8.*zi*o*txs-1.
     #    /2.*zi*o+1./2.*zi*os*x12*tx-3./4.*zi*os*
     #    x12-5./8.*zi*os*tx+1./8.*zi*os*x12s+1./8.*
     #    zi*os*txs+3./4.*zi*os+1./4.*zi*oc*x12+1./
     #    4.*zi*oc*tx-1./2.*zi*oc+1./8.*zi*oq+1./8.
     #    *zi*x12*tx-3./8.*zi*x12*txs-1./4.*zi*x12
     #    -1./8.*zi*tx+1./8.*zi*x12s*txs+1./8.*zi*
     #    x12s+1./4.*zi*txs+1./8.*zi+1./4.*o*x12*x2z*tx
     #    +1./4.*o*x12*tx-1./4.*o*x12-1./4.*o*x2z*tx+1./4.*o*
     #    x2z*txs+1./4.*o*x2z-1./4.*o*tx*x2zs-3./8.*o*tx+3./8.*
     #    o*x2zs+1./8.*o*txs+3./8.*o+1./8.*os*x12+1./4.*os*x2z*
     #    tx-1./8.*os*x2z+1./4.*os*tx-1./4.*os*x2zs-3./8.*os+
     #    1./8.*oc)
      zz40c= zz40c+rt1wz(4)*xx*vvc*gsm2*ys*csti*(1.
     #    /8.*x12*x2z*tx+1./4.*x12*x2z*txs+1./8.*x12*txs+1./8.*
     #    x12+1./8.*x2z*tx-1./4.*x2z*txs-1./8.*x2z+1./8.*tx-1.
     #    /8.*x2zs-1./4.*txs)
      zz40c= zz40c+rt1wz(4)*bxpi*vvc*gsm2*ys*csti*vet
     # *(1./16.*o*x12*x2z-1./32.*o*x12*tx+1./16.*o*x12*txs-1./
     #    32.*o*x2z*tx+1./32.*o*x2z*txs-1./16.*o*x2z+1./32.*o*tx*
     #    x12s-1./32.*o*tx*x2zs+1./32.*o*x2zs-1./32.*o*txs-1./
     #    32.*os*x12*x2z+1./16.*os*x12*tx+3./32.*os*x2z-1./32.*os
     #    *tx-1./32.*os*x2zs+1./32.*os*txs-1./32.*oc*x2z+1./32.
     #    *oc*tx-1./16.*x12*x2z*tx+1./32.*x12*x2z*txs-1./32.*x12*
     #    txs+1./16.*x2z*tx-1./32.*tx*x2zs+1./32.*x12s*txs)
      zz40c= zz40c+rt1wz(4)*bxpi*vvc*gsm2*ys*csti*(
     #    -1./2.-3./2.*zi*o*x12*tx+1./2.*zi*o*x12*txs
     #    +5./2.*zi*o*x12+1./2.*zi*o*tx*x12s+11./8.*
     #    zi*o*tx-3./4.*zi*o*x12s-zi*o*txs-7./4.*
     #    zi*o+zi*os*x12*tx-2*zi*os*x12-3./2.*
     #    zi*os*tx+1./4.*zi*os*x12s+1./4.*zi*os*txs
     #    +9./4.*zi*os+1./2.*zi*oc*x12+1./2.*zi*oc
     #    *tx-5./4.*zi*oc+1./4.*zi*oq+3./8.*zi*x12
     #    *tx-zi*x12*txs-zi*x12-3./8.*zi*tx+1./4.
     #    *zi*x12s*txs+1./2.*zi*x12s+3./4.*zi*txs+
     #    1./2.*zi-1./2.*o*x12*x2z+5./8.*o*x12*tx-1./4.*o*
     #    x12*txs-3./4.*o*x12-1./4.*o*x2z*tx-1./8.*o*x2z*txs+5./
     #    4.*o*x2z-1./8.*o*tx*x12s+1./8.*o*tx*x2zs-o*tx-1./8.*o
     #    *x2zs+5./8.*o*txs+5./4.*o+1./8.*os*x12*x2z-1./4.*os*
     #    x12*tx+1./4.*os*x12-7./8.*os*x2z+3./4.*os*tx+1./8.*os
     #    *x2zs)
      zz40c= zz40c+rt1wz(4)*bxpi*vvc*gsm2*ys*csti*(
     #    -1./8.*os*txs-os+1./8.*oc*x2z-1./8.*oc*tx+1./4.*oc
     #    +1./8.*x12*x2z*tx-1./8.*x12*x2z*txs+1./4.*x12*x2z+5./
     #    8.*x12*txs+1./2.*x12+1./8.*x2z*tx-1./2.*x2z-1./8.*tx*
     #    x12s+1./8.*tx*x2zs+3./8.*tx-1./8.*x12s*txs-3./4.*txs
     #    )
      zz40c= zz40c+rt1wz(4)*vvc*gsm2*bxps*ys*csti*(
     #    -1./2.*zi*o*x12+1./2.*zi*o-1./4.*zi*os
     #    +1./2.*zi*x12-1./4.*zi*x12s-1./4.*zi)
      zz40c= zz40c+rt1wz(4)*vvc*gsm2*ys*csti*vet*bxp
     # *(-1./32.*o*x12+1./32.*o*tx+1./32.*o-1./32.*os+1./
     #    32.*x12*tx-1./32.*tx)
      zz40c= zz40c+rt1wz(4)*vvc*gsm2*ys*csti*vet*(
     #    -3./32.*o*x12*tx-1./16.*o*x12+1./32.*o*x2z*tx-1./32.*
     #    o*x2z+1./16.*o*tx+1./32.*o*x12s-1./32.*o*txs+1./32.*o
     #    +1./16.*os*x12+1./32.*os*x2z-1./16.*os*tx-1./16.*os
     #    +1./32.*oc+1./16.*x12*tx-1./32.*x12*txs+1./32.*x2z*tx
     #    -1./32.*tx*x12s-1./32.*tx)
      zz40c= zz40c+rt1wz(4)*vvc*gsm2*ys*csti*bxp*(
     #    -5./8.-1./2.*zi*o*x12*tx+11./4.*zi*o*x12+3./
     #    4.*zi*o*tx-1./2.*zi*o*x12s-1./2.*zi*o*txs
     #    -9./4.*zi*o-zi*os*x12-1./2.*zi*os*tx+
     #    15./8.*zi*os-1./2.*zi*oc+1./4.*zi*x12*tx
     #    -1./2.*zi*x12*txs-7./4.*zi*x12-1./4.*zi*
     #    tx+7./8.*zi*x12s+1./2.*zi*txs+7./8.*zi
     #    -5./8.*o*x12-3./8.*o*tx+9./8.*o-1./2.*os-3./8.*x12*
     #    tx+3./4.*x12+3./8.*tx-1./8.*x12s)
      zz40c= zz40c+rt1wz(4)*vvc*gsm2*ys*csti*(9./8.
     #    +2*zi*o*x12*tx-1./2.*zi*o*x12*txs-19./4.*
     #    zi*o*x12-1./2.*zi*o*tx*x12s-17./8.*zi*o*tx
     #    +5./4.*zi*o*x12s+3./2.*zi*o*txs+7./2.*zi
     #    *o-zi*os*x12*tx+3*zi*os*x12+2*zi*os*tx
     #    -1./4.*zi*os*x12s-1./4.*zi*os*txs-31./8.*
     #    zi*os-1./2.*zi*oc*x12-1./2.*zi*oc*tx+7./
     #    4.*zi*oc-1./4.*zi*oq-5./8.*zi*x12*tx+3./
     #    2.*zi*x12*txs+9./4.*zi*x12+5./8.*zi*tx-1.
     #    /4.*zi*x12s*txs-9./8.*zi*x12s-5./4.*zi*txs
     #    -9./8.*zi+1./4.*o*x12*x2z-1./8.*o*x12*tx+7./4.*o
     #    *x12+1./4.*o*x2z*tx-7./8.*o*x2z+o*tx-1./8.*o*x12s-3.
     #    /8.*o*txs-21./8.*o-1./2.*os*x12+3./8.*os*x2z-3./8.*os
     #    *tx+15./8.*os-3./8.*oc+1./8.*x12*x2z*tx-1./4.*x12*x2z
     #    -3./8.*x12*txs-5./4.*x12-1./2.*x2z*tx+1./2.*x2z+1./
     #    4.*tx*x12s)
      zz40c= zz40c+rt1wz(4)*vvc*gsm2*ys*csti*(-1.
     #    /2.*tx+1./8.*x12s+3./4.*txs)
      zz40c= zz40c+rt1wz(7)*xx*vvc*gsm2*ys*csti*vet
     # *(1./64.*o*x12*x2z*tx+1./64.*o*x2z*txs+1./64.*o*tx*x2zs
     #    -1./64.*o*x2zs+1./64.*os*x2z*tx+1./64.*os*x2zs+1./64.
     #    *x12*x2z*txs-1./64.*tx*x2zs)
      zz40c= zz40c+rt1wz(7)*xx*vvc*gsm2*ys*csti*(1.
     #    /16.-1./8.*zi*o*x12*tx+1./8.*zi*o*x12*txs-3./
     #    8.*zi*o*x12+1./8.*zi*o*x12s-1./4.*zi*o*txs
     #    +1./4.*zi*o+3./8.*zi*os*x12-1./16.*zi*os
     #    *x12s+1./16.*zi*os*txs-3./8.*zi*os-1./8.*
     #    zi*oc*x12+1./4.*zi*oc-1./16.*zi*oq+1./8.
     #    *zi*x12*tx-1./4.*zi*x12*txs+1./8.*zi*x12
     #    -1./8.*zi*tx*x12s+1./16.*zi*x12s*txs-1./16.*
     #    zi*x12s+1./8.*zi*txs-1./16.*zi-1./16.*o*
     #    x12*x2z*tx-1./8.*o*x12*txs+1./8.*o*x12-3./16.*o*x2z*txs
     #    -1./8.*o*x2z-1./16.*o*tx*x2zs+3./16.*o*x2zs+1./8.*o*
     #    txs-3./16.*o-1./16.*os*x12-1./16.*os*x2z*tx+1./16.*os
     #    *x2z-1./8.*os*x2zs-1./16.*os*txs+3./16.*os-1./16.*oc
     #    +1./8.*x12*x2z*tx-3./16.*x12*x2z*txs-1./8.*x12*tx+1./
     #    8.*x12*txs-1./16.*x12+1./8.*x2z*txs+1./16.*x2z+1./16.
     #    *tx*x2zs)
      zz40c= zz40c+rt1wz(7)*xx*vvc*gsm2*ys*csti*(
     #    -1./16.*x12s*txs-1./16.*x2zs-1./8.*txs)
      zz40c= zz40c+rt1wz(7)*bxpi*vvc*gsm2*ys*csti*vet
     # *(-1./32.*o*x12*x2z*tx+1./32.*o*x12*x2z+1./32.*o*x12*tx
     #    -1./32.*o*x12*txs+1./16.*o*x2z*tx-1./64.*o*x2z*txs-3./
     #    64.*o*x2z-1./64.*o*tx*x12s-1./64.*o*tx*x2zs+1./64.*o*
     #    x2zs+1./32.*o*txs-1./64.*os*x12*x2z-1./32.*os*x12*tx-
     #    1./32.*os*x2z*tx+1./16.*os*x2z+1./32.*os*tx-1./64.*os*
     #    x2zs-1./64.*os*txs-1./64.*oc*x2z-1./64.*oc*tx+1./32.*
     #    x12*x2z*tx-1./64.*x12*x2z*txs+1./32.*x12*txs-3./64.*x2z
     #    *tx+1./64.*tx*x2zs-1./64.*x12s*txs)
      zz40c= zz40c+rt1wz(7)*bxpi*vvc*gsm2*ys*csti*(
     #    1./8.-1./8.*zi*o*x12*tx-1./2.*zi*o*x12+1./8.*
     #    zi*o*x12s-1./8.*zi*o*txs+3./8.*zi*o+1./4.
     #    *zi*os*x12-3./8.*zi*os+1./8.*zi*oc+1./8.
     #    *zi*x12*tx-1./8.*zi*x12*txs+1./4.*zi*x12
     #    -1./8.*zi*tx*x12s-1./8.*zi*x12s+1./8.*zi
     #    *txs-1./8.*zi+1./8.*o*x12*x2z*tx-1./4.*o*x12*x2z
     #    -1./4.*o*x12*tx+1./8.*o*x12*txs+1./8.*o*x12-1./4.*o*
     #    x2z*tx+1./16.*o*x2z*txs+7./16.*o*x2z+1./16.*o*tx*x12s
     #    +1./16.*o*tx*x2zs-1./16.*o*x2zs-1./4.*o*txs-1./4.*o
     #    +1./16.*os*x12*x2z+1./8.*os*x12*tx+1./8.*os*x2z*tx-3./
     #    8.*os*x2z-1./8.*os*tx+1./16.*os*x2zs+1./16.*os*txs+1./
     #    8.*os+1./16.*oc*x2z+1./16.*oc*tx-1./8.*x12*x2z*tx+1./
     #    16.*x12*x2z*txs+1./8.*x12*x2z+1./8.*x12*tx-1./4.*x12*
     #    txs-1./8.*x12+3./16.*x2z*tx-1./8.*x2z-1./8.*tx*x12s
     #    -1./16.*tx*x2zs)
      zz40c= zz40c+rt1wz(7)*bxpi*vvc*gsm2*ys*csti*(
     #    1./16.*x12s*txs+1./8.*txs)
      zz40c= zz40c+rt1wz(7)*vvc*gsm2*ys*csti*vet*(
     #    1./32.*o*x12*tx-3./64.*o*x12-3./64.*o*tx+1./64.*o*x12s
     #    +1./32.*o+1./32.*os*x12+1./64.*os*tx-3./64.*os+1./
     #    64.*oc-3./64.*x12*tx+1./64.*tx*x12s+1./32.*tx)
      zz40c= zz40c+rt1wz(7)*vvc*gsm2*ys*csti*bxp*(
     #    -1./16.-1./8.*zi*o*x12+1./8.*zi*o-1./16.*
     #    zi*os+1./8.*zi*x12-1./16.*zi*x12s-1./16.
     #    *zi-1./8.*o*x12+1./8.*o-1./16.*os+1./8.*x12-1./
     #    16.*x12s)
      zz40c= zz40c+rt1wz(7)*vvc*gsm2*ys*csti*(-1.
     #    /16.+1./8.*zi*o*x12*tx+5./8.*zi*o*x12-1./8.*
     #    zi*o*x12s+1./8.*zi*o*txs-1./2.*zi*o-1./4.
     #    *zi*os*x12+7./16.*zi*os-1./8.*zi*oc-1./8.
     #    *zi*x12*tx+1./8.*zi*x12*txs-3./8.*zi*x12
     #    +1./8.*zi*tx*x12s+3./16.*zi*x12s-1./8.*
     #    zi*txs+3./16.*zi+1./8.*o*x12*x2z+3./16.*o*x12
     #    -1./4.*o*x2z+3./16.*o*tx-1./16.*o*x12s+1./8.*o*txs-
     #    1./8.*os*x12+1./8.*os*x2z-1./16.*os*tx+1./8.*os-1./16.
     #    *oc-1./8.*x12*x2z+1./16.*x12*tx+1./8.*x12*txs+1./8.*
     #    x2z+1./16.*tx*x12s-1./8.*tx+1./16.*x12s-1./8.*txs)
      zz40c= zz40c+rt1wz(8)*xx*vvc*gsm2*ys*csti*(1.
     #    /4.+5./4.*zi*o*x12*tx-1./2.*zi*o*x12*txs-3./2.
     #    *zi*o*x12-1./2.*zi*o*tx*x12s-zi*o*tx+1./
     #    2.*zi*o*x12s+3./4.*zi*o*txs+zi*o-zi
     #    *os*x12*tx+3./2.*zi*os*x12+5./4.*zi*os*tx-1./
     #    4.*zi*os*x12s-1./4.*zi*os*txs-3./2.*zi*os
     #    -1./2.*zi*oc*x12-1./2.*zi*oc*tx+zi*oc-
     #    1./4.*zi*oq-1./4.*zi*x12*tx+3./4.*zi*x12*
     #    txs+1./2.*zi*x12+1./4.*zi*tx-1./4.*zi*
     #    x12s*txs-1./4.*zi*x12s-1./2.*zi*txs-1./4.*
     #    zi-1./2.*o*x12*tx+1./2.*o*x12+1./4.*o*x2z*tx-1./
     #    2.*o*x2z+3./4.*o*tx-1./4.*o*txs-3./4.*o-1./4.*os*x12
     #    +1./4.*os*x2z-1./2.*os*tx+3./4.*os-1./4.*oc-1./4.*
     #    x12*txs-1./4.*x12-1./4.*x2z*tx+1./4.*x2z-1./4.*tx+1.
     #    /2.*txs)
      zz40c= zz40c+rt1wz(8)*bxpi*vvc*gsm2*ys*csti*vet
     # *(-1./32.*o*x12*tx+1./32.*o*x2z*tx-1./32.*o*x2z-1./32.
     #    *o*txs+1./32.*os*x2z-1./32.*os*tx-1./32.*x12*txs+1./
     #    32.*x2z*tx)
      zz40c= zz40c+rt1wz(8)*bxpi*vvc*gsm2*ys*csti*(
     #    3./4.+7./4.*zi*o*x12*tx-1./2.*zi*o*x12*txs-7./
     #    2.*zi*o*x12-1./2.*zi*o*tx*x12s-7./4.*zi*o*
     #    tx+zi*o*x12s+5./4.*zi*o*txs+5./2.*zi*o
     #    -zi*os*x12*tx+5./2.*zi*os*x12+7./4.*zi*
     #    os*tx-1./4.*zi*os*x12s-1./4.*zi*os*txs-3*
     #    zi*os-1./2.*zi*oc*x12-1./2.*zi*oc*tx+3./
     #    2.*zi*oc-1./4.*zi*oq-1./2.*zi*x12*tx+5./
     #    4.*zi*x12*txs+3./2.*zi*x12+1./2.*zi*tx-1.
     #    /4.*zi*x12s*txs-3./4.*zi*x12s-zi*txs-3./
     #    4.*zi-3./8.*o*x12*tx+o*x12+1./8.*o*x2z*tx-3./8.*
     #    o*x2z+o*tx-1./8.*o*txs-7./4.*o-1./4.*os*x12+1./8.*
     #    os*x2z-3./8.*os*tx+5./4.*os-1./4.*oc+1./4.*x12*tx-1.
     #    /8.*x12*txs-3./4.*x12-3./8.*x2z*tx+1./4.*x2z-1./2.*tx
     #    +1./2.*txs)
      zz40c= zz40c+rt1wz(8)*vvc*gsm2*bxps*ys*csti*(
     #    1./2.*zi*o*x12-1./2.*zi*o+1./4.*zi*os-1./
     #    2.*zi*x12+1./4.*zi*x12s+1./4.*zi)
      zz40c= zz40c+rt1wz(8)*vvc*gsm2*ys*csti*vet*bxp
     # *(1./32.*o*x12-1./32.*o*tx-1./32.*o+1./32.*os-1./32.*
     #    x12*tx+1./32.*tx)
      zz40c= zz40c+rt1wz(8)*vvc*gsm2*ys*csti*vet*(
     #    1./32.*o*x12*tx-1./32.*o*x12-1./32.*o*x2z*tx+1./32.*o*
     #    x2z+1./32.*o*tx+1./32.*o*txs+1./32.*o-1./32.*os*x2z
     #    +1./32.*os*tx-1./32.*os+1./32.*x12*tx+1./32.*x12*txs
     #    -1./32.*x2z*tx-1./32.*tx)
      zz40c= zz40c+rt1wz(8)*vvc*gsm2*ys*csti*bxp*(1.
     #    /2.+1./2.*zi*o*x12*tx-3*zi*o*x12-3./4.*
     #    zi*o*tx+1./2.*zi*o*x12s+1./2.*zi*o*txs+5.
     #    /2.*zi*o+zi*os*x12+1./2.*zi*os*tx-2*
     #    zi*os+1./2.*zi*oc-1./4.*zi*x12*tx+1./2.*
     #    zi*x12*txs+2*zi*x12+1./4.*zi*tx-zi*
     #    x12s-1./2.*zi*txs-zi+3./8.*o*x12+3./8.*o*tx
     #    -7./8.*o+3./8.*os+3./8.*x12*tx-1./2.*x12-3./8.*tx)
      zz40c= zz40c+rt1wz(8)*vvc*gsm2*ys*csti*(-5.
     #    /4.-9./4.*zi*o*x12*tx+1./2.*zi*o*x12*txs+6*
     #    zi*o*x12+1./2.*zi*o*tx*x12s+5./2.*zi*o*tx
     #    -3./2.*zi*o*x12s-7./4.*zi*o*txs-9./2.*zi
     #    *o+zi*os*x12*tx-7./2.*zi*os*x12-9./4.*zi
     #    *os*tx+1./4.*zi*os*x12s+1./4.*zi*os*txs+19./4.
     #    *zi*os+1./2.*zi*oc*x12+1./2.*zi*oc*tx-2*
     #    zi*oc+1./4.*zi*oq+3./4.*zi*x12*tx-7./4.*
     #    zi*x12*txs-3*zi*x12-3./4.*zi*tx+1./4.*
     #    zi*x12s*txs+3./2.*zi*x12s+3./2.*zi*txs+3.
     #    /2.*zi+3./8.*o*x12*tx-11./8.*o*x12-1./8.*o*x2z*tx
     #    +3./8.*o*x2z-11./8.*o*tx+1./8.*o*txs+21./8.*o+1./4.
     #    *os*x12-1./8.*os*x2z+3./8.*os*tx-13./8.*os+1./4.*oc
     #    -5./8.*x12*tx+1./8.*x12*txs+5./4.*x12+3./8.*x2z*tx-
     #    1./4.*x2z+7./8.*tx-1./2.*txs)
      zz40c= zz40c+rt1wz(9)*xx*vvc*gsm2*ys*csti*(1.
     #    /2.*zi*o*x12*tx-zi*o*tx-1./2.*zi*o*txs+1.
     #    /2.*zi*os*tx-1./2.*zi*x12*tx-1./2.*zi*x12*
     #    txs+1./2.*zi*tx+1./2.*o*tx-1./2.*tx)
      zz40c= zz40c+rt1wz(9)*bxpi*vvc*gsm2*ys*csti*vet
     # *(1./8.*o*tx)
      zz40c= zz40c+rt1wz(9)*bxpi*vvc*gsm2*ys*csti*(
     #    1./2.*zi*o*x12*tx-3./2.*zi*o*tx-1./2.*zi*o
     #    *txs+1./2.*zi*os*tx-zi*x12*tx-1./2.*zi*
     #    x12*txs+zi*tx-1./2.*tx)
      zz40c= zz40c+rt1wz(9)*vvc*gsm2*ys*csti*vet*(
     #    -1./8.*o*tx)
      zz40c= zz40c+rt1wz(9)*vvc*gsm2*ys*csti*bxp*(
     #    -1./2.*zi*o*tx-1./2.*zi*x12*tx+1./2.*zi*
     #    tx)
      zz40c= zz40c+rt1wz(9)*vvc*gsm2*ys*csti*(-1.
     #    /2.*zi*o*x12*tx+2*zi*o*tx+1./2.*zi*o*txs
     #    -1./2.*zi*os*tx+3./2.*zi*x12*tx+1./2.*zi
     #    *x12*txs-3./2.*zi*tx+1./2.*tx)
      zz40c= zz40c+rt1wz(10)*xx*vvc*gsm2*ys*csti*vet
     # *(-1./64.*o*x12*x2z*tx-1./64.*o*x2z*txs-1./64.*o*tx*
     #    x2zs+1./64.*o*x2zs-1./64.*os*x2z*tx-1./64.*os*x2zs-1./
     #    64.*x12*x2z*txs+1./64.*tx*x2zs)
      zz40c= zz40c+rt1wz(10)*xx*vvc*gsm2*ys*csti*(
     #    1./16.-1./8.*zi*o*x12*tx+1./8.*zi*o*x12*txs-3.
     #    /8.*zi*o*x12+1./8.*zi*o*x12s-1./4.*zi*o*
     #    txs+1./4.*zi*o+3./8.*zi*os*x12-1./16.*zi
     #    *os*x12s+1./16.*zi*os*txs-3./8.*zi*os-1./8.*
     #    zi*oc*x12+1./4.*zi*oc-1./16.*zi*oq+1./8.
     #    *zi*x12*tx-1./4.*zi*x12*txs+1./8.*zi*x12
     #    -1./8.*zi*tx*x12s+1./16.*zi*x12s*txs-1./16.*
     #    zi*x12s+1./8.*zi*txs-1./16.*zi+1./16.*o*
     #    x12*x2z*tx+1./8.*o*x12*txs+1./8.*o*x12+3./16.*o*x2z*txs
     #    -1./8.*o*x2z+1./16.*o*tx*x2zs-3./16.*o*x2zs+1./8.*o*
     #    txs-3./16.*o-1./16.*os*x12+1./16.*os*x2z*tx+1./16.*os
     #    *x2z+1./8.*os*x2zs+1./16.*os*txs+3./16.*os-1./16.*oc
     #    -1./8.*x12*x2z*tx+3./16.*x12*x2z*txs-1./8.*x12*tx+1./
     #    8.*x12*txs-1./16.*x12-1./8.*x2z*txs+1./16.*x2z-1./16.
     #    *tx*x2zs)
      zz40c= zz40c+rt1wz(10)*xx*vvc*gsm2*ys*csti*(
     #    1./16.*x12s*txs+1./16.*x2zs-1./8.*txs)
      zz40c= zz40c+rt1wz(10)*bxpi*vvc*gsm2*ys*csti*vet
     # *(1./32.*o*x12*x2z*tx-1./32.*o*x12*x2z-1./64.*o*x12*tx+
     #    1./32.*o*x12*txs-3./64.*o*x2z*tx+1./64.*o*x2z*txs+1./32.
     #    *o*x2z+1./64.*o*tx*x12s+1./64.*o*tx*x2zs-1./64.*o*x2zs
     #    -1./64.*o*txs+1./64.*os*x12*x2z+1./32.*os*x12*tx+1./
     #    32.*os*x2z*tx-3./64.*os*x2z-1./64.*os*tx+1./64.*os*x2zs
     #    +1./64.*os*txs+1./64.*oc*x2z+1./64.*oc*tx-1./32.*x12*
     #    x2z*tx+1./64.*x12*x2z*txs-1./64.*x12*txs+1./32.*x2z*tx
     #    -1./64.*tx*x2zs+1./64.*x12s*txs)
      zz40c= zz40c+rt1wz(10)*bxpi*vvc*gsm2*ys*csti
     # *(1./4.-3./8.*zi*o*x12*tx+1./4.*zi*o*x12*txs-
     #    5./4.*zi*o*x12+3./8.*zi*o*x12s-5./8.*zi*o*
     #    txs+7./8.*zi*o+zi*os*x12-1./8.*zi*os*
     #    x12s+1./8.*zi*os*txs-9./8.*zi*os-1./4.*
     #    zi*oc*x12+5./8.*zi*oc-1./8.*zi*oq+3./8.*
     #    zi*x12*tx-5./8.*zi*x12*txs+1./2.*zi*x12-
     #    3./8.*zi*tx*x12s+1./8.*zi*x12s*txs-1./4.*
     #    zi*x12s+3./8.*zi*txs-1./4.*zi-1./8.*o*
     #    x12*x2z*tx+1./4.*o*x12*x2z+3./16.*o*x12*tx-1./8.*o*x12*
     #    txs+3./8.*o*x12+3./16.*o*x2z*tx-1./16.*o*x2z*txs-5./8.
     #    *o*x2z-1./16.*o*tx*x12s-1./16.*o*tx*x2zs+1./16.*o*x2zs
     #    +7./16.*o*txs-5./8.*o-1./16.*os*x12*x2z-1./8.*os*x12*
     #    tx-1./8.*os*x12-1./8.*os*x2z*tx+7./16.*os*x2z+1./16.*
     #    os*tx-1./16.*os*x2zs-1./16.*os*txs+1./2.*os-1./16.*oc
     #    *x2z)
      zz40c= zz40c+rt1wz(10)*bxpi*vvc*gsm2*ys*csti
     # *(-1./16.*oc*tx-1./8.*oc+1./8.*x12*x2z*tx-1./16.*x12*
     #    x2z*txs-1./8.*x12*x2z-3./8.*x12*tx+7./16.*x12*txs-1./
     #    4.*x12-1./8.*x2z*tx+1./4.*x2z+1./8.*tx*x12s+1./16.*tx
     #    *x2zs-1./16.*x12s*txs-3./8.*txs)
      zz40c= zz40c+rt1wz(10)*vvc*gsm2*bxps*ys*csti
     # *(1./4.*zi*o*x12-1./4.*zi*o+1./8.*zi*os-
     #    1./4.*zi*x12+1./8.*zi*x12s+1./8.*zi)
      zz40c= zz40c+rt1wz(10)*vvc*gsm2*ys*csti*vet*bxp
     # *(1./64.*o*x12+1./64.*o*tx-1./64.*o+1./64.*os+1./64.*
     #    x12*tx-1./64.*tx)
      zz40c= zz40c+rt1wz(10)*vvc*gsm2*ys*csti*vet
     # *(-3./64.*o*x12*tx+1./32.*o*x12-1./64.*o*x2z*tx+1./64.
     #    *o*x2z+1./32.*o*tx-1./64.*o*x12s-1./64.*o*txs-1./64.*
     #    o-1./32.*os*x12-1./64.*os*x2z-1./32.*os*tx+1./32.*os
     #    -1./64.*oc+1./32.*x12*tx-1./64.*x12*txs+1./64.*x2z*tx
     #    -1./64.*tx*x12s-1./64.*tx)
      zz40c= zz40c+rt1wz(10)*vvc*gsm2*ys*csti*bxp*(
     #    5./16.-1./4.*zi*o*x12*tx-11./8.*zi*o*x12+1./4.
     #    *zi*o*x12s-1./4.*zi*o*txs+9./8.*zi*o+1./
     #    2.*zi*os*x12-15./16.*zi*os+1./4.*zi*oc+1.
     #    /4.*zi*x12*tx-1./4.*zi*x12*txs+7./8.*zi*
     #    x12-1./4.*zi*tx*x12s-7./16.*zi*x12s+1./4.*
     #    zi*txs-7./16.*zi+5./16.*o*x12-1./16.*o*tx-9.
     #    /16.*o+1./4.*os-1./16.*x12*tx-3./8.*x12+1./16.*tx+1.
     #    /16.*x12s)
      zz40c= zz40c+rt1wz(10)*vvc*gsm2*ys*csti*(-
     #    9./16.+5./8.*zi*o*x12*tx-1./4.*zi*o*x12*txs+
     #    19./8.*zi*o*x12-5./8.*zi*o*x12s+7./8.*zi*o
     #    *txs-7./4.*zi*o-3./2.*zi*os*x12+1./8.*zi
     #    *os*x12s-1./8.*zi*os*txs+31./16.*zi*os+1./4.*
     #    zi*oc*x12-7./8.*zi*oc+1./8.*zi*oq-5./8.*
     #    zi*x12*tx+7./8.*zi*x12*txs-9./8.*zi*x12+
     #    5./8.*zi*tx*x12s-1./8.*zi*x12s*txs+9./16.*
     #    zi*x12s-5./8.*zi*txs+9./16.*zi-1./8.*o*
     #    x12*x2z+1./16.*o*x12*tx-7./8.*o*x12+1./16.*o*x2z*tx+7.
     #    /16.*o*x2z-1./8.*o*tx+1./16.*o*x12s-5./16.*o*txs+21./
     #    16.*o+1./4.*os*x12-3./16.*os*x2z+1./8.*os*tx-15./16.*
     #    os+3./16.*oc+1./8.*x12*x2z+1./4.*x12*tx-5./16.*x12*
     #    txs+5./8.*x12-1./16.*x2z*tx-1./4.*x2z-1./16.*tx*x12s
     #    +1./16.*tx-1./16.*x12s+3./8.*txs)
      zz40c= zz40c+rt1wz(11)*xx*vvc*gsm2*ys*csti*(
     #    -1./4.-5./4.*zi*o*x12*tx+1./2.*zi*o*x12*txs
     #    +3./2.*zi*o*x12+1./2.*zi*o*tx*x12s+zi*o*
     #    tx-1./2.*zi*o*x12s-3./4.*zi*o*txs-zi*o
     #    +zi*os*x12*tx-3./2.*zi*os*x12-5./4.*zi*
     #    os*tx+1./4.*zi*os*x12s+1./4.*zi*os*txs+3./2.*
     #    zi*os+1./2.*zi*oc*x12+1./2.*zi*oc*tx-
     #    zi*oc+1./4.*zi*oq+1./4.*zi*x12*tx-3./4.*
     #    zi*x12*txs-1./2.*zi*x12-1./4.*zi*tx+1./4.
     #    *zi*x12s*txs+1./4.*zi*x12s+1./2.*zi*txs+
     #    1./4.*zi+1./2.*o*x12*tx-1./2.*o*x12-1./4.*o*x2z*tx
     #    +1./2.*o*x2z-3./4.*o*tx+1./4.*o*txs+3./4.*o+1./4.*
     #    os*x12-1./4.*os*x2z+1./2.*os*tx-3./4.*os+1./4.*oc+1.
     #    /4.*x12*txs+1./4.*x12+1./4.*x2z*tx-1./4.*x2z+1./4.*tx
     #    -1./2.*txs)
      zz40c= zz40c+rt1wz(11)*bxpi*vvc*gsm2*ys*csti*vet
     # *(1./16.*o*x12*tx-1./16.*o*x2z*tx+1./16.*o*x2z+1./16.*o
     #    *txs-1./16.*os*x2z+1./16.*os*tx+1./16.*x12*txs-1./16.
     #    *x2z*tx)
      zz40c= zz40c+rt1wz(11)*bxpi*vvc*gsm2*ys*csti
     # *(-1./2.-1./2.*zi*o*x12*tx+2*zi*o*x12+3./4.
     #    *zi*o*tx-1./2.*zi*o*x12s-1./2.*zi*o*txs-
     #    3./2.*zi*o-zi*os*x12-1./2.*zi*os*tx+3./2.
     #    *zi*os-1./2.*zi*oc+1./4.*zi*x12*tx-1./2.
     #    *zi*x12*txs-zi*x12-1./4.*zi*tx+1./2.*
     #    zi*x12s+1./2.*zi*txs+1./2.*zi-1./4.*o*
     #    x12*tx-1./2.*o*x12+1./4.*o*x2z*tx-1./4.*o*x2z-1./4.*o
     #    *tx-1./4.*o*txs+o+1./4.*os*x2z-1./4.*os*tx-1./2.*os
     #    -1./4.*x12*tx-1./4.*x12*txs+1./2.*x12+1./4.*x2z*tx+
     #    1./4.*tx)
      zz40c= zz40c+rt1wz(11)*vvc*gsm2*ys*csti*vet
     # *(1./16.*o*x12-1./16.*o*tx-1./16.*o+1./16.*os-1./16.*
     #    x12*tx+1./16.*tx)
      zz40c= zz40c+rt1wz(11)*vvc*gsm2*ys*csti*bxp*(
     #    1./2.*zi*o*x12-1./2.*zi*o+1./4.*zi*os-1./
     #    2.*zi*x12+1./4.*zi*x12s+1./4.*zi)
      zz40c= zz40c+rt1wz(11)*vvc*gsm2*ys*csti*(1./
     #    2.+1./2.*zi*o*x12*tx-5./2.*zi*o*x12-3./4.*
     #    zi*o*tx+1./2.*zi*o*x12s+1./2.*zi*o*txs+2
     #    *zi*o+zi*os*x12+1./2.*zi*os*tx-7./4.*
     #    zi*os+1./2.*zi*oc-1./4.*zi*x12*tx+1./2.*
     #    zi*x12*txs+3./2.*zi*x12+1./4.*zi*tx-3./4.
     #    *zi*x12s-1./2.*zi*txs-3./4.*zi+1./4.*o*
     #    x12+1./2.*o*tx-3./4.*o+1./4.*os+1./2.*x12*tx-1./2.*
     #    x12-1./2.*tx)
      zz40c= zz40c+rt1wz(12)*xx*vvc*gsm2*ys*csti*vet
     # *(-1./16.*o*x2z*tx+1./16.*o*txs+1./16.*x12*txs-1./16.
     #    *x2z*tx)
      zz40c= zz40c+rt1wz(12)*xx*vvc*gsm2*ys*csti*(
     #    1./4.+5./4.*zi*o*x12*tx-1./2.*zi*o*x12*txs-3./
     #    2.*zi*o*x12-1./2.*zi*o*tx*x12s-zi*o*tx+1.
     #    /2.*zi*o*x12s+3./4.*zi*o*txs+zi*o-
     #    zi*os*x12*tx+3./2.*zi*os*x12+5./4.*zi*os*
     #    tx-1./4.*zi*os*x12s-1./4.*zi*os*txs-3./2.*
     #    zi*os-1./2.*zi*oc*x12-1./2.*zi*oc*tx+
     #    zi*oc-1./4.*zi*oq-1./4.*zi*x12*tx+3./4.*
     #    zi*x12*txs+1./2.*zi*x12+1./4.*zi*tx-1./4.
     #    *zi*x12s*txs-1./4.*zi*x12s-1./2.*zi*txs-
     #    1./4.*zi-1./2.*o*x12*tx+1./2.*o*x12+1./2.*o*x2z*tx
     #    -1./2.*o*x2z+3./4.*o*tx-1./2.*o*txs-3./4.*o-1./4.*
     #    os*x12+1./4.*os*x2z-1./2.*os*tx+3./4.*os-1./4.*oc-1.
     #    /2.*x12*txs-1./4.*x12+1./4.*x2z-1./4.*tx+1./2.*txs)
      zz40c= zz40c+rt1wz(12)*bxpi*vvc*gsm2*ys*csti*vet
     # *(-1./16.*o*x12*tx+1./16.*o*x2z*tx-1./16.*o*x2z+1./16.
     #    *o*tx-1./16.*o*txs+1./16.*os*x2z-1./16.*os*tx+1./16.*
     #    x12*tx-1./16.*x12*txs+1./16.*x2z*tx-1./16.*tx)
      zz40c= zz40c+rt1wz(12)*bxpi*vvc*gsm2*ys*csti
     # *(1./2.+1./2.*zi*o*x12*tx-2*zi*o*x12-3./4.*
     #    zi*o*tx+1./2.*zi*o*x12s+1./2.*zi*o*txs+3.
     #    /2.*zi*o+zi*os*x12+1./2.*zi*os*tx-3./2.*
     #    zi*os+1./2.*zi*oc-1./4.*zi*x12*tx+1./2.*
     #    zi*x12*txs+zi*x12+1./4.*zi*tx-1./2.*
     #    zi*x12s-1./2.*zi*txs-1./2.*zi+1./4.*o*
     #    x12*tx+1./2.*o*x12-1./4.*o*x2z*tx+1./4.*o*x2z+1./4.*o
     #    *txs-o-1./4.*os*x2z+1./4.*os*tx+1./2.*os+1./4.*x12*
     #    txs-1./2.*x12-1./4.*x2z*tx)
      zz40c= zz40c+rt1wz(12)*vvc*gsm2*ys*csti*vet
     # *(-1./16.*o*x12+1./16.*o-1./16.*os)
      zz40c= zz40c+rt1wz(12)*vvc*gsm2*ys*csti*bxp*(
     #    -1./2.*zi*o*x12+1./2.*zi*o-1./4.*zi*os
     #    +1./2.*zi*x12-1./4.*zi*x12s-1./4.*zi)
      zz40c= zz40c+rt1wz(12)*vvc*gsm2*ys*csti*(-
     #    1./2.-1./2.*zi*o*x12*tx+5./2.*zi*o*x12+3./4.*
     #    zi*o*tx-1./2.*zi*o*x12s-1./2.*zi*o*txs-2
     #    *zi*o-zi*os*x12-1./2.*zi*os*tx+7./4.*
     #    zi*os-1./2.*zi*oc+1./4.*zi*x12*tx-1./2.*
     #    zi*x12*txs-3./2.*zi*x12-1./4.*zi*tx+3./4.
     #    *zi*x12s+1./2.*zi*txs+3./4.*zi-1./4.*o*
     #    x12-1./4.*o*tx+3./4.*o-1./4.*os-1./4.*x12*tx+1./2.*
     #    x12+1./4.*tx)
      zz40c= zz40c+rt1wz(13)*xx*vvc*gsm2*ys*csti*vet
     # *(1./32.*o*x2z*tx+1./32.*o*txs+1./32.*x12*txs-1./32.*
     #    x2z*tx)
      zz40c= zz40c+rt1wz(13)*xx*vvc*gsm2*ys*csti*(
     #    -1./8.+1./4.*zi*o*x12*tx-1./4.*zi*o*x12*txs
     #    +3./4.*zi*o*x12-1./4.*zi*o*x12s+1./2.*zi
     #    *o*txs-1./2.*zi*o-3./4.*zi*os*x12+1./8.*
     #    zi*os*x12s-1./8.*zi*os*txs+3./4.*zi*os+1.
     #    /4.*zi*oc*x12-1./2.*zi*oc+1./8.*zi*oq-1./
     #    4.*zi*x12*tx+1./2.*zi*x12*txs-1./4.*zi*x12
     #    +1./4.*zi*tx*x12s-1./8.*zi*x12s*txs+1./8.*
     #    zi*x12s-1./4.*zi*txs+1./8.*zi-1./4.*o*
     #    x12-1./8.*o*x2z*tx+1./4.*o*x2z-3./8.*o*txs+3./8.*o+
     #    1./8.*os*x12-1./8.*os*x2z-3./8.*os+1./8.*oc+1./4.*x12
     #    *tx-3./8.*x12*txs+1./8.*x12+1./8.*x2z*tx-1./8.*x2z+
     #    1./4.*txs)
      zz40c= zz40c+rt1wz(13)*bxpi*vvc*gsm2*ys*csti*vet
     # *(-1./32.*o*x12*tx-1./32.*o*x2z*tx+1./32.*o*x2z+1./32.
     #    *o*tx-1./32.*o*txs-1./32.*os*x2z-1./32.*os*tx+1./32.*
     #    x12*tx-1./32.*x12*txs+1./32.*x2z*tx-1./32.*tx)
      zz40c= zz40c+rt1wz(13)*bxpi*vvc*gsm2*ys*csti
     # *(-1./4.+1./4.*zi*o*x12*tx+zi*o*x12-1./4.*
     #    zi*o*x12s+1./4.*zi*o*txs-3./4.*zi*o-1./2.
     #    *zi*os*x12+3./4.*zi*os-1./4.*zi*oc-1./4.
     #    *zi*x12*tx+1./4.*zi*x12*txs-1./2.*zi*x12
     #    +1./4.*zi*tx*x12s+1./4.*zi*x12s-1./4.*zi
     #    *txs+1./4.*zi+1./8.*o*x12*tx-1./4.*o*x12+1./8.*o
     #    *x2z*tx-1./8.*o*x2z-1./8.*o*tx+1./8.*o*txs+1./2.*o+
     #    1./8.*os*x2z+1./8.*os*tx-1./4.*os-1./8.*x12*tx+1./8.*
     #    x12*txs+1./4.*x12-1./8.*x2z*tx+1./8.*tx)
      zz40c= zz40c+rt1wz(13)*vvc*gsm2*ys*csti*vet
     # *(1./32.*o*x12-1./32.*o+1./32.*os)
      zz40c= zz40c+rt1wz(13)*vvc*gsm2*ys*csti*bxp*(
     #    1./4.*zi*o*x12-1./4.*zi*o+1./8.*zi*os-1./
     #    4.*zi*x12+1./8.*zi*x12s+1./8.*zi)
      zz40c= zz40c+rt1wz(13)*vvc*gsm2*ys*csti*(1./
     #    4.-1./4.*zi*o*x12*tx-5./4.*zi*o*x12+1./4.*
     #    zi*o*x12s-1./4.*zi*o*txs+zi*o+1./2.*
     #    zi*os*x12-7./8.*zi*os+1./4.*zi*oc+1./4.*
     #    zi*x12*tx-1./4.*zi*x12*txs+3./4.*zi*x12-
     #    1./4.*zi*tx*x12s-3./8.*zi*x12s+1./4.*zi*
     #    txs-3./8.*zi+1./8.*o*x12-3./8.*o+1./8.*os-1./4.
     #    *x12)
      zz40c= zz40c+rt1wz(14)*xx*vvc*gsm2*ys*csti*vet
     # *(-1./16.*o*x2z*tx)
      zz40c= zz40c+rt1wz(14)*xx*vvc*gsm2*ys*csti*(
     #    1./8.-1./4.*zi*o*x12*tx+1./4.*zi*o*x12*txs-3./
     #    4.*zi*o*x12+1./4.*zi*o*x12s-1./2.*zi*o*txs
     #    +1./2.*zi*o+3./4.*zi*os*x12-1./8.*zi*os*
     #    x12s+1./8.*zi*os*txs-3./4.*zi*os-1./4.*
     #    zi*oc*x12+1./2.*zi*oc-1./8.*zi*oq+1./4.*
     #    zi*x12*tx-1./2.*zi*x12*txs+1./4.*zi*x12-
     #    1./4.*zi*tx*x12s+1./8.*zi*x12s*txs-1./8.*
     #    zi*x12s+1./4.*zi*txs-1./8.*zi+1./4.*o*
     #    x12+1./4.*o*x2z*tx-1./4.*o*x2z+1./4.*o*txs-3./8.*o-
     #    1./8.*os*x12+1./8.*os*x2z+3./8.*os-1./8.*oc-1./4.*x12
     #    *tx+1./4.*x12*txs-1./8.*x12+1./8.*x2z-1./4.*txs)
      zz40c= zz40c+rt1wz(14)*bxpi*vvc*gsm2*ys*csti*vet
     # *(1./32.*o*x12*tx+1./32.*o*x2z*tx-1./32.*o*x2z-1./16.*o
     #    *tx+1./32.*o*txs+1./32.*os*x2z+1./32.*os*tx+1./32.*
     #    x12*txs-1./32.*x2z*tx)
      zz40c= zz40c+rt1wz(14)*bxpi*vvc*gsm2*ys*csti
     # *(1./4.-1./4.*zi*o*x12*tx-zi*o*x12+1./4.*
     #    zi*o*x12s-1./4.*zi*o*txs+3./4.*zi*o+1./2.
     #    *zi*os*x12-3./4.*zi*os+1./4.*zi*oc+1./4.
     #    *zi*x12*tx-1./4.*zi*x12*txs+1./2.*zi*x12
     #    -1./4.*zi*tx*x12s-1./4.*zi*x12s+1./4.*zi
     #    *txs-1./4.*zi-1./8.*o*x12*tx+1./4.*o*x12-1./8.*o
     #    *x2z*tx+1./8.*o*x2z+1./4.*o*tx-1./8.*o*txs-1./2.*o-
     #    1./8.*os*x2z-1./8.*os*tx+1./4.*os-1./8.*x12*txs-1./4.
     #    *x12+1./8.*x2z*tx)
      zz40c= zz40c+rt1wz(14)*vvc*gsm2*ys*csti*vet
     # *(-1./32.*o*x12+1./32.*o*tx+1./32.*o-1./32.*os-1./
     #    32.*x12*tx+1./32.*tx)
      zz40c= zz40c+rt1wz(14)*vvc*gsm2*ys*csti*bxp*(
     #    -1./4.*zi*o*x12+1./4.*zi*o-1./8.*zi*os
     #    +1./4.*zi*x12-1./8.*zi*x12s-1./8.*zi)
      zz40c= zz40c+rt1wz(14)*vvc*gsm2*ys*csti*(-
     #    1./4.+1./4.*zi*o*x12*tx+5./4.*zi*o*x12-1./4.*
     #    zi*o*x12s+1./4.*zi*o*txs-zi*o-1./2.*
     #    zi*os*x12+7./8.*zi*os-1./4.*zi*oc-1./4.*
     #    zi*x12*tx+1./4.*zi*x12*txs-3./4.*zi*x12+
     #    1./4.*zi*tx*x12s+3./8.*zi*x12s-1./4.*zi*
     #    txs+3./8.*zi-1./8.*o*x12-1./8.*o*tx+3./8.*o-1./
     #    8.*os+1./8.*x12*tx+1./4.*x12-1./8.*tx)
      zz10q= rwwz(1,1)*xx*vvq*yc*(-1./2.*o*x2z*txs-1./2.*
     #    x12*x2z*txs+1./2.*x2z*txs)
      zz10q= zz10q+rwwz(1,1)*bxpi*vvq*yc*(1./4.*o*x12*
     #    x2z*tx+1./2.*o*x12*txs-3./4.*o*x2z*tx+1./4.*o*x2z*txs
     #    +1./4.*o*tx*x2zs-o*txs+1./4.*os*x2z*tx+1./4.*os*txs
     #    -1./4.*x12*x2z*tx+1./4.*x12*x2z*txs-x12*txs+1./2.*x2z
     #    *tx-1./4.*tx*x2zs+1./4.*x12s*txs+1./2.*txs)
      zz10q= zz10q+rwwz(1,1)*vvq*bxps*yc*(-1./4.+1./
     #    4.*o+1./4.*x12)
      zz10q= zz10q+rwwz(1,1)*vvq*yc*bxp*(1./4.+1./4.*o
     #    *x12-1./4.*o*x2z-1./4.*o*tx-3./4.*o+1./2.*os-3./4.*
     #    x12*tx-1./4.*x12-1./4.*x2z*tx+1./4.*x2z+1./2.*tx+1./
     #    4.*txs)
      zz10q= zz10q+rwwz(1,1)*vvq*yc*(-1./2.*o*x12*tx
     #    -1./4.*o*x2z*tx+1./2.*o*x2z+5./4.*o*tx+1./2.*o*txs-
     #    1./4.*os*x2z-1./2.*os*tx+1./4.*x12*x2z*tx+3./4.*x12*tx
     #    +1./2.*x12*txs-1./4.*x2z*tx-1./4.*x2z*txs-1./4.*x2z
     #    +1./4.*tx*x2zs-1./2.*tx-1./2.*txs)
      zz10q= zz10q+rwwz(2,2)*xx*vvq*yc*(1./8.*x2z*txs
     #    -1./8.*tx*x2zs)
      zz10q= zz10q+rwwz(2,2)*bxpi*vvq*yc*(1./8.*o*x2z*tx
     #    -1./8.*o*txs+1./8.*x12*x2z*tx-1./8.*x12*txs-1./8.*x2z
     #    *tx+1./8.*txs)
      zz10q= zz10q+rwwz(2,2)*vvq*bxps*yc*(-1./16.+1./
     #    16.*o+1./16.*x12)
      zz10q= zz10q+rwwz(2,2)*vvq*yc*bxp*(1./16.-1./16.
     #    *o*x2z-1./8.*o+1./16.*os-1./8.*x12*tx-1./16.*x12-1./
     #    16.*x2z*tx+1./16.*x2z+1./16.*tx+1./16.*txs)
      zz10q= zz10q+rwwz(2,2)*vvq*yc*(1./16.*o*x12*tx-
     #    1./16.*o*x2z*tx+1./16.*o*x2z+1./16.*o*txs+1./16.*x12*
     #    txs+1./16.*x2z*tx-1./16.*x2z*txs-1./16.*x2z+1./16.*tx
     #    *x12s+1./16.*tx*x2zs-1./8.*txs)
      zz10q= zz10q+rwwz(2,3)*xx*vvq*yc*(-1./4.*x2z*
     #    txs+1./4.*tx*x2zs)
      zz10q= zz10q+rwwz(2,3)*bxpi*vvq*yc*(-1./8.*o*x2z
     #    *tx-1./8.*o*x2zs+1./4.*o*txs-3./8.*x12*x2z*tx+1./4.*
     #    x12*txs+1./4.*x2z*tx+1./4.*x2z*txs-1./4.*tx*x2zs+1./8.
     #    *x2zs-1./4.*txs)
      zz10q= zz10q+rwwz(2,3)*vvq*bxps*yc*(-1./8.+1./
     #    8.*o+1./8.*x12)
      zz10q= zz10q+rwwz(2,3)*vvq*yc*bxp*(-1./8.*o*x12
     #    -1./4.*o*x2z+1./8.*o*tx-1./8.*x12*x2z-1./8.*x12*tx-
     #    1./8.*x2z*tx+1./4.*x2z+1./8.*txs)
      zz10q= zz10q+rwwz(2,3)*vvq*yc*(-1./8.*o*x2z*tx
     #    +1./4.*o*x2z-1./8.*o*tx+1./8.*o*x2zs-1./8.*os*x2z+1.
     #    /8.*os*tx+1./8.*x12*x2z*tx+1./8.*x12*x2z+1./8.*x12*tx
     #    -1./8.*x2z*txs-1./8.*x2z-1./8.*tx*x12s+1./8.*tx*x2zs
     #    -1./8.*x2zs)
      zz10q= zz10q+rwwz(3,3)*xx*vvq*yc*(1./8.*x2z*txs
     #    -1./8.*tx*x2zs)
      zz10q= zz10q+rwwz(3,3)*bxpi*vvq*yc*(1./8.*o*x2zs
     #    -1./8.*o*txs+1./4.*x12*x2z*tx-1./8.*x12*txs-1./8.*x2z
     #    *tx-1./4.*x2z*txs+1./4.*tx*x2zs-1./8.*x2zs+1./8.*txs
     #    )
      zz10q= zz10q+rwwz(3,3)*vvq*bxps*yc*(-1./16.+1./
     #    16.*o+1./16.*x12)
      zz10q= zz10q+rwwz(3,3)*vvq*yc*bxp*(-1./16.-1./
     #    8.*o*x12-3./16.*o*x2z+1./8.*o*tx+1./8.*o-1./16.*os-
     #    1./8.*x12*x2z+1./16.*x12-1./16.*x2z*tx+3./16.*x2z-1./
     #    16.*tx+1./16.*txs)
      zz10q= zz10q+rwwz(3,3)*vvq*yc*(1./4.*o*x12*x2z-
     #    1./16.*o*x12*tx-1./16.*o*x2z*tx-5./16.*o*x2z+1./8.*o*tx
     #    +1./8.*o*x2zs-1./16.*o*txs+1./8.*os*x2z-1./8.*os*tx
     #    +1./8.*x12*x2z*tx-1./8.*x12*x2z-1./8.*x12*tx-1./16.*
     #    x12*txs-1./16.*x2z*tx-1./16.*x2z*txs+3./16.*x2z+1./16.
     #    *tx*x12s+1./16.*tx*x2zs-1./8.*x2zs+1./8.*txs)
      zz10q= zz10q+rwwz(4,1)*xx*vvq*yc*(1./8.*o*x12*tx*
     #    x2zs-1./8.*o*tx*x2zc-1./8.*o*tx*x2zs+1./4.*o*x2zc+1./
     #    8.*o*x2zs*txs+1./8.*os*tx*x2zs-1./8.*os*x2zc+1./8.*x12*
     #    tx*x2zs+1./8.*x12*x2zs*txs+1./8.*tx*x2zc-1./8.*x2zc-1.
     #    /4.*x2zs*txs)
      zz10q= zz10q+rwwz(4,1)*bxpi*vvq*yc*(1./4.*o*x12*
     #    x2z*tx-1./4.*o*x12*x2z*txs-7./16.*o*x12*x2zs-1./8.*o*
     #    x2z*tx*x12s-1./4.*o*x2z*tx+5./8.*o*x2z*txs+1./8.*o*tx*
     #    x2zc-5./16.*o*tx*x2zs-3./16.*o*x2zc-1./8.*o*x2zs*txs+
     #    15./16.*o*x2zs-1./4.*os*x12*x2z*tx+1./8.*os*x12*x2zs+7./
     #    16.*os*x2z*tx-1./8.*os*x2z*txs+1./8.*os*x2zc-11./16.*os
     #    *x2zs-1./8.*oc*x2z*tx+1./8.*oc*x2zs+1./4.*x12*x2z*tx+
     #    5./8.*x12*x2z*txs-3./16.*x12*tx*x2zs-1./8.*x12*x2zs*txs
     #    +5./16.*x12*x2zs-3./16.*x2z*tx*x12s-1./8.*x2z*x12s*txs
     #    -1./2.*x2z*txs+1./8.*tx*x2zs+1./16.*x2zc+1./8.*x2zs*
     #    txs-3./8.*x2zs)
      zz10q= zz10q+rwwz(4,1)*vvq*bxps*yc*(1./8.+1./4.*
     #    o*x12-1./4.*o+1./8.*os-1./4.*x12+1./8.*x12s)
      zz10q= zz10q+rwwz(4,1)*vvq*yc*bxp*(-1./8.-1./4.
     #    *o*x12*x2z-1./4.*o*x12*tx-5./8.*o*x12-1./8.*o*x2z*tx+
     #    1./2.*o*x2z+1./8.*o*tx+3./16.*o*x12s+1./8.*o*txs+7./
     #    16.*o+5./16.*os*x12-3./16.*os*x2z-1./2.*os+3./16.*oc
     #    -1./8.*x12*x2z*tx+3./8.*x12*x2z+3./8.*x12*tx+1./8.*
     #    x12*txs+5./16.*x12+1./8.*x2z*tx-1./16.*x2z*x12s-5./16.
     #    *x2z-1./4.*tx*x12s-1./8.*tx-1./4.*x12s+1./16.*x12c-
     #    1./8.*txs)
      zz10q= zz10q+rwwz(4,1)*vvq*yc*(-1./8.*o*x12*x2z
     #    *tx+17./16.*o*x12*x2z-1./8.*o*x12*tx+1./16.*o*x12*x2zs
     #    +1./2.*o*x12*txs+3./16.*o*x2z*tx-3./16.*o*x2z*x12s-1./
     #    8.*o*x2z*txs-9./8.*o*x2z+1./16.*o*tx*x12s+1./8.*o*tx*
     #    x2zs+1./8.*o*tx-5./16.*o*x2zs-1./2.*o*txs-1./2.*os*
     #    x12*x2z+5./16.*os*x12*tx-3./16.*os*x2z*tx+17./16.*os*
     #    x2z-5./16.*os*tx+1./16.*os*x2zs+1./4.*os*txs-5./16.*
     #    oc*x2z+3./16.*oc*tx-5./16.*x12*x2z*tx-1./8.*x12*x2z*txs
     #    -5./8.*x12*x2z+1./8.*x12*tx*x2zs-1./8.*x12*tx-1./8.*
     #    x12*x2zs-1./2.*x12*txs+1./16.*x2z*tx*x12s+1./8.*x2z*tx
     #    +1./4.*x2z*x12s+1./4.*x2z*txs+3./8.*x2z+3./16.*tx*
     #    x12s-1./16.*tx*x12c-1./4.*tx*x2zs+1./4.*x12s*txs+1./4.
     #    *x2zs+1./4.*txs)
      zz10q= zz10q+rwwz(4,4)*xx*vvq*yc*(-1./32.*o*x12
     #    *x2zc+1./32.*o*tx*x2zc-1./32.*o*x2zq-1./32.*x12*tx*x2zc
     #    -1./32.*tx*x2zq+1./32.*x2zq+1./32.*x2zc*txs)
      zz10q= zz10q+rwwz(4,4)*bxpi*vvq*yc*(3./32.*o*x12*
     #    x2zc-3./32.*o*x12*x2zs+1./32.*o*tx*x2zc+3./32.*o*tx*
     #    x2zs+1./16.*o*x12s*x2zs+1./32.*o*x2zq-3./16.*o*x2zc-1.
     #    /16.*o*x2zs*txs+1./16.*os*x12*x2zs-1./16.*os*tx*x2zs+1./
     #    16.*os*x2zc+3./32.*x12*tx*x2zc-3./32.*x12*tx*x2zs-3./32.
     #    *x12*x2zc-1./16.*x12*x2zs*txs+1./16.*tx*x12s*x2zs+1./32.
     #    *tx*x2zq-3./32.*tx*x2zc-1./32.*x2zq-1./32.*x2zc*txs+1.
     #    /8.*x2zc+3./32.*x2zs*txs)
      zz10q= zz10q+rwwz(4,4)*vvq*bxps*yc*(-1./32.-3./
     #    16.*o*x12+3./32.*o*x12s+3./32.*o+3./32.*os*x12-3./32.
     #    *os+1./32.*oc+3./32.*x12-3./32.*x12s+1./32.*x12c)
      zz10q= zz10q+rwwz(4,4)*vvq*yc*bxp*(-1./16.*o*x12
     #    *x2z*tx+7./16.*o*x12*x2z+1./16.*o*x12*txs-1./32.*o*x12
     #    +1./16.*o*x2z*tx-1./8.*o*x2z*x12s-5./16.*o*x2z-1./32.
     #    *o*tx*x12s+1./32.*o*tx+1./16.*o*x12s-1./32.*o*x12c-1./
     #    16.*o*txs-5./32.*os*x12*x2z+1./32.*os*x12*tx+1./16.*os*
     #    x12-1./32.*os*x2z*tx+1./4.*os*x2z-1./16.*os*tx-1./16.
     #    *os*x12s+1./32.*os*txs-1./32.*oc*x12-1./16.*oc*x2z+1./
     #    32.*oc*tx+1./16.*x12*x2z*tx-9./32.*x12*x2z-1./32.*x12*
     #    tx-1./16.*x12*txs-1./32.*x2z*tx*x12s-1./32.*x2z*tx+3./
     #    16.*x2z*x12s-1./32.*x2z*x12c+1./8.*x2z+1./16.*tx*x12s
     #    -1./32.*tx*x12c+1./32.*x12s*txs+1./32.*txs)
      zz10q= zz10q+rwwz(4,4)*vvq*yc*(-1./16.*o*x12*
     #    x2z*txs+3./32.*o*x12*x2z+1./16.*o*x12*tx*x2zs-5./16.*o*
     #    x12*x2zs+1./32.*o*x2z*tx*x12s-3./32.*o*x2z*tx-1./8.*o*
     #    x2z*x12s+1./32.*o*x2z*x12c+1./8.*o*x2z*txs-1./8.*o*tx*
     #    x2zs+1./32.*o*x12s*x2zs+3./8.*o*x2zs-1./32.*os*x12*x2z*
     #    tx-1./8.*os*x12*x2z+1./16.*os*x12*x2zs+1./8.*os*x2z*tx
     #    +1./16.*os*x2z*x12s-1./32.*os*x2z*txs+1./32.*os*tx*x2zs
     #    -7./32.*os*x2zs+1./32.*oc*x12*x2z-1./32.*oc*x2z*tx+1./
     #    32.*oc*x2zs+3./32.*x12*x2z*tx+1./8.*x12*x2z*txs-1./8.*
     #    x12*tx*x2zs+9./32.*x12*x2zs-1./8.*x2z*tx*x12s+1./32.*
     #    x2z*tx*x12c-1./32.*x2z*x12s*txs-3./32.*x2z*txs+1./32.*
     #    tx*x12s*x2zs+3./32.*tx*x2zs-3./32.*x12s*x2zs-3./16.*
     #    x2zs)
      zz10q= zz10q+rwwz(4,11)*bxpi*vvq*yc*(1./16.*o*x12*
     #    x2zs-1./16.*o*tx*x2zs+1./16.*o*x2zc+1./16.*x12*tx*x2zs
     #    +1./16.*tx*x2zc-1./16.*x2zc-1./16.*x2zs*txs)
      zz10q= zz10q+rwwz(4,11)*vvq*bxps*yc*(1./16.+1./8.
     #    *o*x12-1./8.*o+1./16.*os-1./8.*x12+1./16.*x12s)
      zz10q= zz10q+rwwz(4,11)*vvq*yc*bxp*(-3./16.*o*
     #    x12*x2z+1./16.*o*x12-1./16.*o*x2z*tx+5./16.*o*x2z-1./
     #    16.*o*tx-1./16.*o*x12s+1./16.*o*txs-1./16.*os*x12-1./
     #    8.*os*x2z+1./16.*os*tx-1./16.*x12*x2z*tx+1./4.*x12*x2z
     #    +1./16.*x12*tx+1./16.*x12*txs+1./16.*x2z*tx-1./16.*
     #    x2z*x12s-3./16.*x2z-1./16.*tx*x12s-1./16.*txs)
      zz10q= zz10q+rwwz(4,11)*vvq*yc*(-1./8.*o*x12*
     #    x2z+1./16.*o*x12*x2zs+1./8.*o*x2z*tx+1./16.*o*x2z*x12s
     #    -1./16.*o*x2z*txs+1./16.*o*tx*x2zs-1./4.*o*x2zs+1./16.
     #    *os*x12*x2z-1./16.*os*x2z*tx+1./16.*os*x2zs-1./8.*x12*
     #    x2z*tx-1./16.*x12*x2z*txs+1./16.*x12*tx*x2zs-1./8.*x12*
     #    x2zs+1./16.*x2z*tx*x12s+1./8.*x2z*txs-1./8.*tx*x2zs+3.
     #    /16.*x2zs)
      zz10q= zz10q+rwwz(4,12)*xx*vvq*yc*(-1./16.*o*tx
     #    *x2zs+1./16.*o*x2zc+1./16.*x12*tx*x2zs+1./8.*tx*x2zc-
     #    1./16.*x2zc-1./8.*x2zs*txs)
      zz10q= zz10q+rwwz(4,12)*bxpi*vvq*yc*(-5./32.*o*
     #    x12*x2zs-1./8.*o*x2z*tx+3./16.*o*x2z*txs-3./32.*o*tx*
     #    x2zs-3./32.*o*x2zc+9./32.*o*x2zs+3./32.*os*x2z*tx-3./
     #    32.*os*x2zs+1./8.*x12*x2z*tx+3./16.*x12*x2z*txs-9./32.*
     #    x12*tx*x2zs+5./32.*x12*x2zs-3./32.*x2z*tx*x12s-1./4.*
     #    x2z*txs-1./8.*tx*x2zc+1./4.*tx*x2zs+3./32.*x2zc+1./8.
     #    *x2zs*txs-3./16.*x2zs)
      zz10q= zz10q+rwwz(4,12)*vvq*yc*bxp*(-1./16.+1./
     #    16.*o*x12*x2z-1./4.*o*x12-1./16.*o*x2z+3./32.*o*x12s+
     #    5./32.*o+3./32.*os*x12+1./32.*os*x2z-1./8.*os+1./32.*
     #    oc-1./16.*x12*x2z+5./32.*x12+1./32.*x2z*x12s+1./32.*
     #    x2z-1./8.*x12s+1./32.*x12c)
      zz10q= zz10q+rwwz(4,12)*vvq*yc*(-1./8.*o*x12*
     #    x2z*tx+13./32.*o*x12*x2z-1./32.*o*x12*x2zs+1./8.*o*x12*
     #    txs+5./32.*o*x2z*tx-3./32.*o*x2z*x12s-3./8.*o*x2z-1./
     #    32.*o*tx*x12s+1./16.*o*tx+3./32.*o*x2zs-3./16.*o*txs-
     #    1./8.*os*x12*x2z+1./32.*os*x12*tx-1./32.*os*x2z*tx+7./
     #    32.*os*x2z-3./32.*os*tx-1./32.*os*x2zs+1./16.*os*txs-
     #    1./32.*oc*x2z+1./32.*oc*tx+7./32.*x12*x2z*tx-5./16.*x12
     #    *x2z-1./16.*x12*tx+1./16.*x12*x2zs-3./16.*x12*txs-3./
     #    32.*x2z*tx*x12s-1./8.*x2z*tx+1./8.*x2z*x12s+3./16.*x2z
     #    +3./32.*tx*x12s-1./32.*tx*x12c+1./16.*x12s*txs-1./16.
     #    *x2zs+1./8.*txs)
      zz10q= zz10q+rwwz(5,5)*xx*vvq*yc*(1./32.*x2z*txs
     #    -1./32.*tx*x2zs)
      zz10q= zz10q+rwwz(5,5)*bxpi*vvq*yc*(1./32.*x12*x2z
     #    *tx-1./16.*x2z*tx+1./32.*txs)
      zz10q= zz10q+rwwz(5,5)*vvq*bxps*yc*(1./64.-1./64.
     #    *o-1./64.*x12)
      zz10q= zz10q+rwwz(5,5)*vvq*yc*bxp*(-1./64.+1./
     #    64.*o*x2z+1./64.*os+1./32.*x12*tx+1./64.*x12-1./64.*
     #    x2z*tx-1./64.*x2z-1./64.*tx+1./64.*txs)
      zz10q= zz10q+rwwz(5,5)*vvq*yc*(1./64.*o*x12*tx+
     #    1./64.*o*x2z*tx-1./64.*o*x2z-1./64.*o*txs-1./16.*x12*tx
     #    -1./64.*x12*txs+3./64.*x2z*tx-1./64.*x2z*txs+1./64.*
     #    x2z+1./64.*tx*x12s+1./64.*tx*x2zs+1./32.*tx-1./32.*
     #    txs)
      zz10q= zz10q+rwwz(5,6)*xx*vvq*yc*(-1./16.*o*x2z
     #    *txs+1./16.*o*tx*x2zs-1./16.*x12*x2z*txs+1./16.*x2z*txs
     #    )
      zz10q= zz10q+rwwz(5,6)*bxpi*vvq*yc*(-1./32.*o*
     #    x12*x2z*tx+1./16.*o*x12*txs+1./8.*o*x2z*tx+1./32.*o*x2z
     #    *txs-1./32.*o*tx*x2zs-1./32.*o*x2zs-1./16.*o*txs-1./
     #    32.*os*x2z*tx+1./32.*os*txs-1./16.*x12*x2z*tx+1./32.*
     #    x12*x2z*txs-1./16.*x12*txs-1./16.*x2z*txs+1./32.*tx*
     #    x2zs+1./32.*x12s*txs+1./32.*x2zs+1./16.*txs)
      zz10q= zz10q+rwwz(5,6)*vvq*bxps*yc*(-1./32.+1./
     #    32.*o+1./32.*x12)
      zz10q= zz10q+rwwz(5,6)*vvq*yc*bxp*(-1./16.*o*x2z
     #    +1./32.*o-1./32.*os-1./32.*x12*x2z-1./16.*x12*tx+1./
     #    32.*x2z*tx+1./16.*x2z+1./32.*tx-1./32.*txs)
      zz10q= zz10q+rwwz(5,6)*vvq*yc*(1./32.*o*x12*tx-
     #    1./32.*o*x2z*tx-1./32.*o*x2z-1./16.*o*tx+1./32.*o*x2zs
     #    +1./32.*o*txs+1./16.*os*x2z+1./32.*os*tx+1./16.*x12*
     #    x2z*tx+1./32.*x12*x2z+1./32.*x12*txs-1./16.*x2z*tx+1./
     #    32.*x2z*txs-1./32.*x2z-1./32.*tx*x2zs-1./32.*x2zs)
      zz10q= zz10q+rwwz(6,6)*xx*vvq*yc*(-1./16.*o*x2z
     #    *txs-1./16.*o*tx*x2zs-1./16.*x12*x2z*txs+1./32.*x2z*txs
     #    +1./32.*tx*x2zs)
      zz10q= zz10q+rwwz(6,6)*bxpi*vvq*yc*(1./32.*o*x12*
     #    x2z*tx+1./16.*o*x12*txs-1./8.*o*x2z*tx+3./32.*o*x2z*txs
     #    +1./32.*o*tx*x2zs-3./32.*o*x2zs-1./16.*o*txs+1./32.*
     #    os*x2z*tx+1./16.*os*x2zs+1./32.*os*txs-3./32.*x12*x2z*
     #    tx+3./32.*x12*x2z*txs-1./16.*x12*txs+1./16.*x2z*tx-1./
     #    16.*x2z*txs-1./32.*tx*x2zs+1./32.*x12s*txs+1./32.*x2zs
     #    +1./32.*txs)
      zz10q= zz10q+rwwz(6,6)*vvq*bxps*yc*(1./64.-1./64.
     #    *o-1./64.*x12)
      zz10q= zz10q+rwwz(6,6)*vvq*yc*bxp*(1./64.+3./64.
     #    *o*x2z-1./32.*o+1./64.*os+1./32.*x12*x2z+1./32.*x12*
     #    tx-1./64.*x12-1./64.*x2z*tx-3./64.*x2z-1./64.*tx+1./
     #    64.*txs)
      zz10q= zz10q+rwwz(6,6)*vvq*yc*(-3./64.*o*x12*tx
     #    +1./64.*o*x2z*tx+7./64.*o*x2z+1./16.*o*tx-1./32.*o*
     #    x2zs-1./64.*o*txs-1./16.*os*x2z-1./32.*os*tx-1./16.*
     #    x12*x2z*tx+1./32.*x12*x2z+1./16.*x12*tx-1./64.*x12*txs
     #    +1./64.*x2z*tx-1./64.*x2z*txs-3./64.*x2z-1./64.*tx*
     #    x12s+1./64.*tx*x2zs-1./32.*tx+1./32.*x2zs+1./32.*txs
     #    )
      zz10q= zz10q+rwwz(7,1)*xx*vvq*yc*(-1./8.*o*x12*
     #    x2z*txs+1./8.*o*x2zc-1./8.*o*x2zs*txs-1./16.*os*x2z*txs
     #    -1./16.*os*x2zc+1./8.*x12*tx*x2zs-1./8.*x12*x2zs*txs-
     #    1./16.*x2z*x12s*txs-1./16.*x2zc+1./8.*x2zs*txs)
      zz10q= zz10q+rwwz(7,1)*bxpi*vvq*yc*(-1./4.*o*x12
     #    *x2z*tx+1./4.*o*x12*x2z*txs+1./16.*o*x12*tx*x2zs-7./32.
     #    *o*x12*x2zs-1./8.*o*x12*txs+1./32.*o*x2z*tx*x12s-3./8.*
     #    o*x2z*txs+1./32.*o*tx*x2zc-3./32.*o*tx*x2zs+3./32.*o*
     #    x12s*txs-3./32.*o*x2zc+3./32.*o*x2zs*txs+15./32.*o*x2zs
     #    +1./16.*os*x12*x2z*tx+1./16.*os*x12*x2zs+3./32.*os*x12*
     #    txs-1./16.*os*x2z*tx+1./8.*os*x2z*txs+1./16.*os*tx*x2zs
     #    +1./16.*os*x2zc-11./32.*os*x2zs-1./16.*os*txs+1./32.*
     #    oc*x2z*tx+1./16.*oc*x2zs+1./32.*oc*txs+1./4.*x12*x2z*tx
     #    -3./8.*x12*x2z*txs-3./32.*x12*tx*x2zs+3./32.*x12*x2zs*
     #    txs+5./32.*x12*x2zs-3./16.*x2z*tx*x12s+1./8.*x2z*x12s*
     #    txs+1./4.*x2z*txs-1./32.*tx*x2zc+1./16.*tx*x2zs-1./16.
     #    *x12s*txs+1./32.*x12c*txs+1./32.*x2zc-1./16.*x2zs*txs
     #    -3./16.*x2zs)
      zz10q= zz10q+rwwz(7,1)*vvq*yc*bxp*(-1./16.-1./
     #    32.*o*x12*x2z+1./16.*o*x12*tx-11./32.*o*x12+1./32.*o*
     #    x2z*tx+1./32.*o*x2z-3./32.*o*tx+1./8.*o*x12s-1./16.*o
     #    *txs+7./32.*o+7./32.*os*x12+1./32.*os*tx-9./32.*os+
     #    1./8.*oc+1./32.*x12*x2z*tx+1./16.*x12*x2z-3./32.*x12*tx
     #    -1./16.*x12*txs+5./32.*x12-1./32.*x2z*tx-1./32.*x2z*
     #    x12s-1./32.*x2z+1./32.*tx*x12s+1./16.*tx-1./8.*x12s
     #    +1./32.*x12c+1./16.*txs)
      zz10q= zz10q+rwwz(7,1)*vvq*yc*(-1./16.*o*x12*
     #    x2z*tx+9./16.*o*x12*x2z+1./4.*o*x12*tx+1./32.*o*x12*
     #    x2zs-3./16.*o*x12*txs+3./16.*o*x2z*tx-3./32.*o*x2z*x12s
     #    +3./32.*o*x2z*txs-9./16.*o*x2z-5./32.*o*tx*x12s-1./16.
     #    *o*tx*x2zs-1./16.*o*x2zs+1./4.*o*txs-9./32.*os*x12*x2z
     #    -1./8.*os*x12*tx-3./32.*os*x2z*tx+9./16.*os*x2z+1./16.
     #    *os*tx-3./32.*os*txs-3./16.*oc*x2z-1./32.*oc*tx+1./16.
     #    *x12*x2z*tx+3./32.*x12*x2z*txs-5./16.*x12*x2z-1./32.*
     #    x12*tx*x2zs-1./8.*x12*tx-1./16.*x12*x2zs+1./4.*x12*txs
     #    +1./32.*x2z*tx*x12s-1./8.*x2z*tx+1./8.*x2z*x12s-1./8.
     #    *x2z*txs+3./16.*x2z+3./16.*tx*x12s-1./16.*tx*x12c+1./
     #    16.*tx*x2zs-3./32.*x12s*txs+1./16.*x2zs-1./8.*txs)
      zz10q= zz10q+rwwz(7,4)*xx*vvq*yc*(-1./64.*o*x12
     #    *x2zc+1./32.*o*x12*x2zs*txs+1./64.*o*tx*x12s*x2zs-1./64.
     #    *o*tx*x2zq-1./64.*o*tx*x2zc+1./64.*o*x2zq+1./64.*o*x2zc
     #    *txs+1./32.*os*x12*tx*x2zs-1./64.*os*x12*x2zc-1./64.*os
     #    *x2zq+1./64.*os*x2zc+1./64.*os*x2zs*txs+1./64.*oc*tx*
     #    x2zs-1./64.*oc*x2zc-1./64.*x12*tx*x2zc+1./64.*x12*x2zc*
     #    txs+1./64.*tx*x2zq+1./64.*x12s*x2zs*txs-1./32.*x2zc*txs
     #    )
      zz10q= zz10q+rwwz(7,4)*bxpi*vvq*yc*(1./16.*o*x12*
     #    x2z*txs+1./64.*o*x12*tx*x2zc+1./16.*o*x12*tx*x2zs-1./64.
     #    *o*x12*x2zc-1./16.*o*x12*x2zs*txs-3./64.*o*x12*x2zs+1./
     #    32.*o*x2z*tx*x12s-1./64.*o*x2z*tx*x12c-3./64.*o*x2z*x12s*
     #    txs-1./64.*o*tx*x12s*x2zs+1./64.*o*tx*x2zq-3./64.*o*tx*
     #    x2zc-3./64.*o*tx*x2zs+1./32.*o*x12s*x2zs-1./64.*o*x2zq
     #    -1./64.*o*x2zc*txs+3./64.*o*x2zc+3./32.*o*x2zs*txs+1./
     #    16.*os*x12*x2z*tx-3./64.*os*x12*x2z*txs-1./32.*os*x12*tx*
     #    x2zs+1./32.*os*x12*x2zc-1./32.*os*x12*x2zs-3./64.*os*
     #    x2z*tx*x12s+1./32.*os*x2z*txs+1./64.*os*tx*x2zc+1./32.*
     #    os*tx*x2zs+1./64.*os*x12s*x2zs+1./64.*os*x2zq-5./64.*os
     #    *x2zc-1./32.*os*x2zs*txs+3./64.*os*x2zs-3./64.*oc*x12*
     #    x2z*tx+1./32.*oc*x12*x2zs+1./32.*oc*x2z*tx-1./64.*oc*
     #    x2z*txs-1./64.*oc*tx*x2zs+1./32.*oc*x2zc-1./16.*oc*x2zs
     #    -1./64.*oq*x2z*tx+1./64.*oq*x2zs-1./64.*x12*tx*x2zc-3.
     #    /64.*x12*tx*x2zs)
      zz10q= zz10q+rwwz(7,4)*bxpi*vvq*yc*(-1./64.*x12*
     #    x2zc*txs+3./32.*x12*x2zs*txs+1./32.*x2z*x12s*txs-1./64.
     #    *x2z*x12c*txs+1./32.*tx*x12s*x2zs-1./64.*tx*x2zq+3./64.
     #    *tx*x2zc-1./32.*x12s*x2zs*txs+1./32.*x2zc*txs-3./32.*
     #    x2zs*txs)
      zz10q= zz10q+rwwz(7,4)*vvq*yc*bxp*(1./32.*o*x12*
     #    x2z*tx-1./32.*o*x12*x2z+1./16.*o*x12*tx-1./16.*o*x12*
     #    txs-1./64.*o*x12-1./32.*o*x2z*tx+1./64.*o*x2z*x12s+1./
     #    64.*o*x2z-3./64.*o*tx*x12s-1./64.*o*tx+1./32.*o*x12s-
     #    1./64.*o*x12c+1./16.*o*txs+1./32.*os*x12*x2z-3./64.*os*
     #    x12*tx+1./64.*os*x2z*tx-1./32.*os*x2z+1./32.*os*tx-1./
     #    64.*os*x12s-1./32.*os*txs+1./64.*os+1./64.*oc*x12+1./
     #    64.*oc*x2z-1./64.*oc*tx-1./32.*oc+1./64.*oq-1./32.*
     #    x12*x2z*tx-1./64.*x12*tx+1./16.*x12*txs+1./64.*x2z*tx*
     #    x12s+1./64.*x2z*tx+1./32.*tx*x12s-1./64.*tx*x12c-1./
     #    32.*x12s*txs-1./32.*txs)
      zz10q= zz10q+rwwz(7,4)*vvq*yc*(-1./8.*o*x12*x2z
     #    *tx+3./32.*o*x12*x2z*txs+3./64.*o*x12*x2z-3./64.*o*x12*
     #    tx*x2zs+1./16.*o*x12*x2zs-1./32.*o*x12*txs+3./64.*o*x2z
     #    *tx*x12s+3./64.*o*x2z*tx-1./16.*o*x2z*x12s+1./64.*o*x2z
     #    *x12c-9./64.*o*x2z*txs-1./64.*o*tx*x12s+1./64.*o*tx*
     #    x12c+5./64.*o*tx*x2zs-1./64.*o*x12s*x2zs+3./64.*o*x12s*
     #    txs-3./64.*o*x2zs+3./64.*os*x12*x2z*tx+1./64.*os*x12*
     #    x2z-1./32.*os*x12*tx-3./64.*os*x12*x2zs+3./64.*os*x12*
     #    txs-1./16.*os*x2z*tx+3./64.*os*x2z*txs-3./64.*os*x2z+
     #    3./64.*os*tx*x12s-1./32.*os*tx*x2zs+5./64.*os*x2zs-1./
     #    64.*os*txs-3./64.*oc*x12*x2z+3./64.*oc*x12*tx+1./64.*oc
     #    *x2z*tx+5./64.*oc*x2z-1./64.*oc*tx-1./32.*oc*x2zs+1./
     #    64.*oc*txs-1./32.*oq*x2z+1./64.*oq*tx+3./64.*x12*x2z*tx
     #    -9./64.*x12*x2z*txs+1./16.*x12*tx*x2zs-1./16.*x2z*tx*
     #    x12s+1./64.*x2z*tx*x12c+3./64.*x2z*x12s*txs+3./32.*x2z*
     #    txs)
      zz10q= zz10q+rwwz(7,4)*vvq*yc*(-1./64.*tx*x12s*
     #    x2zs-3./64.*tx*x2zs-1./64.*x12s*txs+1./64.*x12c*txs)
      zz10q= zz10q+rwwz(7,7)*xx*vvq*yc*(-1./64.*o*x12
     #    *x2zs*txs+1./64.*o*x2zq-1./128.*o*x2zc*txs-1./128.*os*
     #    x12*x2zc-1./128.*os*x2zq+1./128.*os*x2zc-1./128.*os*
     #    x2zs*txs-1./128.*oc*x2zc+1./64.*x12*tx*x2zc-1./128.*x12
     #    *x2zc*txs-1./128.*x12s*x2zs*txs-1./128.*x2zq+1./128.*
     #    x2zc*txs)
      zz10q= zz10q+rwwz(7,7)*bxpi*vvq*yc*(-1./32.*o*
     #    x12*x2z*txs-1./32.*o*x12*tx*x2zs-1./32.*o*x12*x2zc+1./
     #    32.*o*x12*x2zs*txs+3./128.*o*x2z*x12s*txs-1./64.*o*x2zq
     #    +1./128.*o*x2zc*txs+9./128.*o*x2zc-1./32.*o*x2zs*txs+
     #    3./128.*os*x12*x2z*txs+1./64.*os*x12*x2zc-1./32.*os*x12*
     #    x2zs-1./64.*os*x2z*txs+1./128.*os*x12s*x2zs+1./128.*os*
     #    x2zq-7./128.*os*x2zc+1./64.*os*x2zs*txs+3./128.*os*x2zs
     #    +1./64.*oc*x12*x2zs+1./128.*oc*x2z*txs+1./64.*oc*x2zc
     #    -1./32.*oc*x2zs+1./128.*oq*x2zs-1./64.*x12*tx*x2zc+3./
     #    64.*x12*tx*x2zs+1./128.*x12*x2zc*txs+3./128.*x12*x2zc-1.
     #    /32.*x12*x2zs*txs-1./64.*x2z*x12s*txs+1./128.*x2z*x12c*
     #    txs-1./32.*tx*x12s*x2zs+1./64.*x12s*x2zs*txs+1./128.*
     #    x2zq-1./128.*x2zc*txs-1./32.*x2zc+3./128.*x2zs*txs)
      zz10q= zz10q+rwwz(7,7)*vvq*bxps*yc*(1./128.+3./
     #    64.*o*x12-3./128.*o*x12s-3./128.*o-3./128.*os*x12+3./
     #    128.*os-1./128.*oc-3./128.*x12+3./128.*x12s-1./128.*
     #    x12c)
      zz10q= zz10q+rwwz(7,7)*vvq*yc*bxp*(-1./8.*o*x12*
     #    x2z-1./32.*o*x12*tx+1./64.*o*x12*txs+5./128.*o*x2z*x12s
     #    +11./128.*o*x2z+1./32.*o*tx*x12s-1./64.*o*txs+7./128.
     #    *os*x12*x2z+1./64.*os*x12*tx-1./64.*os*x12-5./64.*os*
     #    x2z+1./128.*os*x12s+1./128.*os*txs+1./128.*os+1./64.*
     #    oc*x12+3./128.*oc*x2z-1./64.*oc+1./128.*oq+9./128.*
     #    x12*x2z+1./64.*x12*tx-1./64.*x12*txs-3./64.*x2z*x12s+
     #    1./128.*x2z*x12c-1./32.*x2z-1./32.*tx*x12s+1./64.*tx*
     #    x12c+1./128.*x12s*txs+1./128.*txs)
      zz10q= zz10q+rwwz(7,7)*vvq*yc*(1./16.*o*x12*x2z*
     #    tx-1./32.*o*x12*x2z*txs+7./64.*o*x12*x2zs+1./64.*o*x12*
     #    txs-1./32.*o*x2z*tx*x12s+5./128.*o*x2z*txs-1./64.*o*
     #    x12s*x2zs-3./128.*o*x12s*txs-15./128.*o*x2zs-1./64.*os*
     #    x12*x2z*tx+5./128.*os*x12*x2z-5./128.*os*x12*x2zs-3./
     #    128.*os*x12*txs-1./64.*os*x2z*x12s-1./64.*os*x2z*txs-3./
     #    128.*os*x2z+3./32.*os*x2zs+1./128.*os*txs-1./32.*oc*x12
     #    *x2z+5./128.*oc*x2z-3./128.*oc*x2zs-1./128.*oc*txs-1./
     #    64.*oq*x2z-3./64.*x12*x2z*tx+5./128.*x12*x2z*txs-9./128.
     #    *x12*x2zs+1./16.*x2z*tx*x12s-1./64.*x2z*tx*x12c-1./64.*
     #    x2z*x12s*txs-3./128.*x2z*txs+3./128.*x12s*x2zs+1./128.*
     #    x12s*txs-1./128.*x12c*txs+3./64.*x2zs)
      zz10q= zz10q+rwwz(7,11)*bxpi*vvq*yc*(-1./32.*o*
     #    x12*x2z*txs+1./64.*o*x12*x2zs-1./64.*o*x2z*tx*x12s+1./
     #    64.*o*tx*x2zc+1./64.*o*tx*x2zs-1./64.*o*x2zc-1./64.*o*
     #    x2zs*txs-1./32.*os*x12*x2z*tx+1./64.*os*x12*x2zs-1./64.
     #    *os*x2z*txs+1./64.*os*x2zc-1./64.*os*x2zs-1./64.*oc*x2z
     #    *tx+1./64.*oc*x2zs+1./64.*x12*tx*x2zs-1./64.*x12*x2zs*
     #    txs-1./64.*x2z*x12s*txs-1./64.*tx*x2zc+1./32.*x2zs*txs
     #    )
      zz10q= zz10q+rwwz(7,11)*vvq*yc*bxp*(1./64.*o*x12*
     #    x2z-1./32.*o*x12*tx+1./64.*o*x12+1./64.*o*x2z*tx-1./
     #    64.*o*x2z+1./64.*o*tx-1./64.*o*x12s-1./32.*o*txs+1./
     #    64.*os*x2z-1./64.*os*tx-1./64.*os+1./64.*oc+1./64.*
     #    x12*x2z*tx+1./64.*x12*tx-1./32.*x12*txs-1./64.*x2z*tx
     #    -1./64.*tx*x12s+1./32.*txs)
      zz10q= zz10q+rwwz(7,11)*vvq*yc*(1./32.*o*x12*x2z*
     #    tx-1./32.*o*x12*x2z-1./64.*o*x12*x2zs+1./32.*o*x12*txs
     #    -1./32.*o*x2z*tx+1./64.*o*x2z*x12s+3./64.*o*x2z*txs+1.
     #    /64.*o*tx*x12s-1./32.*o*tx*x2zs+1./32.*o*x2zs-1./64.*os
     #    *x12*x2z+1./32.*os*x12*tx+1./64.*os*x2z*tx+1./32.*os*
     #    x2z-1./32.*os*x2zs+1./64.*os*txs-1./32.*oc*x2z+1./64.
     #    *oc*tx-1./32.*x12*x2z*tx+3./64.*x12*x2z*txs-1./64.*x12*
     #    tx*x2zs+1./64.*x2z*tx*x12s-1./16.*x2z*txs+1./32.*tx*
     #    x2zs+1./64.*x12s*txs)
      zz10q= zz10q+rwwz(7,12)*xx*vvq*yc*(-1./16.*o*
     #    x12*x2z*txs+1./32.*o*x12*tx*x2zs+1./32.*o*tx*x2zc+1./32.
     #    *o*x2zc-1./32.*o*x2zs*txs-1./32.*os*x2z*txs+1./32.*os*
     #    tx*x2zs+1./16.*x12*tx*x2zs-1./32.*x12*x2zs*txs-1./32.*
     #    x2z*x12s*txs-1./32.*tx*x2zc-1./32.*x2zc+1./16.*x2zs*txs
     #    )
      zz10q= zz10q+rwwz(7,12)*bxpi*vvq*yc*(-1./16.*o*
     #    x12*x2z*tx+3./32.*o*x12*x2z*txs-1./32.*o*x12*tx*x2zs-1./
     #    16.*o*x12*x2zs-1./16.*o*x12*txs-1./8.*o*x2z*txs-1./32.*
     #    o*tx*x2zc+1./16.*o*tx*x2zs+3./64.*o*x12s*txs+1./32.*o*
     #    x2zs*txs+9./64.*o*x2zs-1./64.*os*x12*x2zs+3./64.*os*x12
     #    *txs+1./32.*os*x2z*tx+3./64.*os*x2z*txs-1./32.*os*tx*
     #    x2zs-1./64.*os*x2zc-1./32.*os*x2zs-1./32.*os*txs-1./
     #    64.*oc*x2zs+1./64.*oc*txs+1./8.*x12*x2z*tx-1./8.*x12*
     #    x2z*txs+1./32.*x12*x2zs*txs+5./64.*x12*x2zs-3./32.*x2z*
     #    tx*x12s+3./64.*x2z*x12s*txs+1./8.*x2z*txs+1./32.*tx*
     #    x2zc-1./16.*tx*x2zs-1./32.*x12s*txs+1./64.*x12c*txs+1.
     #    /64.*x2zc-1./16.*x2zs*txs-3./32.*x2zs)
      zz10q= zz10q+rwwz(7,12)*vvq*yc*bxp*(-1./32.-1./
     #    32.*o*x12*x2z-1./8.*o*x12+1./32.*o*x2z+3./64.*o*x12s+
     #    5./64.*o+3./64.*os*x12-1./64.*os*x2z-1./16.*os+1./64.
     #    *oc+1./32.*x12*x2z+5./64.*x12-1./64.*x2z*x12s-1./64.*
     #    x2z-1./16.*x12s+1./64.*x12c)
      zz10q= zz10q+rwwz(7,12)*vvq*yc*(1./32.*o*x12*x2z*
     #    tx+3./16.*o*x12*x2z+3./32.*o*x12*tx+1./32.*o*x12*x2zs
     #    -1./16.*o*x12*txs-1./32.*o*x2z*tx-1./32.*o*x2z*x12s-3.
     #    /16.*o*x2z-1./16.*o*tx*x12s-1./16.*o*x2zs+3./32.*o*txs
     #    -1./32.*os*x12*x2z-1./32.*os*x12*tx+3./32.*os*x2z+1./
     #    32.*os*x2zs-1./32.*os*txs-1./16.*x12*x2z*tx-5./32.*x12*
     #    x2z-1./16.*x12*tx-1./32.*x12*x2zs+3./32.*x12*txs+1./
     #    32.*x2z*tx*x12s+1./32.*x2z*tx+1./16.*x2z*x12s+3./32.*
     #    x2z+3./32.*tx*x12s-1./32.*tx*x12c-1./32.*x12s*txs+1./
     #    32.*x2zs-1./16.*txs)
      zz10q= zz10q+rwwz(7,13)*xx*vvq*yc*(-1./32.*o*
     #    x12*x2z*txs+1./32.*o*x2zc-1./32.*o*x2zs*txs-1./64.*os*
     #    x2z*txs-1./64.*os*x2zc+1./32.*x12*tx*x2zs-1./32.*x12*
     #    x2zs*txs-1./64.*x2z*x12s*txs-1./64.*x2zc+1./32.*x2zs*
     #    txs)
      zz10q= zz10q+rwwz(7,13)*bxpi*vvq*yc*(-3./64.*o*
     #    x12*x2z*tx+5./64.*o*x12*x2z*txs-3./64.*o*x12*x2zs-1./32.
     #    *o*x12*txs-5./64.*o*x2z*txs+3./128.*o*x12s*txs-3./64.*o
     #    *x2zc+1./32.*o*x2zs*txs+13./128.*o*x2zs+3./128.*os*x12*
     #    x2zs+3./128.*os*x12*txs+5./128.*os*x2z*txs+3./128.*os*
     #    x2zc-5./64.*os*x2zs-1./64.*os*txs+3./128.*oc*x2zs+1./
     #    128.*oc*txs+1./16.*x12*x2z*tx-5./64.*x12*x2z*txs-3./64.
     #    *x12*tx*x2zs+1./32.*x12*x2zs*txs+5./128.*x12*x2zs-3./64.
     #    *x2z*tx*x12s+5./128.*x2z*x12s*txs+1./16.*x2z*txs-1./64.
     #    *x12s*txs+1./128.*x12c*txs+3./128.*x2zc-1./32.*x2zs*txs
     #    -3./64.*x2zs)
      zz10q= zz10q+rwwz(7,13)*vvq*yc*bxp*(-1./64.+1./
     #    64.*o*x12*x2z-1./16.*o*x12-1./64.*o*x2z+3./128.*o*x12s
     #    +5./128.*o+3./128.*os*x12+1./128.*os*x2z-1./32.*os+
     #    1./128.*oc-1./64.*x12*x2z+5./128.*x12+1./128.*x2z*x12s
     #    +1./128.*x2z-1./32.*x12s+1./128.*x12c)
      zz10q= zz10q+rwwz(7,13)*vvq*yc*(-1./64.*o*x12*
     #    x2z*tx+7./64.*o*x12*x2z+3./64.*o*x12*tx-1./64.*o*x12*
     #    x2zs-1./32.*o*x12*txs-1./64.*o*x2z*x12s-7./64.*o*x2z-
     #    1./32.*o*tx*x12s+1./32.*o*x2zs+3./64.*o*txs-3./64.*os*
     #    x12*x2z-1./64.*os*x12*tx+3./32.*os*x2z-1./64.*os*x2zs
     #    -1./64.*os*txs-1./32.*oc*x2z+1./64.*x12*x2z*tx-5./64.
     #    *x12*x2z-1./32.*x12*tx+1./64.*x12*x2zs+3./64.*x12*txs
     #    -1./64.*x2z*tx*x12s+1./32.*x2z*x12s+3./64.*x2z+3./64.
     #    *tx*x12s-1./64.*tx*x12c-1./64.*x12s*txs-1./64.*x2zs-1.
     #    /32.*txs)
      zz10q= zz10q+rwwz(7,14)*xx*vvq*yc*(1./64.*o*x12*
     #    tx*x2zs+1./64.*o*tx*x2zc-1./64.*o*x2zc+1./64.*o*x2zs*
     #    txs+1./64.*os*tx*x2zs+1./64.*os*x2zc+1./64.*x12*x2zs*
     #    txs-1./64.*tx*x2zc)
      zz10q= zz10q+rwwz(7,14)*bxpi*vvq*yc*(1./32.*o*x12*
     #    x2z*tx-3./64.*o*x12*x2z*txs-1./64.*o*x12*tx*x2zs+3./128.
     #    *o*x12*x2zs-1./128.*o*x2z*tx*x12s+1./32.*o*x2z*txs-1./
     #    128.*o*tx*x2zc+7./128.*o*tx*x2zs+5./128.*o*x2zc-3./128.
     #    *o*x2zs*txs-3./64.*o*x2zs-1./64.*os*x12*x2z*tx-3./128.*
     #    os*x12*x2zs+1./32.*os*x2z*tx-3./128.*os*x2z*txs-1./64.*
     #    os*tx*x2zs-3./128.*os*x2zc+9./128.*os*x2zs-1./128.*oc*
     #    x2z*tx-3./128.*oc*x2zs+1./32.*x12*x2z*txs+7./128.*x12*
     #    tx*x2zs-3./128.*x12*x2zs*txs-3./128.*x2z*x12s*txs+1./
     #    128.*tx*x2zc-3./64.*tx*x2zs-1./64.*x2zc+1./64.*x2zs*txs
     #    )
      zz10q= zz10q+rwwz(7,14)*vvq*bxps*yc*(1./64.+1./
     #    32.*o*x12-1./32.*o+1./64.*os-1./32.*x12+1./64.*x12s)
      zz10q= zz10q+rwwz(7,14)*vvq*yc*bxp*(-7./128.*o*
     #    x12*x2z-3./64.*o*x12*tx+3./128.*o*x12+1./128.*o*x2z*tx
     #    +11./128.*o*x2z+3./128.*o*tx-1./128.*o*x12s-1./64.*o*
     #    txs-1./64.*o-1./32.*os*x12-5./128.*os*x2z-1./128.*os*
     #    tx+5./128.*os-3./128.*oc+1./128.*x12*x2z*tx+1./16.*
     #    x12*x2z+7./128.*x12*tx-1./64.*x12*txs-1./128.*x2z*tx-
     #    1./64.*x2z*x12s-3./64.*x2z-5./128.*tx*x12s-1./64.*tx+
     #    1./64.*txs)
      zz10q= zz10q+rwwz(7,14)*vvq*yc*(3./64.*o*x12*x2z*
     #    tx-3./64.*o*x12*x2z-1./64.*o*x12*tx+3./128.*o*x12*x2zs
     #    +3./64.*o*x12*txs-1./16.*o*x2z*tx+1./128.*o*x2z*x12s+
     #    3./128.*o*x2z*txs+3./64.*o*x2z+1./128.*o*tx*x12s-1./64.
     #    *o*tx*x2zs-5./64.*o*x2zs-1./64.*o*txs+7./128.*os*x12*
     #    x2z+1./64.*os*x12*tx+1./128.*os*x2z*tx-3./32.*os*x2z-
     #    1./64.*os*tx+1./32.*os*x2zs+3./128.*os*txs+3./64.*oc*
     #    x2z+1./128.*oc*tx-7./64.*x12*x2z*tx+3./128.*x12*x2z*txs
     #    -1./128.*x12*tx*x2zs-1./32.*x12*x2zs-1./64.*x12*txs+5.
     #    /128.*x2z*tx*x12s+3./64.*x2z*tx-1./32.*x2z*txs+1./64.*
     #    tx*x2zs+3./128.*x12s*txs+3./64.*x2zs)
      zz10q= zz10q+rwwz(10,1)*xx*vvq*yc*(1./8.*o*x12*
     #    x2z*txs-1./8.*o*x2zc+1./8.*o*x2zs*txs+1./16.*os*x2z*txs
     #    +1./16.*os*x2zc-1./8.*x12*tx*x2zs+1./8.*x12*x2zs*txs+
     #    1./16.*x2z*x12s*txs+1./16.*x2zc-1./8.*x2zs*txs)
      zz10q= zz10q+rwwz(10,1)*bxpi*vvq*yc*(1./4.*o*x12*
     #    x2z*tx-1./4.*o*x12*x2z*txs-1./16.*o*x12*tx*x2zs+7./32.*
     #    o*x12*x2zs+1./8.*o*x12*txs-1./32.*o*x2z*tx*x12s+3./8.*o
     #    *x2z*txs-1./32.*o*tx*x2zc+3./32.*o*tx*x2zs-3./32.*o*
     #    x12s*txs+3./32.*o*x2zc-3./32.*o*x2zs*txs-15./32.*o*x2zs
     #    -1./16.*os*x12*x2z*tx-1./16.*os*x12*x2zs-3./32.*os*x12*
     #    txs+1./16.*os*x2z*tx-1./8.*os*x2z*txs-1./16.*os*tx*x2zs
     #    -1./16.*os*x2zc+11./32.*os*x2zs+1./16.*os*txs-1./32.*
     #    oc*x2z*tx-1./16.*oc*x2zs-1./32.*oc*txs-1./4.*x12*x2z*tx
     #    +3./8.*x12*x2z*txs+3./32.*x12*tx*x2zs-3./32.*x12*x2zs*
     #    txs-5./32.*x12*x2zs+3./16.*x2z*tx*x12s-1./8.*x2z*x12s*
     #    txs-1./4.*x2z*txs+1./32.*tx*x2zc-1./16.*tx*x2zs+1./16.
     #    *x12s*txs-1./32.*x12c*txs-1./32.*x2zc+1./16.*x2zs*txs
     #    +3./16.*x2zs)
      zz10q= zz10q+rwwz(10,1)*vvq*yc*bxp*(1./16.+1./32.
     #    *o*x12*x2z-1./16.*o*x12*tx+11./32.*o*x12-1./32.*o*x2z*
     #    tx-1./32.*o*x2z+3./32.*o*tx-1./8.*o*x12s+1./16.*o*txs
     #    -7./32.*o-7./32.*os*x12-1./32.*os*tx+9./32.*os-1./8.
     #    *oc-1./32.*x12*x2z*tx-1./16.*x12*x2z+3./32.*x12*tx+1./
     #    16.*x12*txs-5./32.*x12+1./32.*x2z*tx+1./32.*x2z*x12s+
     #    1./32.*x2z-1./32.*tx*x12s-1./16.*tx+1./8.*x12s-1./32.
     #    *x12c-1./16.*txs)
      zz10q= zz10q+rwwz(10,1)*vvq*yc*(1./16.*o*x12*x2z*
     #    tx-9./16.*o*x12*x2z-1./4.*o*x12*tx-1./32.*o*x12*x2zs+
     #    3./16.*o*x12*txs-3./16.*o*x2z*tx+3./32.*o*x2z*x12s-3./
     #    32.*o*x2z*txs+9./16.*o*x2z+5./32.*o*tx*x12s+1./16.*o*tx
     #    *x2zs+1./16.*o*x2zs-1./4.*o*txs+9./32.*os*x12*x2z+1./
     #    8.*os*x12*tx+3./32.*os*x2z*tx-9./16.*os*x2z-1./16.*os*
     #    tx+3./32.*os*txs+3./16.*oc*x2z+1./32.*oc*tx-1./16.*
     #    x12*x2z*tx-3./32.*x12*x2z*txs+5./16.*x12*x2z+1./32.*x12
     #    *tx*x2zs+1./8.*x12*tx+1./16.*x12*x2zs-1./4.*x12*txs-1.
     #    /32.*x2z*tx*x12s+1./8.*x2z*tx-1./8.*x2z*x12s+1./8.*x2z*
     #    txs-3./16.*x2z-3./16.*tx*x12s+1./16.*tx*x12c-1./16.*
     #    tx*x2zs+3./32.*x12s*txs-1./16.*x2zs+1./8.*txs)
      zz10q= zz10q+rwwz(10,4)*xx*vvq*yc*(1./64.*o*x12*
     #    x2zc-1./32.*o*x12*x2zs*txs-1./64.*o*tx*x12s*x2zs+1./64.
     #    *o*tx*x2zq+1./64.*o*tx*x2zc-1./64.*o*x2zq-1./64.*o*x2zc
     #    *txs-1./32.*os*x12*tx*x2zs+1./64.*os*x12*x2zc+1./64.*os
     #    *x2zq-1./64.*os*x2zc-1./64.*os*x2zs*txs-1./64.*oc*tx*
     #    x2zs+1./64.*oc*x2zc+1./64.*x12*tx*x2zc-1./64.*x12*x2zc*
     #    txs-1./64.*tx*x2zq-1./64.*x12s*x2zs*txs+1./32.*x2zc*txs
     #    )
      zz10q= zz10q+rwwz(10,4)*bxpi*vvq*yc*(-1./16.*o*
     #    x12*x2z*txs-1./64.*o*x12*tx*x2zc-1./16.*o*x12*tx*x2zs+1.
     #    /64.*o*x12*x2zc+1./16.*o*x12*x2zs*txs+3./64.*o*x12*x2zs
     #    -1./32.*o*x2z*tx*x12s+1./64.*o*x2z*tx*x12c+3./64.*o*x2z
     #    *x12s*txs+1./64.*o*tx*x12s*x2zs-1./64.*o*tx*x2zq+3./64.
     #    *o*tx*x2zc+3./64.*o*tx*x2zs-1./32.*o*x12s*x2zs+1./64.*o
     #    *x2zq+1./64.*o*x2zc*txs-3./64.*o*x2zc-3./32.*o*x2zs*txs
     #    -1./16.*os*x12*x2z*tx+3./64.*os*x12*x2z*txs+1./32.*os*
     #    x12*tx*x2zs-1./32.*os*x12*x2zc+1./32.*os*x12*x2zs+3./64.
     #    *os*x2z*tx*x12s-1./32.*os*x2z*txs-1./64.*os*tx*x2zc-1./
     #    32.*os*tx*x2zs-1./64.*os*x12s*x2zs-1./64.*os*x2zq+5./64.
     #    *os*x2zc+1./32.*os*x2zs*txs-3./64.*os*x2zs+3./64.*oc*
     #    x12*x2z*tx-1./32.*oc*x12*x2zs-1./32.*oc*x2z*tx+1./64.*
     #    oc*x2z*txs+1./64.*oc*tx*x2zs-1./32.*oc*x2zc+1./16.*oc*
     #    x2zs+1./64.*oq*x2z*tx-1./64.*oq*x2zs+1./64.*x12*tx*x2zc
     #    +3./64.*x12*tx*x2zs)
      zz10q= zz10q+rwwz(10,4)*bxpi*vvq*yc*(1./64.*x12*
     #    x2zc*txs-3./32.*x12*x2zs*txs-1./32.*x2z*x12s*txs+1./64.
     #    *x2z*x12c*txs-1./32.*tx*x12s*x2zs+1./64.*tx*x2zq-3./64.
     #    *tx*x2zc+1./32.*x12s*x2zs*txs-1./32.*x2zc*txs+3./32.*
     #    x2zs*txs)
      zz10q= zz10q+rwwz(10,4)*vvq*yc*bxp*(-1./32.*o*
     #    x12*x2z*tx+1./32.*o*x12*x2z-1./16.*o*x12*tx+1./16.*o*
     #    x12*txs+1./64.*o*x12+1./32.*o*x2z*tx-1./64.*o*x2z*x12s
     #    -1./64.*o*x2z+3./64.*o*tx*x12s+1./64.*o*tx-1./32.*o*
     #    x12s+1./64.*o*x12c-1./16.*o*txs-1./32.*os*x12*x2z+3./
     #    64.*os*x12*tx-1./64.*os*x2z*tx+1./32.*os*x2z-1./32.*os*
     #    tx+1./64.*os*x12s+1./32.*os*txs-1./64.*os-1./64.*oc*
     #    x12-1./64.*oc*x2z+1./64.*oc*tx+1./32.*oc-1./64.*oq+
     #    1./32.*x12*x2z*tx+1./64.*x12*tx-1./16.*x12*txs-1./64.*
     #    x2z*tx*x12s-1./64.*x2z*tx-1./32.*tx*x12s+1./64.*tx*x12c
     #    +1./32.*x12s*txs+1./32.*txs)
      zz10q= zz10q+rwwz(10,4)*vvq*yc*(1./8.*o*x12*x2z*
     #    tx-3./32.*o*x12*x2z*txs-3./64.*o*x12*x2z+3./64.*o*x12*
     #    tx*x2zs-1./16.*o*x12*x2zs+1./32.*o*x12*txs-3./64.*o*x2z
     #    *tx*x12s-3./64.*o*x2z*tx+1./16.*o*x2z*x12s-1./64.*o*x2z
     #    *x12c+9./64.*o*x2z*txs+1./64.*o*tx*x12s-1./64.*o*tx*
     #    x12c-5./64.*o*tx*x2zs+1./64.*o*x12s*x2zs-3./64.*o*x12s*
     #    txs+3./64.*o*x2zs-3./64.*os*x12*x2z*tx-1./64.*os*x12*
     #    x2z+1./32.*os*x12*tx+3./64.*os*x12*x2zs-3./64.*os*x12*
     #    txs+1./16.*os*x2z*tx-3./64.*os*x2z*txs+3./64.*os*x2z-
     #    3./64.*os*tx*x12s+1./32.*os*tx*x2zs-5./64.*os*x2zs+1./
     #    64.*os*txs+3./64.*oc*x12*x2z-3./64.*oc*x12*tx-1./64.*oc
     #    *x2z*tx-5./64.*oc*x2z+1./64.*oc*tx+1./32.*oc*x2zs-1./
     #    64.*oc*txs+1./32.*oq*x2z-1./64.*oq*tx-3./64.*x12*x2z*tx
     #    +9./64.*x12*x2z*txs-1./16.*x12*tx*x2zs+1./16.*x2z*tx*
     #    x12s-1./64.*x2z*tx*x12c-3./64.*x2z*x12s*txs-3./32.*x2z*
     #    txs)
      zz10q= zz10q+rwwz(10,4)*vvq*yc*(1./64.*tx*x12s*
     #    x2zs+3./64.*tx*x2zs+1./64.*x12s*txs-1./64.*x12c*txs)
      zz10q= zz10q+rwwz(10,7)*xx*vvq*yc*(1./32.*o*x12*
     #    x2zs*txs-1./32.*o*x2zq+1./64.*o*x2zc*txs+1./64.*os*x12*
     #    x2zc+1./64.*os*x2zq-1./64.*os*x2zc+1./64.*os*x2zs*txs
     #    +1./64.*oc*x2zc-1./32.*x12*tx*x2zc+1./64.*x12*x2zc*txs
     #    +1./64.*x12s*x2zs*txs+1./64.*x2zq-1./64.*x2zc*txs)
      zz10q= zz10q+rwwz(10,7)*bxpi*vvq*yc*(1./16.*o*x12*
     #    x2z*txs+1./16.*o*x12*tx*x2zs+1./16.*o*x12*x2zc-1./16.*o
     #    *x12*x2zs*txs-3./64.*o*x2z*x12s*txs+1./32.*o*x2zq-1./64.
     #    *o*x2zc*txs-9./64.*o*x2zc+1./16.*o*x2zs*txs-3./64.*os*
     #    x12*x2z*txs-1./32.*os*x12*x2zc+1./16.*os*x12*x2zs+1./32.
     #    *os*x2z*txs-1./64.*os*x12s*x2zs-1./64.*os*x2zq+7./64.*
     #    os*x2zc-1./32.*os*x2zs*txs-3./64.*os*x2zs-1./32.*oc*x12
     #    *x2zs-1./64.*oc*x2z*txs-1./32.*oc*x2zc+1./16.*oc*x2zs
     #    -1./64.*oq*x2zs+1./32.*x12*tx*x2zc-3./32.*x12*tx*x2zs
     #    -1./64.*x12*x2zc*txs-3./64.*x12*x2zc+1./16.*x12*x2zs*
     #    txs+1./32.*x2z*x12s*txs-1./64.*x2z*x12c*txs+1./16.*tx*
     #    x12s*x2zs-1./32.*x12s*x2zs*txs-1./64.*x2zq+1./64.*x2zc*
     #    txs+1./16.*x2zc-3./64.*x2zs*txs)
      zz10q= zz10q+rwwz(10,7)*vvq*bxps*yc*(-1./64.-3.
     #    /32.*o*x12+3./64.*o*x12s+3./64.*o+3./64.*os*x12-3./64.
     #    *os+1./64.*oc+3./64.*x12-3./64.*x12s+1./64.*x12c)
      zz10q= zz10q+rwwz(10,7)*vvq*yc*bxp*(1./4.*o*x12*
     #    x2z+1./16.*o*x12*tx-1./32.*o*x12*txs-5./64.*o*x2z*x12s
     #    -11./64.*o*x2z-1./16.*o*tx*x12s+1./32.*o*txs-7./64.*
     #    os*x12*x2z-1./32.*os*x12*tx+1./32.*os*x12+5./32.*os*x2z
     #    -1./64.*os*x12s-1./64.*os*txs-1./64.*os-1./32.*oc*x12
     #    -3./64.*oc*x2z+1./32.*oc-1./64.*oq-9./64.*x12*x2z-1.
     #    /32.*x12*tx+1./32.*x12*txs+3./32.*x2z*x12s-1./64.*x2z*
     #    x12c+1./16.*x2z+1./16.*tx*x12s-1./32.*tx*x12c-1./64.*
     #    x12s*txs-1./64.*txs)
      zz10q= zz10q+rwwz(10,7)*vvq*yc*(-1./8.*o*x12*
     #    x2z*tx+1./16.*o*x12*x2z*txs-7./32.*o*x12*x2zs-1./32.*o*
     #    x12*txs+1./16.*o*x2z*tx*x12s-5./64.*o*x2z*txs+1./32.*o*
     #    x12s*x2zs+3./64.*o*x12s*txs+15./64.*o*x2zs+1./32.*os*
     #    x12*x2z*tx-5./64.*os*x12*x2z+5./64.*os*x12*x2zs+3./64.*
     #    os*x12*txs+1./32.*os*x2z*x12s+1./32.*os*x2z*txs+3./64.*
     #    os*x2z-3./16.*os*x2zs-1./64.*os*txs+1./16.*oc*x12*x2z
     #    -5./64.*oc*x2z+3./64.*oc*x2zs+1./64.*oc*txs+1./32.*oq
     #    *x2z+3./32.*x12*x2z*tx-5./64.*x12*x2z*txs+9./64.*x12*
     #    x2zs-1./8.*x2z*tx*x12s+1./32.*x2z*tx*x12c+1./32.*x2z*
     #    x12s*txs+3./64.*x2z*txs-3./64.*x12s*x2zs-1./64.*x12s*
     #    txs+1./64.*x12c*txs-3./32.*x2zs)
      zz10q= zz10q+rwwz(10,10)*xx*vvq*yc*(-1./64.*o*
     #    x12*x2zs*txs+1./64.*o*x2zq-1./128.*o*x2zc*txs-1./128.*
     #    os*x12*x2zc-1./128.*os*x2zq+1./128.*os*x2zc-1./128.*os*
     #    x2zs*txs-1./128.*oc*x2zc+1./64.*x12*tx*x2zc-1./128.*x12
     #    *x2zc*txs-1./128.*x12s*x2zs*txs-1./128.*x2zq+1./128.*
     #    x2zc*txs)
      zz10q= zz10q+rwwz(10,10)*bxpi*vvq*yc*(-1./32.*o*
     #    x12*x2z*txs-1./32.*o*x12*tx*x2zs-1./32.*o*x12*x2zc+1./
     #    32.*o*x12*x2zs*txs+3./128.*o*x2z*x12s*txs-1./64.*o*x2zq
     #    +1./128.*o*x2zc*txs+9./128.*o*x2zc-1./32.*o*x2zs*txs+
     #    3./128.*os*x12*x2z*txs+1./64.*os*x12*x2zc-1./32.*os*x12*
     #    x2zs-1./64.*os*x2z*txs+1./128.*os*x12s*x2zs+1./128.*os*
     #    x2zq-7./128.*os*x2zc+1./64.*os*x2zs*txs+3./128.*os*x2zs
     #    +1./64.*oc*x12*x2zs+1./128.*oc*x2z*txs+1./64.*oc*x2zc
     #    -1./32.*oc*x2zs+1./128.*oq*x2zs-1./64.*x12*tx*x2zc+3./
     #    64.*x12*tx*x2zs+1./128.*x12*x2zc*txs+3./128.*x12*x2zc-1.
     #    /32.*x12*x2zs*txs-1./64.*x2z*x12s*txs+1./128.*x2z*x12c*
     #    txs-1./32.*tx*x12s*x2zs+1./64.*x12s*x2zs*txs+1./128.*
     #    x2zq-1./128.*x2zc*txs-1./32.*x2zc+3./128.*x2zs*txs)
      zz10q= zz10q+rwwz(10,10)*vvq*bxps*yc*(1./128.+3./
     #    64.*o*x12-3./128.*o*x12s-3./128.*o-3./128.*os*x12+3./
     #    128.*os-1./128.*oc-3./128.*x12+3./128.*x12s-1./128.*
     #    x12c)
      zz10q= zz10q+rwwz(10,10)*vvq*yc*bxp*(-1./8.*o*
     #    x12*x2z-1./32.*o*x12*tx+1./64.*o*x12*txs+5./128.*o*x2z*
     #    x12s+11./128.*o*x2z+1./32.*o*tx*x12s-1./64.*o*txs+7./
     #    128.*os*x12*x2z+1./64.*os*x12*tx-1./64.*os*x12-5./64.*
     #    os*x2z+1./128.*os*x12s+1./128.*os*txs+1./128.*os+1./
     #    64.*oc*x12+3./128.*oc*x2z-1./64.*oc+1./128.*oq+9./128.
     #    *x12*x2z+1./64.*x12*tx-1./64.*x12*txs-3./64.*x2z*x12s
     #    +1./128.*x2z*x12c-1./32.*x2z-1./32.*tx*x12s+1./64.*tx
     #    *x12c+1./128.*x12s*txs+1./128.*txs)
      zz10q= zz10q+rwwz(10,10)*vvq*yc*(1./16.*o*x12*x2z
     #    *tx-1./32.*o*x12*x2z*txs+7./64.*o*x12*x2zs+1./64.*o*x12
     #    *txs-1./32.*o*x2z*tx*x12s+5./128.*o*x2z*txs-1./64.*o*
     #    x12s*x2zs-3./128.*o*x12s*txs-15./128.*o*x2zs-1./64.*os*
     #    x12*x2z*tx+5./128.*os*x12*x2z-5./128.*os*x12*x2zs-3./
     #    128.*os*x12*txs-1./64.*os*x2z*x12s-1./64.*os*x2z*txs-3./
     #    128.*os*x2z+3./32.*os*x2zs+1./128.*os*txs-1./32.*oc*x12
     #    *x2z+5./128.*oc*x2z-3./128.*oc*x2zs-1./128.*oc*txs-1./
     #    64.*oq*x2z-3./64.*x12*x2z*tx+5./128.*x12*x2z*txs-9./128.
     #    *x12*x2zs+1./16.*x2z*tx*x12s-1./64.*x2z*tx*x12c-1./64.*
     #    x2z*x12s*txs-3./128.*x2z*txs+3./128.*x12s*x2zs+1./128.*
     #    x12s*txs-1./128.*x12c*txs+3./64.*x2zs)
      zz10q= zz10q+rwwz(10,11)*bxpi*vvq*yc*(1./32.*o*x12
     #    *x2z*txs-1./64.*o*x12*x2zs+1./64.*o*x2z*tx*x12s-1./64.*
     #    o*tx*x2zc-1./64.*o*tx*x2zs+1./64.*o*x2zc+1./64.*o*x2zs*
     #    txs+1./32.*os*x12*x2z*tx-1./64.*os*x12*x2zs+1./64.*os*
     #    x2z*txs-1./64.*os*x2zc+1./64.*os*x2zs+1./64.*oc*x2z*tx
     #    -1./64.*oc*x2zs-1./64.*x12*tx*x2zs+1./64.*x12*x2zs*txs
     #    +1./64.*x2z*x12s*txs+1./64.*tx*x2zc-1./32.*x2zs*txs)
      zz10q= zz10q+rwwz(10,11)*vvq*yc*bxp*(-1./64.*o*
     #    x12*x2z+1./32.*o*x12*tx-1./64.*o*x12-1./64.*o*x2z*tx+
     #    1./64.*o*x2z-1./64.*o*tx+1./64.*o*x12s+1./32.*o*txs-1.
     #    /64.*os*x2z+1./64.*os*tx+1./64.*os-1./64.*oc-1./64.*
     #    x12*x2z*tx-1./64.*x12*tx+1./32.*x12*txs+1./64.*x2z*tx
     #    +1./64.*tx*x12s-1./32.*txs)
      zz10q= zz10q+rwwz(10,11)*vvq*yc*(-1./32.*o*x12*
     #    x2z*tx+1./32.*o*x12*x2z+1./64.*o*x12*x2zs-1./32.*o*x12*
     #    txs+1./32.*o*x2z*tx-1./64.*o*x2z*x12s-3./64.*o*x2z*txs
     #    -1./64.*o*tx*x12s+1./32.*o*tx*x2zs-1./32.*o*x2zs+1./
     #    64.*os*x12*x2z-1./32.*os*x12*tx-1./64.*os*x2z*tx-1./32.
     #    *os*x2z+1./32.*os*x2zs-1./64.*os*txs+1./32.*oc*x2z-1./
     #    64.*oc*tx+1./32.*x12*x2z*tx-3./64.*x12*x2z*txs+1./64.*
     #    x12*tx*x2zs-1./64.*x2z*tx*x12s+1./16.*x2z*txs-1./32.*tx
     #    *x2zs-1./64.*x12s*txs)
      zz10q= zz10q+rwwz(10,12)*xx*vvq*yc*(1./16.*o*x12*
     #    x2z*txs-1./32.*o*x12*tx*x2zs-1./32.*o*tx*x2zc-1./32.*o*
     #    x2zc+1./32.*o*x2zs*txs+1./32.*os*x2z*txs-1./32.*os*tx*
     #    x2zs-1./16.*x12*tx*x2zs+1./32.*x12*x2zs*txs+1./32.*x2z*
     #    x12s*txs+1./32.*tx*x2zc+1./32.*x2zc-1./16.*x2zs*txs)
      zz10q= zz10q+rwwz(10,12)*bxpi*vvq*yc*(1./16.*o*x12
     #    *x2z*tx-3./32.*o*x12*x2z*txs+1./32.*o*x12*tx*x2zs+1./16.
     #    *o*x12*x2zs+1./16.*o*x12*txs+1./8.*o*x2z*txs+1./32.*o*
     #    tx*x2zc-1./16.*o*tx*x2zs-3./64.*o*x12s*txs-1./32.*o*
     #    x2zs*txs-9./64.*o*x2zs+1./64.*os*x12*x2zs-3./64.*os*x12
     #    *txs-1./32.*os*x2z*tx-3./64.*os*x2z*txs+1./32.*os*tx*
     #    x2zs+1./64.*os*x2zc+1./32.*os*x2zs+1./32.*os*txs+1./
     #    64.*oc*x2zs-1./64.*oc*txs-1./8.*x12*x2z*tx+1./8.*x12*
     #    x2z*txs-1./32.*x12*x2zs*txs-5./64.*x12*x2zs+3./32.*x2z*
     #    tx*x12s-3./64.*x2z*x12s*txs-1./8.*x2z*txs-1./32.*tx*
     #    x2zc+1./16.*tx*x2zs+1./32.*x12s*txs-1./64.*x12c*txs-1.
     #    /64.*x2zc+1./16.*x2zs*txs+3./32.*x2zs)
      zz10q= zz10q+rwwz(10,12)*vvq*yc*bxp*(1./32.+1./
     #    32.*o*x12*x2z+1./8.*o*x12-1./32.*o*x2z-3./64.*o*x12s-
     #    5./64.*o-3./64.*os*x12+1./64.*os*x2z+1./16.*os-1./64.
     #    *oc-1./32.*x12*x2z-5./64.*x12+1./64.*x2z*x12s+1./64.*
     #    x2z+1./16.*x12s-1./64.*x12c)
      zz10q= zz10q+rwwz(10,12)*vvq*yc*(-1./32.*o*x12*
     #    x2z*tx-3./16.*o*x12*x2z-3./32.*o*x12*tx-1./32.*o*x12*
     #    x2zs+1./16.*o*x12*txs+1./32.*o*x2z*tx+1./32.*o*x2z*x12s
     #    +3./16.*o*x2z+1./16.*o*tx*x12s+1./16.*o*x2zs-3./32.*o
     #    *txs+1./32.*os*x12*x2z+1./32.*os*x12*tx-3./32.*os*x2z
     #    -1./32.*os*x2zs+1./32.*os*txs+1./16.*x12*x2z*tx+5./32.
     #    *x12*x2z+1./16.*x12*tx+1./32.*x12*x2zs-3./32.*x12*txs
     #    -1./32.*x2z*tx*x12s-1./32.*x2z*tx-1./16.*x2z*x12s-3./
     #    32.*x2z-3./32.*tx*x12s+1./32.*tx*x12c+1./32.*x12s*txs
     #    -1./32.*x2zs+1./16.*txs)
      zz10q= zz10q+rwwz(10,13)*xx*vvq*yc*(1./32.*o*x12*
     #    x2z*txs-1./32.*o*x2zc+1./32.*o*x2zs*txs+1./64.*os*x2z*
     #    txs+1./64.*os*x2zc-1./32.*x12*tx*x2zs+1./32.*x12*x2zs*
     #    txs+1./64.*x2z*x12s*txs+1./64.*x2zc-1./32.*x2zs*txs)
      zz10q= zz10q+rwwz(10,13)*bxpi*vvq*yc*(3./64.*o*x12
     #    *x2z*tx-5./64.*o*x12*x2z*txs+3./64.*o*x12*x2zs+1./32.*o
     #    *x12*txs+5./64.*o*x2z*txs-3./128.*o*x12s*txs+3./64.*o*
     #    x2zc-1./32.*o*x2zs*txs-13./128.*o*x2zs-3./128.*os*x12*
     #    x2zs-3./128.*os*x12*txs-5./128.*os*x2z*txs-3./128.*os*
     #    x2zc+5./64.*os*x2zs+1./64.*os*txs-3./128.*oc*x2zs-1./
     #    128.*oc*txs-1./16.*x12*x2z*tx+5./64.*x12*x2z*txs+3./64.
     #    *x12*tx*x2zs-1./32.*x12*x2zs*txs-5./128.*x12*x2zs+3./64.
     #    *x2z*tx*x12s-5./128.*x2z*x12s*txs-1./16.*x2z*txs+1./64.
     #    *x12s*txs-1./128.*x12c*txs-3./128.*x2zc+1./32.*x2zs*txs
     #    +3./64.*x2zs)
      zz10q= zz10q+rwwz(10,13)*vvq*yc*bxp*(1./64.-1./
     #    64.*o*x12*x2z+1./16.*o*x12+1./64.*o*x2z-3./128.*o*x12s
     #    -5./128.*o-3./128.*os*x12-1./128.*os*x2z+1./32.*os-
     #    1./128.*oc+1./64.*x12*x2z-5./128.*x12-1./128.*x2z*x12s
     #    -1./128.*x2z+1./32.*x12s-1./128.*x12c)
      zz10q= zz10q+rwwz(10,13)*vvq*yc*(1./64.*o*x12*x2z
     #    *tx-7./64.*o*x12*x2z-3./64.*o*x12*tx+1./64.*o*x12*x2zs
     #    +1./32.*o*x12*txs+1./64.*o*x2z*x12s+7./64.*o*x2z+1./
     #    32.*o*tx*x12s-1./32.*o*x2zs-3./64.*o*txs+3./64.*os*x12*
     #    x2z+1./64.*os*x12*tx-3./32.*os*x2z+1./64.*os*x2zs+1./
     #    64.*os*txs+1./32.*oc*x2z-1./64.*x12*x2z*tx+5./64.*x12*
     #    x2z+1./32.*x12*tx-1./64.*x12*x2zs-3./64.*x12*txs+1./
     #    64.*x2z*tx*x12s-1./32.*x2z*x12s-3./64.*x2z-3./64.*tx*
     #    x12s+1./64.*tx*x12c+1./64.*x12s*txs+1./64.*x2zs+1./32.
     #    *txs)
      zz10q= zz10q+rwwz(10,14)*xx*vvq*yc*(-1./64.*o*
     #    x12*tx*x2zs-1./64.*o*tx*x2zc+1./64.*o*x2zc-1./64.*o*
     #    x2zs*txs-1./64.*os*tx*x2zs-1./64.*os*x2zc-1./64.*x12*
     #    x2zs*txs+1./64.*tx*x2zc)
      zz10q= zz10q+rwwz(10,14)*bxpi*vvq*yc*(-1./32.*o*
     #    x12*x2z*tx+3./64.*o*x12*x2z*txs+1./64.*o*x12*tx*x2zs-3./
     #    128.*o*x12*x2zs+1./128.*o*x2z*tx*x12s-1./32.*o*x2z*txs+
     #    1./128.*o*tx*x2zc-7./128.*o*tx*x2zs-5./128.*o*x2zc+3./
     #    128.*o*x2zs*txs+3./64.*o*x2zs+1./64.*os*x12*x2z*tx+3./
     #    128.*os*x12*x2zs-1./32.*os*x2z*tx+3./128.*os*x2z*txs+1./
     #    64.*os*tx*x2zs+3./128.*os*x2zc-9./128.*os*x2zs+1./128.*
     #    oc*x2z*tx+3./128.*oc*x2zs-1./32.*x12*x2z*txs-7./128.*
     #    x12*tx*x2zs+3./128.*x12*x2zs*txs+3./128.*x2z*x12s*txs-1.
     #    /128.*tx*x2zc+3./64.*tx*x2zs+1./64.*x2zc-1./64.*x2zs*
     #    txs)
      zz10q= zz10q+rwwz(10,14)*vvq*bxps*yc*(-1./64.-
     #    1./32.*o*x12+1./32.*o-1./64.*os+1./32.*x12-1./64.*
     #    x12s)
      zz10q= zz10q+rwwz(10,14)*vvq*yc*bxp*(7./128.*o*x12
     #    *x2z+3./64.*o*x12*tx-3./128.*o*x12-1./128.*o*x2z*tx-
     #    11./128.*o*x2z-3./128.*o*tx+1./128.*o*x12s+1./64.*o*txs
     #    +1./64.*o+1./32.*os*x12+5./128.*os*x2z+1./128.*os*tx
     #    -5./128.*os+3./128.*oc-1./128.*x12*x2z*tx-1./16.*x12*
     #    x2z-7./128.*x12*tx+1./64.*x12*txs+1./128.*x2z*tx+1./
     #    64.*x2z*x12s+3./64.*x2z+5./128.*tx*x12s+1./64.*tx-1./
     #    64.*txs)
      zz10q= zz10q+rwwz(10,14)*vvq*yc*(-3./64.*o*x12*
     #    x2z*tx+3./64.*o*x12*x2z+1./64.*o*x12*tx-3./128.*o*x12*
     #    x2zs-3./64.*o*x12*txs+1./16.*o*x2z*tx-1./128.*o*x2z*
     #    x12s-3./128.*o*x2z*txs-3./64.*o*x2z-1./128.*o*tx*x12s
     #    +1./64.*o*tx*x2zs+5./64.*o*x2zs+1./64.*o*txs-7./128.*
     #    os*x12*x2z-1./64.*os*x12*tx-1./128.*os*x2z*tx+3./32.*os
     #    *x2z+1./64.*os*tx-1./32.*os*x2zs-3./128.*os*txs-3./64.
     #    *oc*x2z-1./128.*oc*tx+7./64.*x12*x2z*tx-3./128.*x12*x2z
     #    *txs+1./128.*x12*tx*x2zs+1./32.*x12*x2zs+1./64.*x12*txs
     #    -5./128.*x2z*tx*x12s-3./64.*x2z*tx+1./32.*x2z*txs-1./
     #    64.*tx*x2zs-3./128.*x12s*txs-3./64.*x2zs)
      zz10q= zz10q+rwwz(11,1)*bxpi*vvq*yc*(-1./8.*o*
     #    x12*x2z*tx+1./8.*o*x2z*tx-1./8.*o*x2z*txs+1./8.*o*tx*
     #    x2zs-1./4.*o*x2zs-1./8.*os*x2z*tx+1./8.*os*x2zs-1./8.
     #    *x12*x2z*tx-1./8.*x12*x2z*txs+1./4.*x2z*txs-1./8.*tx*
     #    x2zs+1./8.*x2zs)
      zz10q= zz10q+rwwz(11,1)*vvq*bxps*yc*(-1./4.+1./
     #    4.*o+1./4.*x12)
      zz10q= zz10q+rwwz(11,1)*vvq*yc*bxp*(1./8.-3./8.*
     #    o*x2z-3./8.*o+1./4.*os-1./8.*x12*x2z-1./2.*x12*tx-1.
     #    /8.*x12-1./4.*x2z*tx+3./8.*x2z+1./4.*tx+1./4.*txs)
      zz10q= zz10q+rwwz(11,1)*vvq*yc*(-1./8.*o*x12*
     #    x2z+1./4.*o*x12*tx-1./4.*o*x2z*tx+5./8.*o*x2z-1./8.*o
     #    *tx+1./8.*o*x2zs+1./4.*o*txs-3./8.*os*x2z+1./4.*os*tx
     #    +1./4.*x12*x2z*tx+1./8.*x12*x2z+1./8.*x12*tx+1./4.*
     #    x12*txs-1./8.*x2z*tx-1./4.*x2z*txs-1./4.*x2z+1./4.*tx
     #    *x2zs-1./8.*x2zs-1./4.*txs)
      zz10q= zz10q+rwwz(12,1)*xx*vvq*yc*(-1./4.*o*x2z
     #    *txs+1./4.*o*tx*x2zs-1./4.*x12*x2z*txs+1./2.*x2z*txs-
     #    1./4.*tx*x2zs)
      zz10q= zz10q+rwwz(12,1)*bxpi*vvq*yc*(1./4.*o*x12*
     #    txs+1./4.*o*x2z*tx+1./4.*o*x2z*txs-1./4.*o*tx*x2zs+1./
     #    4.*o*x2zs-3./4.*o*txs-1./8.*os*x2zs+1./8.*os*txs+1./4.
     #    *x12*x2z*tx+1./4.*x12*x2z*txs-3./4.*x12*txs-1./4.*x2z*
     #    txs+1./8.*x12s*txs-1./8.*x2zs+1./2.*txs)
      zz10q= zz10q+rwwz(12,1)*vvq*yc*bxp*(1./8.+1./8.*
     #    o*x12+1./8.*o*x2z-1./8.*o*tx-1./4.*o+1./8.*os+1./8.
     #    *x12*x2z-1./8.*x12*tx-1./8.*x12-1./8.*x2z+1./8.*tx)
      zz10q= zz10q+rwwz(12,1)*vvq*yc*(1./8.*o*x12*x2z
     #    -1./8.*o*x12*tx-1./4.*o*x2z+1./2.*o*tx-1./8.*o*x2zs
     #    +1./8.*o*txs+1./4.*os*x2z-1./4.*os*tx-1./8.*x12*x2z*
     #    tx-1./8.*x12*x2z+1./4.*x12*tx+1./8.*x12*txs+1./8.*x2z
     #    *tx+1./8.*tx*x12s-1./4.*tx+1./8.*x2zs-1./4.*txs)
      zz10q= zz10q+rwwz(13,1)*xx*vvq*yc*(-1./4.*o*x2z
     #    *txs-1./4.*x12*x2z*txs+1./4.*x2z*txs)
      zz10q= zz10q+rwwz(13,1)*bxpi*vvq*yc*(1./16.*o*x12*
     #    x2z*tx+1./4.*o*x12*txs-3./16.*o*x2z*tx+3./16.*o*x2z*txs
     #    +1./16.*o*tx*x2zs-1./8.*o*x2zs-3./8.*o*txs+1./16.*os*
     #    x2z*tx+1./16.*os*x2zs+1./8.*os*txs-3./16.*x12*x2z*tx+
     #    3./16.*x12*x2z*txs-3./8.*x12*txs+1./8.*x2z*tx-1./8.*x2z
     #    *txs-1./16.*tx*x2zs+1./8.*x12s*txs+1./16.*x2zs+1./4.*
     #    txs)
      zz10q= zz10q+rwwz(13,1)*vvq*yc*bxp*(1./16.-1./16.
     #    *o*x2z-1./16.*o-1./16.*x12*x2z-1./16.*x12+1./16.*x2z
     #    )
      zz10q= zz10q+rwwz(13,1)*vvq*yc*(-1./16.*o*x12*
     #    x2z+5./16.*o*x2z+1./16.*o*tx+1./16.*o*x2zs-3./16.*os*
     #    x2z+1./8.*x12*x2z*tx+1./16.*x12*x2z+3./16.*x12*tx+1./
     #    16.*x2z*tx-1./8.*x2z-1./8.*tx-1./16.*x2zs-1./8.*txs)
      zz10q= zz10q+rwwz(13,4)*xx*vvq*yc*(1./32.*o*x12*
     #    tx*x2zs-1./32.*o*tx*x2zc-1./32.*o*tx*x2zs+1./16.*o*x2zc
     #    +1./32.*o*x2zs*txs+1./32.*os*tx*x2zs-1./32.*os*x2zc+1.
     #    /32.*x12*tx*x2zs+1./32.*x12*x2zs*txs+1./32.*tx*x2zc-1./
     #    32.*x2zc-1./16.*x2zs*txs)
      zz10q= zz10q+rwwz(13,4)*bxpi*vvq*yc*(1./32.*o*x12*
     #    x2z*tx-1./16.*o*x12*x2z*txs-5./64.*o*x12*x2zs-1./32.*o*
     #    x2z*tx*x12s-1./16.*o*x2z*tx+1./8.*o*x2z*txs+1./32.*o*tx
     #    *x2zc-3./64.*o*tx*x2zs-3./64.*o*x2zc-1./32.*o*x2zs*txs
     #    +13./64.*o*x2zs-1./16.*os*x12*x2z*tx+1./32.*os*x12*x2zs
     #    +5./64.*os*x2z*tx-1./32.*os*x2z*txs+1./32.*os*x2zc-9./
     #    64.*os*x2zs-1./32.*oc*x2z*tx+1./32.*oc*x2zs+1./16.*x12*
     #    x2z*tx+1./8.*x12*x2z*txs-3./64.*x12*tx*x2zs-1./32.*x12*
     #    x2zs*txs+5./64.*x12*x2zs-3./64.*x2z*tx*x12s-1./32.*x2z*
     #    x12s*txs-1./8.*x2z*txs-1./32.*tx*x2zc+1./16.*tx*x2zs+
     #    1./64.*x2zc+1./16.*x2zs*txs-3./32.*x2zs)
      zz10q= zz10q+rwwz(13,4)*vvq*yc*bxp*(-1./32.-1./
     #    32.*o*x12*x2z-1./8.*o*x12+1./32.*o*x2z+3./64.*o*x12s+
     #    5./64.*o+3./64.*os*x12-1./64.*os*x2z-1./16.*os+1./64.
     #    *oc+1./32.*x12*x2z+5./64.*x12-1./64.*x2z*x12s-1./64.*
     #    x2z-1./16.*x12s+1./64.*x12c)
      zz10q= zz10q+rwwz(13,4)*vvq*yc*(13./64.*o*x12*x2z
     #    +1./64.*o*x12*x2zs+1./16.*o*x12*txs+3./64.*o*x2z*tx-1.
     #    /64.*o*x2z*x12s-7./32.*o*x2z-1./64.*o*tx*x12s+1./32.*o*
     #    tx-3./64.*o*x2zs-3./32.*o*txs-1./16.*os*x12*x2z+1./64.
     #    *os*x12*tx-1./64.*os*x2z*tx+11./64.*os*x2z-3./64.*os*tx
     #    +1./64.*os*x2zs+1./32.*os*txs-3./64.*oc*x2z+1./64.*oc
     #    *tx+1./64.*x12*x2z*tx-5./32.*x12*x2z-1./32.*x12*tx-1./
     #    32.*x12*x2zs-3./32.*x12*txs+1./64.*x2z*tx*x12s-1./32.*
     #    x2z*tx+1./16.*x2z*x12s+3./32.*x2z+3./64.*tx*x12s-1./
     #    64.*tx*x12c+1./32.*x12s*txs+1./32.*x2zs+1./16.*txs)
      zz10q= zz10q+rwwz(13,11)*bxpi*vvq*yc*(-1./32.*o*
     #    x12*x2z*tx+1./32.*o*x2z*tx-1./32.*o*x2z*txs+1./32.*o*tx
     #    *x2zs-1./16.*o*x2zs-1./32.*os*x2z*tx+1./32.*os*x2zs-1.
     #    /32.*x12*x2z*tx-1./32.*x12*x2z*txs+1./16.*x2z*txs-1./32.
     #    *tx*x2zs+1./32.*x2zs)
      zz10q= zz10q+rwwz(13,11)*vvq*yc*bxp*(1./32.-1./
     #    32.*o*x2z-1./32.*o-1./32.*x12*x2z-1./32.*x12+1./32.*
     #    x2z)
      zz10q= zz10q+rwwz(13,11)*vvq*yc*(1./32.*o*x12*x2z
     #    +3./32.*o*x2z-1./32.*o*tx+1./32.*o*x2zs-1./32.*os*x2z
     #    +1./16.*x12*x2z*tx+1./32.*x12*x2z+1./32.*x12*tx+1./32.
     #    *x2z*tx-1./16.*x2z-1./32.*x2zs-1./16.*txs)
      zz10q= zz10q+rwwz(13,12)*xx*vvq*yc*(-1./16.*o*
     #    x2z*txs+1./16.*o*tx*x2zs-1./16.*x12*x2z*txs+1./8.*x2z*
     #    txs-1./16.*tx*x2zs)
      zz10q= zz10q+rwwz(13,12)*bxpi*vvq*yc*(1./16.*o*x12
     #    *txs+1./32.*o*x2z*tx+1./16.*o*x2z*txs-1./16.*o*tx*x2zs
     #    +1./32.*o*x2zs-1./8.*o*txs-1./32.*os*x2zs+1./32.*os*
     #    txs+1./32.*x12*x2z*tx+1./16.*x12*x2z*txs-1./8.*x12*txs
     #    -1./16.*x2z*tx-1./8.*x2z*txs+1./16.*tx*x2zs+1./32.*
     #    x12s*txs+1./8.*txs)
      zz10q= zz10q+rwwz(13,12)*vvq*yc*(-1./32.*o*x12*
     #    x2z+1./16.*o*x12*tx+1./32.*o*x2z-1./32.*o*tx-1./32.*
     #    os*x2z+1./32.*os*tx-1./32.*x12*tx+1./32.*tx*x12s)
      zz10q= zz10q+rwwz(14,1)*xx*vvq*yc*(1./8.*o*x2z*
     #    txs+1./8.*o*tx*x2zs+1./8.*x12*x2z*txs-1./8.*tx*x2zs)
      zz10q= zz10q+rwwz(14,1)*bxpi*vvq*yc*(-1./8.*o*
     #    x12*x2z*tx-1./8.*o*x12*txs+1./2.*o*x2z*tx-1./8.*o*x2z*
     #    txs-1./8.*o*tx*x2zs+1./8.*o*x2zs+1./8.*o*txs-1./8.*os
     #    *x2z*tx-1./16.*os*x2zs-1./16.*os*txs+1./4.*x12*x2z*tx
     #    -1./8.*x12*x2z*txs+1./8.*x12*txs-1./4.*x2z*tx+1./8.*
     #    x2z*txs-1./16.*x12s*txs-1./16.*x2zs)
      zz10q= zz10q+rwwz(14,1)*vvq*yc*bxp*(-1./16.-1./
     #    16.*o*x12+1./16.*o*x2z-1./16.*o*tx+1./4.*o-3./16.*os
     #    +1./16.*x12*x2z-1./16.*x12*tx+1./16.*x12-1./8.*x2z*tx
     #    -1./16.*x2z+1./16.*tx+1./8.*txs)
      zz10q= zz10q+rwwz(14,1)*vvq*yc*(1./16.*o*x12*x2z
     #    +3./16.*o*x12*tx-3./8.*o*x2z-3./8.*o*tx-1./16.*o*x2zs
     #    +1./16.*o*txs+1./4.*os*x2z+1./8.*os*tx-1./16.*x12*x2z
     #    *tx-1./16.*x12*x2z-1./4.*x12*tx+1./16.*x12*txs+1./16.
     #    *x2z*tx-1./8.*x2z*txs+1./8.*x2z+1./16.*tx*x12s+1./8.*
     #    tx*x2zs+1./8.*tx+1./16.*x2zs-1./8.*txs)
      zz10q= zz10q+rwwz(14,4)*xx*vvq*yc*(-1./32.*o*
     #    x12*tx*x2zs+1./32.*o*tx*x2zc-1./32.*o*x2zc-1./32.*o*
     #    x2zs*txs-1./32.*os*tx*x2zs+1./32.*os*x2zc-1./32.*x12*
     #    x2zs*txs+1./32.*tx*x2zc)
      zz10q= zz10q+rwwz(14,4)*bxpi*vvq*yc*(-1./16.*o*
     #    x12*x2z*tx+1./16.*o*x12*x2z*txs+1./32.*o*x12*x2zs+1./32.
     #    *o*x2z*tx*x12s-1./16.*o*x2z*txs-1./32.*o*tx*x2zc+1./32.
     #    *o*x2zc+1./32.*o*x2zs*txs-3./32.*o*x2zs+1./16.*os*x12*
     #    x2z*tx-1./32.*os*x12*x2zs-1./16.*os*x2z*tx+1./32.*os*
     #    x2z*txs-1./32.*os*x2zc+1./8.*os*x2zs+1./32.*oc*x2z*tx
     #    -1./32.*oc*x2zs-1./16.*x12*x2z*txs-1./16.*x12*tx*x2zs
     #    +1./32.*x12*x2zs*txs+1./32.*x2z*x12s*txs+3./32.*tx*x2zs
     #    -1./32.*x2zs*txs)
      zz10q= zz10q+rwwz(14,4)*vvq*yc*bxp*(1./16.*o*x12*
     #    tx+1./32.*o*x12-1./32.*o*x2z*tx-1./16.*o*tx+1./32.*o*
     #    txs-1./32.*o-1./32.*os*x12+1./32.*os*tx+1./16.*os-1.
     #    /32.*oc-1./32.*x12*x2z*tx-1./16.*x12*tx+1./32.*x12*txs
     #    +1./32.*x2z*tx+1./32.*tx*x12s+1./32.*tx-1./32.*txs)
      zz10q= zz10q+rwwz(14,4)*vvq*yc*(-1./32.*o*x12*
     #    x2z*tx-1./16.*o*x12*x2z+1./32.*o*x12*tx-1./16.*o*x12*
     #    txs+3./32.*o*x2z*tx-1./32.*o*x2z*txs+3./32.*o*x2z-1./
     #    32.*o*tx*x12s+1./32.*o*tx*x2zs+1./32.*o*txs+1./16.*os*
     #    x12*x2z-1./16.*os*x12*tx-5./32.*os*x2z+1./32.*os*tx-1.
     #    /32.*os*txs+1./16.*oc*x2z-1./32.*oc*tx+1./8.*x12*x2z*tx
     #    -1./32.*x12*x2z*txs+1./32.*x12*tx*x2zs+1./32.*x12*txs
     #    -1./32.*x2z*tx*x12s-3./32.*x2z*tx+1./16.*x2z*txs-1./
     #    16.*tx*x2zs-1./32.*x12s*txs)
      zz10q= zz10q+rwwz(14,11)*bxpi*vvq*yc*(1./32.*o*x12
     #    *x2z*tx+1./32.*o*x2z*txs-1./32.*o*tx*x2zs+1./32.*o*x2zs
     #    +1./32.*os*x2z*tx-1./32.*os*x2zs+1./32.*x12*x2z*txs-1.
     #    /32.*tx*x2zs)
      zz10q= zz10q+rwwz(14,11)*vvq*yc*bxp*(1./32.*o*x12
     #    +1./32.*o*tx+1./32.*o-1./32.*os+1./32.*x12*tx-1./16.
     #    *x2z*tx-1./32.*tx+1./16.*txs)
      zz10q= zz10q+rwwz(14,11)*vvq*yc*(-1./32.*o*x12*
     #    x2z-1./32.*o*x12*tx-1./16.*o*x2z-1./32.*o*txs+1./16.*
     #    os*x2z-1./32.*os*tx-1./32.*x12*x2z*tx-1./32.*x12*txs+
     #    1./16.*x2z*tx-1./16.*x2z*txs+1./16.*tx*x2zs)
      zz10q= zz10q+rwwz(14,12)*xx*vvq*yc*(1./16.*o*x2z*
     #    txs-1./16.*o*tx*x2zs+1./16.*x12*x2z*txs-1./16.*tx*x2zs
     #    )
      zz10q= zz10q+rwwz(14,12)*bxpi*vvq*yc*(-1./16.*o*
     #    x12*txs-1./16.*o*x2z*txs+1./16.*o*tx*x2zs+1./16.*o*txs
     #    +1./32.*os*x2zs-1./32.*os*txs+1./8.*x12*x2z*tx-1./16.
     #    *x12*x2z*txs+1./16.*x12*txs-1./8.*x2z*tx+1./16.*x2z*txs
     #    -1./32.*x12s*txs-1./32.*x2zs)
      zz10q= zz10q+rwwz(14,12)*vvq*yc*bxp*(-1./32.-1.
     #    /32.*o*x12+1./32.*o*x2z-1./32.*o*tx+1./16.*o-1./32.*
     #    os+1./32.*x12*x2z-1./32.*x12*tx+1./32.*x12-1./32.*x2z
     #    +1./32.*tx)
      zz10q= zz10q+rwwz(14,12)*vvq*yc*(1./32.*o*x12*x2z
     #    +1./32.*o*x12*tx-1./16.*o*x2z-1./16.*o*tx-1./32.*o*
     #    x2zs+1./32.*o*txs-1./32.*x12*x2z*tx-1./32.*x12*x2z-1./
     #    8.*x12*tx+1./32.*x12*txs+1./32.*x2z*tx+1./16.*x2z+1./
     #    32.*tx*x12s+1./16.*tx+1./32.*x2zs-1./16.*txs)

      zz20q= rwwz(1,1)*xx*vvq*yc*(-3./2.*o*x2z*txs-3./2.*
     #    x12*x2z*txs+3./2.*x2z*txs)
      zz20q= zz20q+rwwz(1,1)*bxpi*vvq*yc*(1./4.*o*x12*
     #    x2z*tx+3./2.*o*x12*txs-9./4.*o*x2z*tx+3./4.*o*x2z*txs
     #    -1./4.*o*tx*x12s+1./2.*o*tx*x2zs-3*o*txs-1./2.*os*x12
     #    *tx+1./4.*os*x2z*tx+3./4.*os*txs-1./4.*oc*tx-3./4.*
     #    x12*x2z*tx+3./4.*x12*x2z*txs-3*x12*txs+3./2.*x2z*tx-3.
     #    /4.*tx*x2zs+3./4.*x12s*txs+3./2.*txs)
      zz20q= zz20q+rwwz(1,1)*vvq*bxps*yc*(-1./4.+1./
     #    4.*o+1./4.*x12)
      zz20q= zz20q+rwwz(1,1)*vvq*yc*bxp*(1./4.+1./4.*o
     #    *x12-1./4.*o*x2z-1./4.*o*tx-3./4.*o+1./2.*os-3./4.*
     #    x12*tx-1./4.*x12-1./4.*x2z*tx+1./4.*x2z+1./2.*tx+1./
     #    4.*txs)
      zz20q= zz20q+rwwz(1,1)*vvq*yc*(-3./2.*o*x12*tx
     #    -3./4.*o*x2z*tx+1./2.*o*x2z+15./4.*o*tx+3./2.*o*txs
     #    -1./4.*os*x2z-os*tx-1./4.*x12*x2z*tx+9./4.*x12*tx+3.
     #    /2.*x12*txs+1./4.*x2z*tx-1./4.*x2z*txs-1./4.*x2z-1./2.
     #    *tx*x12s+1./4.*tx*x2zs-3./2.*tx-3./2.*txs)
      zz20q= zz20q+rwwz(2,2)*xx*vvq*yc*(3./8.*x2z*txs
     #    -3./8.*tx*x2zs)
      zz20q= zz20q+rwwz(2,2)*bxpi*vvq*yc*(3./8.*o*x2z*tx
     #    -3./8.*o*txs+3./8.*x12*x2z*tx-3./8.*x12*txs-3./8.*x2z
     #    *tx+3./8.*txs)
      zz20q= zz20q+rwwz(2,2)*vvq*bxps*yc*(-1./16.+1./
     #    16.*o+1./16.*x12)
      zz20q= zz20q+rwwz(2,2)*vvq*yc*bxp*(1./16.-1./16.
     #    *o*x2z-1./8.*o+1./16.*os-1./8.*x12*tx-1./16.*x12-1./
     #    16.*x2z*tx+1./16.*x2z+1./16.*tx+1./16.*txs)
      zz20q= zz20q+rwwz(2,2)*vvq*yc*(1./16.*o*x12*tx-
     #    5./16.*o*x2z*tx+1./16.*o*x2z+5./16.*o*txs-1./4.*x12*x2z
     #    *tx+5./16.*x12*txs+5./16.*x2z*tx-1./16.*x2z*txs-1./16.
     #    *x2z+1./16.*tx*x12s+1./16.*tx*x2zs-3./8.*txs)
      zz20q= zz20q+rwwz(2,3)*xx*vvq*yc*(-3./4.*x2z*
     #    txs+3./4.*tx*x2zs)
      zz20q= zz20q+rwwz(2,3)*bxpi*vvq*yc*(-3./8.*o*x2z
     #    *tx-3./8.*o*x2zs+3./4.*o*txs-9./8.*x12*x2z*tx+3./4.*
     #    x12*txs+3./4.*x2z*tx+3./4.*x2z*txs-3./4.*tx*x2zs+3./8.
     #    *x2zs-3./4.*txs)
      zz20q= zz20q+rwwz(2,3)*vvq*bxps*yc*(-1./8.+1./
     #    8.*o+1./8.*x12)
      zz20q= zz20q+rwwz(2,3)*vvq*yc*bxp*(1./4.+3./8.*o
     #    *x12-1./4.*o*x2z+1./8.*o*tx-1./2.*o+1./4.*os-1./8.*
     #    x12*x2z-1./8.*x12*tx-1./2.*x12-1./8.*x2z*tx+1./4.*x2z
     #    +1./4.*x12s+1./8.*txs)
      zz20q= zz20q+rwwz(2,3)*vvq*yc*(-1./4.*o*x12*x2z
     #    -1./8.*o*x2z*tx+o*x2z-3./8.*o*tx+1./8.*o*x2zs-3./8.
     #    *os*x2z+3./8.*os*tx+1./8.*x12*x2z*tx+5./8.*x12*x2z+3./
     #    8.*x12*tx-1./8.*x2z*txs-5./8.*x2z-3./8.*tx*x12s+1./8.
     #    *tx*x2zs-1./8.*x2zs)
      zz20q= zz20q+rwwz(3,3)*xx*vvq*yc*(3./8.*x2z*txs
     #    -3./8.*tx*x2zs)
      zz20q= zz20q+rwwz(3,3)*bxpi*vvq*yc*(-1./4.*o*x12
     #    *x2z+1./4.*o*x2z*tx+1./8.*o*x2zs-3./8.*o*txs+1./2.*
     #    x12*x2z*tx-3./8.*x12*txs-3./8.*x2z*tx-1./2.*x2z*txs+1.
     #    /2.*tx*x2zs-1./8.*x2zs+3./8.*txs)
      zz20q= zz20q+rwwz(3,3)*vvq*bxps*yc*(-1./16.+1./
     #    16.*o+1./16.*x12)
      zz20q= zz20q+rwwz(3,3)*vvq*yc*bxp*(-1./16.-1./
     #    8.*o*x12-3./16.*o*x2z+1./8.*o*tx+1./8.*o-1./16.*os-
     #    1./8.*x12*x2z+1./16.*x12-1./16.*x2z*tx+3./16.*x2z-1./
     #    16.*tx+1./16.*txs)
      zz20q= zz20q+rwwz(3,3)*vvq*yc*(1./4.*o*x12*x2z-
     #    1./16.*o*x12*tx+1./4.*o*x12-1./16.*o*x2z*tx-5./16.*o*
     #    x2z+1./8.*o*tx-1./4.*o*x12s+1./8.*o*x2zs-1./16.*o*txs
     #    -1./4.*os*x12+1./8.*os*x2z-1./8.*os*tx+1./8.*x12*x2z*
     #    tx-1./8.*x12*x2z-1./8.*x12*tx-1./16.*x12*txs-1./16.*
     #    x2z*tx-1./16.*x2z*txs+3./16.*x2z+1./16.*tx*x12s+1./16.
     #    *tx*x2zs-1./8.*x2zs+1./8.*txs)
      zz20q= zz20q+rwwz(4,1)*xx*vvq*yc*(3./8.*o*x12*tx*
     #    x2zs-3./8.*o*tx*x2zc-3./8.*o*tx*x2zs+3./4.*o*x2zc+3./
     #    8.*o*x2zs*txs+3./8.*os*tx*x2zs-3./8.*os*x2zc+3./8.*x12*
     #    tx*x2zs+3./8.*x12*x2zs*txs+3./8.*tx*x2zc-3./8.*x2zc-3.
     #    /4.*x2zs*txs)
      zz20q= zz20q+rwwz(4,1)*bxpi*vvq*yc*(5./8.*o*x12*
     #    x2z*tx-1./2.*o*x12*x2z*txs-1./16.*o*x12*tx*x2zs-19./16.
     #    *o*x12*x2zs-5./16.*o*x2z*tx*x12s-3./4.*o*x2z*tx+1./16.*
     #    o*x2z*x12s+15./8.*o*x2z*txs+1./16.*o*tx*x12c+5./16.*o*
     #    tx*x2zc-17./16.*o*tx*x2zs+3./16.*o*x12s*txs-1./2.*o*
     #    x2zc-5./16.*o*x2zs*txs+45./16.*o*x2zs-5./8.*os*x12*x2z*
     #    tx+1./8.*os*x12*x2z+1./4.*os*x12*x2zs+3./16.*os*x12*txs
     #    +5./4.*os*x2z*tx-1./16.*os*x2z*x12s-1./4.*os*x2z*txs+
     #    3./16.*os*tx*x12s-1./16.*os*tx*x2zs+5./16.*os*x2zc-31./
     #    16.*os*x2zs-1./8.*oc*x12*x2z+3./16.*oc*x12*tx-5./16.*oc
     #    *x2z*tx+1./16.*oc*x2z+1./4.*oc*x2zs+1./16.*oc*txs-1./
     #    16.*oq*x2z+1./16.*oq*tx+3./4.*x12*x2z*tx+15./8.*x12*x2z
     #    *txs-11./16.*x12*tx*x2zs-5./16.*x12*x2zs*txs+15./16.*
     #    x12*x2zs-5./8.*x2z*tx*x12s-1./4.*x2z*x12s*txs-3./2.*x2z
     #    *txs-1./16.*tx*x2zc+3./8.*tx*x2zs+1./16.*x12c*txs+3./
     #    16.*x2zc)
      zz20q= zz20q+rwwz(4,1)*bxpi*vvq*yc*(3./8.*x2zs*txs
     #    -9./8.*x2zs)
      zz20q= zz20q+rwwz(4,1)*vvq*bxps*yc*(1./8.+1./4.*
     #    o*x12-1./4.*o+1./8.*os-1./4.*x12+1./8.*x12s)
      zz20q= zz20q+rwwz(4,1)*vvq*yc*bxp*(-3./8.-1./2.
     #    *o*x12*x2z-1./4.*o*x12*tx-15./8.*o*x12-1./8.*o*x2z*tx
     #    +3./4.*o*x2z+3./8.*o*tx+9./16.*o*x12s+1./8.*o*txs+
     #    21./16.*o+11./16.*os*x12-5./16.*os*x2z-5./4.*os+5./16.
     #    *oc-1./8.*x12*x2z*tx+5./8.*x12*x2z+5./8.*x12*tx+1./8.
     #    *x12*txs+15./16.*x12+1./8.*x2z*tx-3./16.*x2z*x12s-7./
     #    16.*x2z-1./4.*tx*x12s-3./8.*tx-3./4.*x12s+3./16.*x12c
     #    -1./8.*txs)
      zz20q= zz20q+rwwz(4,1)*vvq*yc*(-3./8.*o*x12*x2z
     #    *tx+49./16.*o*x12*x2z-1./4.*o*x12*tx+1./4.*o*x12*x2zs
     #    +o*x12*txs+11./16.*o*x2z*tx-7./16.*o*x2z*x12s-3./8.*o
     #    *x2z*txs-27./8.*o*x2z-1./4.*o*tx*x12s+5./16.*o*tx*x2zs
     #    +3./8.*o*tx-1./16.*o*x12s+1./16.*o*x12c-3./4.*o*x2zs
     #    -3./2.*o*txs-os*x12*x2z+1./4.*os*x12*tx-1./8.*os*x12
     #    -7./16.*os*x2z*tx+45./16.*os*x2z-7./8.*os*tx+3./16.*
     #    os*x12s+1./4.*os*x2zs+1./2.*os*txs+3./16.*oc*x12-9./
     #    16.*oc*x2z+1./4.*oc*tx-1./16.*oc+1./16.*oq-5./16.*x12
     #    *x2z*tx-3./8.*x12*x2z*txs-15./8.*x12*x2z+5./16.*x12*tx*
     #    x2zs-3./8.*x12*tx-3./8.*x12*x2zs-3./2.*x12*txs+1./16.
     #    *x2z*tx*x12s+3./8.*x2z*tx+3./4.*x2z*x12s+1./2.*x2z*txs
     #    +9./8.*x2z+5./8.*tx*x12s-1./4.*tx*x12c-7./16.*tx*x2zs
     #    +1./2.*x12s*txs+1./2.*x2zs+3./4.*txs)
      zz20q= zz20q+rwwz(4,4)*xx*vvq*yc*(-3./32.*o*x12
     #    *x2zc+3./32.*o*tx*x2zc-3./32.*o*x2zq-3./32.*x12*tx*x2zc
     #    -3./32.*tx*x2zq+3./32.*x2zq+3./32.*x2zc*txs)
      zz20q= zz20q+rwwz(4,4)*bxpi*vvq*yc*(1./32.*o*x12*
     #    x2z*txs-1./32.*o*x12*tx*x2zs+15./64.*o*x12*x2zc-1./4.*o
     #    *x12*x2zs-1./64.*o*x2z*tx*x12s-1./64.*o*x2z*x12c+5./64.
     #    *o*tx*x2zc+9./32.*o*tx*x2zs+9./64.*o*x12s*x2zs+5./64.*o
     #    *x2zq-17./32.*o*x2zc-5./32.*o*x2zs*txs+1./64.*os*x12*
     #    x2z*tx+1./8.*os*x12*x2zs-1./32.*os*x2z*x12s+1./64.*os*
     #    x2z*txs-11./64.*os*tx*x2zs+5./32.*os*x2zc+1./64.*os*
     #    x2zs-1./64.*oc*x12*x2z+1./64.*oc*x2z*tx-1./64.*oc*x2zs
     #    +15./64.*x12*tx*x2zc-9./32.*x12*tx*x2zs-1./4.*x12*x2zc
     #    -5./32.*x12*x2zs*txs-1./64.*x2z*tx*x12c+1./64.*x2z*x12s
     #    *txs+9./64.*tx*x12s*x2zs+5./64.*tx*x2zq-9./32.*tx*x2zc
     #    +1./64.*x12s*x2zs-5./64.*x2zq-5./64.*x2zc*txs+3./8.*
     #    x2zc+9./32.*x2zs*txs)
      zz20q= zz20q+rwwz(4,4)*vvq*bxps*yc*(-3./32.-5./
     #    16.*o*x12+3./32.*o*x12s+7./32.*o+3./32.*os*x12-5./32.
     #    *os+1./32.*oc+7./32.*x12-5./32.*x12s+1./32.*x12c)
      zz20q= zz20q+rwwz(4,4)*vvq*yc*bxp*(-1./16.*o*x12
     #    *x2z*tx+7./8.*o*x12*x2z+1./32.*o*x12*x2zs+1./16.*o*x12*
     #    txs-1./16.*o*x12+1./8.*o*x2z*tx-7./32.*o*x2z*x12s-25./
     #    32.*o*x2z-1./32.*o*tx*x12s+3./32.*o*tx+1./32.*o*x12s+
     #    1./32.*o*x12c-1./32.*o*x2zs-1./8.*o*txs-1./4.*os*x12*
     #    x2z+1./32.*os*x12*tx+1./32.*os*x12-1./32.*os*x2z*tx+1.
     #    /2.*os*x2z-1./8.*os*tx+1./32.*os*x12s+1./64.*os*x2zs+
     #    1./32.*os*txs+1./64.*os+1./32.*oc*x12-3./32.*oc*x2z+1.
     #    /32.*oc*tx-1./32.*oc+1./64.*oq+1./8.*x12*x2z*tx-11./
     #    16.*x12*x2z-3./32.*x12*tx+1./64.*x12*x12c-1./32.*x12*
     #    x2zs-1./8.*x12*txs-1./32.*x2z*tx*x12s-3./32.*x2z*tx+3.
     #    /8.*x2z*x12s-1./16.*x2z*x12c+3./8.*x2z+1./8.*tx*x12s-
     #    1./32.*tx*x12c+1./64.*x12s*x2zs+1./32.*x12s*txs+1./64.*
     #    x12s-1./32.*x12c+1./64.*x2zs+3./32.*txs)
      zz20q= zz20q+rwwz(4,4)*vvq*yc*(1./32.*o*x12*x2z*
     #    tx-1./8.*o*x12*x2z*txs+7./32.*o*x12*x2z+1./8.*o*x12*tx*
     #    x2zs-1./64.*o*x12*x12c-1./64.*o*x12*x2zc-45./64.*o*x12*
     #    x2zs-1./32.*o*x12*txs+1./64.*o*x2z*tx*x12s-9./32.*o*x2z
     #    *tx-11./64.*o*x2z*x12s+3./64.*o*x2z*x12c+9./32.*o*x2z*
     #    txs+1./64.*o*tx*x12s-1./32.*o*tx*x12c-1./64.*o*tx*x2zc
     #    -19./64.*o*tx*x2zs+3./64.*o*x12s*x2zs+3./64.*o*x12s*txs
     #    +1./64.*o*x12c+3./64.*o*x2zc+1./64.*o*x2zs*txs+o*x2zs
     #    -7./64.*os*x12*x2z*tx-5./32.*os*x12*x2z-1./64.*os*x12*
     #    tx+7./64.*os*x12*x2zs+3./64.*os*x12*txs+19./64.*os*x2z*
     #    tx+5./64.*os*x2z*x12s-1./16.*os*x2z*txs-1./32.*os*x2z
     #    +5./64.*os*tx*x2zs+1./32.*os*x12s-3./64.*os*x12c-1./
     #    64.*os*x2zc-1./2.*os*x2zs-1./64.*os*txs+1./64.*oc*x12*
     #    x2z+1./32.*oc*x12*tx+1./64.*oc*x12-5./64.*oc*x2z*tx+3.
     #    /64.*oc*x2z-1./64.*oc*tx-3./64.*oc*x12s+1./16.*oc*x2zs
     #    +1./64.*oc*txs)
      zz20q= zz20q+rwwz(4,4)*vvq*yc*(-1./64.*oq*x12
     #    -1./64.*oq*x2z+1./64.*oq*tx+9./32.*x12*x2z*tx+9./32.*
     #    x12*x2z*txs-1./64.*x12*tx*x12c-1./64.*x12*tx*x2zc-17./
     #    64.*x12*tx*x2zs+1./32.*x12*x2zc+1./64.*x12*x2zs*txs+23./
     #    32.*x12*x2zs-17./64.*x2z*tx*x12s+3./64.*x2z*tx*x12c-1./
     #    16.*x2z*x12s*txs-1./32.*x2z*x12s+1./32.*x2z*x12c-9./32.
     #    *x2z*txs+3./64.*tx*x12s*x2zs+1./64.*tx*x12c+1./64.*tx*
     #    x2zc+9./32.*tx*x2zs-7./32.*x12s*x2zs-1./64.*x12s*txs+
     #    1./64.*x12c*txs-1./32.*x2zc-1./64.*x2zs*txs-9./16.*x2zs
     #    )
      zz20q= zz20q+rwwz(4,11)*bxpi*vvq*yc*(1./16.*o*x12*
     #    x2zs-1./16.*o*x2z*x12s+1./16.*o*x2z*txs-3./16.*o*tx*
     #    x2zs+1./8.*o*x2zc+1./16.*o*x2zs-1./16.*os*x12*x2z+1./
     #    16.*os*x2z*tx-1./16.*os*x2zs+1./16.*x12*x2z*txs+1./16.*
     #    x12*tx*x2zs+1./16.*x12*x2zs-1./16.*x2z*tx*x12s+1./8.*tx
     #    *x2zc-1./8.*x2zc-1./8.*x2zs*txs)
      zz20q= zz20q+rwwz(4,11)*vvq*bxps*yc*(1./16.+1./8.
     #    *o*x12-1./8.*o+1./16.*os-1./8.*x12+1./16.*x12s)
      zz20q= zz20q+rwwz(4,11)*vvq*yc*bxp*(-5./16.*o*
     #    x12*x2z-3./16.*o*x12-1./16.*o*x2z*tx+7./16.*o*x2z-1./
     #    16.*o*tx+1./8.*o*x12s+1./16.*o*txs+1./16.*o+1./8.*os*
     #    x12-3./16.*os*x2z+1./16.*os*tx-1./8.*os+1./16.*oc-1.
     #    /16.*x12*x2z*tx+3./8.*x12*x2z+1./16.*x12*tx+1./16.*x12*
     #    txs+1./16.*x12+1./16.*x2z*tx-1./8.*x2z*x12s-1./4.*x2z
     #    -1./16.*tx*x12s-1./8.*x12s+1./16.*x12c-1./16.*txs)
      zz20q= zz20q+rwwz(4,11)*vvq*yc*(-1./8.*o*x12*
     #    x2z*tx+1./8.*o*x12*x2z+1./8.*o*x12*x2zs+1./8.*o*x12*txs
     #    +1./4.*o*x2z*tx+1./16.*o*x2z*x12s-1./8.*o*x2z*txs-1./
     #    8.*o*x2z-1./16.*o*tx*x12s+1./8.*o*tx*x2zs+1./16.*o*x12s
     #    -1./16.*o*x12c-7./16.*o*x2zs-1./16.*o*txs+1./16.*os*
     #    x12*tx+1./16.*os*x12-3./16.*os*x2z*tx+3./16.*os*x2z-1.
     #    /16.*os*tx-1./8.*os*x12s+1./8.*os*x2zs+1./16.*os*txs-
     #    1./16.*oc*x12-1./16.*oc*x2z+1./16.*oc*tx-1./8.*x12*x2z*
     #    tx-1./8.*x12*x2z*txs-1./8.*x12*x2z+1./8.*x12*tx*x2zs-
     #    1./4.*x12*x2zs-1./16.*x12*txs+1./16.*x2z*tx*x12s+1./8.*
     #    x2z*x12s+3./16.*x2z*txs+1./16.*tx*x12s-1./16.*tx*x12c
     #    -3./16.*tx*x2zs+1./16.*x12s*txs+5./16.*x2zs)
      zz20q= zz20q+rwwz(4,12)*xx*vvq*yc*(-3./16.*o*tx
     #    *x2zs+3./16.*o*x2zc+3./16.*x12*tx*x2zs+3./8.*tx*x2zc-
     #    3./16.*x2zc-3./8.*x2zs*txs)
      zz20q= zz20q+rwwz(4,12)*bxpi*vvq*yc*(-11./32.*o*
     #    x12*x2zs-3./8.*o*x2z*tx+1./16.*o*x2z*x12s+1./2.*o*x2z*
     #    txs-9./32.*o*tx*x2zs-7./32.*o*x2zc+25./32.*o*x2zs+1./
     #    16.*os*x12*x2z+7./32.*os*x2z*tx-7./32.*os*x2zs+3./8.*
     #    x12*x2z*tx+1./2.*x12*x2z*txs-23./32.*x12*tx*x2zs+13./32.
     #    *x12*x2zs-7./32.*x2z*tx*x12s-3./4.*x2z*txs-5./16.*tx*
     #    x2zc+3./4.*tx*x2zs+7./32.*x2zc+5./16.*x2zs*txs-9./16.
     #    *x2zs)
      zz20q= zz20q+rwwz(4,12)*vvq*yc*bxp*(-3./16.+1./
     #    16.*o*x12*x2z-1./2.*o*x12-1./16.*o*x2z+3./32.*o*x12s+
     #    13./32.*o+3./32.*os*x12+1./32.*os*x2z-1./4.*os+1./32.
     #    *oc-1./16.*x12*x2z+13./32.*x12+1./32.*x2z*x12s+1./32.
     #    *x2z-1./4.*x12s+1./32.*x12c)
      zz20q= zz20q+rwwz(4,12)*vvq*yc*(-1./4.*o*x12*
     #    x2z*tx+27./32.*o*x12*x2z-1./32.*o*x12*x2zs+1./4.*o*x12*
     #    txs+15./32.*o*x2z*tx-5./32.*o*x2z*x12s-1./16.*o*x2z*txs
     #    -o*x2z-1./32.*o*tx*x12s+1./16.*o*tx*x2zs+3./16.*o*tx
     #    -1./16.*o*x12s+1./16.*o*x12c+3./32.*o*x2zs-1./2.*o*
     #    txs-3./16.*os*x12*x2z+1./32.*os*x12*tx-1./16.*os*x12-
     #    3./32.*os*x2z*tx+15./32.*os*x2z-7./32.*os*tx+1./8.*os*
     #    x12s-1./32.*os*x2zs+1./8.*os*txs+1./16.*oc*x12-1./32.
     #    *oc*x2z+1./32.*oc*tx+17./32.*x12*x2z*tx-1./16.*x12*x2z*
     #    txs-13./16.*x12*x2z+1./16.*x12*tx*x2zs-3./16.*x12*tx+
     #    1./16.*x12*x2zs-1./2.*x12*txs-5./32.*x2z*tx*x12s-3./8.*
     #    x2z*tx+1./4.*x2z*x12s+1./16.*x2z*txs+9./16.*x2z+7./32.
     #    *tx*x12s-1./32.*tx*x12c-1./16.*tx*x2zs+1./8.*x12s*txs
     #    -1./16.*x2zs+3./8.*txs)
      zz20q= zz20q+rwwz(5,5)*xx*vvq*yc*(3./32.*x2z*txs
     #    -3./32.*tx*x2zs)
      zz20q= zz20q+rwwz(5,5)*bxpi*vvq*yc*(3./32.*x12*x2z
     #    *tx-3./16.*x2z*tx+3./32.*txs)
      zz20q= zz20q+rwwz(5,5)*vvq*bxps*yc*(1./64.-1./64.
     #    *o-1./64.*x12)
      zz20q= zz20q+rwwz(5,5)*vvq*yc*bxp*(-1./64.+1./
     #    64.*o*x2z+1./64.*os+3./32.*x12*tx+1./64.*x12-1./64.*
     #    x2z*tx-1./64.*x2z-5./64.*tx+1./64.*txs)
      zz20q= zz20q+rwwz(5,5)*vvq*yc*(1./64.*o*x12*tx+
     #    1./64.*o*x2z*tx-1./64.*o*x2z-1./64.*o*txs-1./16.*x12*
     #    x2z*tx-1./8.*x12*tx-1./64.*x12*txs+11./64.*x2z*tx-1./
     #    64.*x2z*txs+1./64.*x2z+1./64.*tx*x12s+1./64.*tx*x2zs+
     #    3./32.*tx-3./32.*txs)
      zz20q= zz20q+rwwz(5,6)*xx*vvq*yc*(-3./16.*o*x2z
     #    *txs+3./16.*o*tx*x2zs-3./16.*x12*x2z*txs+3./16.*x2z*txs
     #    )
      zz20q= zz20q+rwwz(5,6)*bxpi*vvq*yc*(-3./32.*o*
     #    x12*x2z*tx+3./16.*o*x12*txs+3./8.*o*x2z*tx+3./32.*o*x2z
     #    *txs-3./32.*o*tx*x2zs-3./32.*o*x2zs-3./16.*o*txs-3./
     #    32.*os*x2z*tx+3./32.*os*txs-3./16.*x12*x2z*tx+3./32.*
     #    x12*x2z*txs-3./16.*x12*txs-3./16.*x2z*txs+3./32.*tx*
     #    x2zs+3./32.*x12s*txs+3./32.*x2zs+3./16.*txs)
      zz20q= zz20q+rwwz(5,6)*vvq*bxps*yc*(-1./32.+1./
     #    32.*o+1./32.*x12)
      zz20q= zz20q+rwwz(5,6)*vvq*yc*bxp*(1./16.+1./16.
     #    *o*x12-1./16.*o*x2z+1./16.*o*tx-1./32.*o-1./32.*os-
     #    1./32.*x12*x2z-1./8.*x12*tx-1./8.*x12+1./32.*x2z*tx+1.
     #    /16.*x2z+3./32.*tx+1./16.*x12s-1./32.*txs)
      zz20q= zz20q+rwwz(5,6)*vvq*yc*(-1./16.*o*x12*
     #    x2z-1./32.*o*x12*tx-5./32.*o*x2z*tx+3./32.*o*x2z-3./
     #    16.*o*tx+1./32.*o*x2zs+3./32.*o*txs+1./16.*os*x2z+3./
     #    32.*os*tx+1./8.*x12*x2z*tx+5./32.*x12*x2z+1./8.*x12*tx
     #    +3./32.*x12*txs-3./16.*x2z*tx+1./32.*x2z*txs-5./32.*
     #    x2z-1./8.*tx*x12s-1./32.*tx*x2zs-1./32.*x2zs)
      zz20q= zz20q+rwwz(6,6)*xx*vvq*yc*(-3./16.*o*x2z
     #    *txs-3./16.*o*tx*x2zs-3./16.*x12*x2z*txs+3./32.*x2z*txs
     #    +3./32.*tx*x2zs)
      zz20q= zz20q+rwwz(6,6)*bxpi*vvq*yc*(3./32.*o*x12*
     #    x2z*tx+1./16.*o*x12*txs-3./8.*o*x2z*tx+7./32.*o*x2z*txs
     #    +3./32.*o*tx*x2zs-5./32.*o*x2zs-3./16.*o*txs-1./16.*
     #    os*x12*x2z+3./32.*os*x2z*tx+1./16.*os*x2z+1./8.*os*x2zs
     #    +1./32.*os*txs-1./16.*oc*x2z-5./32.*x12*x2z*tx+7./32.
     #    *x12*x2z*txs-3./16.*x12*txs+3./16.*x2z*tx-1./8.*x2z*txs
     #    -3./32.*tx*x2zs+1./32.*x12s*txs+1./32.*x2zs+3./32.*
     #    txs)
      zz20q= zz20q+rwwz(6,6)*vvq*bxps*yc*(1./64.-1./64.
     #    *o-1./64.*x12)
      zz20q= zz20q+rwwz(6,6)*vvq*yc*bxp*(1./64.+1./16.
     #    *o*x12+3./64.*o*x2z-1./16.*o*tx-3./32.*o+5./64.*os+
     #    1./32.*x12*x2z+1./32.*x12*tx-1./64.*x12-1./64.*x2z*tx
     #    -3./64.*x2z-1./64.*tx+1./64.*txs)
      zz20q= zz20q+rwwz(6,6)*vvq*yc*(-1./16.*o*x12*
     #    x2z-7./64.*o*x12*tx+9./64.*o*x2z*tx+15./64.*o*x2z+3./
     #    16.*o*tx-1./32.*o*x2zs-1./64.*o*txs+1./16.*os*x12-3./
     #    16.*os*x2z-3./32.*os*tx-1./16.*os+1./16.*oc-1./16.*
     #    x12*x2z*tx+1./32.*x12*x2z+1./8.*x12*tx-1./64.*x12*txs
     #    +1./64.*x2z*tx-1./64.*x2z*txs-3./64.*x2z-1./64.*tx*
     #    x12s+1./64.*tx*x2zs-3./32.*tx+1./32.*x2zs+1./32.*txs
     #    )
      zz20q= zz20q+rwwz(7,1)*xx*vvq*yc*(-3./8.*o*x12*
     #    x2z*txs+3./8.*o*x2zc-3./8.*o*x2zs*txs-3./16.*os*x2z*txs
     #    -3./16.*os*x2zc+3./8.*x12*tx*x2zs-3./8.*x12*x2zs*txs-
     #    3./16.*x2z*x12s*txs-3./16.*x2zc+3./8.*x2zs*txs)
      zz20q= zz20q+rwwz(7,1)*bxpi*vvq*yc*(-9./16.*o*
     #    x12*x2z*tx+5./8.*o*x12*x2z*txs-1./16.*o*x12*x2z+3./32.*
     #    o*x12*tx*x2zs-19./32.*o*x12*x2zs-1./4.*o*x12*txs-1./16.
     #    *o*x2z*tx+1./32.*o*x2z*x12s-17./16.*o*x2z*txs+1./16.*o*
     #    tx*x12s-1./32.*o*tx*x12c+1./16.*o*tx*x2zc-5./32.*o*tx*
     #    x2zs+3./16.*o*x12s*txs-1./4.*o*x2zc+1./4.*o*x2zs*txs+
     #    43./32.*o*x2zs+1./8.*os*x12*x2z+1./8.*os*x12*tx+1./8.*
     #    os*x12*x2zs+3./16.*os*x12*txs-1./32.*os*x2z*tx-1./32.*
     #    os*x2z*x12s+5./16.*os*x2z*txs-1./16.*os*x2z-3./32.*os*
     #    tx*x12s+3./32.*os*tx*x2zs+5./32.*os*x2zc-29./32.*os*
     #    x2zs-1./8.*os*txs-1./16.*oc*x12*x2z-3./32.*oc*x12*tx+
     #    3./32.*oc*x2z+1./16.*oc*tx+1./8.*oc*x2zs+1./16.*oc*txs
     #    -1./32.*oq*x2z-1./32.*oq*tx+11./16.*x12*x2z*tx-17./16.
     #    *x12*x2z*txs-7./32.*x12*tx*x2zs+1./4.*x12*x2zs*txs+15./
     #    32.*x12*x2zs-17./32.*x2z*tx*x12s+5./16.*x2z*x12s*txs+3./
     #    4.*x2z*txs)
      zz20q= zz20q+rwwz(7,1)*bxpi*vvq*yc*(-1./16.*tx*
     #    x2zc+1./8.*tx*x2zs-1./8.*x12s*txs+1./16.*x12c*txs+3./
     #    32.*x2zc-3./16.*x2zs*txs-9./16.*x2zs)
      zz20q= zz20q+rwwz(7,1)*vvq*yc*bxp*(-3./16.-5./
     #    32.*o*x12*x2z+1./16.*o*x12*tx-27./32.*o*x12+1./32.*o*
     #    x2z*tx+5./32.*o*x2z-3./32.*o*tx+5./16.*o*x12s-1./16.*
     #    o*txs+17./32.*o+13./32.*os*x12-1./16.*os*x2z+1./32.*
     #    os*tx-17./32.*os+3./16.*oc+1./32.*x12*x2z*tx+3./16.*
     #    x12*x2z-3./32.*x12*tx-1./16.*x12*txs+15./32.*x12-1./
     #    32.*x2z*tx-3./32.*x2z*x12s-3./32.*x2z+1./32.*tx*x12s+
     #    1./16.*tx-3./8.*x12s+3./32.*x12c+1./16.*txs)
      zz20q= zz20q+rwwz(7,1)*vvq*yc*(1./16.*o*x12*x2z*
     #    tx+3./2.*o*x12*x2z+7./16.*o*x12*tx+1./8.*o*x12*x2zs-7.
     #    /16.*o*x12*txs+1./16.*o*x12+1./4.*o*x2z*tx-7./32.*o*x2z
     #    *x12s+7./32.*o*x2z*txs-3./2.*o*x2z-5./16.*o*tx*x12s-3.
     #    /32.*o*tx*x2zs+1./16.*o*tx-3./32.*o*x12s+1./32.*o*x12c
     #    -9./32.*o*x2zs+5./8.*o*txs-17./32.*os*x12*x2z-5./32.*
     #    os*x12*tx-3./16.*os*x12-3./32.*os*x2z*tx+5./4.*os*x2z
     #    -1./32.*os*tx+3./32.*os*x12s+3./32.*os*x2zs-7./32.*os
     #    *txs+1./16.*os+3./32.*oc*x12-5./16.*oc*x2z-3./32.*oc
     #    +1./32.*oq+7./32.*x12*x2z*txs-15./16.*x12*x2z-1./16.*
     #    x12*tx*x2zs-5./16.*x12*tx-3./16.*x12*x2zs+5./8.*x12*txs
     #    +5./32.*x2z*tx*x12s-3./16.*x2z*tx+3./8.*x2z*x12s-1./4.
     #    *x2z*txs+9./16.*x2z+15./32.*tx*x12s-5./32.*tx*x12c+3./
     #    32.*tx*x2zs-7./32.*x12s*txs+3./16.*x2zs-3./8.*txs)
      zz20q= zz20q+rwwz(7,4)*xx*vvq*yc*(-3./64.*o*x12
     #    *x2zc+3./32.*o*x12*x2zs*txs+3./64.*o*tx*x12s*x2zs-3./64.
     #    *o*tx*x2zq-3./64.*o*tx*x2zc+3./64.*o*x2zq+3./64.*o*x2zc
     #    *txs+3./32.*os*x12*tx*x2zs-3./64.*os*x12*x2zc-3./64.*os
     #    *x2zq+3./64.*os*x2zc+3./64.*os*x2zs*txs+3./64.*oc*tx*
     #    x2zs-3./64.*oc*x2zc-3./64.*x12*tx*x2zc+3./64.*x12*x2zc*
     #    txs+3./64.*tx*x2zq+3./64.*x12s*x2zs*txs-3./32.*x2zc*txs
     #    )
      zz20q= zz20q+rwwz(7,4)*bxpi*vvq*yc*(-1./128.*o*
     #    oq*x2z+1./128.*o*oq*tx+1./32.*o*x12*x2z*tx+3./32.*o*x12
     #    *x2z*txs+1./128.*o*x12*tx*x12c+1./32.*o*x12*tx*x2zc+3./
     #    16.*o*x12*tx*x2zs-5./128.*o*x12*x2zc-9./64.*o*x12*x2zs*
     #    txs-9./64.*o*x12*x2zs+7./128.*o*x2z*tx*x12s-1./32.*o*
     #    x2z*tx*x12c-9./128.*o*x2z*x12s*txs+1./64.*o*x2z*x12s-1./
     #    128.*o*x2z*x12c+1./32.*o*x2z*txs-3./64.*o*tx*x12s*x2zs-
     #    1./64.*o*tx*x12c+5./128.*o*tx*x2zq-15./128.*o*tx*x2zc-9.
     #    /64.*o*tx*x2zs+11./128.*o*x12s*x2zs-3./64.*o*x12s*txs+1.
     #    /32.*o*x12c*txs-5./128.*o*x2zq-5./128.*o*x2zc*txs+1./8.
     #    *o*x2zc+15./64.*o*x2zs*txs+17./128.*os*x12*x2z*tx-9./
     #    128.*os*x12*x2z*txs-3./32.*os*x12*tx*x2zs+9./128.*os*x12*
     #    x2zc-3./64.*os*x12*x2zs-3./64.*os*x12*txs-3./32.*os*x2z
     #    *tx*x12s+1./64.*os*x2z*tx+1./128.*os*x2z*x12s-1./128.*
     #    os*x2z*x12c+3./64.*os*x2z*txs-3./64.*os*tx*x12s+1./32.*
     #    os*tx*x12c)
      zz20q= zz20q+rwwz(7,4)*bxpi*vvq*yc*(1./32.*os*tx*
     #    x2zc+13./128.*os*tx*x2zs+3./128.*os*x12s*x2zs+3./64.*os
     #    *x12s*txs+5./128.*os*x2zq-25./128.*os*x2zc-9./128.*os*
     #    x2zs*txs+7./64.*os*x2zs-3./32.*oc*x12*x2z*tx+5./128.*oc
     #    *x12*x2z-3./64.*oc*x12*tx+3./64.*oc*x12*x2zs+1./32.*oc*
     #    x12*txs+9./128.*oc*x2z*tx-3./128.*oc*x2z*x12s-3./128.*
     #    oc*x2z*txs-1./64.*oc*x2z+3./64.*oc*tx*x12s-3./64.*oc*tx
     #    *x2zs+9./128.*oc*x2zc-17./128.*oc*x2zs-1./64.*oc*txs-
     #    3./128.*oq*x12*x2z+1./32.*oq*x12*tx-1./32.*oq*x2z*tx+3./
     #    128.*oq*x2z-1./64.*oq*tx+3./128.*oq*x2zs+1./128.*oq*txs
     #    +1./32.*x12*x2z*txs-5./128.*x12*tx*x2zc-9./64.*x12*tx*
     #    x2zs+1./128.*x12*x12c*txs-5./128.*x12*x2zc*txs+15./64.*
     #    x12*x2zs*txs+1./64.*x2z*tx*x12s-1./128.*x2z*tx*x12c+3./
     #    64.*x2z*x12s*txs-3./128.*x2z*x12c*txs+11./128.*tx*x12s*
     #    x2zs-5./128.*tx*x2zq+1./8.*tx*x2zc-9./128.*x12s*x2zs*
     #    txs)
      zz20q= zz20q+rwwz(7,4)*bxpi*vvq*yc*(-1./64.*x12c
     #    *txs+5./64.*x2zc*txs-1./4.*x2zs*txs)
      zz20q= zz20q+rwwz(7,4)*vvq*yc*bxp*(1./32.*o*x12*
     #    x2z*tx-1./32.*o*x12*x2z+1./16.*o*x12*tx-1./16.*o*x12*
     #    txs-1./64.*o*x12-1./32.*o*x2z*tx+1./64.*o*x2z*x12s+1./
     #    64.*o*x2z-3./64.*o*tx*x12s-1./64.*o*tx+1./32.*o*x12s-
     #    1./64.*o*x12c+1./16.*o*txs+1./32.*os*x12*x2z-3./64.*os*
     #    x12*tx+1./64.*os*x2z*tx-1./32.*os*x2z+1./32.*os*tx-1./
     #    64.*os*x12s-1./32.*os*txs+1./64.*os+1./64.*oc*x12+1./
     #    64.*oc*x2z-1./64.*oc*tx-1./32.*oc+1./64.*oq-1./32.*
     #    x12*x2z*tx-1./64.*x12*tx+1./16.*x12*txs+1./64.*x2z*tx*
     #    x12s+1./64.*x2z*tx+1./32.*tx*x12s-1./64.*tx*x12c-1./
     #    32.*x12s*txs-1./32.*txs)
      zz20q= zz20q+rwwz(7,4)*vvq*yc*(1./128.*o*oq-19./
     #    64.*o*x12*x2z*tx+5./32.*o*x12*x2z*txs+7./64.*o*x12*x2z-
     #    3./32.*o*x12*tx*x2zs-1./32.*o*x12*tx-1./128.*o*x12*x12c
     #    +1./128.*o*x12*x2zc+17./128.*o*x12*x2zs+1./16.*o*x12*
     #    txs+15./128.*o*x2z*tx*x12s+7./64.*o*x2z*tx-19./128.*o*
     #    x2z*x12s+5./128.*o*x2z*x12c-17./64.*o*x2z*txs+7./128.*o
     #    *tx*x12s-1./64.*o*tx*x12c+1./128.*o*tx*x2zc+19./128.*o*
     #    tx*x2zs-5./128.*o*x12s*x2zs-1./64.*o*x12s+3./128.*o*
     #    x12c-1./128.*o*x2zc-1./64.*o*x2zs*txs-3./32.*o*x2zs-1.
     #    /32.*o*txs+15./128.*os*x12*x2z*tx-1./32.*os*x12*x2z+5./
     #    128.*os*x12*tx-5./64.*os*x12*x2zs-19./128.*os*x2z*tx+5./
     #    128.*os*x2z*x12s+5./64.*os*x2z*txs-5./64.*os*x2z-7./128.
     #    *os*tx*x2zs-1./64.*os*tx+3./128.*os*x12s-1./64.*os*x12c
     #    +1./128.*os*x2zc+17./128.*os*x2zs+1./32.*os*txs-5./
     #    128.*oc*x12*x2z+1./64.*oc*x12*tx-3./128.*oc*x12+5./128.
     #    *oc*x2z*tx)
      zz20q= zz20q+rwwz(7,4)*vvq*yc*(15./128.*oc*x2z+
     #    1./128.*oc*tx-5./128.*oc*x2zs+1./64.*oc+1./64.*oq*x12
     #    -5./128.*oq*x2z+1./128.*oq*tx-3./128.*oq+7./64.*x12*
     #    x2z*tx-17./64.*x12*x2z*txs-1./128.*x12*tx*x12c+1./128.*
     #    x12*tx*x2zc+17./128.*x12*tx*x2zs-1./64.*x12*x2zs*txs-1./
     #    32.*x12*txs-19./128.*x2z*tx*x12s+5./128.*x2z*tx*x12c+5./
     #    64.*x2z*x12s*txs+3./16.*x2z*txs-5./128.*tx*x12s*x2zs-1./
     #    64.*tx*x12s+3./128.*tx*x12c-1./128.*tx*x2zc-3./32.*tx*
     #    x2zs+1./32.*x12s*txs+1./64.*x2zs*txs)
      zz20q= zz20q+rwwz(7,7)*xx*vvq*yc*(-3./64.*o*x12
     #    *x2zs*txs+3./64.*o*x2zq-3./128.*o*x2zc*txs-3./128.*os*
     #    x12*x2zc-3./128.*os*x2zq+3./128.*os*x2zc-3./128.*os*
     #    x2zs*txs-3./128.*oc*x2zc+3./64.*x12*tx*x2zc-3./128.*x12
     #    *x2zc*txs-3./128.*x12s*x2zs*txs-3./128.*x2zq+3./128.*
     #    x2zc*txs)
      zz20q= zz20q+rwwz(7,7)*bxpi*vvq*yc*(-1./256.*o*
     #    oq*x2z-1./32.*o*x12*x2z*tx-3./128.*o*x12*x2z*txs-5./64.
     #    *o*x12*tx*x2zs-5./64.*o*x12*x2zc+9./128.*o*x12*x2zs*txs
     #    -5./128.*o*x12*x2zs-1./32.*o*x12*txs+1./64.*o*x2z*tx*
     #    x12s+9./256.*o*x2z*x12s*txs-1./32.*o*x2z*txs+1./128.*o*
     #    x12s*x2zs+3./64.*o*x12s*txs-1./64.*o*x12c*txs-5./128.*o
     #    *x2zq+5./256.*o*x2zc*txs+11./64.*o*x2zc-9./128.*o*x2zs*
     #    txs+3./64.*o*x2zs+1./128.*os*x12*x2z*tx+9./256.*os*x12*
     #    x2z*txs-1./32.*os*x12*x2z+9./256.*os*x12*x2zc-5./128.*
     #    os*x12*x2zs+3./64.*os*x12*txs+5./256.*os*x2z*x12s-1./
     #    256.*os*x2z*x12c-3./256.*os*x2z*txs+1./64.*os*x2z+3./
     #    256.*os*x12s*x2zs-3./128.*os*x12s*txs+5./256.*os*x2zq-
     #    33./256.*os*x2zc+9./256.*os*x2zs*txs+1./256.*os*x2zs-1./
     #    64.*os*txs+5./128.*oc*x12*x2z+3./128.*oc*x12*x2zs-1./64.
     #    *oc*x12*txs-3./256.*oc*x2z*x12s+3./256.*oc*x2z*txs-1./
     #    32.*oc*x2z)
      zz20q= zz20q+rwwz(7,7)*bxpi*vvq*yc*(9./256.*oc*
     #    x2zc-3./64.*oc*x2zs+1./64.*oc*txs-3./256.*oq*x12*x2z+
     #    5./256.*oq*x2z+3./256.*oq*x2zs-1./256.*oq*txs+1./32.*
     #    x12*x2z*tx-1./32.*x12*x2z*txs-5./128.*x12*tx*x2zc+7./64.
     #    *x12*tx*x2zs-1./256.*x12*x12c*txs+5./256.*x12*x2zc*txs+
     #    1./16.*x12*x2zc-9./128.*x12*x2zs*txs+1./64.*x12*x2zs-1./
     #    32.*x2z*tx*x12s+1./128.*x2z*tx*x12c-3./256.*x2z*x12s*txs
     #    +3./256.*x2z*x12c*txs+1./64.*x2z*txs-5./64.*tx*x12s*
     #    x2zs+9./256.*x12s*x2zs*txs-1./256.*x12s*x2zs-1./64.*
     #    x12s*txs+1./64.*x12c*txs+5./256.*x2zq-5./256.*x2zc*txs
     #    -5./64.*x2zc+7./128.*x2zs*txs-1./64.*x2zs)
      zz20q= zz20q+rwwz(7,7)*vvq*bxps*yc*(1./128.+3./
     #    64.*o*x12-3./128.*o*x12s-3./128.*o-3./128.*os*x12+3./
     #    128.*os-1./128.*oc-3./128.*x12+3./128.*x12s-1./128.*
     #    x12c)
      zz20q= zz20q+rwwz(7,7)*vvq*yc*bxp*(-1./64.-3./
     #    16.*o*x12*x2z-1./32.*o*x12*tx-1./128.*o*x12*x2zs+1./64.
     #    *o*x12*txs-13./128.*o*x12+1./16.*o*x2z*x12s+1./8.*o*x2z
     #    +1./32.*o*tx*x12s+9./128.*o*x12s-1./64.*o*x12c+1./128.
     #    *o*x2zs-1./64.*o*txs+3./64.*o+5./64.*os*x12*x2z+1./64.
     #    *os*x12*tx+7./128.*os*x12-7./64.*os*x2z-1./64.*os*x12s
     #    -1./256.*os*x2zs+1./128.*os*txs-11./256.*os+1./32.*oc
     #    *x2z+1./128.*oc+1./256.*oq+7./64.*x12*x2z+1./64.*x12*
     #    tx-1./256.*x12*x12c+1./128.*x12*x2zs-1./64.*x12*txs+3.
     #    /64.*x12-5./64.*x2z*x12s+1./64.*x2z*x12c-3./64.*x2z-1.
     #    /32.*tx*x12s+1./64.*tx*x12c-1./256.*x12s*x2zs+1./128.*
     #    x12s*txs-13./256.*x12s+3./128.*x12c-1./256.*x2zs+1./
     #    128.*txs)
      zz20q= zz20q+rwwz(7,7)*vvq*yc*(1./256.*o*oq+7./
     #    64.*o*x12*x2z*tx-3./64.*o*x12*x2z*txs+9./64.*o*x12*x2z+
     #    1./128.*o*x12*tx*x2zs+1./16.*o*x12*tx+1./128.*o*x12*x2zc
     #    +7./32.*o*x12*x2zs-3./128.*o*x12*txs-1./16.*o*x2z*tx*
     #    x12s-1./16.*o*x2z*x12s+1./128.*o*x2z*x12c+1./16.*o*x2z*
     #    txs-3./32.*o*x2z-5./64.*o*tx*x12s+3./128.*o*tx*x12c-1.
     #    /32.*o*x12s*x2zs-3./256.*o*x12s*txs-1./64.*o*x2zc+1./
     #    256.*o*x2zs*txs-29./128.*o*x2zs+1./32.*o*txs-1./32.*os*
     #    x12*x2z*tx-5./128.*os*x12*x2z-5./128.*os*x12*tx-17./256.
     #    *os*x12*x2zs-3./256.*os*x12*txs+1./32.*os*x12-3./128.*
     #    os*x2z*txs+1./16.*os*x2z+3./128.*os*tx*x12s-5./256.*os*
     #    x12s+1./256.*os*x12c+1./128.*os*x2zc+43./256.*os*x2zs
     #    -3./256.*os*txs-1./64.*os-3./128.*oc*x12*x2z+1./128.*
     #    oc*x12*tx-5./128.*oc*x12+1./64.*oc*x2z+3./256.*oc*x12s
     #    -9./256.*oc*x2zs-1./256.*oc*txs+1./32.*oc+3./256.*oq*
     #    x12)
      zz20q= zz20q+rwwz(7,7)*vvq*yc*(-1./64.*oq*x2z
     #    -5./256.*oq-5./64.*x12*x2z*tx+1./16.*x12*x2z*txs-1./
     #    16.*x12*x2z+1./128.*x12*tx*x12c-1./128.*x12*tx*x2zs-1./
     #    32.*x12*tx-1./128.*x12*x2zc+1./256.*x12*x2zs*txs-19./
     #    128.*x12*x2zs+1./32.*x12*txs+7./64.*x2z*tx*x12s-1./32.*
     #    x2z*tx*x12c-3./128.*x2z*x12s*txs+5./128.*x2z*x12s-1./
     #    128.*x2z*x12c-5./128.*x2z*txs+1./32.*x2z+1./128.*tx*
     #    x12s*x2zs+1./16.*tx*x12s-5./128.*tx*x12c+7./128.*x12s*
     #    x2zs-3./256.*x12s*txs-1./256.*x12c*txs+1./128.*x2zc-1.
     #    /256.*x2zs*txs+3./32.*x2zs-1./64.*txs)
      zz20q= zz20q+rwwz(7,11)*bxpi*vvq*yc*(-1./32.*o*
     #    x12*x2z*tx-1./32.*o*x12*x2z*txs+1./32.*o*x12*x2z-1./64.
     #    *o*x12*tx*x2zs+3./64.*o*x12*x2zs-1./16.*o*x12*txs-1./32.
     #    *o*x2z*tx*x12s+1./32.*o*x2z*tx-1./64.*o*x2z*x12s-1./16.
     #    *o*x2z*txs-1./32.*o*tx*x12s+1./64.*o*tx*x12c+1./32.*o*
     #    tx*x2zc+5./64.*o*tx*x2zs+3./64.*o*x12s*txs-1./32.*o*
     #    x2zc-1./32.*o*x2zs*txs-1./32.*o*x2zs-1./16.*os*x12*x2z*
     #    tx+1./32.*os*x12*x2z-1./16.*os*x12*tx+1./64.*os*x12*
     #    x2zs+3./64.*os*x12*txs-1./64.*os*x2z*tx-1./64.*os*x2z*
     #    x12s-1./64.*os*x2z*txs-1./32.*os*x2z+3./64.*os*tx*x12s
     #    -1./64.*os*tx*x2zs+1./32.*os*x2zc+1./64.*os*x2zs-1./
     #    32.*os*txs-1./32.*oc*x12*x2z+3./64.*oc*x12*tx-1./32.*oc
     #    *x2z*tx+3./64.*oc*x2z-1./32.*oc*tx+1./64.*oc*x2zs+1./
     #    64.*oc*txs-1./64.*oq*x2z+1./64.*oq*tx+1./32.*x12*x2z*tx
     #    -1./16.*x12*x2z*txs+3./64.*x12*tx*x2zs-1./32.*x12*x2zs*
     #    txs)
      zz20q= zz20q+rwwz(7,11)*bxpi*vvq*yc*(-1./64.*x2z
     #    *tx*x12s-1./64.*x2z*x12s*txs+1./16.*x2z*txs-1./32.*tx*
     #    x2zc-1./32.*tx*x2zs-1./32.*x12s*txs+1./64.*x12c*txs+1.
     #    /16.*x2zs*txs)
      zz20q= zz20q+rwwz(7,11)*vvq*yc*bxp*(1./64.*o*x12*
     #    x2z-1./32.*o*x12*tx+1./64.*o*x12+1./64.*o*x2z*tx-1./
     #    64.*o*x2z+1./64.*o*tx-1./64.*o*x12s-1./32.*o*txs+1./
     #    64.*os*x2z-1./64.*os*tx-1./64.*os+1./64.*oc+1./64.*
     #    x12*x2z*tx+1./64.*x12*tx-1./32.*x12*txs-1./64.*x2z*tx
     #    -1./64.*tx*x12s+1./32.*txs)
      zz20q= zz20q+rwwz(7,11)*vvq*yc*(3./32.*o*x12*x2z*
     #    tx-3./32.*o*x12*x2z+3./32.*o*x12*tx-1./32.*o*x12*x2zs
     #    -1./32.*o*x12*txs-1./32.*o*x12-3./32.*o*x2z*tx+3./64.
     #    *o*x2z*x12s+5./64.*o*x2z*txs+1./32.*o*x2z-1./32.*o*tx*
     #    x12s-3./64.*o*tx*x2zs-1./32.*o*tx+3./64.*o*x12s-1./64.
     #    *o*x12c+3./64.*o*x2zs+3./32.*o*txs+1./64.*os*x12*x2z-
     #    1./64.*os*x12*tx+3./64.*os*x2z*tx+3./64.*os*tx-1./64.*
     #    os*x12s-3./64.*os*x2zs-1./64.*os*txs+1./32.*os+1./64.
     #    *oc*x12-1./32.*oc*x2z-3./64.*oc+1./64.*oq-3./32.*x12*
     #    x2z*tx+5./64.*x12*x2z*txs-1./32.*x12*tx*x2zs-1./32.*x12
     #    *tx+3./32.*x12*txs+3./64.*x2z*tx*x12s+1./32.*x2z*tx-3.
     #    /32.*x2z*txs+3./64.*tx*x12s-1./64.*tx*x12c+3./64.*tx*
     #    x2zs-1./64.*x12s*txs-1./16.*txs)
      zz20q= zz20q+rwwz(7,12)*xx*vvq*yc*(-3./16.*o*
     #    x12*x2z*txs+3./32.*o*x12*tx*x2zs+3./32.*o*tx*x2zc+3./32.
     #    *o*x2zc-3./32.*o*x2zs*txs-3./32.*os*x2z*txs+3./32.*os*
     #    tx*x2zs+3./16.*x12*tx*x2zs-3./32.*x12*x2zs*txs-3./32.*
     #    x2z*x12s*txs-3./32.*tx*x2zc-3./32.*x2zc+3./16.*x2zs*txs
     #    )
      zz20q= zz20q+rwwz(7,12)*bxpi*vvq*yc*(-5./32.*o*
     #    x12*x2z*tx+7./32.*o*x12*x2z*txs-1./32.*o*x12*x2z-5./64.
     #    *o*x12*tx*x2zs-3./16.*o*x12*x2zs-1./8.*o*x12*txs-1./64.
     #    *o*x2z*tx*x12s-1./32.*o*x2z*tx+1./64.*o*x2z*x12s-5./16.
     #    *o*x2z*txs+1./32.*o*tx*x12s-1./64.*o*tx*x12c-5./64.*o*
     #    tx*x2zc+5./32.*o*tx*x2zs+3./32.*o*x12s*txs-1./64.*o*
     #    x2zc+5./64.*o*x2zs*txs+29./64.*o*x2zs-1./32.*os*x12*x2z
     #    *tx-1./32.*os*x12*x2z+1./16.*os*x12*tx-1./64.*os*x12*
     #    x2zs+3./32.*os*x12*txs+7./64.*os*x2z*tx+1./64.*os*x2z*
     #    x12s+7./64.*os*x2z*txs+1./32.*os*x2z-3./64.*os*tx*x12s
     #    -5./64.*os*tx*x2zs-1./32.*os*x2zc-5./32.*os*x2zs-1./
     #    16.*os*txs+1./32.*oc*x12*x2z-3./64.*oc*x12*tx-1./64.*oc
     #    *x2z*tx-3./64.*oc*x2z+1./32.*oc*tx-1./64.*oc*x2zs+1./
     #    32.*oc*txs+1./64.*oq*x2z-1./64.*oq*tx+11./32.*x12*x2z*
     #    tx-5./16.*x12*x2z*txs+5./64.*x12*x2zs*txs+15./64.*x12*
     #    x2zs)
      zz20q= zz20q+rwwz(7,12)*bxpi*vvq*yc*(-17./64.*
     #    x2z*tx*x12s+7./64.*x2z*x12s*txs+5./16.*x2z*txs+5./64.*
     #    tx*x2zc-5./32.*tx*x2zs-1./16.*x12s*txs+1./32.*x12c*txs
     #    +3./64.*x2zc-5./32.*x2zs*txs-9./32.*x2zs)
      zz20q= zz20q+rwwz(7,12)*vvq*yc*bxp*(-3./32.-3./
     #    32.*o*x12*x2z-3./8.*o*x12+3./32.*o*x2z+9./64.*o*x12s+
     #    15./64.*o+9./64.*os*x12-3./64.*os*x2z-3./16.*os+3./64.
     #    *oc+3./32.*x12*x2z+15./64.*x12-3./64.*x2z*x12s-3./64.
     #    *x2z-3./16.*x12s+3./64.*x12c)
      zz20q= zz20q+rwwz(7,12)*vvq*yc*(3./32.*o*x12*x2z*
     #    tx+19./32.*o*x12*x2z+3./16.*o*x12*tx+5./64.*o*x12*x2zs
     #    -1./8.*o*x12*txs+1./32.*o*x12-1./16.*o*x2z*tx-3./32.*
     #    o*x2z*x12s+1./32.*o*x2z*txs-19./32.*o*x2z-9./64.*o*tx*
     #    x12s-1./64.*o*tx*x2zs+1./32.*o*tx-3./64.*o*x12s+1./64.
     #    *o*x12c-11./64.*o*x2zs+3./16.*o*txs-1./8.*os*x12*x2z-
     #    3./64.*os*x12*tx+11./32.*os*x2z-3./64.*os*tx+1./64.*os*
     #    x12s+5./64.*os*x2zs-1./16.*os*txs-1./32.*os-1./64.*oc
     #    *x12-1./32.*oc*x2z+1./64.*oc*tx+3./64.*oc-1./64.*oq
     #    -5./32.*x12*x2z*tx+1./32.*x12*x2z*txs-15./32.*x12*x2z
     #    -1./64.*x12*tx*x2zs-5./32.*x12*tx-3./32.*x12*x2zs+3./
     #    16.*x12*txs+3./32.*x2z*tx*x12s+1./16.*x2z*tx+3./16.*x2z
     #    *x12s-1./32.*x2z*txs+9./32.*x2z+15./64.*tx*x12s-5./64.
     #    *tx*x12c+1./64.*tx*x2zs-1./16.*x12s*txs+3./32.*x2zs-1.
     #    /8.*txs)
      zz20q= zz20q+rwwz(7,13)*xx*vvq*yc*(-3./32.*o*
     #    x12*x2z*txs+3./32.*o*x2zc-3./32.*o*x2zs*txs-3./64.*os*
     #    x2z*txs-3./64.*os*x2zc+3./32.*x12*tx*x2zs-3./32.*x12*
     #    x2zs*txs-3./64.*x2z*x12s*txs-3./64.*x2zc+3./32.*x2zs*
     #    txs)
      zz20q= zz20q+rwwz(7,13)*bxpi*vvq*yc*(-7./64.*o*
     #    x12*x2z*tx+11./64.*o*x12*x2z*txs-7./64.*o*x12*x2zs-1./
     #    32.*o*x12*txs-3./16.*o*x2z*txs+3./128.*o*x12s*txs-7./64.
     #    *o*x2zc+5./64.*o*x2zs*txs+29./128.*o*x2zs+3./64.*os*x12
     #    *x2z+5./128.*os*x12*x2zs+3./128.*os*x12*txs-1./64.*os*
     #    x2z*x12s+11./128.*os*x2z*txs-1./32.*os*x2z+7./128.*os*
     #    x2zc-5./32.*os*x2zs-1./64.*os*txs-1./32.*oc*x12*x2z+3.
     #    /64.*oc*x2z+5./128.*oc*x2zs+1./128.*oc*txs-1./64.*oq*
     #    x2z+1./8.*x12*x2z*tx-3./16.*x12*x2z*txs-7./64.*x12*tx*
     #    x2zs+5./64.*x12*x2zs*txs+13./128.*x12*x2zs-7./64.*x2z*
     #    tx*x12s+11./128.*x2z*x12s*txs+5./32.*x2z*txs-1./64.*
     #    x12s*txs+1./128.*x12c*txs+7./128.*x2zc-5./64.*x2zs*txs
     #    -7./64.*x2zs)
      zz20q= zz20q+rwwz(7,13)*vvq*yc*bxp*(-1./64.+1./
     #    64.*o*x12*x2z-1./16.*o*x12-1./64.*o*x2z+3./128.*o*x12s
     #    +5./128.*o+3./128.*os*x12+1./128.*os*x2z-1./32.*os+
     #    1./128.*oc-1./64.*x12*x2z+5./128.*x12+1./128.*x2z*x12s
     #    +1./128.*x2z-1./32.*x12s+1./128.*x12c)
      zz20q= zz20q+rwwz(7,13)*vvq*yc*(-1./64.*o*x12*
     #    x2z*tx+11./64.*o*x12*x2z+3./64.*o*x12*tx-1./64.*o*x12*
     #    x2zs-1./16.*o*x12*txs-1./64.*o*x2z*x12s+1./64.*o*x2z*
     #    txs-11./64.*o*x2z-1./32.*o*tx*x12s+1./32.*o*x2zs+3./
     #    32.*o*txs-1./16.*os*x12*x2z-1./64.*os*x12*tx-3./64.*os*
     #    x12+9./64.*os*x2z+1./64.*os*x12s-1./64.*os*x2zs-1./32.
     #    *os*txs+1./32.*os+1./32.*oc*x12-3./64.*oc*x2z-3./64.*
     #    oc+1./64.*oq+1./64.*x12*x2z*tx+1./64.*x12*x2z*txs-9./
     #    64.*x12*x2z-1./32.*x12*tx+1./64.*x12*x2zs+3./32.*x12*
     #    txs-1./64.*x2z*tx*x12s+1./16.*x2z*x12s-1./64.*x2z*txs
     #    +5./64.*x2z+3./64.*tx*x12s-1./64.*tx*x12c-1./32.*x12s
     #    *txs-1./64.*x2zs-1./16.*txs)
      zz20q= zz20q+rwwz(7,14)*xx*vvq*yc*(3./64.*o*x12*
     #    tx*x2zs+3./64.*o*tx*x2zc-3./64.*o*x2zc+3./64.*o*x2zs*
     #    txs+3./64.*os*tx*x2zs+3./64.*os*x2zc+3./64.*x12*x2zs*
     #    txs-3./64.*tx*x2zc)
      zz20q= zz20q+rwwz(7,14)*bxpi*vvq*yc*(1./16.*o*x12*
     #    x2z*tx-5./64.*o*x12*x2z*txs-3./64.*o*x12*tx*x2zs+5./128.
     #    *o*x12*x2zs-1./16.*o*x12*txs-3./128.*o*x2z*tx*x12s+3./
     #    64.*o*x2z*txs-3./128.*o*tx*x2zc+21./128.*o*tx*x2zs+3./
     #    64.*o*x12s*txs+11./128.*o*x2zc-7./128.*o*x2zs*txs-1./16.
     #    *o*x2zs-3./64.*os*x12*x2z*tx-3./64.*os*x12*x2z-5./128.*
     #    os*x12*x2zs+3./64.*os*x12*txs+3./32.*os*x2z*tx+1./64.*
     #    os*x2z*x12s-5./128.*os*x2z*txs+1./32.*os*x2z-3./64.*os*
     #    tx*x2zs-7./128.*os*x2zc+17./128.*os*x2zs-1./32.*os*txs
     #    +1./32.*oc*x12*x2z-3./128.*oc*x2z*tx-3./64.*oc*x2z-5./
     #    128.*oc*x2zs+1./64.*oc*txs+1./64.*oq*x2z+1./16.*x12*x2z
     #    *tx+3./64.*x12*x2z*txs+17./128.*x12*tx*x2zs-7./128.*x12
     #    *x2zs*txs+1./64.*x12*x2zs-1./32.*x2z*tx*x12s-5./128.*
     #    x2z*x12s*txs+1./32.*x2z*txs+3./128.*tx*x2zc-9./64.*tx*
     #    x2zs-1./32.*x12s*txs+1./64.*x12c*txs-1./32.*x2zc+1./
     #    32.*x2zs*txs)
      zz20q= zz20q+rwwz(7,14)*bxpi*vvq*yc*(-1./32.*
     #    x2zs)
      zz20q= zz20q+rwwz(7,14)*vvq*bxps*yc*(1./64.+1./
     #    32.*o*x12-1./32.*o+1./64.*os-1./32.*x12+1./64.*x12s)
      zz20q= zz20q+rwwz(7,14)*vvq*yc*bxp*(-1./32.-9./
     #    128.*o*x12*x2z-5./64.*o*x12*tx-7./128.*o*x12+3./128.*o*
     #    x2z*tx+13./128.*o*x2z+9./128.*o*tx+3./128.*o*x12s-1./
     #    64.*o*txs+1./32.*o-1./64.*os*x12-5./128.*os*x2z-3./
     #    128.*os*tx+3./128.*os-3./128.*oc+3./128.*x12*x2z*tx+3.
     #    /32.*x12*x2z+13./128.*x12*tx-1./64.*x12*txs+5./64.*x12
     #    -3./128.*x2z*tx-1./32.*x2z*x12s-1./16.*x2z-7./128.*tx
     #    *x12s-3./64.*tx-1./16.*x12s+1./64.*x12c+1./64.*txs)
      zz20q= zz20q+rwwz(7,14)*vvq*yc*(7./64.*o*x12*x2z*
     #    tx+1./64.*o*x12*x2z+3./64.*o*x12*tx+5./128.*o*x12*x2zs
     #    +3./64.*o*x12*txs-3./16.*o*x2z*tx-1./128.*o*x2z*x12s+
     #    3./128.*o*x2z*txs-1./64.*o*x2z-5./128.*o*tx*x12s-3./64.
     #    *o*tx*x2zs-7./64.*o*x2zs+7./128.*os*x12*x2z+1./64.*os*
     #    x12*tx+3./64.*os*x12+3./128.*os*x2z*tx-7./64.*os*x2z-
     #    3./64.*os*tx-1./64.*os*x12s+1./32.*os*x2zs+3./128.*os*
     #    txs-1./32.*os-1./32.*oc*x12+1./16.*oc*x2z+3./128.*oc*
     #    tx+3./64.*oc-1./64.*oq-15./64.*x12*x2z*tx+3./128.*x12
     #    *x2z*txs-3./32.*x12*x2z-3./128.*x12*tx*x2zs-1./16.*x12*
     #    tx-1./16.*x12*x2zs+11./128.*x2z*tx*x12s+9./64.*x2z*tx
     #    +1./32.*x2z*x12s-3./64.*x2z*txs+1./16.*x2z+3./32.*tx*
     #    x12s-1./32.*tx*x12c+3./64.*tx*x2zs+3./128.*x12s*txs+5.
     #    /64.*x2zs-1./32.*txs)
      zz20q= zz20q+rwwz(8,1)*bxpi*vvq*yc*(-1./8.*o*x12
     #    *x2z-1./4.*o*x12*txs+1./8.*o*x2z*tx-1./8.*o*x2z*txs-1.
     #    /8.*o*tx*x12s+1./8.*o*tx*x2zs-1./8.*o*x2zs+1./8.*os*x12
     #    *x2z-1./4.*os*x12*tx-1./8.*os*x2z+1./8.*os*x2zs-1./8.
     #    *os*txs+1./8.*oc*x2z-1./8.*oc*tx+1./8.*x12*x2z*tx-1./
     #    8.*x12*x2z*txs+1./8.*tx*x2zs-1./8.*x12s*txs)
      zz20q= zz20q+rwwz(8,1)*vvq*yc*bxp*(1./4.*o*x12-1.
     #    /4.*o*tx-1./4.*o+1./4.*os-1./4.*x12*tx+1./4.*tx)
      zz20q= zz20q+rwwz(8,1)*vvq*yc*(-1./8.*o*x12*x2z
     #    +1./2.*o*x12*tx+1./8.*o*x12-1./8.*o*x2z*tx+3./8.*o*
     #    x2z-1./8.*o*tx-1./8.*o*x12s+1./4.*o*txs-1./4.*os*x12
     #    -3./8.*os*x2z+3./8.*os*tx+1./8.*os-1./8.*oc+1./8.*
     #    x12*x2z*tx-1./8.*x12*tx+1./4.*x12*txs-3./8.*x2z*tx+1./
     #    8.*tx*x12s)
      zz20q= zz20q+rwwz(8,4)*bxpi*vvq*yc*(1./8.*o*x12*
     #    x2zs+1./16.*o*x2z*x12s-1./16.*o*x2z*txs+1./16.*o*x2zc
     #    -1./16.*o*x2zs+1./16.*os*x12*x2z-1./16.*os*x2z*tx+1./
     #    16.*os*x2zs-1./16.*x12*x2z*txs+1./8.*x12*tx*x2zs-1./16.
     #    *x12*x2zs+1./16.*x2z*tx*x12s+1./16.*tx*x2zc-1./16.*x2zc
     #    -1./16.*x2zs*txs)
      zz20q= zz20q+rwwz(8,4)*vvq*bxps*yc*(1./8.+1./4.*
     #    o*x12-1./4.*o+1./8.*os-1./4.*x12+1./8.*x12s)
      zz20q= zz20q+rwwz(8,4)*vvq*yc*bxp*(-1./4.*o*x12*
     #    x2z+3./8.*o*x12-1./8.*o*x2z*tx+1./2.*o*x2z-1./8.*o*tx
     #    -5./16.*o*x12s+1./8.*o*txs-1./16.*o-5./16.*os*x12-3.
     #    /16.*os*x2z+1./8.*os*tx+1./8.*os-1./16.*oc-1./8.*x12*
     #    x2z*tx+3./8.*x12*x2z+1./8.*x12*tx+1./8.*x12*txs-1./16.
     #    *x12+1./8.*x2z*tx-1./16.*x2z*x12s-5./16.*x2z-1./8.*tx
     #    *x12s+1./8.*x12s-1./16.*x12c-1./8.*txs)
      zz20q= zz20q+rwwz(8,4)*vvq*yc*(1./8.*o*x12*x2z*tx
     #    -1./2.*o*x12*x2z+1./16.*o*x12*x2zs-1./8.*o*x12*txs+1./
     #    8.*o*x2z*tx+1./8.*o*x2z*x12s-1./16.*o*x2z*txs+1./8.*o*
     #    x2z+1./16.*o*tx*x12s+1./16.*o*tx*x2zs-1./16.*o*x12s+1.
     #    /16.*o*x12c-5./16.*o*x2zs+1./16.*o*txs+3./16.*os*x12*
     #    x2z-1./16.*os*x12*tx-1./16.*os*x12-3./16.*os*x2z+1./
     #    16.*os*tx+1./8.*os*x12s+1./16.*os*x2zs-1./16.*os*txs+
     #    1./16.*oc*x12+1./16.*oc*x2z-1./16.*oc*tx-1./4.*x12*x2z*
     #    tx-1./16.*x12*x2z*txs+1./8.*x12*x2z+1./16.*x12*tx*x2zs
     #    -1./8.*x12*x2zs+1./16.*x12*txs+1./8.*x2z*tx*x12s-1./8.
     #    *x2z*x12s+3./16.*x2z*txs-1./16.*tx*x12s+1./16.*tx*x12c
     #    -3./16.*tx*x2zs-1./16.*x12s*txs+1./4.*x2zs)
      zz20q= zz20q+rwwz(8,7)*bxpi*vvq*yc*(1./32.*o*x12*
     #    x2z*tx-1./16.*o*x12*x2z*txs-1./32.*o*x12*x2z+1./64.*o*
     #    x12*tx*x2zs+1./16.*o*x12*txs-1./64.*o*x2z*tx*x12s-1./32.
     #    *o*x2z*tx+1./64.*o*x2z*x12s+1./16.*o*x2z*txs+1./32.*o*
     #    tx*x12s-1./64.*o*tx*x12c+1./64.*o*tx*x2zc-1./32.*o*tx*
     #    x2zs-3./64.*o*x12s*txs-1./64.*o*x2zc-1./64.*o*x2zs*txs
     #    +1./32.*o*x2zs-1./32.*os*x12*x2z*tx-1./32.*os*x12*x2z
     #    +1./16.*os*x12*tx+1./32.*os*x12*x2zs-3./64.*os*x12*txs
     #    +1./64.*os*x2z*tx+1./64.*os*x2z*x12s-1./32.*os*x2z*txs
     #    +1./32.*os*x2z-3./64.*os*tx*x12s+1./64.*os*tx*x2zs+1./
     #    64.*os*x2zc-1./16.*os*x2zs+1./32.*os*txs+1./32.*oc*x12*
     #    x2z-3./64.*oc*x12*tx-1./64.*oc*x2z*tx-3./64.*oc*x2z+1.
     #    /32.*oc*tx+1./32.*oc*x2zs-1./64.*oc*txs+1./64.*oq*x2z
     #    -1./64.*oq*tx-1./32.*x12*x2z*tx+1./16.*x12*x2z*txs-1./
     #    64.*x12*x2zs*txs+1./64.*x2z*tx*x12s-1./32.*x2z*x12s*txs
     #    -1./16.*x2z*txs)
      zz20q= zz20q+rwwz(8,7)*bxpi*vvq*yc*(-1./64.*tx*
     #    x2zc+1./32.*tx*x2zs+1./32.*x12s*txs-1./64.*x12c*txs+1.
     #    /32.*x2zs*txs)
      zz20q= zz20q+rwwz(8,7)*vvq*yc*(1./32.*o*x12*x2z
     #    -3./32.*o*x12*tx-1./64.*o*x12*x2zs+1./16.*o*x12*txs+1.
     #    /32.*o*x12+1./32.*o*x2z*tx+1./32.*o*x2z*txs-1./32.*o*
     #    x2z+3./64.*o*tx*x12s-1./64.*o*tx*x2zs+1./32.*o*tx-3./
     #    64.*o*x12s+1./64.*o*x12c+1./64.*o*x2zs-3./32.*o*txs-1.
     #    /32.*os*x12*x2z+3./64.*os*x12*tx+1./16.*os*x2z-3./64.*
     #    os*tx+1./64.*os*x12s-1./64.*os*x2zs+1./32.*os*txs-1./
     #    32.*os-1./64.*oc*x12-1./32.*oc*x2z+1./64.*oc*tx+3./64.
     #    *oc-1./64.*oq+1./32.*x12*x2z*tx+1./32.*x12*x2z*txs-1./
     #    64.*x12*tx*x2zs+1./32.*x12*tx-3./32.*x12*txs-1./32.*x2z
     #    *tx-1./32.*x2z*txs-3./64.*tx*x12s+1./64.*tx*x12c+1./
     #    64.*tx*x2zs+1./32.*x12s*txs+1./16.*txs)
      zz20q= zz20q+rwwz(8,8)*bxpi*vvq*yc*(-1./16.*o*
     #    x12*x2z+1./16.*o*x2z*tx-1./16.*o*x2zs-1./16.*x12*x2z*tx
     #    +1./16.*x2z*txs-1./16.*tx*x2zs+1./16.*x2zs)
      zz20q= zz20q+rwwz(8,8)*vvq*bxps*yc*(-1./16.-1./
     #    8.*o*x12+1./8.*o-1./16.*os+1./8.*x12-1./16.*x12s)
      zz20q= zz20q+rwwz(8,8)*vvq*yc*bxp*(1./16.+1./16.
     #    *o*x12*x2z+1./16.*o*x12+1./16.*o*x2z*tx-3./16.*o*x2z+
     #    1./16.*o*tx+1./16.*o*x12s-1./16.*o*txs-1./8.*o+1./16.
     #    *os*x12+1./16.*os*x2z-1./16.*os*tx+1./16.*os+1./16.*
     #    x12*x2z*tx-1./8.*x12*x2z-1./16.*x12*tx-1./16.*x12*txs
     #    -1./8.*x12-1./16.*x2z*tx+1./8.*x2z+1./16.*tx*x12s+1.
     #    /16.*x12s+1./16.*txs)
      zz20q= zz20q+rwwz(8,8)*vvq*yc*(1./16.*o*x12-1./
     #    8.*o*x2z*tx+3./16.*o*x2z-1./16.*o*tx-1./16.*o*x12s+1./
     #    16.*o*x2zs+1./16.*o*txs-1./16.*os*x12-1./16.*os*x2z+1.
     #    /16.*os*tx+1./8.*x12*x2z+1./16.*x12*tx+1./16.*x12*txs
     #    +1./16.*x2z*tx-1./16.*x2z*txs-1./8.*x2z-1./16.*tx*
     #    x12s+1./16.*tx*x2zs-1./16.*x2zs-1./16.*txs)
      zz20q= zz20q+rwwz(8,11)*bxpi*vvq*yc*(1./8.*o*x12*
     #    x2z-1./8.*o*x2z*tx+1./8.*o*x2zs+1./8.*x12*x2z*tx-1./8.
     #    *x2z*txs+1./8.*tx*x2zs-1./8.*x2zs)
      zz20q= zz20q+rwwz(8,11)*vvq*yc*bxp*(-1./8.-1./
     #    4.*o*x12+1./4.*o-1./8.*os+1./4.*x12-1./8.*x12s)
      zz20q= zz20q+rwwz(8,11)*vvq*yc*(1./8.*o*x12*x2z
     #    -1./8.*o*x12+1./8.*o*x2z*tx-3./8.*o*x2z+1./8.*o*tx+
     #    1./8.*o*x12s-1./8.*o*txs+1./8.*os*x12+1./8.*os*x2z-1./
     #    8.*os*tx+1./8.*x12*x2z*tx-1./4.*x12*x2z-1./8.*x12*tx-
     #    1./8.*x12*txs-1./8.*x2z*tx+1./4.*x2z+1./8.*tx*x12s+1./
     #    8.*txs)
      zz20q= zz20q+rwwz(8,12)*bxpi*vvq*yc*(-1./8.*o*
     #    x12*x2z+1./8.*o*x2z*tx-1./8.*o*x2zs-1./8.*x12*x2z*tx+
     #    1./8.*x2z*txs-1./8.*tx*x2zs+1./8.*x2zs)
      zz20q= zz20q+rwwz(8,12)*vvq*yc*bxp*(1./8.+1./4.*
     #    o*x12-1./4.*o+1./8.*os-1./4.*x12+1./8.*x12s)
      zz20q= zz20q+rwwz(8,12)*vvq*yc*(-1./8.*o*x12*
     #    x2z+1./8.*o*x12-1./8.*o*x2z*tx+3./8.*o*x2z-1./8.*o*tx
     #    -1./8.*o*x12s+1./8.*o*txs-1./8.*os*x12-1./8.*os*x2z
     #    +1./8.*os*tx-1./8.*x12*x2z*tx+1./4.*x12*x2z+1./8.*x12
     #    *tx+1./8.*x12*txs+1./8.*x2z*tx-1./4.*x2z-1./8.*tx*
     #    x12s-1./8.*txs)
      zz20q= zz20q+rwwz(8,13)*bxpi*vvq*yc*(1./32.*o*x12*
     #    x2z-1./16.*o*x12*txs+1./32.*o*x2z*tx-1./32.*o*x2z*txs
     #    -1./32.*o*tx*x12s+1./32.*o*tx*x2zs-1./32.*o*x2zs+1./
     #    32.*os*x12*x2z-1./16.*os*x12*tx-1./32.*os*x2z+1./32.*os
     #    *x2zs-1./32.*os*txs+1./32.*oc*x2z-1./32.*oc*tx+1./32.
     #    *x12*x2z*tx-1./32.*x12*x2z*txs+1./16.*x2z*txs-1./32.*tx
     #    *x2zs-1./32.*x12s*txs)
      zz20q= zz20q+rwwz(8,13)*vvq*yc*(-1./32.*o*x12*
     #    x2z+1./16.*o*x12*tx-1./32.*o*x12-1./32.*o*x2z*tx+1./
     #    32.*o*x2z-1./32.*o*tx+1./32.*o*x12s+1./16.*o*txs-1./
     #    32.*os*x2z+1./32.*os*tx+1./32.*os-1./32.*oc-1./32.*
     #    x12*x2z*tx-1./32.*x12*tx+1./16.*x12*txs+1./32.*x2z*tx
     #    +1./32.*tx*x12s-1./16.*txs)
      zz20q= zz20q+rwwz(8,14)*bxpi*vvq*yc*(-1./32.*o*
     #    x12*x2z+1./16.*o*x12*txs-1./32.*o*x2z*tx+1./32.*o*x2z*
     #    txs+1./32.*o*tx*x12s-1./32.*o*tx*x2zs+1./32.*o*x2zs-1.
     #    /32.*os*x12*x2z+1./16.*os*x12*tx+1./32.*os*x2z-1./32.*
     #    os*x2zs+1./32.*os*txs-1./32.*oc*x2z+1./32.*oc*tx-1./
     #    32.*x12*x2z*tx+1./32.*x12*x2z*txs-1./16.*x2z*txs+1./32.
     #    *tx*x2zs+1./32.*x12s*txs)
      zz20q= zz20q+rwwz(8,14)*vvq*yc*(1./32.*o*x12*x2z
     #    -1./16.*o*x12*tx+1./32.*o*x12+1./32.*o*x2z*tx-1./32.*
     #    o*x2z+1./32.*o*tx-1./32.*o*x12s-1./16.*o*txs+1./32.*
     #    os*x2z-1./32.*os*tx-1./32.*os+1./32.*oc+1./32.*x12*
     #    x2z*tx+1./32.*x12*tx-1./16.*x12*txs-1./32.*x2z*tx-1./
     #    32.*tx*x12s+1./16.*txs)
      zz20q= zz20q+rwwz(9,1)*bxpi*vvq*yc*(1./2.*o*x12*tx
     #    +1./2.*o*x2z*tx+1./2.*os*tx)
      zz20q= zz20q+rwwz(9,1)*vvq*yc*(-o*tx)
      zz20q= zz20q+rwwz(9,4)*bxpi*vvq*yc*(-1./16.*o*
     #    x12*x2z-1./8.*o*x12*txs+1./16.*o*x2z*tx-1./16.*o*x2z*
     #    txs-1./16.*o*tx*x12s+1./16.*o*tx*x2zs-1./16.*o*x2zs+1.
     #    /16.*os*x12*x2z-1./8.*os*x12*tx-1./16.*os*x2z+1./16.*os
     #    *x2zs-1./16.*os*txs+1./16.*oc*x2z-1./16.*oc*tx+1./16.
     #    *x12*x2z*tx-1./16.*x12*x2z*txs+1./16.*tx*x2zs-1./16.*
     #    x12s*txs)
      zz20q= zz20q+rwwz(9,4)*vvq*yc*bxp*(1./8.*o*x12-1.
     #    /8.*o*tx-1./8.*o+1./8.*os-1./8.*x12*tx+1./8.*tx)
      zz20q= zz20q+rwwz(9,4)*vvq*yc*(-1./16.*o*x12*
     #    x2z+1./4.*o*x12*tx+1./16.*o*x12-1./16.*o*x2z*tx+3./16.
     #    *o*x2z-1./16.*o*tx-1./16.*o*x12s+1./8.*o*txs-1./8.*os
     #    *x12-3./16.*os*x2z+3./16.*os*tx+1./16.*os-1./16.*oc
     #    +1./16.*x12*x2z*tx-1./16.*x12*tx+1./8.*x12*txs-3./16.
     #    *x2z*tx+1./16.*tx*x12s)
      zz20q= zz20q+rwwz(9,7)*bxpi*vvq*yc*(1./16.*o*x12*
     #    x2z*tx-1./32.*o*x12*x2z-1./16.*o*x12*tx+1./16.*o*x12*
     #    txs-3./32.*o*x2z*tx+1./32.*o*x2z*txs+1./16.*o*x2z+1./
     #    32.*o*tx*x12s+1./32.*o*tx*x2zs-1./32.*o*x2zs-1./16.*o*
     #    txs+1./32.*os*x12*x2z+1./16.*os*x12*tx+1./16.*os*x2z*tx
     #    -3./32.*os*x2z-1./16.*os*tx+1./32.*os*x2zs+1./32.*os*
     #    txs+1./32.*oc*x2z+1./32.*oc*tx-1./32.*x12*x2z*tx+1./
     #    32.*x12*x2z*txs-1./16.*x12*txs+1./16.*x2z*tx-1./32.*tx*
     #    x2zs+1./32.*x12s*txs)
      zz20q= zz20q+rwwz(9,7)*vvq*yc*(-1./32.*o*x12*
     #    x2z-1./16.*o*x12*tx+3./32.*o*x12-1./32.*o*x2z*tx+1./
     #    32.*o*x2z+3./32.*o*tx-1./32.*o*x12s-1./16.*o-1./16.*
     #    os*x12-1./32.*os*x2z-1./32.*os*tx+3./32.*os-1./32.*oc
     #    -1./32.*x12*x2z*tx+3./32.*x12*tx+1./32.*x2z*tx-1./32.
     #    *tx*x12s-1./16.*tx)
      zz20q= zz20q+rwwz(9,8)*bxpi*vvq*yc*(1./8.*o*x12*tx
     #    -1./8.*o*x2z*tx+1./8.*o*x2z+1./8.*o*txs-1./8.*os*x2z
     #    +1./8.*os*tx+1./8.*x12*txs-1./8.*x2z*tx)
      zz20q= zz20q+rwwz(9,8)*vvq*yc*bxp*(-1./8.*o*x12
     #    +1./8.*o*tx+1./8.*o-1./8.*os+1./8.*x12*tx-1./8.*tx
     #    )
      zz20q= zz20q+rwwz(9,8)*vvq*yc*(-1./8.*o*x12*tx
     #    +1./8.*o*x12+1./8.*o*x2z*tx-1./8.*o*x2z-1./8.*o*tx-
     #    1./8.*o*txs-1./8.*o+1./8.*os*x2z-1./8.*os*tx+1./8.*os
     #    -1./8.*x12*tx-1./8.*x12*txs+1./8.*x2z*tx+1./8.*tx)
      zz20q= zz20q+rwwz(9,9)*bxpi*vvq*yc*(-1./4.*o*tx
     #    )
      zz20q= zz20q+rwwz(9,9)*vvq*yc*(1./4.*o*tx)
      zz20q= zz20q+rwwz(9,11)*bxpi*vvq*yc*(-1./8.*o*
     #    x12*tx+1./8.*o*x2z*tx-1./8.*o*x2z-1./8.*o*txs+1./8.*
     #    os*x2z-1./8.*os*tx-1./8.*x12*txs+1./8.*x2z*tx)
      zz20q= zz20q+rwwz(9,11)*vvq*yc*(-1./8.*o*x12+
     #    1./8.*o*tx+1./8.*o-1./8.*os+1./8.*x12*tx-1./8.*tx)
      zz20q= zz20q+rwwz(9,12)*bxpi*vvq*yc*(1./8.*o*x12*
     #    tx-1./8.*o*x2z*tx+1./8.*o*x2z+1./8.*o*txs-1./8.*os*
     #    x2z+1./8.*os*tx+1./8.*x12*txs-1./8.*x2z*tx)
      zz20q= zz20q+rwwz(9,12)*vvq*yc*(1./8.*o*x12-1./
     #    8.*o*tx-1./8.*o+1./8.*os-1./8.*x12*tx+1./8.*tx)
      zz20q= zz20q+rwwz(9,13)*bxpi*vvq*yc*(1./16.*o*x12*
     #    tx+1./16.*o*x2z*tx-1./16.*o*x2z+1./16.*o*txs+1./16.*
     #    os*x2z+1./16.*os*tx+1./16.*x12*txs-1./16.*x2z*tx)
      zz20q= zz20q+rwwz(9,13)*vvq*yc*(-1./16.*o*x12
     #    -1./16.*o*tx+1./16.*o-1./16.*os-1./16.*x12*tx+1./16.
     #    *tx)
      zz20q= zz20q+rwwz(9,14)*bxpi*vvq*yc*(-1./16.*o*
     #    x12*tx-1./16.*o*x2z*tx+1./16.*o*x2z-1./16.*o*txs-1./
     #    16.*os*x2z-1./16.*os*tx-1./16.*x12*txs+1./16.*x2z*tx)
      zz20q= zz20q+rwwz(9,14)*vvq*yc*(1./16.*o*x12+1./
     #    16.*o*tx-1./16.*o+1./16.*os+1./16.*x12*tx-1./16.*tx)
      zz20q= zz20q+rwwz(10,1)*xx*vvq*yc*(3./8.*o*x12*
     #    x2z*txs-3./8.*o*x2zc+3./8.*o*x2zs*txs+3./16.*os*x2z*txs
     #    +3./16.*os*x2zc-3./8.*x12*tx*x2zs+3./8.*x12*x2zs*txs+
     #    3./16.*x2z*x12s*txs+3./16.*x2zc-3./8.*x2zs*txs)
      zz20q= zz20q+rwwz(10,1)*bxpi*vvq*yc*(11./16.*o*x12
     #    *x2z*tx-5./8.*o*x12*x2z*txs-3./32.*o*x12*tx*x2zs+19./32.
     #    *o*x12*x2zs+3./8.*o*x12*txs-1./32.*o*x2z*x12s+9./8.*o*
     #    x2z*txs+1./32.*o*tx*x12c-1./16.*o*tx*x2zc+7./32.*o*tx*
     #    x2zs-3./16.*o*x12s*txs+1./4.*o*x2zc-1./4.*o*x2zs*txs-
     #    45./32.*o*x2zs-1./16.*os*x12*x2z-1./8.*os*x12*x2zs-3./
     #    16.*os*x12*txs+5./32.*os*x2z*tx+1./32.*os*x2z*x12s-5./
     #    16.*os*x2z*txs+3./32.*os*tx*x12s-3./32.*os*tx*x2zs-5./
     #    32.*os*x2zc+31./32.*os*x2zs+3./16.*os*txs+1./16.*oc*x12
     #    *x2z+3./32.*oc*x12*tx-1./32.*oc*x2z-1./8.*oc*x2zs-1./
     #    16.*oc*txs+1./32.*oq*x2z+1./32.*oq*tx-3./4.*x12*x2z*tx
     #    +9./8.*x12*x2z*txs+7./32.*x12*tx*x2zs-1./4.*x12*x2zs*
     #    txs-15./32.*x12*x2zs+17./32.*x2z*tx*x12s-5./16.*x2z*
     #    x12s*txs-3./4.*x2z*txs+1./16.*tx*x2zc-3./16.*tx*x2zs+
     #    3./16.*x12s*txs-1./16.*x12c*txs-3./32.*x2zc+3./16.*x2zs
     #    *txs)
      zz20q= zz20q+rwwz(10,1)*bxpi*vvq*yc*(9./16.*x2zs)
      zz20q= zz20q+rwwz(10,1)*vvq*yc*bxp*(3./16.+5./32.
     #    *o*x12*x2z-1./16.*o*x12*tx+31./32.*o*x12-1./32.*o*x2z*
     #    tx-5./32.*o*x2z+7./32.*o*tx-5./16.*o*x12s+1./16.*o*
     #    txs-21./32.*o-13./32.*os*x12+1./16.*os*x2z-1./32.*os*
     #    tx+21./32.*os-3./16.*oc-1./32.*x12*x2z*tx-3./16.*x12*
     #    x2z+7./32.*x12*tx+1./16.*x12*txs-15./32.*x12+1./32.*
     #    x2z*tx+3./32.*x2z*x12s+3./32.*x2z-1./32.*tx*x12s-3./
     #    16.*tx+3./8.*x12s-3./32.*x12c-1./16.*txs)
      zz20q= zz20q+rwwz(10,1)*vvq*yc*(-1./16.*o*x12*
     #    x2z*tx-25./16.*o*x12*x2z-11./16.*o*x12*tx-1./8.*o*x12*
     #    x2zs+7./16.*o*x12*txs-7./16.*o*x2z*tx+7./32.*o*x2z*x12s
     #    -7./32.*o*x2z*txs+27./16.*o*x2z+5./16.*o*tx*x12s+3./
     #    32.*o*tx*x2zs+1./32.*o*x12s-1./32.*o*x12c+9./32.*o*x2zs
     #    -3./4.*o*txs+17./32.*os*x12*x2z+5./32.*os*x12*tx+1./
     #    16.*os*x12+3./32.*os*x2z*tx-23./16.*os*x2z-5./32.*os*tx
     #    -3./32.*os*x12s-3./32.*os*x2zs+7./32.*os*txs-3./32.*
     #    oc*x12+5./16.*oc*x2z+1./32.*oc-1./32.*oq-1./16.*x12*
     #    x2z*tx-7./32.*x12*x2z*txs+15./16.*x12*x2z+1./16.*x12*tx
     #    *x2zs+3./8.*x12*tx+3./16.*x12*x2zs-3./4.*x12*txs-5./
     #    32.*x2z*tx*x12s+3./8.*x2z*tx-3./8.*x2z*x12s+1./4.*x2z*
     #    txs-9./16.*x2z-17./32.*tx*x12s+5./32.*tx*x12c-3./32.*
     #    tx*x2zs+7./32.*x12s*txs-3./16.*x2zs+3./8.*txs)
      zz20q= zz20q+rwwz(10,4)*xx*vvq*yc*(3./64.*o*x12*
     #    x2zc-3./32.*o*x12*x2zs*txs-3./64.*o*tx*x12s*x2zs+3./64.
     #    *o*tx*x2zq+3./64.*o*tx*x2zc-3./64.*o*x2zq-3./64.*o*x2zc
     #    *txs-3./32.*os*x12*tx*x2zs+3./64.*os*x12*x2zc+3./64.*os
     #    *x2zq-3./64.*os*x2zc-3./64.*os*x2zs*txs-3./64.*oc*tx*
     #    x2zs+3./64.*oc*x2zc+3./64.*x12*tx*x2zc-3./64.*x12*x2zc*
     #    txs-3./64.*tx*x2zq-3./64.*x12s*x2zs*txs+3./32.*x2zc*txs
     #    )
      zz20q= zz20q+rwwz(10,4)*bxpi*vvq*yc*(1./128.*o*oq*
     #    x2z-1./128.*o*oq*tx-5./32.*o*x12*x2z*txs-1./128.*o*x12*
     #    tx*x12c-1./32.*o*x12*tx*x2zc-11./64.*o*x12*tx*x2zs+5./
     #    128.*o*x12*x2zc+9./64.*o*x12*x2zs*txs+9./64.*o*x12*x2zs
     #    -9./128.*o*x2z*tx*x12s+1./32.*o*x2z*tx*x12c+9./128.*o*
     #    x2z*x12s*txs+1./128.*o*x2z*x12c+3./64.*o*tx*x12s*x2zs-5.
     #    /128.*o*tx*x2zq+17./128.*o*tx*x2zc+9./64.*o*tx*x2zs-11./
     #    128.*o*x12s*x2zs-1./32.*o*x12c*txs+5./128.*o*x2zq+5./
     #    128.*o*x2zc*txs-9./64.*o*x2zc-1./4.*o*x2zs*txs-21./128.
     #    *os*x12*x2z*tx+9./128.*os*x12*x2z*txs+3./32.*os*x12*tx*
     #    x2zs-9./128.*os*x12*x2zc+5./64.*os*x12*x2zs+3./32.*os*
     #    x2z*tx*x12s+1./128.*os*x2z*x12s+1./128.*os*x2z*x12c-5./
     #    64.*os*x2z*txs-1./32.*os*tx*x12c-1./32.*os*tx*x2zc-11./
     #    128.*os*tx*x2zs-3./128.*os*x12s*x2zs-3./64.*os*x12s*txs
     #    -5./128.*os*x2zq+27./128.*os*x2zc+9./128.*os*x2zs*txs
     #    -9./64.*os*x2zs)
      zz20q= zz20q+rwwz(10,4)*bxpi*vvq*yc*(3./32.*oc*x12
     #    *x2z*tx-1./128.*oc*x12*x2z-3./64.*oc*x12*x2zs-1./32.*oc
     #    *x12*txs-11./128.*oc*x2z*tx+3./128.*oc*x2z*x12s+3./128.
     #    *oc*x2z*txs-3./64.*oc*tx*x12s+3./64.*oc*tx*x2zs-9./128.
     #    *oc*x2zc+21./128.*oc*x2zs+3./128.*oq*x12*x2z-1./32.*oq*
     #    x12*tx+1./32.*oq*x2z*tx-1./128.*oq*x2z-3./128.*oq*x2zs
     #    -1./128.*oq*txs+5./128.*x12*tx*x2zc+9./64.*x12*tx*x2zs
     #    -1./128.*x12*x12c*txs+5./128.*x12*x2zc*txs-1./4.*x12*
     #    x2zs*txs+1./128.*x2z*tx*x12c-5./64.*x2z*x12s*txs+3./128.
     #    *x2z*x12c*txs-11./128.*tx*x12s*x2zs+5./128.*tx*x2zq-9./
     #    64.*tx*x2zc+9./128.*x12s*x2zs*txs-5./64.*x2zc*txs+9./32.
     #    *x2zs*txs)
      zz20q= zz20q+rwwz(10,4)*vvq*yc*bxp*(-1./32.*o*
     #    x12*x2z*tx+1./16.*o*x12*x2z-1./8.*o*x12*tx+1./16.*o*x12
     #    *txs+3./64.*o*x12+1./16.*o*x2z*tx-1./64.*o*x2z*x12s-3.
     #    /64.*o*x2z+3./64.*o*tx*x12s+3./64.*o*tx-1./16.*o*x12s
     #    +1./64.*o*x12c-1./8.*o*txs-1./32.*os*x12*x2z+3./64.*
     #    os*x12*tx-1./64.*os*x2z*tx+1./16.*os*x2z-1./16.*os*tx
     #    +1./64.*os*x12s+1./32.*os*txs-3./64.*os-1./64.*oc*x12
     #    -1./64.*oc*x2z+1./64.*oc*tx+1./16.*oc-1./64.*oq+1./
     #    16.*x12*x2z*tx+3./64.*x12*tx-1./8.*x12*txs-1./64.*x2z*
     #    tx*x12s-3./64.*x2z*tx-1./16.*tx*x12s+1./64.*tx*x12c+1.
     #    /32.*x12s*txs+3./32.*txs)
      zz20q= zz20q+rwwz(10,4)*vvq*yc*(-1./128.*o*oq
     #    +19./64.*o*x12*x2z*tx-5./32.*o*x12*x2z*txs-9./64.*o*x12
     #    *x2z+3./32.*o*x12*tx*x2zs+1./128.*o*x12*x12c-1./128.*o*
     #    x12*x2zc-19./128.*o*x12*x2zs+1./16.*o*x12*txs-15./128.*
     #    o*x2z*tx*x12s-9./64.*o*x2z*tx+19./128.*o*x2z*x12s-5./
     #    128.*o*x2z*x12c+21./64.*o*x2z*txs+3./128.*o*tx*x12s+1./
     #    64.*o*tx*x12c-1./128.*o*tx*x2zc-25./128.*o*tx*x2zs+5./
     #    128.*o*x12s*x2zs-1./128.*o*x12c+1./128.*o*x2zc+1./64.*o
     #    *x2zs*txs+9./64.*o*x2zs-15./128.*os*x12*x2z*tx-1./32.*
     #    os*x12*x2z+9./128.*os*x12*tx+5./64.*os*x12*x2zs+19./128.
     #    *os*x2z*tx-5./128.*os*x2z*x12s-5./64.*os*x2z*txs+9./64.
     #    *os*x2z+7./128.*os*tx*x2zs-1./128.*os*x12s+1./64.*os*
     #    x12c-1./128.*os*x2zc-23./128.*os*x2zs+1./32.*os*txs+5.
     #    /128.*oc*x12*x2z-1./64.*oc*x12*tx+1./128.*oc*x12-5./128.
     #    *oc*x2z*tx-23./128.*oc*x2z+5./128.*oc*tx+5./128.*oc*
     #    x2zs)
      zz20q= zz20q+rwwz(10,4)*vvq*yc*(-1./64.*oq*x12
     #    +5./128.*oq*x2z-1./128.*oq*tx+1./128.*oq-9./64.*x12*
     #    x2z*tx+21./64.*x12*x2z*txs+1./128.*x12*tx*x12c-1./128.*
     #    x12*tx*x2zc-19./128.*x12*tx*x2zs+1./64.*x12*x2zs*txs+19.
     #    /128.*x2z*tx*x12s-5./128.*x2z*tx*x12c-5./64.*x2z*x12s*txs
     #    -9./32.*x2z*txs+5./128.*tx*x12s*x2zs-1./128.*tx*x12c+
     #    1./128.*tx*x2zc+9./64.*tx*x2zs+1./32.*x12s*txs-1./64.*
     #    x2zs*txs)
      zz20q= zz20q+rwwz(10,7)*xx*vvq*yc*(3./32.*o*x12*
     #    x2zs*txs-3./32.*o*x2zq+3./64.*o*x2zc*txs+3./64.*os*x12*
     #    x2zc+3./64.*os*x2zq-3./64.*os*x2zc+3./64.*os*x2zs*txs
     #    +3./64.*oc*x2zc-3./32.*x12*tx*x2zc+3./64.*x12*x2zc*txs
     #    +3./64.*x12s*x2zs*txs+3./64.*x2zq-3./64.*x2zc*txs)
      zz20q= zz20q+rwwz(10,7)*bxpi*vvq*yc*(1./128.*o*oq*
     #    x2z+1./32.*o*x12*x2z*tx+7./64.*o*x12*x2z*txs+5./32.*o*
     #    x12*tx*x2zs+5./32.*o*x12*x2zc-9./64.*o*x12*x2zs*txs+3./
     #    64.*o*x12*x2zs-1./32.*o*x2z*tx*x12s-9./128.*o*x2z*x12s*
     #    txs+1./64.*o*x2z*txs-1./64.*o*x12s*x2zs-3./64.*o*x12s*
     #    txs+1./32.*o*x12c*txs+5./64.*o*x2zq-5./128.*o*x2zc*txs
     #    -3./8.*o*x2zc+5./32.*o*x2zs*txs-1./64.*o*x2zs-1./64.*
     #    os*x12*x2z*tx-9./128.*os*x12*x2z*txs+1./64.*os*x12*x2z-
     #    9./128.*os*x12*x2zc+7./64.*os*x12*x2zs-3./64.*os*x12*txs
     #    -3./128.*os*x2z*x12s+1./128.*os*x2z*x12c+7./128.*os*x2z
     #    *txs-3./128.*os*x12s*x2zs+3./64.*os*x12s*txs-5./128.*os
     #    *x2zq+35./128.*os*x2zc-9./128.*os*x2zs*txs-11./128.*os*
     #    x2zs-3./64.*oc*x12*x2z-3./64.*oc*x12*x2zs+1./32.*oc*x12
     #    *txs+3./128.*oc*x2z*x12s-3./128.*oc*x2z*txs+1./64.*oc*
     #    x2z-9./128.*oc*x2zc+1./8.*oc*x2zs-1./64.*oc*txs+3./
     #    128.*oq*x12*x2z)
      zz20q= zz20q+rwwz(10,7)*bxpi*vvq*yc*(-3./128.*oq
     #    *x2z-3./128.*oq*x2zs+1./128.*oq*txs+1./64.*x12*x2z*txs
     #    +5./64.*x12*tx*x2zc-1./4.*x12*tx*x2zs+1./128.*x12*x12c*
     #    txs-5./128.*x12*x2zc*txs-1./8.*x12*x2zc+5./32.*x12*x2zs
     #    *txs-1./64.*x12*x2zs+1./32.*x2z*tx*x12s-1./64.*x2z*tx*
     #    x12c+7./128.*x2z*x12s*txs-3./128.*x2z*x12c*txs+5./32.*
     #    tx*x12s*x2zs-9./128.*x12s*x2zs*txs+1./128.*x12s*x2zs-1./
     #    64.*x12c*txs-5./128.*x2zq+5./128.*x2zc*txs+11./64.*x2zc
     #    -1./8.*x2zs*txs)
      zz20q= zz20q+rwwz(10,7)*vvq*bxps*yc*(-1./64.-3.
     #    /32.*o*x12+3./64.*o*x12s+3./64.*o+3./64.*os*x12-3./64.
     #    *os+1./64.*oc+3./64.*x12-3./64.*x12s+1./64.*x12c)
      zz20q= zz20q+rwwz(10,7)*vvq*yc*bxp*(13./32.*o*x12*
     #    x2z+1./16.*o*x12*tx+1./64.*o*x12*x2zs-1./32.*o*x12*txs
     #    +5./64.*o*x12-1./8.*o*x2z*x12s-9./32.*o*x2z-1./16.*o*
     #    tx*x12s-3./32.*o*x12s+1./32.*o*x12c-1./64.*o*x2zs+1./
     #    32.*o*txs-1./64.*o-5./32.*os*x12*x2z-1./32.*os*x12*tx
     #    -1./16.*os*x12+15./64.*os*x2z+1./32.*os*x12s+1./128.*
     #    os*x2zs-1./64.*os*txs+3./128.*os-1./16.*oc*x2z-1./128.
     #    *oq-1./4.*x12*x2z-1./32.*x12*tx+1./128.*x12*x12c-1./
     #    64.*x12*x2zs+1./32.*x12*txs-1./64.*x12+11./64.*x2z*x12s
     #    -1./32.*x2z*x12c+7./64.*x2z+1./16.*tx*x12s-1./32.*tx*
     #    x12c+1./128.*x12s*x2zs-1./64.*x12s*txs+5./128.*x12s-1.
     #    /32.*x12c+1./128.*x2zs-1./64.*txs)
      zz20q= zz20q+rwwz(10,7)*vvq*yc*(-1./128.*o*oq
     #    -1./4.*o*x12*x2z*tx+3./32.*o*x12*x2z*txs-1./8.*o*x12*
     #    x2z-1./64.*o*x12*tx*x2zs-1./32.*o*x12*tx-1./64.*o*x12*
     #    x2zc-15./32.*o*x12*x2zs+1./64.*o*x12*txs+1./8.*o*x2z*tx
     #    *x12s+3./32.*o*x2z*x12s-1./64.*o*x2z*x12c-9./64.*o*x2z*
     #    txs+1./32.*o*x2z+3./32.*o*tx*x12s-3./64.*o*tx*x12c+1./
     #    16.*o*x12s*x2zs+3./128.*o*x12s*txs+1./32.*o*x2zc-1./128.
     #    *o*x2zs*txs+33./64.*o*x2zs-1./64.*o*txs+1./16.*os*x12*
     #    x2z*tx+3./64.*os*x12*tx+17./128.*os*x12*x2zs+3./128.*os
     #    *x12*txs-1./64.*os*x12+3./64.*os*x2z*txs+1./64.*os*x2z
     #    -3./64.*os*tx*x12s+3./128.*os*x12s-1./128.*os*x12c-1./
     #    64.*os*x2zc-47./128.*os*x2zs+1./128.*os*txs+3./64.*oc*
     #    x12*x2z-1./64.*oc*x12*tx+3./64.*oc*x12-5./64.*oc*x2z-
     #    3./128.*oc*x12s+9./128.*oc*x2zs+1./128.*oc*txs-1./64.*
     #    oc-3./128.*oq*x12+1./32.*oq*x2z+3./128.*oq+3./16.*x12
     #    *x2z*tx)
      zz20q= zz20q+rwwz(10,7)*vvq*yc*(-9./64.*x12*x2z
     #    *txs+1./32.*x12*x2z-1./64.*x12*tx*x12c+1./64.*x12*tx*
     #    x2zs+1./64.*x12*x2zc-1./128.*x12*x2zs*txs+21./64.*x12*
     #    x2zs-1./64.*x12*txs-1./4.*x2z*tx*x12s+1./16.*x2z*tx*
     #    x12c+3./64.*x2z*x12s*txs-3./64.*x2z*x12s+1./64.*x2z*
     #    x12c+3./32.*x2z*txs-1./64.*tx*x12s*x2zs-1./32.*tx*x12s
     #    +3./64.*tx*x12c-7./64.*x12s*x2zs+1./128.*x12s*txs+1./
     #    128.*x12c*txs-1./64.*x2zc+1./128.*x2zs*txs-7./32.*x2zs
     #    )
      zz20q= zz20q+rwwz(10,8)*bxpi*vvq*yc*(-1./32.*o*
     #    x12*x2z*tx+1./16.*o*x12*x2z*txs-1./64.*o*x12*tx*x2zs+1./
     #    64.*o*x2z*tx*x12s-1./64.*o*x2z*x12s-1./32.*o*x2z*txs+1./
     #    64.*o*tx*x12c-1./64.*o*tx*x2zc+3./64.*o*x12s*txs+1./64.
     #    *o*x2zc+1./64.*o*x2zs*txs+1./32.*os*x12*x2z*tx-1./32.*
     #    os*x12*x2zs+3./64.*os*x12*txs-1./64.*os*x2z*tx-1./64.*
     #    os*x2z*x12s+1./32.*os*x2z*txs+3./64.*os*tx*x12s-1./64.*
     #    os*tx*x2zs-1./64.*os*x2zc+1./32.*os*x2zs-1./32.*oc*x12*
     #    x2z+3./64.*oc*x12*tx+1./64.*oc*x2z*tx+1./64.*oc*x2z-1.
     #    /32.*oc*x2zs+1./64.*oc*txs-1./64.*oq*x2z+1./64.*oq*tx
     #    -1./32.*x12*x2z*txs+1./64.*x12*x2zs*txs-1./64.*x2z*tx*
     #    x12s+1./32.*x2z*x12s*txs+1./64.*tx*x2zc+1./64.*x12c*txs
     #    -1./32.*x2zs*txs)
      zz20q= zz20q+rwwz(10,8)*vvq*yc*bxp*(-1./32.*o*
     #    x12*x2z+1./16.*o*x12*tx-1./32.*o*x12-1./32.*o*x2z*tx+
     #    1./32.*o*x2z-1./32.*o*tx+1./32.*o*x12s+1./16.*o*txs-1.
     #    /32.*os*x2z+1./32.*os*tx+1./32.*os-1./32.*oc-1./32.*
     #    x12*x2z*tx-1./32.*x12*tx+1./16.*x12*txs+1./32.*x2z*tx
     #    +1./32.*tx*x12s-1./16.*txs)
      zz20q= zz20q+rwwz(10,8)*vvq*yc*(1./32.*o*x12*x2z
     #    +1./32.*o*x12*tx+1./64.*o*x12*x2zs-1./8.*o*x12*txs+1./
     #    32.*o*x2z*tx-1./16.*o*x2z*txs-5./64.*o*tx*x12s+3./64.*o
     #    *tx*x2zs+1./64.*o*x12s-1./64.*o*x12c-3./64.*o*x2zs+1./
     #    32.*o*txs+1./16.*os*x12*x2z-7./64.*os*x12*tx-1./16.*os*
     #    x2z+1./64.*os*tx-1./64.*os*x12s+3./64.*os*x2zs-1./16.
     #    *os*txs+1./64.*oc*x12+1./16.*oc*x2z-3./64.*oc*tx-1./
     #    64.*oc+1./64.*oq+1./32.*x12*x2z*tx-1./16.*x12*x2z*txs
     #    +1./64.*x12*tx*x2zs+1./32.*x12*txs+3./32.*x2z*txs+1./
     #    64.*tx*x12s-1./64.*tx*x12c-3./64.*tx*x2zs-1./16.*x12s*
     #    txs)
      zz20q= zz20q+rwwz(10,9)*bxpi*vvq*yc*(-1./16.*o*
     #    x12*x2z*tx+1./32.*o*x12*x2z-1./16.*o*x12*txs+1./32.*o*
     #    x2z*tx-1./32.*o*x2z*txs-1./32.*o*tx*x12s-1./32.*o*tx*
     #    x2zs+1./32.*o*x2zs-1./32.*os*x12*x2z-1./16.*os*x12*tx
     #    -1./16.*os*x2z*tx+1./32.*os*x2z-1./32.*os*x2zs-1./32.
     #    *os*txs-1./32.*oc*x2z-1./32.*oc*tx+1./32.*x12*x2z*tx-
     #    1./32.*x12*x2z*txs+1./32.*tx*x2zs-1./32.*x12s*txs)
      zz20q= zz20q+rwwz(10,9)*vvq*yc*bxp*(-1./16.*o*
     #    x12-1./16.*o*tx+1./16.*o-1./16.*os-1./16.*x12*tx+1./
     #    16.*tx)
      zz20q= zz20q+rwwz(10,9)*vvq*yc*(1./32.*o*x12*x2z
     #    +1./8.*o*x12*tx-1./32.*o*x12+3./32.*o*x2z*tx-3./32.*o
     #    *x2z-1./32.*o*tx+1./32.*o*x12s+1./16.*o*txs+1./16.*os
     #    *x12+3./32.*os*x2z+3./32.*os*tx-1./32.*os+1./32.*oc
     #    +1./32.*x12*x2z*tx-1./32.*x12*tx+1./16.*x12*txs-3./32.
     #    *x2z*tx+1./32.*tx*x12s)
      zz20q= zz20q+rwwz(10,10)*xx*vvq*yc*(-3./64.*o*
     #    x12*x2zs*txs+3./64.*o*x2zq-3./128.*o*x2zc*txs-3./128.*
     #    os*x12*x2zc-3./128.*os*x2zq+3./128.*os*x2zc-3./128.*os*
     #    x2zs*txs-3./128.*oc*x2zc+3./64.*x12*tx*x2zc-3./128.*x12
     #    *x2zc*txs-3./128.*x12s*x2zs*txs-3./128.*x2zq+3./128.*
     #    x2zc*txs)
      zz20q= zz20q+rwwz(10,10)*bxpi*vvq*yc*(-1./256.*o
     #    *oq*x2z-11./128.*o*x12*x2z*txs-5./64.*o*x12*tx*x2zs-5./
     #    64.*o*x12*x2zc+9./128.*o*x12*x2zs*txs-1./128.*o*x12*x2zs
     #    +1./64.*o*x2z*tx*x12s+9./256.*o*x2z*x12s*txs+1./128.*o*
     #    x12s*x2zs-1./64.*o*x12c*txs-5./128.*o*x2zq+5./256.*o*
     #    x2zc*txs+13./64.*o*x2zc-11./128.*o*x2zs*txs+1./128.*os*
     #    x12*x2z*tx+9./256.*os*x12*x2z*txs+9./256.*os*x12*x2zc-9.
     #    /128.*os*x12*x2zs+1./256.*os*x2z*x12s-1./256.*os*x2z*x12c
     #    -11./256.*os*x2z*txs+3./256.*os*x12s*x2zs-3./128.*os*
     #    x12s*txs+5./256.*os*x2zq-37./256.*os*x2zc+9./256.*os*
     #    x2zs*txs+17./256.*os*x2zs+1./128.*oc*x12*x2z+3./128.*oc
     #    *x12*x2zs-1./64.*oc*x12*txs-3./256.*oc*x2z*x12s+3./256.
     #    *oc*x2z*txs+9./256.*oc*x2zc-5./64.*oc*x2zs-3./256.*oq*
     #    x12*x2z+1./256.*oq*x2z+3./256.*oq*x2zs-1./256.*oq*txs
     #    -5./128.*x12*tx*x2zc+9./64.*x12*tx*x2zs-1./256.*x12*
     #    x12c*txs)
      zz20q= zz20q+rwwz(10,10)*bxpi*vvq*yc*(5./256.*x12*
     #    x2zc*txs+1./16.*x12*x2zc-11./128.*x12*x2zs*txs+1./128.*
     #    x2z*tx*x12c-11./256.*x2z*x12s*txs+3./256.*x2z*x12c*txs-
     #    5./64.*tx*x12s*x2zs+9./256.*x12s*x2zs*txs-1./256.*x12s*
     #    x2zs+5./256.*x2zq-5./256.*x2zc*txs-3./32.*x2zc+9./128.
     #    *x2zs*txs)
      zz20q= zz20q+rwwz(10,10)*vvq*bxps*yc*(3./128.+5./
     #    64.*o*x12-3./128.*o*x12s-7./128.*o-3./128.*os*x12+5./
     #    128.*os-1./128.*oc-7./128.*x12+5./128.*x12s-1./128.*
     #    x12c)
      zz20q= zz20q+rwwz(10,10)*vvq*yc*bxp*(-1./4.*o*
     #    x12*x2z-1./16.*o*x12*tx-1./128.*o*x12*x2zs+1./64.*o*x12
     #    *txs-1./128.*o*x12+1./16.*o*x2z*x12s+7./32.*o*x2z+1./
     #    32.*o*tx*x12s+3./128.*o*x12s-1./64.*o*x12c+1./128.*o*
     #    x2zs-1./32.*o*txs+5./64.*os*x12*x2z+1./64.*os*x12*tx-
     #    1./128.*os*x12-5./32.*os*x2z-1./64.*os*x12s-1./256.*os*
     #    x2zs+1./128.*os*txs+5./256.*os+1./32.*oc*x2z-3./128.*
     #    oc+1./256.*oq+11./64.*x12*x2z+3./64.*x12*tx-1./256.*
     #    x12*x12c+1./128.*x12*x2zs-1./32.*x12*txs-3./32.*x2z*
     #    x12s+1./64.*x2z*x12c-3./32.*x2z-1./16.*tx*x12s+1./64.
     #    *tx*x12c-1./256.*x12s*x2zs+1./128.*x12s*txs-1./256.*
     #    x12s+1./128.*x12c-1./256.*x2zs+3./128.*txs)
      zz20q= zz20q+rwwz(10,10)*vvq*yc*(1./256.*o*oq+9.
     #    /64.*o*x12*x2z*tx-3./64.*o*x12*x2z*txs+1./64.*o*x12*x2z
     #    +1./128.*o*x12*tx*x2zs+1./128.*o*x12*x2zc+1./4.*o*x12*
     #    x2zs+5./128.*o*x12*txs-1./16.*o*x2z*tx*x12s-1./32.*o*
     #    x2z*x12s+1./128.*o*x2z*x12c+3./32.*o*x2z*txs-1./64.*o*
     #    tx*x12s+3./128.*o*tx*x12c-1./32.*o*x12s*x2zs-3./256.*o*
     #    x12s*txs-1./64.*o*x2zc+1./256.*o*x2zs*txs-41./128.*o*
     #    x2zs-1./32.*os*x12*x2z*tx+7./128.*os*x12*x2z-1./128.*os
     #    *x12*tx-17./256.*os*x12*x2zs-3./256.*os*x12*txs-3./128.
     #    *os*x2z*txs-1./16.*os*x2z+3./128.*os*tx*x12s-1./256.*os
     #    *x12s+1./256.*os*x12c+1./128.*os*x2zc+55./256.*os*x2zs
     #    +5./256.*os*txs-3./128.*oc*x12*x2z+1./128.*oc*x12*tx-
     #    1./128.*oc*x12+5./64.*oc*x2z+3./256.*oc*x12s-9./256.*oc
     #    *x2zs-1./256.*oc*txs+3./256.*oq*x12-1./64.*oq*x2z-1./
     #    256.*oq-9./64.*x12*x2z*tx+3./32.*x12*x2z*txs+1./128.*
     #    x12*tx*x12c)
      zz20q= zz20q+rwwz(10,10)*vvq*yc*(-1./128.*x12*
     #    tx*x2zs-1./128.*x12*x2zc+1./256.*x12*x2zs*txs-23./128.*
     #    x12*x2zs+9./64.*x2z*tx*x12s-1./32.*x2z*tx*x12c-3./128.*
     #    x2z*x12s*txs+1./128.*x2z*x12s-1./128.*x2z*x12c-9./128.*
     #    x2z*txs+1./128.*tx*x12s*x2zs-1./128.*tx*x12c+7./128.*
     #    x12s*x2zs+5./256.*x12s*txs-1./256.*x12c*txs+1./128.*
     #    x2zc-1./256.*x2zs*txs+9./64.*x2zs)
      zz20q= zz20q+rwwz(10,11)*bxpi*vvq*yc*(1./32.*o*x12
     #    *x2z*tx+1./32.*o*x12*x2z*txs+1./64.*o*x12*tx*x2zs-3./64.
     #    *o*x12*x2zs+1./32.*o*x2z*tx*x12s+1./64.*o*x2z*x12s+1./
     #    32.*o*x2z*txs-1./64.*o*tx*x12c-1./32.*o*tx*x2zc-3./64.*
     #    o*tx*x2zs-3./64.*o*x12s*txs+1./32.*o*x2zc+1./32.*o*x2zs
     #    *txs+1./16.*os*x12*x2z*tx-1./64.*os*x12*x2zs-3./64.*os*
     #    x12*txs+1./64.*os*x2z*tx+1./64.*os*x2z*x12s+1./64.*os*
     #    x2z*txs-3./64.*os*tx*x12s+1./64.*os*tx*x2zs-1./32.*os*
     #    x2zc+1./64.*os*x2zs+1./32.*oc*x12*x2z-3./64.*oc*x12*tx
     #    +1./32.*oc*x2z*tx-1./64.*oc*x2z-1./64.*oc*x2zs-1./64.
     #    *oc*txs+1./64.*oq*x2z-1./64.*oq*tx+1./32.*x12*x2z*txs
     #    -3./64.*x12*tx*x2zs+1./32.*x12*x2zs*txs+1./64.*x2z*tx*
     #    x12s+1./64.*x2z*x12s*txs+1./32.*tx*x2zc-1./64.*x12c*txs
     #    -1./16.*x2zs*txs)
      zz20q= zz20q+rwwz(10,11)*vvq*yc*bxp*(-1./64.*o*
     #    x12*x2z+1./32.*o*x12*tx-1./64.*o*x12-1./64.*o*x2z*tx+
     #    1./64.*o*x2z-1./64.*o*tx+1./64.*o*x12s+1./32.*o*txs-1.
     #    /64.*os*x2z+1./64.*os*tx+1./64.*os-1./64.*oc-1./64.*
     #    x12*x2z*tx-1./64.*x12*tx+1./32.*x12*txs+1./64.*x2z*tx
     #    +1./64.*tx*x12s-1./32.*txs)
      zz20q= zz20q+rwwz(10,11)*vvq*yc*(-3./32.*o*x12*
     #    x2z*tx+1./16.*o*x12*x2z-1./32.*o*x12*tx+1./32.*o*x12*
     #    x2zs+1./32.*o*x12*txs+1./16.*o*x2z*tx-3./64.*o*x2z*x12s
     #    -5./64.*o*x2z*txs+1./32.*o*tx*x12s+3./64.*o*tx*x2zs-1.
     #    /64.*o*x12s+1./64.*o*x12c-3./64.*o*x2zs-1./32.*o*txs-
     #    1./64.*os*x12*x2z+1./64.*os*x12*tx-3./64.*os*x2z*tx-1./
     #    32.*os*x2z-1./64.*os*tx+1./64.*os*x12s+3./64.*os*x2zs
     #    +1./64.*os*txs-1./64.*oc*x12+1./32.*oc*x2z+1./64.*oc
     #    -1./64.*oq+1./16.*x12*x2z*tx-5./64.*x12*x2z*txs+1./32.
     #    *x12*tx*x2zs-1./32.*x12*txs-3./64.*x2z*tx*x12s+3./32.*
     #    x2z*txs-1./64.*tx*x12s+1./64.*tx*x12c-3./64.*tx*x2zs+
     #    1./64.*x12s*txs)
      zz20q= zz20q+rwwz(10,12)*xx*vvq*yc*(3./16.*o*x12*
     #    x2z*txs-3./32.*o*x12*tx*x2zs-3./32.*o*tx*x2zc-3./32.*o*
     #    x2zc+3./32.*o*x2zs*txs+3./32.*os*x2z*txs-3./32.*os*tx*
     #    x2zs-3./16.*x12*tx*x2zs+3./32.*x12*x2zs*txs+3./32.*x2z*
     #    x12s*txs+3./32.*tx*x2zc+3./32.*x2zc-3./16.*x2zs*txs)
      zz20q= zz20q+rwwz(10,12)*bxpi*vvq*yc*(5./32.*o*x12
     #    *x2z*tx-7./32.*o*x12*x2z*txs+5./64.*o*x12*tx*x2zs+3./16.
     #    *o*x12*x2zs+3./16.*o*x12*txs+1./64.*o*x2z*tx*x12s-1./64.
     #    *o*x2z*x12s+11./32.*o*x2z*txs+1./64.*o*tx*x12c+5./64.*o
     #    *tx*x2zc-3./16.*o*tx*x2zs-3./32.*o*x12s*txs+1./64.*o*
     #    x2zc-5./64.*o*x2zs*txs-27./64.*o*x2zs+1./32.*os*x12*x2z
     #    *tx+1./64.*os*x12*x2zs-3./32.*os*x12*txs-7./64.*os*x2z*
     #    tx-1./64.*os*x2z*x12s-7./64.*os*x2z*txs+3./64.*os*tx*
     #    x12s+5./64.*os*tx*x2zs+1./32.*os*x2zc+1./8.*os*x2zs+3.
     #    /32.*os*txs-1./32.*oc*x12*x2z+3./64.*oc*x12*tx+1./64.*
     #    oc*x2z*tx+1./64.*oc*x2z+1./64.*oc*x2zs-1./32.*oc*txs-
     #    1./64.*oq*x2z+1./64.*oq*tx-3./8.*x12*x2z*tx+11./32.*x12
     #    *x2z*txs-5./64.*x12*x2zs*txs-15./64.*x12*x2zs+17./64.*
     #    x2z*tx*x12s-7./64.*x2z*x12s*txs-3./8.*x2z*txs-5./64.*tx
     #    *x2zc+3./16.*tx*x2zs+3./32.*x12s*txs-1./32.*x12c*txs-
     #    3./64.*x2zc)
      zz20q= zz20q+rwwz(10,12)*bxpi*vvq*yc*(5./32.*x2zs*
     #    txs+9./32.*x2zs)
      zz20q= zz20q+rwwz(10,12)*vvq*yc*bxp*(3./32.+3./
     #    32.*o*x12*x2z+3./8.*o*x12-3./32.*o*x2z-9./64.*o*x12s-
     #    15./64.*o-9./64.*os*x12+3./64.*os*x2z+3./16.*os-3./64.
     #    *oc-3./32.*x12*x2z-15./64.*x12+3./64.*x2z*x12s+3./64.
     #    *x2z+3./16.*x12s-3./64.*x12c)
      zz20q= zz20q+rwwz(10,12)*vvq*yc*(-3./32.*o*x12*
     #    x2z*tx-9./16.*o*x12*x2z-1./4.*o*x12*tx-5./64.*o*x12*
     #    x2zs+1./8.*o*x12*txs+3./32.*o*x2z*tx+3./32.*o*x2z*x12s
     #    -1./32.*o*x2z*txs+9./16.*o*x2z+9./64.*o*tx*x12s+1./64.
     #    *o*tx*x2zs+1./64.*o*x12s-1./64.*o*x12c+11./64.*o*x2zs
     #    -1./4.*o*txs+1./8.*os*x12*x2z+3./64.*os*x12*tx-5./16.
     #    *os*x2z+1./64.*os*tx-1./64.*os*x12s-5./64.*os*x2zs+1./
     #    16.*os*txs+1./64.*oc*x12+1./32.*oc*x2z-1./64.*oc*tx-1.
     #    /64.*oc+1./64.*oq+3./16.*x12*x2z*tx-1./32.*x12*x2z*txs
     #    +15./32.*x12*x2z+1./64.*x12*tx*x2zs+3./16.*x12*tx+3./
     #    32.*x12*x2zs-1./4.*x12*txs-3./32.*x2z*tx*x12s-3./32.*
     #    x2z*tx-3./16.*x2z*x12s+1./32.*x2z*txs-9./32.*x2z-17./
     #    64.*tx*x12s+5./64.*tx*x12c-1./64.*tx*x2zs+1./16.*x12s*
     #    txs-3./32.*x2zs+3./16.*txs)
      zz20q= zz20q+rwwz(10,13)*xx*vvq*yc*(3./32.*o*x12*
     #    x2z*txs-3./32.*o*x2zc+3./32.*o*x2zs*txs+3./64.*os*x2z*
     #    txs+3./64.*os*x2zc-3./32.*x12*tx*x2zs+3./32.*x12*x2zs*
     #    txs+3./64.*x2z*x12s*txs+3./64.*x2zc-3./32.*x2zs*txs)
      zz20q= zz20q+rwwz(10,13)*bxpi*vvq*yc*(7./64.*o*x12
     #    *x2z*tx-11./64.*o*x12*x2z*txs+7./64.*o*x12*x2zs+3./32.*
     #    o*x12*txs+7./32.*o*x2z*txs-3./128.*o*x12s*txs+7./64.*o*
     #    x2zc-5./64.*o*x2zs*txs-37./128.*o*x2zs-1./64.*os*x12*
     #    x2z-5./128.*os*x12*x2zs-3./128.*os*x12*txs+1./64.*os*
     #    x2z*x12s-11./128.*os*x2z*txs-7./128.*os*x2zc+3./16.*os*
     #    x2zs+3./64.*os*txs+1./32.*oc*x12*x2z-1./64.*oc*x2z-5./
     #    128.*oc*x2zs-1./128.*oc*txs+1./64.*oq*x2z-3./16.*x12*
     #    x2z*tx+7./32.*x12*x2z*txs+7./64.*x12*tx*x2zs-5./64.*x12
     #    *x2zs*txs-13./128.*x12*x2zs+7./64.*x2z*tx*x12s-11./128.
     #    *x2z*x12s*txs-3./16.*x2z*txs+3./64.*x12s*txs-1./128.*
     #    x12c*txs-7./128.*x2zc+5./64.*x2zs*txs+9./64.*x2zs)
      zz20q= zz20q+rwwz(10,13)*vvq*yc*bxp*(3./64.-1./
     #    64.*o*x12*x2z+1./8.*o*x12+1./64.*o*x2z-3./128.*o*x12s
     #    -13./128.*o-3./128.*os*x12-1./128.*os*x2z+1./16.*os
     #    -1./128.*oc+1./64.*x12*x2z-13./128.*x12-1./128.*x2z*
     #    x12s-1./128.*x2z+1./16.*x12s-1./128.*x12c)
      zz20q= zz20q+rwwz(10,13)*vvq*yc*(1./64.*o*x12*x2z
     #    *tx-15./64.*o*x12*x2z-7./64.*o*x12*tx+1./64.*o*x12*x2zs
     #    +1./16.*o*x12*txs+1./64.*o*x2z*x12s-1./64.*o*x2z*txs+
     #    19./64.*o*x2z+1./32.*o*tx*x12s-1./32.*o*x2zs-1./8.*o*
     #    txs+1./16.*os*x12*x2z+1./64.*os*x12*tx+1./64.*os*x12-
     #    13./64.*os*x2z-1./64.*os*x12s+1./64.*os*x2zs+1./32.*os*
     #    txs-1./32.*oc*x12+3./64.*oc*x2z+1./64.*oc-1./64.*oq
     #    -1./64.*x12*x2z*tx-1./64.*x12*x2z*txs+13./64.*x12*x2z
     #    +3./32.*x12*tx-1./64.*x12*x2zs-1./8.*x12*txs+1./64.*
     #    x2z*tx*x12s-1./16.*x2z*x12s+1./64.*x2z*txs-9./64.*x2z
     #    -7./64.*tx*x12s+1./64.*tx*x12c+1./32.*x12s*txs+1./64.
     #    *x2zs+3./32.*txs)
      zz20q= zz20q+rwwz(10,14)*xx*vvq*yc*(-3./64.*o*
     #    x12*tx*x2zs-3./64.*o*tx*x2zc+3./64.*o*x2zc-3./64.*o*
     #    x2zs*txs-3./64.*os*tx*x2zs-3./64.*os*x2zc-3./64.*x12*
     #    x2zs*txs+3./64.*tx*x2zc)
      zz20q= zz20q+rwwz(10,14)*bxpi*vvq*yc*(-1./16.*o*
     #    x12*x2z*tx+5./64.*o*x12*x2z*txs+3./64.*o*x12*tx*x2zs-5./
     #    128.*o*x12*x2zs+3./128.*o*x2z*tx*x12s-5./64.*o*x2z*txs+
     #    3./128.*o*tx*x2zc-21./128.*o*tx*x2zs-3./64.*o*x12s*txs-
     #    11./128.*o*x2zc+7./128.*o*x2zs*txs+1./8.*o*x2zs+3./64.*
     #    os*x12*x2z*tx+1./64.*os*x12*x2z+5./128.*os*x12*x2zs-3./
     #    64.*os*x12*txs-3./32.*os*x2z*tx-1./64.*os*x2z*x12s+5./
     #    128.*os*x2z*txs+3./64.*os*tx*x2zs+7./128.*os*x2zc-21./
     #    128.*os*x2zs-1./32.*oc*x12*x2z+3./128.*oc*x2z*tx+1./64.
     #    *oc*x2z+5./128.*oc*x2zs-1./64.*oc*txs-1./64.*oq*x2z-5.
     #    /64.*x12*x2z*txs-17./128.*x12*tx*x2zs+7./128.*x12*x2zs*
     #    txs-1./64.*x12*x2zs+1./32.*x2z*tx*x12s+5./128.*x2z*x12s
     #    *txs-3./128.*tx*x2zc+9./64.*tx*x2zs-1./64.*x12c*txs+1.
     #    /32.*x2zc-1./32.*x2zs*txs)
      zz20q= zz20q+rwwz(10,14)*vvq*bxps*yc*(-1./64.-
     #    1./32.*o*x12+1./32.*o-1./64.*os+1./32.*x12-1./64.*
     #    x12s)
      zz20q= zz20q+rwwz(10,14)*vvq*yc*bxp*(9./128.*o*x12
     #    *x2z+5./64.*o*x12*tx-1./128.*o*x12-3./128.*o*x2z*tx-
     #    13./128.*o*x2z-9./128.*o*tx-3./128.*o*x12s+1./64.*o*txs
     #    +1./32.*o+1./64.*os*x12+5./128.*os*x2z+3./128.*os*tx
     #    -7./128.*os+3./128.*oc-3./128.*x12*x2z*tx-3./32.*x12*
     #    x2z-13./128.*x12*tx+1./64.*x12*txs-1./64.*x12+3./128.
     #    *x2z*tx+1./32.*x2z*x12s+1./16.*x2z+7./128.*tx*x12s+3./
     #    64.*tx+1./32.*x12s-1./64.*x12c-1./64.*txs)
      zz20q= zz20q+rwwz(10,14)*vvq*yc*(-7./64.*o*x12*
     #    x2z*tx+3./64.*o*x12*x2z+1./64.*o*x12*tx-5./128.*o*x12*
     #    x2zs-3./64.*o*x12*txs+3./16.*o*x2z*tx+1./128.*o*x2z*
     #    x12s-3./128.*o*x2z*txs-7./64.*o*x2z+5./128.*o*tx*x12s
     #    +3./64.*o*tx*x2zs+7./64.*o*x2zs+1./32.*o*txs-7./128.*
     #    os*x12*x2z-1./64.*os*x12*tx-1./64.*os*x12-3./128.*os*
     #    x2z*tx+11./64.*os*x2z+3./64.*os*tx+1./64.*os*x12s-1./
     #    32.*os*x2zs-3./128.*os*txs+1./32.*oc*x12-1./16.*oc*x2z
     #    -3./128.*oc*tx-1./64.*oc+1./64.*oq+15./64.*x12*x2z*tx
     #    -3./128.*x12*x2z*txs+1./32.*x12*x2z+3./128.*x12*tx*x2zs
     #    +1./16.*x12*x2zs+1./32.*x12*txs-11./128.*x2z*tx*x12s-
     #    9./64.*x2z*tx-1./32.*x2z*x12s+3./64.*x2z*txs-1./32.*tx*
     #    x12s+1./32.*tx*x12c-3./64.*tx*x2zs-3./128.*x12s*txs-5.
     #    /64.*x2zs)
      zz20q= zz20q+rwwz(11,1)*bxpi*vvq*yc*(-3./8.*o*
     #    x12*x2z*tx+1./8.*o*x12*x2z+1./4.*o*x12*txs+1./4.*o*x2z*
     #    tx-1./4.*o*x2z*txs+1./8.*o*tx*x12s+1./4.*o*tx*x2zs-5./
     #    8.*o*x2zs-1./8.*os*x12*x2z+1./4.*os*x12*tx-3./8.*os*x2z
     #    *tx+1./8.*os*x2z+1./4.*os*x2zs+1./8.*os*txs-1./8.*oc*
     #    x2z+1./8.*oc*tx-1./2.*x12*x2z*tx-1./4.*x12*x2z*txs+3./
     #    4.*x2z*txs-1./2.*tx*x2zs+1./8.*x12s*txs+3./8.*x2zs)
      zz20q= zz20q+rwwz(11,1)*vvq*bxps*yc*(-1./4.+1./
     #    4.*o+1./4.*x12)
      zz20q= zz20q+rwwz(11,1)*vvq*yc*bxp*(3./8.+1./2.*
     #    o*x12-3./8.*o*x2z-7./8.*o+1./2.*os-1./8.*x12*x2z-1./
     #    2.*x12*tx-5./8.*x12-1./4.*x2z*tx+3./8.*x2z+1./4.*tx
     #    +1./4.*x12s+1./4.*txs)
      zz20q= zz20q+rwwz(11,1)*vvq*yc*(-1./2.*o*x12*
     #    x2z-1./8.*o*x12-5./8.*o*x2z*tx+3./2.*o*x2z-1./4.*o*tx
     #    +1./8.*o*x12s+1./8.*o*x2zs+3./4.*o*txs+1./4.*os*x12
     #    -3./4.*os*x2z+3./8.*os*tx-1./8.*os+1./8.*oc-1./8.*
     #    x12*x2z*tx+5./8.*x12*x2z+1./2.*x12*tx+3./4.*x12*txs+1.
     #    /4.*x2z*tx-1./4.*x2z*txs-3./4.*x2z-3./8.*tx*x12s+1./4.
     #    *tx*x2zs-1./8.*x2zs-3./4.*txs)
      zz20q= zz20q+rwwz(12,1)*xx*vvq*yc*(-3./4.*o*x2z
     #    *txs+3./4.*o*tx*x2zs-3./4.*x12*x2z*txs+3./2.*x2z*txs-
     #    3./4.*tx*x2zs)
      zz20q= zz20q+rwwz(12,1)*bxpi*vvq*yc*(-1./8.*o*
     #    x12*x2z+1./2.*o*x12*txs+7./8.*o*x2z*tx+5./8.*o*x2z*txs
     #    -1./8.*o*tx*x12s-5./8.*o*tx*x2zs+5./8.*o*x2zs-9./4.*o
     #    *txs+1./8.*os*x12*x2z-1./4.*os*x12*tx-1./8.*os*x2z-1./
     #    4.*os*x2zs+1./4.*os*txs+1./8.*oc*x2z-1./8.*oc*tx+7./8.
     #    *x12*x2z*tx+5./8.*x12*x2z*txs-9./4.*x12*txs-3./4.*x2z*
     #    txs+1./8.*tx*x2zs+1./4.*x12s*txs-3./8.*x2zs+3./2.*txs
     #    )
      zz20q= zz20q+rwwz(12,1)*vvq*yc*bxp*(-1./8.-3./
     #    8.*o*x12+1./8.*o*x2z-1./8.*o*tx+1./4.*o-1./8.*os+1./
     #    8.*x12*x2z-1./8.*x12*tx+3./8.*x12-1./8.*x2z+1./8.*tx
     #    -1./4.*x12s)
      zz20q= zz20q+rwwz(12,1)*vvq*yc*(1./2.*o*x12*x2z
     #    -3./8.*o*x12*tx+1./8.*o*x12-3./8.*o*x2z*tx-9./8.*o*
     #    x2z+11./8.*o*tx-1./8.*o*x12s-1./8.*o*x2zs+5./8.*o*txs
     #    -1./4.*os*x12+5./8.*os*x2z-5./8.*os*tx+1./8.*os-1./
     #    8.*oc-1./2.*x12*x2z*tx-5./8.*x12*x2z+5./8.*x12*tx+5./
     #    8.*x12*txs+1./2.*x2z*tx+1./2.*x2z+1./4.*tx*x12s-3./4.
     #    *tx+1./8.*x2zs-3./4.*txs)
      zz20q= zz20q+rwwz(13,1)*xx*vvq*yc*(-3./4.*o*x2z
     #    *txs-3./4.*x12*x2z*txs+3./4.*x2z*txs)
      zz20q= zz20q+rwwz(13,1)*bxpi*vvq*yc*(1./16.*o*x12*
     #    x2z*tx+1./16.*o*x12*x2z+5./8.*o*x12*txs-1./2.*o*x2z*tx
     #    +1./2.*o*x2z*txs-1./16.*o*tx*x12s+1./8.*o*tx*x2zs-5./
     #    16.*o*x2zs-9./8.*o*txs-1./16.*os*x12*x2z-1./8.*os*x12*
     #    tx+1./16.*os*x2z*tx+1./16.*os*x2z+1./8.*os*x2zs+5./16.
     #    *os*txs-1./16.*oc*x2z-1./16.*oc*tx-1./2.*x12*x2z*tx+1.
     #    /2.*x12*x2z*txs-9./8.*x12*txs+3./8.*x2z*tx-3./8.*x2z*
     #    txs-1./8.*tx*x2zs+5./16.*x12s*txs+3./16.*x2zs+3./4.*
     #    txs)
      zz20q= zz20q+rwwz(13,1)*vvq*yc*bxp*(3./16.+1./4.
     #    *o*x12-1./16.*o*x2z-5./16.*o+1./8.*os-1./16.*x12*x2z
     #    -5./16.*x12+1./16.*x2z+1./8.*x12s)
      zz20q= zz20q+rwwz(13,1)*vvq*yc*(-1./4.*o*x12*
     #    x2z-3./8.*o*x12*tx-1./16.*o*x12-1./16.*o*x2z*tx+3./4.
     #    *o*x2z+3./8.*o*tx+1./16.*o*x12s+1./16.*o*x2zs+1./4.*o
     #    *txs+1./8.*os*x12-3./8.*os*x2z-1./16.*os*tx-1./16.*os
     #    +1./16.*oc+1./16.*x12*x2z*tx+5./16.*x12*x2z+3./4.*x12
     #    *tx+1./4.*x12*txs+1./8.*x2z*tx-3./8.*x2z-5./16.*tx*
     #    x12s-3./8.*tx-1./16.*x2zs-3./8.*txs)
      zz20q= zz20q+rwwz(13,4)*xx*vvq*yc*(3./32.*o*x12*
     #    tx*x2zs-3./32.*o*tx*x2zc-3./32.*o*tx*x2zs+3./16.*o*x2zc
     #    +3./32.*o*x2zs*txs+3./32.*os*tx*x2zs-3./32.*os*x2zc+3.
     #    /32.*x12*tx*x2zs+3./32.*x12*x2zs*txs+3./32.*tx*x2zc-3./
     #    32.*x2zc-3./16.*x2zs*txs)
      zz20q= zz20q+rwwz(13,4)*bxpi*vvq*yc*(1./16.*o*x12*
     #    x2z*tx-1./8.*o*x12*x2z*txs-1./64.*o*x12*tx*x2zs-15./64.
     #    *o*x12*x2zs-5./64.*o*x2z*tx*x12s-3./16.*o*x2z*tx-1./64.
     #    *o*x2z*x12s+11./32.*o*x2z*txs+1./64.*o*tx*x12c+5./64.*o
     #    *tx*x2zc-9./64.*o*tx*x2zs+3./64.*o*x12s*txs-1./8.*o*
     #    x2zc-5./64.*o*x2zs*txs+39./64.*o*x2zs-5./32.*os*x12*x2z
     #    *tx+1./16.*os*x12*x2zs+3./64.*os*x12*txs+7./32.*os*x2z*
     #    tx-1./64.*os*x2z*x12s-1./16.*os*x2z*txs+3./64.*os*tx*
     #    x12s-1./64.*os*tx*x2zs+5./64.*os*x2zc-25./64.*os*x2zs
     #    -1./32.*oc*x12*x2z+3./64.*oc*x12*tx-5./64.*oc*x2z*tx+
     #    1./64.*oc*x2z+1./16.*oc*x2zs+1./64.*oc*txs-1./64.*oq*
     #    x2z+1./64.*oq*tx+3./16.*x12*x2z*tx+11./32.*x12*x2z*txs
     #    -9./64.*x12*tx*x2zs-5./64.*x12*x2zs*txs+15./64.*x12*
     #    x2zs-5./32.*x2z*tx*x12s-1./16.*x2z*x12s*txs-3./8.*x2z*
     #    txs-5./64.*tx*x2zc+3./16.*tx*x2zs+1./64.*x12c*txs+3./
     #    64.*x2zc)
      zz20q= zz20q+rwwz(13,4)*bxpi*vvq*yc*(5./32.*x2zs*
     #    txs-9./32.*x2zs)
      zz20q= zz20q+rwwz(13,4)*vvq*yc*bxp*(-3./32.-3./
     #    32.*o*x12*x2z-3./8.*o*x12+3./32.*o*x2z+9./64.*o*x12s+
     #    15./64.*o+9./64.*os*x12-3./64.*os*x2z-3./16.*os+3./64.
     #    *oc+3./32.*x12*x2z+15./64.*x12-3./64.*x2z*x12s-3./64.
     #    *x2z-3./16.*x12s+3./64.*x12c)
      zz20q= zz20q+rwwz(13,4)*vvq*yc*(39./64.*o*x12*x2z
     #    +1./32.*o*x12*tx+1./16.*o*x12*x2zs+1./8.*o*x12*txs+9./
     #    64.*o*x2z*tx-3./64.*o*x2z*x12s-1./32.*o*x2z*txs-21./32.
     #    *o*x2z-3./32.*o*tx*x12s+1./64.*o*tx*x2zs+3./32.*o*tx+
     #    1./64.*o*x12s-1./64.*o*x12c-5./32.*o*x2zs-1./4.*o*txs
     #    -5./32.*os*x12*x2z-3./64.*os*x2z*tx+31./64.*os*x2z-1./
     #    8.*os*tx-1./64.*os*x12s+1./16.*os*x2zs+1./16.*os*txs+
     #    1./64.*oc*x12-7./64.*oc*x2z+1./32.*oc*tx-1./64.*oc+1./
     #    64.*oq+3./64.*x12*x2z*tx-1./32.*x12*x2z*txs-15./32.*x12
     #    *x2z+1./64.*x12*tx*x2zs-3./32.*x12*tx-3./32.*x12*x2zs
     #    -1./4.*x12*txs+3./64.*x2z*tx*x12s-3./32.*x2z*tx+3./16.
     #    *x2z*x12s+1./32.*x2z*txs+9./32.*x2z+5./32.*tx*x12s-1./
     #    16.*tx*x12c-1./64.*tx*x2zs+1./16.*x12s*txs+3./32.*x2zs
     #    +3./16.*txs)
      zz20q= zz20q+rwwz(13,11)*bxpi*vvq*yc*(-3./32.*o*
     #    x12*x2z*tx-1./32.*o*x12*x2z+1./16.*o*x12*txs+1./16.*o*
     #    x2z*tx-1./16.*o*x2z*txs+1./32.*o*tx*x12s+1./16.*o*tx*
     #    x2zs-5./32.*o*x2zs-1./32.*os*x12*x2z+1./16.*os*x12*tx
     #    -3./32.*os*x2z*tx+1./32.*os*x2z+1./16.*os*x2zs+1./32.
     #    *os*txs-1./32.*oc*x2z+1./32.*oc*tx-1./8.*x12*x2z*tx-1.
     #    /16.*x12*x2z*txs+1./8.*x2z*txs-1./16.*tx*x2zs+1./32.*
     #    x12s*txs+3./32.*x2zs)
      zz20q= zz20q+rwwz(13,11)*vvq*yc*bxp*(3./32.+1./8.
     #    *o*x12-1./32.*o*x2z-5./32.*o+1./16.*os-1./32.*x12*x2z
     #    -5./32.*x12+1./32.*x2z+1./16.*x12s)
      zz20q= zz20q+rwwz(13,11)*vvq*yc*(-1./16.*o*x12*
     #    x2z-1./16.*o*x12*tx+1./32.*o*x12-1./32.*o*x2z*tx+5./
     #    16.*o*x2z-1./16.*o*tx-1./32.*o*x12s+1./32.*o*x2zs+1./
     #    16.*o*txs-1./8.*os*x2z+1./32.*os*tx-1./32.*os+1./32.*
     #    oc+1./32.*x12*x2z*tx+5./32.*x12*x2z+1./8.*x12*tx+1./
     #    16.*x12*txs+1./16.*x2z*tx-3./16.*x2z-3./32.*tx*x12s-1.
     #    /32.*x2zs-1./8.*txs)
      zz20q= zz20q+rwwz(13,12)*xx*vvq*yc*(-3./16.*o*
     #    x2z*txs+3./16.*o*tx*x2zs-3./16.*x12*x2z*txs+3./8.*x2z*
     #    txs-3./16.*tx*x2zs)
      zz20q= zz20q+rwwz(13,12)*bxpi*vvq*yc*(1./32.*o*x12
     #    *x2z+1./8.*o*x12*txs+1./8.*o*x2z*tx+5./32.*o*x2z*txs-
     #    1./32.*o*tx*x12s-5./32.*o*tx*x2zs+1./16.*o*x2zs-3./8.*o
     #    *txs+1./32.*os*x12*x2z-1./16.*os*x12*tx-1./32.*os*x2z
     #    -1./16.*os*x2zs+1./16.*os*txs+1./32.*oc*x2z-1./32.*oc
     #    *tx+1./8.*x12*x2z*tx+5./32.*x12*x2z*txs-3./8.*x12*txs
     #    -3./16.*x2z*tx-5./16.*x2z*txs+5./32.*tx*x2zs+1./16.*
     #    x12s*txs+3./8.*txs)
      zz20q= zz20q+rwwz(13,12)*vvq*yc*(-1./32.*o*x12
     #    -1./32.*o*x2z*tx+1./32.*o*x12s+1./16.*o*txs+1./32.*os
     #    -1./32.*oc-1./32.*x12*x2z*tx+1./16.*x12*txs+1./32.*
     #    x2z*tx-1./16.*txs)
      zz20q= zz20q+rwwz(14,1)*xx*vvq*yc*(3./8.*o*x2z*
     #    txs+3./8.*o*tx*x2zs+3./8.*x12*x2z*txs-3./8.*tx*x2zs)
      zz20q= zz20q+rwwz(14,1)*bxpi*vvq*yc*(-1./4.*o*
     #    x12*x2z*tx-1./16.*o*x12*x2z-1./4.*o*x12*txs+23./16.*o*
     #    x2z*tx-5./16.*o*x2z*txs+1./16.*o*tx*x12s-5./16.*o*tx*
     #    x2zs+5./16.*o*x2zs+3./8.*o*txs+1./16.*os*x12*x2z+1./8.
     #    *os*x12*tx-1./4.*os*x2z*tx-1./16.*os*x2z-1./8.*os*x2zs
     #    -1./8.*os*txs+1./16.*oc*x2z+1./16.*oc*tx+11./16.*x12*
     #    x2z*tx-5./16.*x12*x2z*txs+3./8.*x12*txs-3./4.*x2z*tx+
     #    3./8.*x2z*txs-1./16.*tx*x2zs-1./8.*x12s*txs-3./16.*x2zs
     #    )
      zz20q= zz20q+rwwz(14,1)*vvq*yc*bxp*(-3./16.-5./
     #    16.*o*x12+1./16.*o*x2z+3./16.*o*tx+1./2.*o-5./16.*os
     #    +1./16.*x12*x2z+3./16.*x12*tx+5./16.*x12-1./8.*x2z*tx
     #    -1./16.*x2z-3./16.*tx-1./8.*x12s+1./8.*txs)
      zz20q= zz20q+rwwz(14,1)*vvq*yc*(1./4.*o*x12*x2z
     #    +9./16.*o*x12*tx+1./16.*o*x12-5./16.*o*x2z*tx-13./16.
     #    *o*x2z-17./16.*o*tx-1./16.*o*x12s-1./16.*o*x2zs+1./16.
     #    *o*txs-1./8.*os*x12+7./16.*os*x2z+5./16.*os*tx+1./16.
     #    *os-1./16.*oc-3./8.*x12*x2z*tx-5./16.*x12*x2z-11./16.
     #    *x12*tx+1./16.*x12*txs+5./8.*x2z*tx-1./8.*x2z*txs+3./
     #    8.*x2z+1./4.*tx*x12s+1./8.*tx*x2zs+3./8.*tx+1./16.*
     #    x2zs-3./8.*txs)
      zz20q= zz20q+rwwz(14,4)*xx*vvq*yc*(-3./32.*o*
     #    x12*tx*x2zs+3./32.*o*tx*x2zc-3./32.*o*x2zc-3./32.*o*
     #    x2zs*txs-3./32.*os*tx*x2zs+3./32.*os*x2zc-3./32.*x12*
     #    x2zs*txs+3./32.*tx*x2zc)
      zz20q= zz20q+rwwz(14,4)*bxpi*vvq*yc*(-5./32.*o*
     #    x12*x2z*tx+1./8.*o*x12*x2z*txs+1./64.*o*x12*tx*x2zs+3./
     #    32.*o*x12*x2zs+5./64.*o*x2z*tx*x12s+1./64.*o*x2z*x12s-5.
     #    /32.*o*x2z*txs-1./64.*o*tx*x12c-5./64.*o*tx*x2zc-3./64.
     #    *o*x12s*txs+5./64.*o*x2zc+5./64.*o*x2zs*txs-9./32.*o*
     #    x2zs+5./32.*os*x12*x2z*tx-1./16.*os*x12*x2zs-3./64.*os*
     #    x12*txs-11./64.*os*x2z*tx+1./64.*os*x2z*x12s+1./16.*os*
     #    x2z*txs-3./64.*os*tx*x12s+1./64.*os*tx*x2zs-5./64.*os*
     #    x2zc+11./32.*os*x2zs+1./32.*oc*x12*x2z-3./64.*oc*x12*tx
     #    +5./64.*oc*x2z*tx-1./64.*oc*x2z-1./16.*oc*x2zs-1./64.
     #    *oc*txs+1./64.*oq*x2z-1./64.*oq*tx-5./32.*x12*x2z*txs
     #    -3./16.*x12*tx*x2zs+5./64.*x12*x2zs*txs+1./64.*x2z*tx*
     #    x12s+1./16.*x2z*x12s*txs-1./64.*tx*x2zc+9./32.*tx*x2zs
     #    -1./64.*x12c*txs-1./16.*x2zs*txs)
      zz20q= zz20q+rwwz(14,4)*vvq*yc*bxp*(1./32.*o*x12*
     #    x2z+1./8.*o*x12*tx+1./8.*o*x12-1./16.*o*x2z*tx-1./32.
     #    *o*x2z-5./32.*o*tx-1./32.*o*x12s+1./32.*o*txs-3./32.*
     #    o-3./32.*os*x12+1./32.*os*x2z+1./16.*os*tx+5./32.*os
     #    -1./16.*oc-1./16.*x12*x2z*tx-5./32.*x12*tx+1./32.*x12
     #    *txs+1./16.*x2z*tx+1./16.*tx*x12s+3./32.*tx-1./32.*
     #    txs)
      zz20q= zz20q+rwwz(14,4)*vvq*yc*(-3./32.*o*x12*
     #    x2z*tx-7./32.*o*x12*x2z+1./16.*o*x12*tx-1./64.*o*x12*
     #    x2zs-1./16.*o*x12*txs+1./4.*o*x2z*tx-1./32.*o*x2z*txs
     #    +9./32.*o*x2z-1./64.*o*tx*x12s+3./64.*o*tx*x2zs-1./64.
     #    *o*x12s+1./64.*o*x12c+3./64.*o*x2zs+1./16.*o*txs+1./8.
     #    *os*x12*x2z-5./64.*os*x12*tx-13./32.*os*x2z+5./64.*os*
     #    tx+1./64.*os*x12s-3./64.*os*x2zs-1./32.*os*txs-1./64.
     #    *oc*x12+1./8.*oc*x2z-3./64.*oc*tx+1./64.*oc-1./64.*oq
     #    +11./32.*x12*x2z*tx-1./32.*x12*x2z*txs+5./64.*x12*tx*
     #    x2zs+1./16.*x12*txs-3./32.*x2z*tx*x12s-9./32.*x2z*tx+
     #    3./32.*x2z*txs-1./64.*tx*x12s+1./64.*tx*x12c-9./64.*tx*
     #    x2zs-1./32.*x12s*txs)
      zz20q= zz20q+rwwz(14,11)*bxpi*vvq*yc*(3./32.*o*x12
     #    *x2z*tx+1./32.*o*x12*x2z-1./16.*o*x12*txs+1./32.*o*x2z*
     #    tx+1./16.*o*x2z*txs-1./32.*o*tx*x12s-1./16.*o*tx*x2zs
     #    +1./16.*o*x2zs+1./32.*os*x12*x2z-1./16.*os*x12*tx+3./
     #    32.*os*x2z*tx-1./32.*os*x2z-1./16.*os*x2zs-1./32.*os*
     #    txs+1./32.*oc*x2z-1./32.*oc*tx+1./32.*x12*x2z*tx+1./
     #    16.*x12*x2z*txs+1./16.*x2z*txs-1./8.*tx*x2zs-1./32.*
     #    x12s*txs)
      zz20q= zz20q+rwwz(14,11)*vvq*yc*bxp*(-1./32.*o*
     #    x12+3./32.*o*tx+3./32.*o-3./32.*os+3./32.*x12*tx-1./
     #    16.*x2z*tx-3./32.*tx+1./16.*txs)
      zz20q= zz20q+rwwz(14,11)*vvq*yc*(-1./32.*o*x12*
     #    tx-1./32.*o*x12-1./32.*o*x2z*tx-5./32.*o*x2z-1./32.*o
     #    *tx+1./32.*o*x12s-1./32.*o*txs+5./32.*os*x2z-1./16.*
     #    os*tx+1./32.*os-1./32.*oc-1./8.*x12*x2z*tx-1./32.*x12
     #    *tx-1./32.*x12*txs+7./32.*x2z*tx-1./16.*x2z*txs+1./32.
     #    *tx*x12s+1./16.*tx*x2zs-1./16.*txs)
      zz20q= zz20q+rwwz(14,12)*xx*vvq*yc*(3./16.*o*x2z*
     #    txs-3./16.*o*tx*x2zs+3./16.*x12*x2z*txs-3./16.*tx*x2zs
     #    )
      zz20q= zz20q+rwwz(14,12)*bxpi*vvq*yc*(-1./32.*o*
     #    x12*x2z-1./8.*o*x12*txs-1./32.*o*x2z*tx-5./32.*o*x2z*
     #    txs+1./32.*o*tx*x12s+5./32.*o*tx*x2zs+1./32.*o*x2zs+3.
     #    /16.*o*txs-1./32.*os*x12*x2z+1./16.*os*x12*tx+1./32.*os
     #    *x2z+1./16.*os*x2zs-1./16.*os*txs-1./32.*oc*x2z+1./32.
     #    *oc*tx+11./32.*x12*x2z*tx-5./32.*x12*x2z*txs+3./16.*x12
     #    *txs-3./8.*x2z*tx+1./8.*x2z*txs+1./32.*tx*x2zs-1./16.
     #    *x12s*txs-3./32.*x2zs)
      zz20q= zz20q+rwwz(14,12)*vvq*yc*bxp*(-3./32.-3.
     #    /32.*o*x12+1./32.*o*x2z+1./32.*o*tx+1./8.*o-1./32.*os
     #    +1./32.*x12*x2z+1./32.*x12*tx+5./32.*x12-1./32.*x2z
     #    -1./32.*tx-1./16.*x12s)
      zz20q= zz20q+rwwz(14,12)*vvq*yc*(1./16.*o*x12*x2z
     #    +5./32.*o*x12*tx+1./32.*o*x12-1./32.*o*x2z*tx-5./32.*
     #    o*x2z-5./32.*o*tx-1./32.*o*x12s-1./32.*o*x2zs+1./32.*
     #    o*txs-1./32.*os*x2z+1./32.*os*tx-1./32.*os+1./32.*oc
     #    -1./8.*x12*x2z*tx-5./32.*x12*x2z-11./32.*x12*tx+1./32.
     #    *x12*txs+3./16.*x2z*tx+3./16.*x2z+1./8.*tx*x12s+3./16.
     #    *tx+1./32.*x2zs-1./8.*txs)

      zz30q= rwwz(1,1)*bxpi*vvq*yc*(-1./2.*o*x2zs-1./2.*
     #    x12*x2z*tx-1./2.*x12*x2zs+1./2.*x2z*tx+1./2.*x2z*txs+
     #    1./2.*x2zs)
      zz30q= zz30q+rwwz(1,1)*vvq*bxps*yc*(-1./2.+1./
     #    2.*o+1./2.*x12)
      zz30q= zz30q+rwwz(1,1)*vvq*yc*bxp*(3./4.+5./4.*o
     #    *x12-3./4.*o*x2z-1./4.*o*tx-3./2.*o+3./4.*os-1./4.*
     #    x12*x2z-3./4.*x12*tx-3./2.*x12-1./4.*x2z*tx+3./4.*x2z
     #    +3./4.*tx+3./4.*x12s+1./4.*txs)
      zz30q= zz30q+rwwz(1,1)*vvq*yc*(-o*x12*x2z-1./
     #    4.*o*x12*tx+7./4.*o*x2z+1./2.*o*tx+1./4.*o*x2zs+1./4.
     #    *o*txs-1./2.*os*x2z+1./4.*x12*x2z*tx+7./4.*x12*x2z+
     #    x12*tx+1./4.*x12*txs-3./4.*x2z*tx-1./2.*x2z*x12s-1./4.
     #    *x2z*txs-5./4.*x2z-1./4.*tx*x12s+1./4.*tx*x2zs-1./2.*
     #    tx-1./4.*x2zs-1./2.*txs)
      zz30q= zz30q+rwwz(2,2)*bxpi*vvq*yc*(1./16.*o*x2z*
     #    tx-1./16.*o*x2zs-1./16.*x12*x2z*tx+1./8.*x2z*tx+1./8.
     #    *x2z*txs-1./8.*tx*x2zs+1./16.*x2zs)
      zz30q= zz30q+rwwz(2,2)*vvq*bxps*yc*(-3./32.+3./
     #    32.*o+3./32.*x12)
      zz30q= zz30q+rwwz(2,2)*vvq*yc*bxp*(1./8.+1./16.*
     #    o*x12-1./8.*o*x2z+1./32.*o*tx-7./32.*o+3./32.*os-1./
     #    32.*x12*x2z-3./32.*x12*tx-5./32.*x12-1./16.*x2z*tx+1./
     #    8.*x2z+1./16.*tx+1./32.*x12s+1./16.*txs)
      zz30q= zz30q+rwwz(2,2)*vvq*yc*(-1./32.*o*x12*
     #    x2z-3./32.*o*x2z*tx+7./32.*o*x2z+1./16.*o*tx+1./32.*o
     #    *x2zs+1./16.*o*txs-1./32.*os*x2z+1./32.*os*tx-1./32.*
     #    x12*x2z*tx+3./32.*x12*x2z+3./16.*x12*tx+1./16.*x12*txs
     #    +1./16.*x2z*tx-1./16.*x2z*txs-3./16.*x2z-1./32.*tx*
     #    x12s+1./16.*tx*x2zs-1./8.*tx-1./32.*x2zs-1./8.*txs)
      zz30q= zz30q+rwwz(2,3)*bxpi*vvq*yc*(-1./4.*x2z*
     #    tx)
      zz30q= zz30q+rwwz(2,3)*vvq*bxps*yc*(-1./8.+1./
     #    8.*o+1./8.*x12)
      zz30q= zz30q+rwwz(2,3)*vvq*yc*bxp*(-1./8.-1./4.
     #    *o*x12-1./4.*o*x2z+1./8.*o*tx+1./4.*o-1./8.*os-1./8.
     #    *x12*x2z-1./8.*x12*tx+1./8.*x12-1./8.*x2z*tx+1./4.*
     #    x2z+1./8.*txs)
      zz30q= zz30q+rwwz(2,3)*vvq*yc*(1./8.*o*x12*x2z-
     #    1./8.*o*x2z*tx-1./8.*o*x2z-1./4.*o*tx+1./8.*o*x2zs+1./
     #    8.*x12*x2z*tx-1./4.*x12*tx-1./8.*x2z*txs+1./8.*x2z+1./
     #    8.*tx*x2zs+1./4.*tx-1./8.*x2zs)
      zz30q= zz30q+rwwz(3,3)*bxpi*vvq*yc*(-1./16.*o*
     #    x2z*tx+1./16.*o*x2zs+1./16.*x12*x2z*tx+1./8.*x2z*tx-1.
     #    /8.*x2z*txs+1./8.*tx*x2zs-1./16.*x2zs)
      zz30q= zz30q+rwwz(3,3)*vvq*bxps*yc*(-1./32.+1./
     #    32.*o+1./32.*x12)
      zz30q= zz30q+rwwz(3,3)*vvq*yc*bxp*(-1./16.*o*x12
     #    -1./8.*o*x2z+3./32.*o*tx-1./32.*o+1./32.*os-3./32.*
     #    x12*x2z-1./32.*x12*tx+1./32.*x12-1./16.*x2z*tx+1./8.*
     #    x2z-1./16.*tx-1./32.*x12s+1./16.*txs)
      zz30q= zz30q+rwwz(3,3)*vvq*yc*(5./32.*o*x12*x2z
     #    -1./32.*o*x2z*tx-3./32.*o*x2z+3./16.*o*tx+3./32.*o*
     #    x2zs-1./16.*o*txs+1./32.*os*x2z-1./32.*os*tx+5./32.*
     #    x12*x2z*tx-3./32.*x12*x2z+1./16.*x12*tx-1./16.*x12*txs
     #    -1./16.*x2z*tx-1./16.*x2z*txs+1./16.*x2z+1./32.*tx*
     #    x12s+1./16.*tx*x2zs-1./8.*tx-3./32.*x2zs+1./8.*txs)
      zz30q= zz30q+rwwz(4,1)*bxpi*vvq*yc*(1./8.*o*x12*
     #    x2zs-1./8.*o*tx*x2zs+1./8.*o*x2zc+1./8.*x12*tx*x2zs+1.
     #    /8.*tx*x2zc-1./8.*tx*x2zs-1./8.*x2zc-1./8.*x2zs*txs)
      zz30q= zz30q+rwwz(4,1)*vvq*bxps*yc*(3./16.+3./8.
     #    *o*x12-3./8.*o+3./16.*os-3./8.*x12+3./16.*x12s)
      zz30q= zz30q+rwwz(4,1)*vvq*yc*bxp*(-7./16.*o*x12
     #    *x2z-1./8.*o*x12*tx+1./8.*o*x12-1./8.*o*x2z*tx+13./16.
     #    *o*x2z+1./16.*o*tx-1./8.*o*x12s+1./8.*o*txs-1./8.*os*
     #    x12-5./16.*os*x2z+1./16.*os*tx-1./8.*x12*x2z*tx+5./8.
     #    *x12*x2z+5./16.*x12*tx+1./8.*x12*txs+1./8.*x2z*tx-1./
     #    8.*x2z*x12s-1./2.*x2z-3./16.*tx*x12s-1./8.*tx-1./8.*
     #    txs)
      zz30q= zz30q+rwwz(4,1)*vvq*yc*(-1./4.*o*x12*x2z
     #    +1./8.*o*x12*x2zs+1./16.*o*x2z*tx+1./8.*o*x2z*x12s-1./
     #    8.*o*x2z*txs+1./8.*o*tx*x2zs-9./16.*o*x2zs+1./8.*os*x12
     #    *x2z-1./8.*os*x2z*tx+1./8.*os*x2zs-7./16.*x12*x2z*tx-
     #    1./8.*x12*x2z*txs+1./8.*x12*tx*x2zs-1./4.*x12*x2zs+1./8.
     #    *x2z*tx*x12s+1./4.*x2z*tx+1./4.*x2z*txs-1./4.*tx*x2zs
     #    +7./16.*x2zs)
      zz30q= zz30q+rwwz(4,11)*bxpi*vvq*yc*(1./16.*o*x12*
     #    x2zs-1./16.*o*tx*x2zs+1./16.*o*x2zc+1./16.*x12*tx*x2zs
     #    +1./16.*tx*x2zc-1./16.*x2zc-1./16.*x2zs*txs)
      zz30q= zz30q+rwwz(4,11)*vvq*bxps*yc*(1./16.+1./8.
     #    *o*x12-1./8.*o+1./16.*os-1./8.*x12+1./16.*x12s)
      zz30q= zz30q+rwwz(4,11)*vvq*yc*bxp*(-3./16.*o*
     #    x12*x2z+1./16.*o*x12-1./16.*o*x2z*tx+5./16.*o*x2z-1./
     #    16.*o*tx-1./16.*o*x12s+1./16.*o*txs-1./16.*os*x12-1./
     #    8.*os*x2z+1./16.*os*tx-1./16.*x12*x2z*tx+1./4.*x12*x2z
     #    +1./16.*x12*tx+1./16.*x12*txs+1./16.*x2z*tx-1./16.*
     #    x2z*x12s-3./16.*x2z-1./16.*tx*x12s-1./16.*txs)
      zz30q= zz30q+rwwz(4,11)*vvq*yc*(-1./8.*o*x12*
     #    x2z+1./16.*o*x12*x2zs+1./8.*o*x2z*tx+1./16.*o*x2z*x12s
     #    -1./16.*o*x2z*txs+1./16.*o*tx*x2zs-1./4.*o*x2zs+1./16.
     #    *os*x12*x2z-1./16.*os*x2z*tx+1./16.*os*x2zs-1./8.*x12*
     #    x2z*tx-1./16.*x12*x2z*txs+1./16.*x12*tx*x2zs-1./8.*x12*
     #    x2zs+1./16.*x2z*tx*x12s+1./8.*x2z*txs-1./8.*tx*x2zs+3.
     #    /16.*x2zs)
      zz30q= zz30q+rwwz(4,12)*bxpi*vvq*yc*(-1./16.*tx*
     #    x2zs)
      zz30q= zz30q+rwwz(4,12)*vvq*bxps*yc*(1./32.+1./
     #    16.*o*x12-1./16.*o+1./32.*os-1./16.*x12+1./32.*x12s)
      zz30q= zz30q+rwwz(4,12)*vvq*yc*bxp*(-1./32.*o*
     #    x12*x2z-1./16.*o*x12*tx+3./32.*o*x2z+3./32.*o*tx-1./
     #    32.*os*x2z-1./32.*os*tx+1./16.*x12*x2z+3./32.*x12*tx-
     #    1./16.*x2z-1./32.*tx*x12s-1./16.*tx)
      zz30q= zz30q+rwwz(4,12)*vvq*yc*(-3./32.*o*x2z*
     #    tx-1./32.*o*x2zs-3./32.*x12*x2z*tx+1./8.*x2z*tx+1./32.
     #    *x2zs)
      zz30q= zz30q+rwwz(5,5)*bxpi*vvq*yc*(-3./64.*o*
     #    x2z*tx+1./64.*o*x2zs+1./32.*o*txs-3./64.*x12*x2z*tx+1.
     #    /32.*x12*txs+1./32.*x2z*txs-1./32.*tx*x2zs-1./64.*x2zs
     #    )
      zz30q= zz30q+rwwz(5,5)*vvq*bxps*yc*(3./128.-3./
     #    128.*o-1./128.*x12)
      zz30q= zz30q+rwwz(5,5)*vvq*yc*bxp*(-1./32.+1./
     #    32.*o*x2z-1./128.*o*tx+3./128.*o+1./128.*os-1./128.*
     #    x12*x2z+3./128.*x12*tx+1./128.*x12-1./64.*x2z*tx-1./
     #    32.*x2z-1./64.*tx+1./128.*x12s+1./64.*txs)
      zz30q= zz30q+rwwz(5,5)*vvq*yc*(1./128.*o*x12*x2z
     #    -1./32.*o*x12*tx+3./128.*o*x2z*tx-7./128.*o*x2z+3./64.
     #    *o*tx-1./128.*o*x2zs-1./64.*o*txs+1./128.*os*x2z-1./
     #    128.*os*tx+1./128.*x12*x2z*tx+1./128.*x12*x2z+1./64.*
     #    x12*tx-1./64.*x12*txs+3./64.*x2z*tx-1./64.*x2z*txs+3./
     #    64.*x2z-3./128.*tx*x12s+1./64.*tx*x2zs+1./128.*x2zs-1.
     #    /32.*txs)
      zz30q= zz30q+rwwz(5,6)*bxpi*vvq*yc*(1./16.*o*txs
     #    -1./8.*x12*x2z*tx+1./16.*x12*x2zs+1./16.*x12*txs+1./
     #    16.*tx*x2zs)
      zz30q= zz30q+rwwz(5,6)*vvq*bxps*yc*(-1./16.+1./
     #    16.*o+1./32.*x12)
      zz30q= zz30q+rwwz(5,6)*vvq*yc*bxp*(-1./32.-1./
     #    32.*o*x12-1./8.*o*x2z+3./32.*o-1./16.*os-1./16.*x12*
     #    tx+1./32.*x12+1./32.*x2z*tx+1./8.*x2z+1./16.*tx-1./
     #    32.*txs)
      zz30q= zz30q+rwwz(5,6)*vvq*yc*(1./16.*o*x12*x2z
     #    -3./32.*o*x12*tx-1./8.*o*x2z+1./16.*o*x2zs+3./32.*os*
     #    x2z-1./32.*os*tx+1./16.*x12*x2z*tx-1./16.*x12*x2z+1./
     #    16.*x12*tx-1./32.*x12*x2zs-1./8.*x2z*tx+1./32.*x2z*x12s
     #    +1./32.*x2z*txs+1./32.*x2z-1./16.*tx*x12s-1./32.*tx*
     #    x2zs-1./16.*x2zs)
      zz30q= zz30q+rwwz(6,6)*bxpi*vvq*yc*(3./64.*o*x2z*
     #    tx-1./64.*o*x2zs+1./32.*o*txs-5./64.*x12*x2z*tx-1./16.
     #    *x12*x2zs+1./32.*x12*txs-1./32.*x2z*txs-1./32.*tx*x2zs
     #    +1./64.*x2zs)
      zz30q= zz30q+rwwz(6,6)*vvq*bxps*yc*(-3./128.+3.
     #    /128.*o+5./128.*x12)
      zz30q= zz30q+rwwz(6,6)*vvq*yc*bxp*(1./32.*o*x12-
     #    1./32.*o*x2z+9./128.*o*tx+9./128.*o-9./128.*os-7./128.
     #    *x12*x2z+5./128.*x12*tx-13./128.*x12-1./64.*x2z*tx+1./
     #    32.*x2z-3./64.*tx+7./128.*x12s+1./64.*txs)
      zz30q= zz30q+rwwz(6,6)*vvq*yc*(-1./128.*o*x12*
     #    x2z-1./16.*o*x12*tx-11./128.*o*x2z*tx-9./128.*o*x2z-3.
     #    /64.*o*tx+1./128.*o*x2zs+1./64.*o*txs+11./128.*os*x2z
     #    -3./128.*os*tx-9./128.*x12*x2z*tx+23./128.*x12*x2z+3./
     #    64.*x12*tx+1./32.*x12*x2zs+1./64.*x12*txs+5./64.*x2z*tx
     #    -1./32.*x2z*x12s-1./64.*x2z*txs-1./64.*x2z-5./128.*tx
     #    *x12s+1./64.*tx*x2zs-1./128.*x2zs+1./32.*txs)
      zz30q= zz30q+rwwz(7,1)*bxpi*vvq*yc*(-1./16.*o*
     #    x12*x2zs+1./16.*o*x2zs-1./16.*os*x2zs-1./16.*x12*tx*
     #    x2zs+1./16.*tx*x2zs+1./16.*x2zs*txs)
      zz30q= zz30q+rwwz(7,1)*vvq*bxps*yc*(1./32.*o*x12
     #    +1./32.*o*tx-1./32.*o+1./32.*os+1./32.*x12*tx-1./32.
     #    *tx)
      zz30q= zz30q+rwwz(7,1)*vvq*yc*bxp*(-1./32.*o*x12
     #    *x2z+3./32.*o*x12*tx-1./8.*o*x12-1./16.*o*x2z*tx+1./
     #    16.*o*x2z-1./16.*o*tx+1./16.*o*x12s-1./32.*o*txs+1./
     #    16.*o+1./8.*os*x12-1./16.*os*x2z+1./32.*os*tx-1./8.*
     #    os+1./16.*oc-1./32.*x12*x2z*tx-1./8.*x12*tx-1./32.*
     #    x12*txs+1./16.*x2z*tx+1./16.*tx*x12s+1./16.*tx+1./16.
     #    *txs)
      zz30q= zz30q+rwwz(7,1)*vvq*yc*(-3./32.*o*x12*
     #    x2z*tx+3./16.*o*x12*x2z+1./16.*o*x2z*tx-1./16.*o*x2z*
     #    x12s+1./32.*o*x2z*txs-1./8.*o*x2z+1./32.*o*tx*x2zs-1./
     #    32.*o*x2zs-1./8.*os*x12*x2z-1./32.*os*x2z*tx+3./16.*os*
     #    x2z+1./32.*os*x2zs-1./16.*oc*x2z+3./16.*x12*x2z*tx+1./
     #    32.*x12*x2z*txs-1./16.*x2z*tx*x12s-1./8.*x2z*tx-1./8.*
     #    x2z*txs-1./32.*tx*x2zs)
      zz30q= zz30q+rwwz(7,11)*bxpi*vvq*yc*(1./32.*o*tx*
     #    x2zs+1./32.*x2zs*txs)
      zz30q= zz30q+rwwz(7,11)*vvq*bxps*yc*(1./64.*o*x12
     #    +1./64.*o*tx-1./64.*o+1./64.*os+1./64.*x12*tx-1./64.
     #    *tx)
      zz30q= zz30q+rwwz(7,11)*vvq*yc*bxp*(-1./64.*o*
     #    x12*x2z-1./64.*o*x12*tx-1./32.*o*x2z*tx+1./32.*o*x2z+
     #    1./32.*o*tx-1./64.*o*txs-1./32.*os*x2z-1./64.*os*tx-1.
     #    /64.*x12*x2z*tx-1./64.*x12*txs+1./32.*x2z*tx+1./32.*txs
     #    )
      zz30q= zz30q+rwwz(7,11)*vvq*yc*(1./64.*o*x12*x2z*
     #    tx-1./16.*o*x2z*tx+1./64.*o*x2z*txs+1./64.*o*tx*x2zs-
     #    1./64.*o*x2zs+1./64.*os*x2z*tx+1./64.*os*x2zs+1./64.*
     #    x12*x2z*txs-1./16.*x2z*txs-1./64.*tx*x2zs)
      zz30q= zz30q+rwwz(7,12)*bxpi*vvq*yc*(-1./32.*o*
     #    x12*x2zs-1./32.*o*tx*x2zs+1./32.*o*x2zs-1./32.*os*x2zs
     #    -1./32.*x12*tx*x2zs+1./32.*tx*x2zs)
      zz30q= zz30q+rwwz(7,12)*vvq*yc*bxp*(1./16.*o*x12*
     #    tx-1./16.*o*x12-1./16.*o*tx+1./32.*o*x12s+1./32.*o+
     #    1./16.*os*x12+1./32.*os*tx-1./16.*os+1./32.*oc-1./16.
     #    *x12*tx+1./32.*tx*x12s+1./32.*tx)
      zz30q= zz30q+rwwz(7,12)*vvq*yc*(-1./16.*o*x12*
     #    x2z*tx+3./32.*o*x12*x2z+3./32.*o*x2z*tx-1./32.*o*x2z*
     #    x12s-1./16.*o*x2z-1./16.*os*x12*x2z-1./32.*os*x2z*tx+
     #    3./32.*os*x2z-1./32.*oc*x2z+3./32.*x12*x2z*tx-1./32.*
     #    x2z*tx*x12s-1./16.*x2z*tx)
      zz30q= zz30q+rwwz(7,13)*bxpi*vvq*yc*(1./64.*o*x12*
     #    x2zs+1./64.*o*x2z*txs-1./64.*o*x2zs+1./64.*os*x2zs+1./
     #    64.*x12*x2z*txs-1./64.*x12*tx*x2zs)
      zz30q= zz30q+rwwz(7,13)*vvq*bxps*yc*(1./128.+1./
     #    64.*o*x12-1./64.*o+1./128.*os-1./64.*x12+1./128.*x12s
     #    )
      zz30q= zz30q+rwwz(7,13)*vvq*yc*bxp*(-1./64.*o*
     #    x12*x2z+1./32.*o*x12+1./32.*o*x2z-1./64.*o*x12s-1./64.
     #    *o-1./32.*os*x12-1./64.*os*x2z+1./32.*os-1./64.*oc+
     #    1./64.*x12*x2z-1./64.*x2z)
      zz30q= zz30q+rwwz(7,13)*vvq*yc*(-1./64.*o*x12*
     #    x2z*tx-3./64.*o*x12*x2z+1./64.*o*x12*txs+1./64.*o*x2z*
     #    x12s+1./32.*o*x2z-1./64.*o*x2zs-1./64.*o*txs+1./32.*
     #    os*x12*x2z-3./64.*os*x2z+1./128.*os*x2zs+1./128.*os*txs
     #    +1./64.*oc*x2z+1./64.*x12*x2z*tx-1./64.*x12*txs-1./64.
     #    *x2z*tx*x12s+1./128.*x12s*txs+1./128.*x2zs)
      zz30q= zz30q+rwwz(7,14)*bxpi*vvq*yc*(1./64.*o*x2zc
     #    +1./64.*x12*tx*x2zs-1./64.*x2zc+1./64.*x2zs*txs)
      zz30q= zz30q+rwwz(7,14)*vvq*bxps*yc*(1./64.+3./
     #    128.*o*x12+1./128.*o*tx-3./128.*o+1./128.*os+1./128.*
     #    x12*tx-1./32.*x12-1./128.*tx+1./64.*x12s)
      zz30q= zz30q+rwwz(7,14)*vvq*yc*bxp*(-5./128.*o*
     #    x12*x2z-3./128.*o*x12*tx-1./64.*o*x2z*tx+1./16.*o*x2z
     #    -1./128.*o*txs-1./64.*os*x2z-1./128.*os*tx-1./128.*
     #    x12*x2z*tx+1./16.*x12*x2z+1./64.*x12*tx-1./128.*x12*txs
     #    +1./64.*x2z*tx-1./64.*x2z*x12s-3./64.*x2z-1./64.*tx*
     #    x12s+1./64.*txs)
      zz30q= zz30q+rwwz(7,14)*vvq*yc*(3./128.*o*x12*x2z
     #    *tx+1./64.*o*x12*x2zs+1./128.*o*x2z*txs+1./128.*o*tx*
     #    x2zs-7./128.*o*x2zs+1./128.*os*x2z*tx+1./128.*os*x2zs
     #    -1./32.*x12*x2z*tx+1./128.*x12*x2z*txs-1./32.*x12*x2zs
     #    +1./64.*x2z*tx*x12s-1./32.*x2z*txs-1./128.*tx*x2zs+3./
     #    64.*x2zs)
      zz30q= zz30q+rwwz(10,1)*bxpi*vvq*yc*(1./16.*o*x12*
     #    x2zs-1./16.*o*x2zs+1./16.*os*x2zs+1./16.*x12*tx*x2zs-
     #    1./16.*tx*x2zs-1./16.*x2zs*txs)
      zz30q= zz30q+rwwz(10,1)*vvq*bxps*yc*(-1./32.*o*
     #    x12-1./32.*o*tx+1./32.*o-1./32.*os-1./32.*x12*tx+1./
     #    32.*tx)
      zz30q= zz30q+rwwz(10,1)*vvq*yc*bxp*(1./32.*o*x12*
     #    x2z-3./32.*o*x12*tx+1./8.*o*x12+1./16.*o*x2z*tx-1./16.
     #    *o*x2z+1./16.*o*tx-1./16.*o*x12s+1./32.*o*txs-1./16.*
     #    o-1./8.*os*x12+1./16.*os*x2z-1./32.*os*tx+1./8.*os-
     #    1./16.*oc+1./32.*x12*x2z*tx+1./8.*x12*tx+1./32.*x12*txs
     #    -1./16.*x2z*tx-1./16.*tx*x12s-1./16.*tx-1./16.*txs)
      zz30q= zz30q+rwwz(10,1)*vvq*yc*(3./32.*o*x12*x2z*
     #    tx-3./16.*o*x12*x2z-1./16.*o*x2z*tx+1./16.*o*x2z*x12s
     #    -1./32.*o*x2z*txs+1./8.*o*x2z-1./32.*o*tx*x2zs+1./32.
     #    *o*x2zs+1./8.*os*x12*x2z+1./32.*os*x2z*tx-3./16.*os*x2z
     #    -1./32.*os*x2zs+1./16.*oc*x2z-3./16.*x12*x2z*tx-1./32.
     #    *x12*x2z*txs+1./16.*x2z*tx*x12s+1./8.*x2z*tx+1./8.*x2z*
     #    txs+1./32.*tx*x2zs)
      zz30q= zz30q+rwwz(10,11)*bxpi*vvq*yc*(-1./32.*o*
     #    tx*x2zs-1./32.*x2zs*txs)
      zz30q= zz30q+rwwz(10,11)*vvq*bxps*yc*(-1./64.*o*
     #    x12-1./64.*o*tx+1./64.*o-1./64.*os-1./64.*x12*tx+1./
     #    64.*tx)
      zz30q= zz30q+rwwz(10,11)*vvq*yc*bxp*(1./64.*o*x12*
     #    x2z+1./64.*o*x12*tx+1./32.*o*x2z*tx-1./32.*o*x2z-1./
     #    32.*o*tx+1./64.*o*txs+1./32.*os*x2z+1./64.*os*tx+1./
     #    64.*x12*x2z*tx+1./64.*x12*txs-1./32.*x2z*tx-1./32.*txs
     #    )
      zz30q= zz30q+rwwz(10,11)*vvq*yc*(-1./64.*o*x12*
     #    x2z*tx+1./16.*o*x2z*tx-1./64.*o*x2z*txs-1./64.*o*tx*
     #    x2zs+1./64.*o*x2zs-1./64.*os*x2z*tx-1./64.*os*x2zs-1./
     #    64.*x12*x2z*txs+1./16.*x2z*txs+1./64.*tx*x2zs)
      zz30q= zz30q+rwwz(10,12)*bxpi*vvq*yc*(1./32.*o*x12
     #    *x2zs+1./32.*o*tx*x2zs-1./32.*o*x2zs+1./32.*os*x2zs+1.
     #    /32.*x12*tx*x2zs-1./32.*tx*x2zs)
      zz30q= zz30q+rwwz(10,12)*vvq*yc*bxp*(-1./16.*o*
     #    x12*tx+1./16.*o*x12+1./16.*o*tx-1./32.*o*x12s-1./32.*
     #    o-1./16.*os*x12-1./32.*os*tx+1./16.*os-1./32.*oc+1./
     #    16.*x12*tx-1./32.*tx*x12s-1./32.*tx)
      zz30q= zz30q+rwwz(10,12)*vvq*yc*(1./16.*o*x12*x2z
     #    *tx-3./32.*o*x12*x2z-3./32.*o*x2z*tx+1./32.*o*x2z*x12s
     #    +1./16.*o*x2z+1./16.*os*x12*x2z+1./32.*os*x2z*tx-3./
     #    32.*os*x2z+1./32.*oc*x2z-3./32.*x12*x2z*tx+1./32.*x2z*
     #    tx*x12s+1./16.*x2z*tx)
      zz30q= zz30q+rwwz(10,13)*bxpi*vvq*yc*(-1./64.*o*
     #    x12*x2zs-1./64.*o*x2z*txs+1./64.*o*x2zs-1./64.*os*x2zs
     #    -1./64.*x12*x2z*txs+1./64.*x12*tx*x2zs)
      zz30q= zz30q+rwwz(10,13)*vvq*bxps*yc*(-1./128.
     #    -1./64.*o*x12+1./64.*o-1./128.*os+1./64.*x12-1./128.
     #    *x12s)
      zz30q= zz30q+rwwz(10,13)*vvq*yc*bxp*(1./64.*o*x12*
     #    x2z-1./32.*o*x12-1./32.*o*x2z+1./64.*o*x12s+1./64.*o
     #    +1./32.*os*x12+1./64.*os*x2z-1./32.*os+1./64.*oc-1./
     #    64.*x12*x2z+1./64.*x2z)
      zz30q= zz30q+rwwz(10,13)*vvq*yc*(1./64.*o*x12*x2z
     #    *tx+3./64.*o*x12*x2z-1./64.*o*x12*txs-1./64.*o*x2z*x12s
     #    -1./32.*o*x2z+1./64.*o*x2zs+1./64.*o*txs-1./32.*os*
     #    x12*x2z+3./64.*os*x2z-1./128.*os*x2zs-1./128.*os*txs-
     #    1./64.*oc*x2z-1./64.*x12*x2z*tx+1./64.*x12*txs+1./64.*
     #    x2z*tx*x12s-1./128.*x12s*txs-1./128.*x2zs)
      zz30q= zz30q+rwwz(10,14)*bxpi*vvq*yc*(-1./64.*o*
     #    x2zc-1./64.*x12*tx*x2zs+1./64.*x2zc-1./64.*x2zs*txs)
      zz30q= zz30q+rwwz(10,14)*vvq*bxps*yc*(-1./64.-
     #    3./128.*o*x12-1./128.*o*tx+3./128.*o-1./128.*os-1./
     #    128.*x12*tx+1./32.*x12+1./128.*tx-1./64.*x12s)
      zz30q= zz30q+rwwz(10,14)*vvq*yc*bxp*(5./128.*o*x12
     #    *x2z+3./128.*o*x12*tx+1./64.*o*x2z*tx-1./16.*o*x2z+1./
     #    128.*o*txs+1./64.*os*x2z+1./128.*os*tx+1./128.*x12*x2z*
     #    tx-1./16.*x12*x2z-1./64.*x12*tx+1./128.*x12*txs-1./64.
     #    *x2z*tx+1./64.*x2z*x12s+3./64.*x2z+1./64.*tx*x12s-1./
     #    64.*txs)
      zz30q= zz30q+rwwz(10,14)*vvq*yc*(-3./128.*o*x12
     #    *x2z*tx-1./64.*o*x12*x2zs-1./128.*o*x2z*txs-1./128.*o*
     #    tx*x2zs+7./128.*o*x2zs-1./128.*os*x2z*tx-1./128.*os*
     #    x2zs+1./32.*x12*x2z*tx-1./128.*x12*x2z*txs+1./32.*x12*
     #    x2zs-1./64.*x2z*tx*x12s+1./32.*x2z*txs+1./128.*tx*x2zs
     #    -3./64.*x2zs)
      zz30q= zz30q+rwwz(11,1)*bxpi*vvq*yc*(1./8.*o*x2z*
     #    tx-1./8.*o*x2zs-1./8.*x12*x2z*tx-1./8.*x12*x2zs+1./4.
     #    *x2z*txs+1./8.*x2zs)
      zz30q= zz30q+rwwz(11,1)*vvq*bxps*yc*(-3./8.+3./
     #    8.*o+3./8.*x12)
      zz30q= zz30q+rwwz(11,1)*vvq*yc*bxp*(1./8.-5./8.*
     #    o*x2z-3./16.*o+1./16.*os-1./4.*x12*x2z-1./2.*x12*tx
     #    -5./16.*x12-1./4.*x2z*tx+5./8.*x2z+3./8.*tx+3./16.*
     #    x12s+1./4.*txs)
      zz30q= zz30q+rwwz(11,1)*vvq*yc*(-1./16.*o*x12*
     #    x2z-1./8.*o*x2z*tx+5./16.*o*x2z-1./8.*o*tx+1./4.*o*
     #    x2zs+1./8.*o*txs-1./16.*os*x2z+1./16.*os*tx+1./4.*x12
     #    *x2z*tx+7./16.*x12*x2z+1./8.*x12*tx+1./8.*x12*txs-3./
     #    8.*x2z*tx-1./8.*x2z*x12s-1./4.*x2z*txs-1./4.*x2z-1./
     #    16.*tx*x12s+1./4.*tx*x2zs-1./4.*x2zs-1./4.*txs)
      zz30q= zz30q+rwwz(12,1)*bxpi*vvq*yc*(-1./4.*o*
     #    x2zs-1./4.*x12*x2z*tx-1./8.*x12*x2zs+1./2.*x2z*tx+1./
     #    4.*x2z*txs-1./4.*tx*x2zs+1./4.*x2zs)
      zz30q= zz30q+rwwz(12,1)*vvq*bxps*yc*(-1./16.+1.
     #    /16.*o+1./16.*x12)
      zz30q= zz30q+rwwz(12,1)*vvq*yc*bxp*(1./2.+3./4.*
     #    o*x12-1./16.*o*tx-o+1./2.*os+1./16.*x12*x2z-1./16.*
     #    x12*tx-3./4.*x12+1./8.*tx+1./4.*x12s)
      zz30q= zz30q+rwwz(12,1)*vvq*yc*(-1./2.*o*x12*
     #    x2z-1./8.*o*x12*tx-1./16.*o*x2z*tx+o*x2z+1./2.*o*tx
     #    -1./16.*o*x2zs+1./8.*o*txs-1./4.*os*x2z-3./16.*x12*
     #    x2z*tx+5./8.*x12*x2z+3./4.*x12*tx+1./8.*x12*txs+1./8.
     #    *x2z*tx-1./8.*x2z*x12s-3./4.*x2z-1./8.*tx*x12s-1./2.*
     #    tx+1./16.*x2zs-1./4.*txs)
      zz30q= zz30q+rwwz(13,1)*bxpi*vvq*yc*(-1./16.*o*
     #    x2z*tx-1./16.*o*x2zs+1./8.*o*txs-5./16.*x12*x2z*tx+1./
     #    8.*x12*txs+1./8.*x2z*tx+1./8.*x2z*txs+1./16.*x2zs)
      zz30q= zz30q+rwwz(13,1)*vvq*bxps*yc*(1./32.-1./
     #    32.*o-1./32.*x12)
      zz30q= zz30q+rwwz(13,1)*vvq*yc*bxp*(-3./32.*o*tx
     #    +5./32.*o-5./32.*os-1./32.*x12*x2z+1./32.*x12*tx-1./
     #    32.*x12+1./16.*tx+1./32.*x12s)
      zz30q= zz30q+rwwz(13,1)*vvq*yc*(-3./32.*o*x12*
     #    x2z-3./16.*o*x12*tx+5./32.*o*x2z*tx+1./32.*o*x2z+1./
     #    32.*o*x2zs-1./16.*o*txs+1./32.*os*x2z-1./32.*os*tx+3./
     #    32.*x12*x2z*tx+3./32.*x12*x2z+1./4.*x12*tx-1./16.*x12*
     #    txs-1./16.*x2z*tx-1./16.*x2z-5./32.*tx*x12s-1./8.*tx
     #    -1./32.*x2zs-1./8.*txs)
      zz30q= zz30q+rwwz(13,4)*bxpi*vvq*yc*(-1./32.*o*
     #    x12*x2z*tx+1./32.*o*x12*x2zs-1./32.*o*x2z*txs+1./32.*o*
     #    tx*x2zs-1./32.*o*x2zs-1./32.*os*x2z*tx+1./32.*os*x2zs
     #    -1./32.*x12*x2z*txs+1./32.*x12*tx*x2zs)
      zz30q= zz30q+rwwz(13,4)*vvq*bxps*yc*(-1./64.-1.
     #    /32.*o*x12+1./32.*o-1./64.*os+1./32.*x12-1./64.*x12s
     #    )
      zz30q= zz30q+rwwz(13,4)*vvq*yc*bxp*(1./64.*o*x12*
     #    x2z+3./64.*o*x12-3./64.*o*x2z-1./64.*o*x12s-1./32.*o
     #    -1./32.*os*x12+1./64.*os*x2z+3./64.*os-1./64.*oc-1./
     #    32.*x12*x2z+1./32.*x2z)
      zz30q= zz30q+rwwz(13,4)*vvq*yc*(3./64.*o*x12*x2z*
     #    tx-5./64.*o*x12*x2z+1./32.*o*x12*tx-1./32.*o*x12*txs-
     #    1./32.*o*x2z*tx+1./32.*o*x2z*x12s+1./16.*o*x2z-1./64.*o
     #    *tx*x12s+1./64.*o*x2zs+1./32.*o*txs+3./64.*os*x12*x2z
     #    -1./32.*os*x12*tx+1./64.*os*x2z*tx-5./64.*os*x2z+1./
     #    32.*os*tx-1./64.*os*txs+1./64.*oc*x2z-1./64.*oc*tx-1./
     #    32.*x12*x2z*tx+1./32.*x12*txs+1./32.*x2z*tx*x12s-1./64.
     #    *x12s*txs-1./64.*x2zs)
      zz30q= zz30q+rwwz(13,11)*bxpi*vvq*yc*(1./32.*o*x2z
     #    *tx-1./32.*o*x2zs-1./32.*x12*x2z*tx+1./16.*x2z*txs+1./
     #    32.*x2zs)
      zz30q= zz30q+rwwz(13,11)*vvq*bxps*yc*(1./64.-1./
     #    64.*o-1./64.*x12)
      zz30q= zz30q+rwwz(13,11)*vvq*yc*bxp*(1./32.+1./
     #    32.*o*x12-3./64.*o*tx+1./64.*o-3./64.*os-1./64.*x12*
     #    x2z+1./64.*x12*tx-3./64.*x12+1./32.*tx+1./64.*x12s)
      zz30q= zz30q+rwwz(13,11)*vvq*yc*(1./64.*o*x12*x2z
     #    -1./16.*o*x12*tx+5./64.*o*x2z*tx+1./64.*o*x2z-1./32.*
     #    o*tx+1./64.*o*x2zs-1./32.*o*txs+3./64.*os*x2z-3./64.*
     #    os*tx+3./64.*x12*x2z*tx+3./64.*x12*x2z+1./32.*x12*tx-
     #    1./32.*x12*txs-1./32.*x2z*tx-1./16.*x2z-1./64.*tx*x12s
     #    -1./64.*x2zs-1./16.*txs)
      zz30q= zz30q+rwwz(13,12)*bxpi*vvq*yc*(-1./8.*o*
     #    x2z*tx+1./16.*o*txs-1./8.*x12*x2z*tx+1./16.*x12*txs+1.
     #    /16.*x2z*tx)
      zz30q= zz30q+rwwz(13,12)*vvq*yc*bxp*(-1./32.+1.
     #    /32.*o+1./32.*x12)
      zz30q= zz30q+rwwz(13,12)*vvq*yc*(-1./16.*o*x12*
     #    x2z-1./16.*o*x12*tx+1./32.*o*x2z+3./32.*o*tx-1./16.*
     #    os*x2z+3./32.*x12*tx+1./32.*x2z-1./16.*tx*x12s-1./16.
     #    *tx)
      zz30q= zz30q+rwwz(14,1)*bxpi*vvq*yc*(1./16.*o*x2z*
     #    tx+1./16.*o*x2zs+1./16.*x12*x2z*tx+1./8.*x2z*txs-1./8.
     #    *tx*x2zs-1./16.*x2zs)
      zz30q= zz30q+rwwz(14,1)*vvq*bxps*yc*(-1./32.+1.
     #    /32.*o+1./32.*x12)
      zz30q= zz30q+rwwz(14,1)*vvq*yc*bxp*(-1./16.-1./
     #    8.*o*x12-3./32.*o*tx+5./32.*o-3./32.*os+1./32.*x12*
     #    x2z-3./32.*x12*tx+3./32.*x12-1./8.*x2z*tx+1./8.*tx-
     #    1./32.*x12s+1./8.*txs)
      zz30q= zz30q+rwwz(14,1)*vvq*yc*(3./32.*o*x12*x2z
     #    +1./16.*o*x12*tx+1./32.*o*x2z*tx-7./32.*o*x2z-1./16.*
     #    o*tx-1./32.*o*x2zs+3./32.*os*x2z+1./32.*os*tx+1./32.*
     #    x12*x2z*tx-3./32.*x12*x2z-1./16.*x12*tx-1./8.*x2z*txs
     #    +1./8.*x2z+1./32.*tx*x12s+1./8.*tx*x2zs+1./32.*x2zs
     #    -1./8.*txs)
      zz30q= zz30q+rwwz(14,4)*bxpi*vvq*yc*(-1./32.*o*
     #    tx*x2zs+1./32.*o*x2zc+1./32.*tx*x2zc-1./32.*x2zc-1./
     #    32.*x2zs*txs)
      zz30q= zz30q+rwwz(14,4)*vvq*bxps*yc*(1./32.+3./
     #    64.*o*x12-1./64.*o*tx-3./64.*o+1./64.*os-1./64.*x12*
     #    tx-1./16.*x12+1./64.*tx+1./32.*x12s)
      zz30q= zz30q+rwwz(14,4)*vvq*yc*bxp*(-5./64.*o*
     #    x12*x2z+1./64.*o*x12*tx+1./8.*o*x2z-1./32.*o*tx+1./64.
     #    *o*txs-1./32.*os*x2z+1./64.*os*tx-1./64.*x12*x2z*tx+1.
     #    /8.*x12*x2z+1./64.*x12*txs-1./32.*x2z*x12s-3./32.*x2z
     #    -1./32.*txs)
      zz30q= zz30q+rwwz(14,4)*vvq*yc*(-1./64.*o*x12*
     #    x2z*tx+1./32.*o*x12*x2zs+1./16.*o*x2z*tx-1./64.*o*x2z*
     #    txs+1./64.*o*tx*x2zs-7./64.*o*x2zs-1./64.*os*x2z*tx+1.
     #    /64.*os*x2zs-1./64.*x12*x2z*txs+1./32.*x12*tx*x2zs-1./
     #    16.*x12*x2zs+1./16.*x2z*txs-3./64.*tx*x2zs+3./32.*x2zs
     #    )
      zz30q= zz30q+rwwz(14,11)*bxpi*vvq*yc*(-1./16.*tx
     #    *x2zs)
      zz30q= zz30q+rwwz(14,11)*vvq*bxps*yc*(-1./32.+
     #    1./32.*o+1./32.*x12)
      zz30q= zz30q+rwwz(14,11)*vvq*yc*bxp*(-1./16.*o*
     #    x2z+3./32.*o*tx-1./32.*x12*x2z+1./32.*x12*tx-1./16.*
     #    x2z*tx+1./16.*x2z-1./16.*tx+1./16.*txs)
      zz30q= zz30q+rwwz(14,11)*vvq*yc*(-3./32.*o*x2z*
     #    tx+1./32.*o*x2zs-1./32.*x12*x2z*tx+1./8.*x2z*tx-1./16.
     #    *x2z*txs+1./16.*tx*x2zs-1./32.*x2zs)
      zz30q= zz30q+rwwz(14,12)*bxpi*vvq*yc*(1./32.*o*x2z
     #    *tx+1./32.*o*x2zs+1./32.*x12*x2z*tx+1./16.*x2z*txs-1./
     #    16.*tx*x2zs-1./32.*x2zs)
      zz30q= zz30q+rwwz(14,12)*vvq*bxps*yc*(1./64.-1./
     #    64.*o-1./64.*x12)
      zz30q= zz30q+rwwz(14,12)*vvq*yc*bxp*(-1./32.-1.
     #    /16.*o*x12+1./16.*o*x2z-5./64.*o*tx+5./64.*o-3./64.*
     #    os+3./64.*x12*x2z-1./64.*x12*tx+3./64.*x12-1./16.*x2z
     #    +1./16.*tx-1./64.*x12s)
      zz30q= zz30q+rwwz(14,12)*vvq*yc*(3./64.*o*x12*x2z
     #    +1./32.*o*x12*tx+3./64.*o*x2z*tx-7./64.*o*x2z-1./32.*
     #    o*tx-3./64.*o*x2zs+3./64.*os*x2z+1./64.*os*tx-1./64.*
     #    x12*x2z*tx-3./64.*x12*x2z-1./32.*x12*tx+1./16.*x2z+1./
     #    64.*tx*x12s+3./64.*x2zs-1./16.*txs)

      zz40q= rwwz(1,1)*xx*vvq*yc*(1./2.*o*x12*x2z*tx+o*x12*
     #    txs-1./2.*o*x2z*tx+1./2.*o*x2z*txs+1./2.*o*tx*x2zs+1./
     #    2.*os*x2z*tx+1./2.*os*txs-1./2.*x12*x2z*tx+1./2.*x12*
     #    x2z*txs-1./2.*tx*x2zs+1./2.*x12s*txs)
      zz40q= zz40q+rwwz(1,1)*bxpi*vvq*yc*(-o*x12*x2z*
     #    tx+2*o*x12*tx+5./2.*o*x2z*tx-1./2.*o*tx*x12s-1./2.*o*
     #    tx*x2zs-1./2.*o*tx+o*txs-os*x12*tx-os*x2z*tx+3./2.*
     #    os*tx-1./2.*oc*tx+1./2.*x12*x2z*tx-1./2.*x12*tx+x12*
     #    txs-3./2.*x2z*tx+1./2.*tx*x12s)
      zz40q= zz40q+rwwz(1,1)*vvq*yc*bxp*(o*tx+x12*tx
     #    -tx)
      zz40q= zz40q+rwwz(1,1)*vvq*yc*(-1./2.*o*x2z*tx
     #    -5./2.*o*tx-o*txs+1./2.*os*tx-1./2.*x12*x2z*tx-1./2.
     #    *x12*tx-x12*txs+3./2.*x2z*tx-1./2.*tx*x12s+tx)
      zz40q= zz40q+rwwz(2,3)*xx*vvq*yc*(1./4.*o*x2z*tx
     #    -1./4.*o*x2zs-1./4.*x12*x2z*tx+1./2.*x2z*txs-1./2.*tx
     #    *x2zs+1./4.*x2zs)
      zz40q= zz40q+rwwz(2,3)*bxpi*vvq*yc*(1./4.*o*x12*
     #    x2z+1./2.*o*x2z*tx-3./4.*o*x2z+1./4.*o*tx-1./2.*o*txs
     #    +1./4.*os*x2z-1./4.*os*tx+1./2.*x12*x2z*tx-1./2.*x12*
     #    x2z-1./4.*x12*tx-1./2.*x12*txs-1./2.*x2z*tx+1./2.*x2z
     #    +1./4.*tx*x12s+1./2.*txs)
      zz40q= zz40q+rwwz(2,3)*vvq*yc*bxp*(1./4.+1./2.*o
     #    *x12-1./2.*o+1./4.*os-1./2.*x12+1./4.*x12s)
      zz40q= zz40q+rwwz(2,3)*vvq*yc*(-1./4.-1./4.*o
     #    *x12*x2z-1./2.*o*x12-1./2.*o*x2z*tx+3./4.*o*x2z-1./4.
     #    *o*tx+1./2.*o*txs+1./2.*o-1./4.*os*x2z+1./4.*os*tx-
     #    1./4.*os-1./2.*x12*x2z*tx+1./2.*x12*x2z+1./4.*x12*tx+
     #    1./2.*x12*txs+1./2.*x12+1./2.*x2z*tx-1./2.*x2z-1./4.*
     #    tx*x12s-1./4.*x12s-1./2.*txs)
      zz40q= zz40q+rwwz(3,3)*xx*vvq*yc*(-1./4.*o*x2z*
     #    tx+1./4.*o*x2zs+1./4.*x12*x2z*tx-1./2.*x2z*txs+1./2.*
     #    tx*x2zs-1./4.*x2zs)
      zz40q= zz40q+rwwz(3,3)*bxpi*vvq*yc*(-3./4.*o*x12
     #    *x2z+3./4.*o*x2z-1./4.*o*tx-1./2.*o*x2zs+1./2.*o*txs
     #    -1./4.*os*x2z+1./4.*os*tx-x12*x2z*tx+1./2.*x12*x2z+
     #    1./4.*x12*tx+1./2.*x12*txs+1./2.*x2z*tx+1./2.*x2z*txs
     #    -1./2.*x2z-1./4.*tx*x12s-1./2.*tx*x2zs+1./2.*x2zs-1.
     #    /2.*txs)
      zz40q= zz40q+rwwz(3,3)*vvq*yc*bxp*(1./4.+1./2.*o
     #    *x12-1./2.*o+1./4.*os-1./2.*x12+1./4.*x12s)
      zz40q= zz40q+rwwz(3,3)*vvq*yc*(1./4.-1./4.*o*
     #    x12*x2z+o*x12+3./4.*o*x2z-1./4.*o*tx-1./2.*o*x12s-1.
     #    /2.*o-1./2.*os*x12-1./4.*os*x2z+1./4.*os*tx+1./4.*os
     #    +1./2.*x12*x2z+1./4.*x12*tx-1./2.*x12-1./2.*x2z-1./
     #    4.*tx*x12s+1./4.*x12s)
      zz40q= zz40q+rwwz(4,1)*xx*vvq*yc*(-1./2.*o*x12*
     #    x2z*txs-3./8.*o*x12*x2zs-1./4.*o*x2z*tx*x12s+1./4.*o*
     #    x2z*txs+1./4.*o*tx*x2zc+1./8.*o*tx*x2zs-3./8.*o*x2zc-
     #    1./4.*o*x2zs*txs+1./8.*o*x2zs-1./2.*os*x12*x2z*tx+1./4.
     #    *os*x12*x2zs+1./8.*os*x2z*tx-1./4.*os*x2z*txs+1./4.*os*
     #    x2zc-3./8.*os*x2zs-1./4.*oc*x2z*tx+1./4.*oc*x2zs+1./4.
     #    *x12*x2z*txs-1./8.*x12*tx*x2zs-1./4.*x12*x2zs*txs+1./8.
     #    *x12*x2zs-1./8.*x2z*tx*x12s-1./4.*x2z*x12s*txs+1./8.*
     #    x2zc+1./4.*x2zs*txs)
      zz40q= zz40q+rwwz(4,1)*bxpi*vvq*yc*(-3./4.*o*x12
     #    *x2z*tx+1./2.*o*x12*x2z*txs-9./8.*o*x12*x2z-1./8.*o*x12
     #    *tx*x2zs+5./8.*o*x12*x2zs-o*x12*txs+1./8.*o*x2z*tx*x12s
     #    +5./8.*o*x2z*tx+1./2.*o*x2z*x12s-o*x2z*txs+1./4.*o*
     #    x2z-1./8.*o*tx*x12s+1./8.*o*tx*x12c-1./8.*o*tx*x2zc+1.
     #    /2.*o*tx*x2zs+3./8.*o*x12s*txs+1./8.*o*x2zc+1./8.*o*
     #    x2zs*txs-13./8.*o*x2zs+1./4.*o*txs+1./4.*os*x12*x2z*tx
     #    +5./4.*os*x12*x2z-5./8.*os*x12*tx-1./4.*os*x12*x2zs+3.
     #    /8.*os*x12*txs-3./4.*os*x2z*tx-1./8.*os*x2z*x12s+1./4.*
     #    os*x2z*txs-7./8.*os*x2z+3./8.*os*tx*x12s-1./8.*os*tx*
     #    x2zs+1./8.*os*tx-1./8.*os*x2zc+11./8.*os*x2zs-1./2.*
     #    os*txs-1./4.*oc*x12*x2z+3./8.*oc*x12*tx+1./8.*oc*x2z*tx
     #    +3./4.*oc*x2z-3./8.*oc*tx-1./4.*oc*x2zs+1./8.*oc*txs
     #    -1./8.*oq*x2z+1./8.*oq*tx-1./8.*x12*x2z*tx-x12*x2z*
     #    txs+1./4.*x12*x2z-1./4.*x12*tx*x2zs+1./8.*x12*x2zs*txs
     #    -1./4.*x12*x2zs)
      zz40q= zz40q+rwwz(4,1)*bxpi*vvq*yc*(1./4.*x12*txs
     #    +1./4.*x2z*x12s*txs-1./4.*x2z*x12s+3./4.*x2z*txs-1./8.
     #    *tx*x12s+1./8.*tx*x12c-1./8.*tx*x2zc+1./4.*tx*x2zs-1./
     #    2.*x12s*txs+1./8.*x12c*txs+1./2.*x2zs)
      zz40q= zz40q+rwwz(4,1)*vvq*bxps*yc*(-1./4.-1./
     #    2.*o*x12+1./2.*o-1./4.*os+1./2.*x12-1./4.*x12s)
      zz40q= zz40q+rwwz(4,1)*vvq*yc*bxp*(1./4.+3./4.*o
     #    *x12*x2z+1./2.*o*x12*tx+3./4.*o*x12+1./4.*o*x2z*tx-5./
     #    4.*o*x2z-1./2.*o*tx+1./8.*o*x12s-1./2.*o*txs-7./8.*o
     #    -1./8.*os*x12+5./8.*os*x2z+3./4.*os-1./8.*oc+1./4.*
     #    x12*x2z*tx-3./4.*x12*x2z-x12*tx-1./2.*x12*txs-3./8.*
     #    x12-1./4.*x2z*tx+1./8.*x2z*x12s+5./8.*x2z+1./2.*tx*
     #    x12s+1./2.*tx+1./8.*x12c+1./2.*txs)
      zz40q= zz40q+rwwz(4,1)*vvq*yc*(-7./8.*o*x12*x2z
     #    +5./4.*o*x12*tx-1./4.*o*x12*x2zs+3./4.*o*x12-1./8.*o*
     #    x2z*tx-1./8.*o*x2z*x12s+1./2.*o*x2z*txs+2*o*x2z-3./4.
     #    *o*tx*x12s-3./8.*o*tx*x2zs-1./2.*o*tx-3./4.*o*x12s+1./
     #    8.*o*x12c+o*x2zs+3./4.*o*txs-1./8.*o-3./4.*os*x12*tx
     #    -9./8.*os*x12+3./8.*os*x2z*tx-3./2.*os*x2z+os*tx+3./
     #    8.*os*x12s-1./2.*os*x2zs+1./2.*os+3./8.*oc*x12+1./8.*
     #    oc*x2z-1./4.*oc*tx-1./2.*oc+1./8.*oq+9./8.*x12*x2z*tx
     #    +1./2.*x12*x2z*txs+1./2.*x12*x2z-1./8.*x12*tx*x2zs+1./
     #    4.*x12*x2zs+3./4.*x12*txs-1./8.*x12-3./8.*x2z*tx*x12s
     #    -3./4.*x2z*tx+1./8.*x2z*x12s-3./4.*x2z*txs-5./8.*x2z
     #    +1./4.*tx*x12s-1./4.*tx*x12c+3./8.*tx*x2zs+1./4.*x12s
     #    -1./8.*x12c-1./2.*x2zs-1./2.*txs)
      zz40q= zz40q+rwwz(4,4)*xx*vvq*yc*(1./8.*o*x12*
     #    x2zc+1./16.*o*x12s*x2zs+1./16.*o*x2zq-1./16.*o*x2zc-1.
     #    /16.*o*x2zs*txs+1./16.*os*x12*x2zs-1./16.*os*tx*x2zs+1./
     #    16.*os*x2zc+1./8.*x12*tx*x2zc-1./16.*x12*x2zc-1./16.*
     #    x12*x2zs*txs+1./16.*tx*x12s*x2zs+1./16.*tx*x2zq-1./16.*
     #    x2zq-1./16.*x2zc*txs)
      zz40q= zz40q+rwwz(4,4)*bxpi*vvq*yc*(3./16.*o*x12*
     #    x2z*txs-3./16.*o*x12*tx*x2zs-5./32.*o*x12*x2zc+11./16.*
     #    o*x12*x2zs-3./32.*o*x2z*tx*x12s+1./8.*o*x2z*x12s-3./32.
     #    *o*x2z*x12c-1./8.*o*x2z*txs-3./32.*o*tx*x2zc-1./8.*o*tx
     #    *x2zs-7./32.*o*x12s*x2zs-1./32.*o*x2zq+7./16.*o*x2zc+
     #    1./8.*o*x2zs*txs-3./16.*o*x2zs+3./32.*os*x12*x2z*tx+1./
     #    8.*os*x12*x2z-5./16.*os*x12*x2zs-1./8.*os*x2z*tx-3./16.
     #    *os*x2z*x12s+3./32.*os*x2z*txs+1./32.*os*tx*x2zs-1./8.*
     #    os*x2zc+9./32.*os*x2zs-3./32.*oc*x12*x2z+3./32.*oc*x2z*
     #    tx-3./32.*oc*x2zs-1./8.*x12*x2z*txs-5./32.*x12*tx*x2zc
     #    +3./8.*x12*tx*x2zs+3./16.*x12*x2zc+1./8.*x12*x2zs*txs
     #    -3./16.*x12*x2zs+1./8.*x2z*tx*x12s-3./32.*x2z*tx*x12c
     #    +3./32.*x2z*x12s*txs-7./32.*tx*x12s*x2zs-1./32.*tx*x2zq
     #    +1./4.*tx*x2zc+5./32.*x12s*x2zs+1./32.*x2zq+1./32.*
     #    x2zc*txs-5./16.*x2zc-1./4.*x2zs*txs)
      zz40q= zz40q+rwwz(4,4)*vvq*bxps*yc*(1./8.+1./8.*
     #    o*x12*x2z+1./2.*o*x12-1./8.*o*x2z-3./16.*o*x12s-5./16.
     #    *o-3./16.*os*x12+1./16.*os*x2z+1./4.*os-1./16.*oc-1.
     #    /8.*x12*x2z-5./16.*x12+1./16.*x2z*x12s+1./16.*x2z+1./
     #    4.*x12s-1./16.*x12c)
      zz40q= zz40q+rwwz(4,4)*vvq*yc*bxp*(1./8.*o*x12*x2z
     #    *tx-3./4.*o*x12*x2z-1./8.*o*x12*x2zs-1./8.*o*x12*txs+
     #    7./16.*o*x12-1./4.*o*x2z*tx+1./16.*o*x2z*txs+7./8.*o*
     #    x2z+1./16.*o*tx*x12s-1./16.*o*tx*x2zs-1./8.*o*tx-9./
     #    16.*o*x12s+3./16.*o*x12c+1./4.*o*x2zs+3./16.*o*txs-1./
     #    16.*o+1./16.*os*x12*x2z-1./16.*os*x12*tx-9./16.*os*x12
     #    +1./8.*os*x2z*tx-1./2.*os*x2z+3./16.*os*tx+5./16.*os*
     #    x12s-3./32.*os*x2zs-1./16.*os*txs+5./32.*os+3./16.*oc
     #    *x12+1./16.*oc*x2z-1./16.*oc*tx-1./8.*oc+1./32.*oq-
     #    1./8.*x12*x2z*tx+1./16.*x12*x2z*txs+3./4.*x12*x2z-1./16.
     #    *x12*tx*x2zs+1./8.*x12*tx+1./32.*x12*x12c+3./16.*x12*
     #    x2zs+3./16.*x12*txs-1./16.*x12+1./8.*x2z*tx-5./16.*
     #    x2z*x12s-1./16.*x2z*txs-7./16.*x2z-3./16.*tx*x12s+1./
     #    16.*tx*x12c+1./16.*tx*x2zs-1./32.*x12s*x2zs-1./16.*x12s
     #    *txs+5./32.*x12s-1./8.*x12c-5./32.*x2zs-1./8.*txs)
      zz40q= zz40q+rwwz(4,4)*vvq*yc*(3./16.*o*x12*x2z*
     #    tx-o*x12*x2z-1./32.*o*x12*x12c+1./32.*o*x12*x2zc+9./
     #    32.*o*x12*x2zs-3./16.*o*x12*txs-3./32.*o*x2z*tx*x12s+1./
     #    4.*o*x2z*tx+23./32.*o*x2z*x12s-1./32.*o*x2z*x12c-1./4.*
     #    o*x2z*txs+3./16.*o*x2z+3./32.*o*tx*x12s-1./16.*o*tx*
     #    x12c+1./32.*o*tx*x2zc+11./32.*o*tx*x2zs+1./32.*o*x12s*
     #    x2zs+3./32.*o*x12s*txs-1./16.*o*x12s+3./32.*o*x12c-5./
     #    32.*o*x2zc-1./32.*o*x2zs*txs-7./8.*o*x2zs+1./16.*o*txs
     #    -3./32.*os*x12*x2z*tx+13./16.*os*x12*x2z-3./32.*os*x12*
     #    tx+1./32.*os*x12*x2zs+3./32.*os*x12*txs-1./16.*os*x12
     #    -5./32.*os*x2z*tx-3./32.*os*x2z*x12s-3./8.*os*x2z-1./
     #    32.*os*tx*x2zs+1./16.*os*tx+3./16.*os*x12s-3./32.*os*
     #    x12c+1./32.*os*x2zc+5./16.*os*x2zs-3./32.*os*txs-3./
     #    32.*oc*x12*x2z+1./16.*oc*x12*tx+3./32.*oc*x12-1./32.*oc
     #    *x2z*tx+7./32.*oc*x2z-3./32.*oc*tx-3./32.*oc*x12s+1./
     #    32.*oc*txs)
      zz40q= zz40q+rwwz(4,4)*vvq*yc*(-1./32.*oq*x12
     #    -1./32.*oq*x2z+1./32.*oq*tx-3./8.*x12*x2z*tx-1./4.*
     #    x12*x2z*txs+3./16.*x12*x2z-1./32.*x12*tx*x12c+1./32.*
     #    x12*tx*x2zc+5./32.*x12*tx*x2zs-1./16.*x12*x2zc-1./32.*
     #    x12*x2zs*txs-9./16.*x12*x2zs+1./16.*x12*txs+11./32.*x2z
     #    *tx*x12s-1./32.*x2z*tx*x12c-5./16.*x2z*x12s+1./8.*x2z*
     #    x12c+5./16.*x2z*txs+1./32.*tx*x12s*x2zs-1./16.*tx*x12s
     #    +3./32.*tx*x12c-3./32.*tx*x2zc-5./16.*tx*x2zs+1./16.*
     #    x12s*x2zs-3./32.*x12s*txs+1./32.*x12c*txs+1./8.*x2zc+
     #    3./32.*x2zs*txs+9./16.*x2zs)
      zz40q= zz40q+rwwz(4,11)*xx*vvq*yc*(1./8.*o*x12*
     #    x2zs-1./8.*o*tx*x2zs+1./8.*o*x2zc+1./8.*x12*tx*x2zs+1.
     #    /8.*tx*x2zc-1./8.*x2zc-1./8.*x2zs*txs)
      zz40q= zz40q+rwwz(4,11)*bxpi*vvq*yc*(1./4.*o*x12*
     #    x2z-3./8.*o*x12*x2zs-1./4.*o*x2z*tx-1./4.*o*x2z*x12s+
     #    1./4.*o*x2z*txs-1./8.*o*tx*x2zs-1./8.*o*x2zc+5./8.*o*
     #    x2zs-1./4.*os*x12*x2z+1./4.*os*x2z*tx-1./4.*os*x2zs+1.
     #    /4.*x12*x2z*tx+1./4.*x12*x2z*txs-3./8.*x12*tx*x2zs+3./8.
     #    *x12*x2zs-1./4.*x2z*tx*x12s-1./4.*x2z*txs-1./8.*tx*x2zc
     #    +1./4.*tx*x2zs+1./8.*x2zc+1./8.*x2zs*txs-3./8.*x2zs)
      zz40q= zz40q+rwwz(4,11)*vvq*bxps*yc*(-1./8.-1./
     #    4.*o*x12+1./4.*o-1./8.*os+1./4.*x12-1./8.*x12s)
      zz40q= zz40q+rwwz(4,11)*vvq*yc*bxp*(-1./8.+1./
     #    8.*o*x12*x2z-7./8.*o*x12+1./8.*o*x2z*tx-3./8.*o*x2z+1.
     #    /8.*o*tx+1./2.*o*x12s-1./8.*o*txs+3./8.*o+1./2.*os*
     #    x12+1./8.*os*x2z-1./8.*os*tx-3./8.*os+1./8.*oc+1./8.
     #    *x12*x2z*tx-1./4.*x12*x2z-1./8.*x12*tx-1./8.*x12*txs+
     #    3./8.*x12-1./8.*x2z*tx+1./4.*x2z+1./8.*tx*x12s-3./8.*
     #    x12s+1./8.*x12c+1./8.*txs)
      zz40q= zz40q+rwwz(4,11)*vvq*yc*(-1./4.*o*x12*
     #    x2z*tx+9./8.*o*x12*x2z+1./4.*o*x12*txs-1./8.*o*x12+1./
     #    8.*o*x2z*tx-1./8.*o*x2z*x12s-7./8.*o*x2z-1./8.*o*tx*
     #    x12s+1./8.*o*tx+1./4.*o*x12s-1./8.*o*x12c+1./8.*o*
     #    x2zs-1./4.*o*txs-1./4.*os*x12*x2z+1./8.*os*x12*tx+1./
     #    4.*os*x12-1./8.*os*x2z*tx+5./8.*os*x2z-1./4.*os*tx-1./
     #    4.*os*x12s+1./8.*os*txs-1./8.*oc*x12-1./8.*oc*x2z+1./
     #    8.*oc*tx+3./8.*x12*x2z*tx-3./4.*x12*x2z-1./8.*x12*tx-
     #    1./4.*x12*txs-1./8.*x2z*tx*x12s-1./8.*x2z*tx+3./8.*x2z*
     #    x12s-1./8.*x2z*txs+3./8.*x2z+1./4.*tx*x12s-1./8.*tx*
     #    x12c+1./8.*tx*x2zs+1./8.*x12s*txs-1./8.*x2zs+1./8.*
     #    txs)
      zz40q= zz40q+rwwz(4,12)*xx*vvq*yc*(-3./16.*o*
     #    x12*x2zs+1./8.*o*x2z*txs+1./16.*o*tx*x2zs-3./16.*o*x2zc
     #    +1./16.*o*x2zs+1./16.*os*x2z*tx-1./16.*os*x2zs+1./8.*
     #    x12*x2z*txs-5./16.*x12*tx*x2zs+1./16.*x12*x2zs-1./16.*
     #    x2z*tx*x12s-1./4.*tx*x2zc+3./16.*x2zc+1./4.*x2zs*txs)
      zz40q= zz40q+rwwz(4,12)*bxpi*vvq*yc*(1./4.*o*x12*
     #    x2z*tx-9./16.*o*x12*x2z+7./16.*o*x12*x2zs-1./4.*o*x12*
     #    txs+5./16.*o*x2z*tx+5./16.*o*x2z*x12s-3./8.*o*x2z*txs
     #    +1./8.*o*x2z+1./16.*o*tx*x12s+1./4.*o*tx*x2zs+1./8.*o
     #    *x2zc-15./16.*o*x2zs+1./8.*o*txs+3./8.*os*x12*x2z-1./
     #    16.*os*x12*tx-3./16.*os*x2z*tx-3./16.*os*x2z+1./16.*os*
     #    tx+5./16.*os*x2zs-1./8.*os*txs+1./16.*oc*x2z-1./16.*
     #    oc*tx-9./16.*x12*x2z*tx-3./8.*x12*x2z*txs+1./8.*x12*x2z
     #    +1./2.*x12*tx*x2zs-1./2.*x12*x2zs+1./8.*x12*txs+7./16.
     #    *x2z*tx*x12s-1./8.*x2z*x12s+5./8.*x2z*txs-1./16.*tx*
     #    x12s+1./16.*tx*x12c+1./8.*tx*x2zc-5./8.*tx*x2zs-1./8.
     #    *x12s*txs-1./8.*x2zc-1./8.*x2zs*txs+5./8.*x2zs)
      zz40q= zz40q+rwwz(4,12)*vvq*yc*bxp*(1./4.+1./8.*
     #    o*x12*x2z+7./8.*o*x12+1./8.*o*x2z*tx-1./8.*o*x2z-5./
     #    16.*o*x12s-1./8.*o*txs-9./16.*o-5./16.*os*x12+1./16.*
     #    os*x2z+3./8.*os-1./16.*oc+1./8.*x12*x2z*tx-1./8.*x12*
     #    x2z-1./8.*x12*txs-9./16.*x12-1./8.*x2z*tx+1./16.*x2z*
     #    x12s+1./16.*x2z+3./8.*x12s-1./16.*x12c+1./8.*txs)
      zz40q= zz40q+rwwz(4,12)*vvq*yc*(-17./16.*o*x12*
     #    x2z-1./16.*o*x12*x2zs+3./8.*o*x12-7./16.*o*x2z*tx+1./
     #    16.*o*x2z*x12s+1./8.*o*x2z*txs+5./4.*o*x2z+1./16.*o*tx*
     #    x12s-1./8.*o*tx*x2zs-1./4.*o*tx-7./16.*o*x12s+1./8.*o
     #    *x12c+3./16.*o*x2zs+3./8.*o*txs-1./16.*o+1./8.*os*x12
     #    *x2z-1./16.*os*x12*tx-7./16.*os*x12+1./16.*os*x2z*tx-
     #    5./8.*os*x2z+5./16.*os*tx+1./4.*os*x12s-1./16.*os*x2zs
     #    +1./8.*os+1./8.*oc*x12+1./16.*oc*x2z-1./16.*oc*tx-1.
     #    /16.*oc-5./16.*x12*x2z*tx+1./8.*x12*x2z*txs+x12*x2z-1.
     #    /8.*x12*tx*x2zs+1./4.*x12*tx+1./8.*x12*x2zs+3./8.*x12*
     #    txs-1./16.*x12-1./16.*x2z*tx*x12s+3./8.*x2z*tx-5./16.
     #    *x2z*x12s-1./4.*x2z*txs-11./16.*x2z-5./16.*tx*x12s+1./
     #    16.*tx*x12c+1./4.*tx*x2zs+1./8.*x12s-1./16.*x12c-1./8.
     #    *x2zs-3./8.*txs)
      zz40q= zz40q+rwwz(5,6)*xx*vvq*yc*(-1./16.*o*x12
     #    *x2z*tx+1./8.*o*x12*txs+1./16.*o*x2z*txs-1./16.*o*tx*
     #    x2zs-1./16.*o*x2zs-1./16.*os*x2z*tx+1./16.*os*txs-1./
     #    8.*x12*x2z*tx+1./16.*x12*x2z*txs-1./8.*x2z*txs+1./16.*
     #    tx*x2zs+1./16.*x12s*txs+1./16.*x2zs)
      zz40q= zz40q+rwwz(5,6)*bxpi*vvq*yc*(1./16.*o*x12*
     #    x2z+1./16.*o*x12*tx-1./8.*o*x2z*tx-1./8.*o*x2z+1./16.
     #    *o*txs-1./16.*os*tx-1./16.*x12*x2z*tx-1./8.*x12*x2z-1.
     #    /8.*x12*tx+1./16.*x12*txs+1./8.*x2z*tx+1./8.*x2z+1./8.
     #    *tx*x12s-1./8.*txs)
      zz40q= zz40q+rwwz(5,6)*vvq*yc*bxp*(1./16.+1./16.
     #    *o*x12-1./16.*o*tx-1./16.*o-1./16.*x12*tx-1./8.*x12
     #    +1./16.*tx+1./16.*x12s)
      zz40q= zz40q+rwwz(5,6)*vvq*yc*(-1./16.-1./16.
     #    *o*x12*x2z-1./16.*o*x12*tx-1./16.*o*x12+1./8.*o*x2z*tx
     #    +1./8.*o*x2z+1./16.*o*tx-1./16.*o*txs+1./16.*o+1./
     #    16.*os*tx+1./16.*x12*x2z*tx+1./8.*x12*x2z+3./16.*x12*tx
     #    -1./16.*x12*txs+1./8.*x12-1./8.*x2z*tx-1./8.*x2z-1./
     #    8.*tx*x12s-1./16.*tx-1./16.*x12s+1./8.*txs)
      zz40q= zz40q+rwwz(6,6)*xx*vvq*yc*(1./16.*o*x12*
     #    x2z*tx+1./8.*o*x12*txs+3./16.*o*x2z*txs+1./16.*o*tx*
     #    x2zs-3./16.*o*x2zs+1./16.*os*x2z*tx+1./8.*os*x2zs+1./
     #    16.*os*txs-1./8.*x12*x2z*tx+3./16.*x12*x2z*txs-1./8.*
     #    x2z*txs-1./16.*tx*x2zs+1./16.*x12s*txs+1./16.*x2zs)
      zz40q= zz40q+rwwz(6,6)*bxpi*vvq*yc*(3./16.*o*x12*
     #    x2z+3./16.*o*x12*tx-1./4.*o*x12*txs+1./8.*o*x2z*tx-1./
     #    8.*o*x2z*txs-3./8.*o*x2z+1./4.*o*x2zs+3./16.*o*txs-1./
     #    8.*os*x12*x2z+3./8.*os*x2z+1./16.*os*tx-1./8.*os*x2zs
     #    -1./8.*os*txs-1./8.*oc*x2z+5./16.*x12*x2z*tx-1./8.*
     #    x12*x2z*txs-1./8.*x12*x2z-1./8.*x12*tx+3./16.*x12*txs
     #    -1./8.*x2z*tx+1./8.*x2z*txs+1./8.*x2z+1./8.*tx*x12s
     #    -1./8.*x12s*txs-1./8.*x2zs-1./8.*txs)
      zz40q= zz40q+rwwz(6,6)*vvq*yc*bxp*(-1./16.-1./
     #    16.*o*x12+1./16.*o*tx+1./16.*o+1./16.*x12*tx+1./8.*
     #    x12-1./16.*tx-1./16.*x12s)
      zz40q= zz40q+rwwz(6,6)*vvq*yc*(-1./16.+1./16.
     #    *o*x12*x2z+1./16.*o*x12*tx-3./16.*o*x12-1./8.*o*x2z*tx
     #    -1./8.*o*x2z-1./16.*o*tx-1./16.*o*txs+3./16.*o+1./8.
     #    *os*x12-1./16.*os*tx-1./4.*os+1./8.*oc-1./16.*x12*x2z
     #    *tx-1./8.*x12*x2z-3./16.*x12*tx-1./16.*x12*txs+1./8.*
     #    x12+1./8.*x2z*tx+1./8.*x2z+1./8.*tx*x12s+1./16.*tx-
     #    1./16.*x12s)
      zz40q= zz40q+rwwz(7,1)*xx*vvq*yc*(-1./8.*o*x12*
     #    x2z*tx+1./2.*o*x12*x2z*txs+1./8.*o*x12*tx*x2zs-3./16.*o
     #    *x12*x2zs-1./4.*o*x12*txs+1./16.*o*x2z*tx*x12s-3./8.*o*
     #    x2z*txs+1./16.*o*tx*x2zc-1./16.*o*tx*x2zs+3./16.*o*x12s
     #    *txs-3./16.*o*x2zc+3./16.*o*x2zs*txs+5./16.*o*x2zs+1./
     #    8.*os*x12*x2z*tx+1./8.*os*x12*x2zs+3./16.*os*x12*txs+1./
     #    4.*os*x2z*txs+1./8.*os*tx*x2zs+1./8.*os*x2zc-5./16.*os*
     #    x2zs-1./8.*os*txs+1./16.*oc*x2z*tx+1./8.*oc*x2zs+1./
     #    16.*oc*txs+1./4.*x12*x2z*tx-3./8.*x12*x2z*txs-3./16.*
     #    x12*tx*x2zs+3./16.*x12*x2zs*txs+1./16.*x12*x2zs-1./8.*
     #    x2z*tx*x12s+1./4.*x2z*x12s*txs+1./4.*x2z*txs-1./16.*tx*
     #    x2zc-1./8.*x12s*txs+1./16.*x12c*txs+1./16.*x2zc-1./8.
     #    *x2zs*txs-1./8.*x2zs)
      zz40q= zz40q+rwwz(7,1)*bxpi*vvq*yc*(7./8.*o*x12*
     #    x2z*tx-1./4.*o*x12*x2z*txs-7./8.*o*x12*x2z-3./16.*o*x12
     #    *tx*x2zs-1./2.*o*x12*tx+5./16.*o*x12*x2zs+5./8.*o*x12*
     #    txs-3./16.*o*x2z*tx*x12s-3./8.*o*x2z*tx+1./4.*o*x2z*
     #    x12s+7./16.*o*x2z*txs+3./4.*o*x2z+7./16.*o*tx*x12s-1./
     #    16.*o*tx*x12c-1./16.*o*tx*x2zc+1./2.*o*tx*x2zs-3./16.*o
     #    *x12s*txs+1./16.*o*x2zc-1./16.*o*x2zs*txs-5./8.*o*x2zs
     #    -1./2.*o*txs-3./8.*os*x12*x2z*tx+11./16.*os*x12*x2z+1.
     #    /2.*os*x12*tx-1./8.*os*x12*x2zs-3./16.*os*x12*txs+5./8.
     #    *os*x2z*tx-1./16.*os*x2z*x12s-1./8.*os*x2z*txs-7./8.*os
     #    *x2z-3./16.*os*tx*x12s-3./16.*os*tx*x2zs-1./8.*os*tx-
     #    1./16.*os*x2zc+5./8.*os*x2zs+5./16.*os*txs-1./8.*oc*x12
     #    *x2z-3./16.*oc*x12*tx-3./16.*oc*x2z*tx+7./16.*oc*x2z+
     #    3./16.*oc*tx-1./8.*oc*x2zs-1./16.*oc*txs-1./16.*oq*x2z
     #    -1./16.*oq*tx-3./8.*x12*x2z*tx+7./16.*x12*x2z*txs+3./
     #    8.*x12*x2z)
      zz40q= zz40q+rwwz(7,1)*bxpi*vvq*yc*(3./16.*x12*tx*
     #    x2zs+1./4.*x12*tx-1./16.*x12*x2zs*txs-1./8.*x12*x2zs-
     #    1./2.*x12*txs+1./4.*x2z*tx*x12s+1./8.*x2z*tx-1./8.*x2z*
     #    x12s*txs-1./8.*x2z*x12s-1./8.*x2z*txs-1./4.*x2z-3./8.
     #    *tx*x12s+1./8.*tx*x12c+1./16.*tx*x2zc-3./8.*tx*x2zs+5.
     #    /16.*x12s*txs-1./16.*x12c*txs+1./8.*x2zs+1./4.*txs)
      zz40q= zz40q+rwwz(7,1)*vvq*yc*bxp*(-1./8.+3./
     #    16.*o*x12*x2z-1./8.*o*x12*tx-5./16.*o*x12+1./16.*o*x2z*
     #    tx-3./16.*o*x2z+3./16.*o*tx+1./8.*o*x12s+3./16.*o+1.
     #    /16.*os*x12+1./8.*os*x2z-1./16.*os*tx-1./16.*os+1./16.
     #    *x12*x2z*tx-1./8.*x12*x2z+3./16.*x12*tx+5./16.*x12-1./
     #    16.*x2z*tx+1./16.*x2z*x12s+1./16.*x2z-1./16.*tx*x12s-
     #    1./8.*tx-1./4.*x12s+1./16.*x12c)
      zz40q= zz40q+rwwz(7,1)*vvq*yc*(1./8.+1./16.*o*
     #    x12*x2z-1./4.*o*x12*tx-1./8.*o*x12*x2zs-1./8.*o*x12*txs
     #    +13./16.*o*x12-9./16.*o*x2z*tx-1./16.*o*x2z*x12s-3./
     #    16.*o*x2z*txs-1./16.*o*x2z-1./16.*o*tx*x2zs+5./16.*o*tx
     #    -7./16.*o*x12s+1./16.*o*x12c+5./16.*o*x2zs+1./4.*o*
     #    txs-7./16.*o-1./16.*os*x12*x2z+3./16.*os*x12*tx-11./
     #    16.*os*x12+1./16.*os*x2z*tx-1./8.*os*x2z-3./8.*os*tx+
     #    3./16.*os*x12s-3./16.*os*x2zs-1./16.*os*txs+9./16.*os
     #    +3./16.*oc*x12+1./8.*oc*tx-5./16.*oc+1./16.*oq-5./
     #    16.*x12*x2z*tx-3./16.*x12*x2z*txs-1./4.*x12*x2z+1./16.*
     #    x12*tx+1./8.*x12*x2zs+1./4.*x12*txs-5./16.*x12-1./16.
     #    *x2z*tx*x12s+7./16.*x2z*tx+1./16.*x2z*x12s+1./8.*x2z*
     #    txs+3./16.*x2z+1./8.*tx*x12s-1./16.*tx*x12c+1./16.*tx
     #    *x2zs-1./8.*tx-1./16.*x12s*txs+1./4.*x12s-1./16.*x12c
     #    -1./8.*x2zs-1./4.*txs)
      zz40q= zz40q+rwwz(7,4)*xx*vvq*yc*(1./16.*o*x12*
     #    x2z*txs+1./32.*o*x12*tx*x2zc+1./16.*o*x12*tx*x2zs-1./8.
     #    *o*x12*x2zs*txs-1./32.*o*x12*x2zs+1./32.*o*x2z*tx*x12s-
     #    1./32.*o*x2z*tx*x12c-3./32.*o*x2z*x12s*txs-1./32.*o*tx*
     #    x12s*x2zs+1./32.*o*tx*x2zq-1./32.*o*tx*x2zc-1./32.*o*tx
     #    *x2zs+1./32.*o*x12s*x2zs-1./32.*o*x2zq-1./32.*o*x2zc*
     #    txs+1./32.*o*x2zc+3./32.*o*x2zs*txs+1./16.*os*x12*x2z*
     #    tx-3./32.*os*x12*x2z*txs-1./16.*os*x12*tx*x2zs+1./16.*
     #    os*x12*x2zc-1./32.*os*x12*x2zs-3./32.*os*x2z*tx*x12s+1./
     #    32.*os*x2z*txs+1./32.*os*tx*x2zc+1./32.*os*tx*x2zs+1./
     #    32.*os*x12s*x2zs+1./32.*os*x2zq-3./32.*os*x2zc-1./16.*
     #    os*x2zs*txs+1./32.*os*x2zs-3./32.*oc*x12*x2z*tx+1./16.*
     #    oc*x12*x2zs+1./32.*oc*x2z*tx-1./32.*oc*x2z*txs-1./32.*
     #    oc*tx*x2zs+1./16.*oc*x2zc-1./16.*oc*x2zs-1./32.*oq*x2z*
     #    tx+1./32.*oq*x2zs-1./32.*x12*tx*x2zs-1./32.*x12*x2zc*
     #    txs)
      zz40q= zz40q+rwwz(7,4)*xx*vvq*yc*(3./32.*x12*x2zs
     #    *txs+1./32.*x2z*x12s*txs-1./32.*x2z*x12c*txs+1./32.*tx*
     #    x12s*x2zs-1./32.*tx*x2zq+1./32.*tx*x2zc-1./16.*x12s*
     #    x2zs*txs+1./16.*x2zc*txs-1./16.*x2zs*txs)
      zz40q= zz40q+rwwz(7,4)*bxpi*vvq*yc*(-1./64.*o*oq
     #    *x2z+1./64.*o*oq*tx+7./32.*o*x12*x2z*tx-7./16.*o*x12*
     #    x2z*txs-1./16.*o*x12*x2z+1./64.*o*x12*tx*x12c-1./32.*o*
     #    x12*tx*x2zc+1./64.*o*x12*tx*x2zs+3./64.*o*x12*x2zc+3./
     #    32.*o*x12*x2zs*txs+1./16.*o*x12*txs-7./32.*o*x2z*tx*x12s
     #    +1./32.*o*x2z*tx*x12c-1./16.*o*x2z*tx+9./64.*o*x2z*x12s
     #    *txs+7./64.*o*x2z*x12s-3./64.*o*x2z*x12c+1./4.*o*x2z*
     #    txs+1./32.*o*tx*x12s-3./64.*o*tx*x12c-1./64.*o*tx*x2zq
     #    +1./8.*o*tx*x2zc-1./32.*o*tx*x2zs-1./64.*o*x12s*x2zs-
     #    9./64.*o*x12s*txs+1./16.*o*x12c*txs+1./64.*o*x2zq+1./64.
     #    *o*x2zc*txs-7./64.*o*x2zc-13./64.*o*x2zs*txs+1./16.*o*
     #    x2zs-19./64.*os*x12*x2z*tx+9./64.*os*x12*x2z*txs-1./32.
     #    *os*x12*x2z+1./16.*os*x12*tx-3./64.*os*x12*x2zc+7./32.*
     #    os*x12*x2zs-9./64.*os*x12*txs+3./32.*os*x2z*tx*x12s+7./
     #    64.*os*x2z*tx-1./64.*os*x2z*x12c-7./32.*os*x2z*txs+1./
     #    16.*os*x2z)
      zz40q= zz40q+rwwz(7,4)*bxpi*vvq*yc*(-9./64.*os*
     #    tx*x12s+1./16.*os*tx*x12c-1./32.*os*tx*x2zc+1./32.*os*
     #    tx*x2zs-3./64.*os*x12s*x2zs+3./32.*os*x12s*txs-1./64.*
     #    os*x2zq+5./32.*os*x2zc+3./64.*os*x2zs*txs-1./4.*os*x2zs
     #    +1./32.*os*txs+3./32.*oc*x12*x2z*tx+9./64.*oc*x12*x2z
     #    -9./64.*oc*x12*tx-3./32.*oc*x12*x2zs+1./16.*oc*x12*txs
     #    -1./8.*oc*x2z*tx-3./64.*oc*x2z*x12s+3./64.*oc*x2z*txs
     #    -9./64.*oc*x2z+3./32.*oc*tx*x12s+1./32.*oc*tx-3./64.*
     #    oc*x2zc+15./64.*oc*x2zs-3./64.*oc*txs-3./64.*oq*x12*x2z
     #    +1./16.*oq*x12*tx+1./32.*oq*x2z*tx+3./32.*oq*x2z-3./
     #    64.*oq*tx-3./64.*oq*x2zs+1./64.*oq*txs-1./16.*x12*x2z*
     #    tx+1./4.*x12*x2z*txs+3./64.*x12*tx*x2zc+1./64.*x12*x12c
     #    *txs+1./64.*x12*x2zc*txs-13./64.*x12*x2zs*txs+7./64.*
     #    x2z*tx*x12s-3./64.*x2z*tx*x12c-7./32.*x2z*x12s*txs+3./
     #    64.*x2z*x12c*txs-1./8.*x2z*txs-1./64.*tx*x12s*x2zs+1./
     #    64.*tx*x2zq)
      zz40q= zz40q+rwwz(7,4)*bxpi*vvq*yc*(-7./64.*tx*
     #    x2zc+1./16.*tx*x2zs+3./64.*x12s*x2zs*txs+1./32.*x12s*
     #    txs-3./64.*x12c*txs-1./32.*x2zc*txs+7./32.*x2zs*txs)
      zz40q= zz40q+rwwz(7,4)*vvq*yc*bxp*(-1./16.*o*x12
     #    *x2z*tx+1./16.*o*x12*x2z-3./32.*o*x12*tx+1./64.*o*x12*
     #    x2zs+1./16.*o*x12*txs+1./32.*o*x12+1./16.*o*x2z*tx-1./
     #    32.*o*x2z*x12s-1./32.*o*x2z*txs-1./32.*o*x2z+3./64.*o*
     #    tx*x12s+1./64.*o*tx*x2zs+1./32.*o*tx-3./64.*o*x12s+1./
     #    64.*o*x12c-1./64.*o*x2zs-3./32.*o*txs-1./32.*os*x12*x2z
     #    +3./64.*os*x12*tx-1./32.*os*x2z*tx+1./32.*os*x2z-3./
     #    64.*os*tx+1./64.*os*x12s+1./64.*os*x2zs+1./32.*os*txs
     #    -1./32.*os-1./64.*oc*x12+1./64.*oc*tx+3./64.*oc-1./
     #    64.*oq+1./16.*x12*x2z*tx-1./32.*x12*x2z*txs+1./64.*x12*
     #    tx*x2zs+1./32.*x12*tx-3./32.*x12*txs-1./32.*x2z*tx*x12s
     #    -1./32.*x2z*tx+1./32.*x2z*txs-3./64.*tx*x12s+1./64.*
     #    tx*x12c-1./64.*tx*x2zs+1./32.*x12s*txs+1./16.*txs)
      zz40q= zz40q+rwwz(7,4)*vvq*yc*(1./64.*o*oq+3./
     #    64.*o*x12*tx*x2zs-5./32.*o*x12*tx-1./64.*o*x12*x12c-1./
     #    64.*o*x12*x2zc-3./32.*o*x12*x2zs+5./16.*o*x12*txs+1./32.
     #    *o*x12+1./16.*o*x2z*tx*x12s+1./64.*o*x2z*x12c+5./32.*o*
     #    x2z*txs-1./32.*o*x2z+7./32.*o*tx*x12s-5./64.*o*tx*x12c
     #    -1./32.*o*tx*x2zc-1./8.*o*tx*x2zs+1./32.*o*tx+1./64.*
     #    o*x12s*x2zs-9./64.*o*x12s*txs-5./64.*o*x12s+1./16.*o*
     #    x12c+1./32.*o*x2zc+3./64.*o*x2zs*txs+5./64.*o*x2zs-5./
     #    32.*o*txs+5./64.*os*x12*x2z*tx-5./32.*os*x12*x2z+1./4.*
     #    os*x12*tx-9./64.*os*x12*txs+1./16.*os*x2z*x12s+5./32.*
     #    os*x2z-9./64.*os*tx*x12s+1./32.*os*tx*x2zs-5./64.*os*tx
     #    +1./16.*os*x12s-1./32.*os*x12c-1./32.*os*x2zc-1./16.*
     #    os*x2zs+5./32.*os*txs-1./32.*os+5./64.*oc*x12*x2z-7./
     #    64.*oc*x12*tx-1./16.*oc*x12+1./32.*oc*x2z*tx-5./32.*oc*
     #    x2z+3./32.*oc*tx-1./64.*oc*x2zs-3./64.*oc*txs+5./64.*
     #    oc)
      zz40q= zz40q+rwwz(7,4)*vvq*yc*(1./32.*oq*x12+1./
     #    32.*oq*x2z-1./32.*oq*tx-1./16.*oq+5./32.*x12*x2z*txs-
     #    1./64.*x12*tx*x12c-1./64.*x12*tx*x2zc-3./32.*x12*tx*x2zs
     #    +1./32.*x12*tx+3./64.*x12*x2zs*txs-5./32.*x12*txs+1./
     #    64.*x2z*tx*x12c-1./32.*x2z*tx-5./32.*x2z*txs+1./64.*tx*
     #    x12s*x2zs-5./64.*tx*x12s+1./16.*tx*x12c+1./32.*tx*x2zc
     #    +5./64.*tx*x2zs+5./32.*x12s*txs-3./64.*x12c*txs-1./16.
     #    *x2zs*txs+1./16.*txs)
      zz40q= zz40q+rwwz(7,7)*xx*vvq*yc*(-1./16.*o*x12
     #    *x2z*txs-1./32.*o*x12*tx*x2zs-1./32.*o*x12*x2zc+1./16.*
     #    o*x12*x2zs*txs+3./64.*o*x2z*x12s*txs-1./32.*o*x2zq+1./
     #    64.*o*x2zc*txs+5./64.*o*x2zc-3./64.*o*x2zs*txs+3./64.*
     #    os*x12*x2z*txs+1./32.*os*x12*x2zc-3./64.*os*x12*x2zs-1./
     #    32.*os*x2z*txs+1./64.*os*x12s*x2zs+1./64.*os*x2zq-5./64.
     #    *os*x2zc+1./32.*os*x2zs*txs+1./32.*os*x2zs+1./32.*oc*
     #    x12*x2zs+1./64.*oc*x2z*txs+1./32.*oc*x2zc-3./64.*oc*
     #    x2zs+1./64.*oq*x2zs-1./32.*x12*tx*x2zc+1./16.*x12*tx*
     #    x2zs+1./64.*x12*x2zc*txs+1./64.*x12*x2zc-3./64.*x12*
     #    x2zs*txs-1./32.*x2z*x12s*txs+1./64.*x2z*x12c*txs-1./32.
     #    *tx*x12s*x2zs+1./32.*x12s*x2zs*txs+1./64.*x2zq-1./64.*
     #    x2zc*txs-1./32.*x2zc+1./32.*x2zs*txs)
      zz40q= zz40q+rwwz(7,7)*bxpi*vvq*yc*(-1./128.*o*
     #    oq*x2z-5./32.*o*x12*x2z*tx+11./64.*o*x12*x2z*txs+1./16.
     #    *o*x12*tx*x2zs+1./16.*o*x12*x2zc-3./64.*o*x12*x2zs*txs-
     #    15./64.*o*x12*x2zs-1./16.*o*x12*txs+3./32.*o*x2z*tx*x12s
     #    -9./128.*o*x2z*x12s*txs-7./64.*o*x2z*txs+3./64.*o*x12s*
     #    x2zs+3./32.*o*x12s*txs-1./32.*o*x12c*txs+1./64.*o*x2zq
     #    -1./128.*o*x2zc*txs-9./64.*o*x2zc+1./16.*o*x2zs*txs+1.
     #    /4.*o*x2zs+3./64.*os*x12*x2z*tx-9./128.*os*x12*x2z*txs-
     #    7./64.*os*x12*x2z-3./128.*os*x12*x2zc+3./16.*os*x12*x2zs
     #    +3./32.*os*x12*txs+7./128.*os*x2z*x12s-1./128.*os*x2z*
     #    x12c+11./128.*os*x2z*txs+1./16.*os*x2z-3./128.*os*x12s*
     #    x2zs-3./64.*os*x12s*txs-1./128.*os*x2zq+13./128.*os*
     #    x2zc-3./128.*os*x2zs*txs-35./128.*os*x2zs-1./32.*os*txs
     #    +7./64.*oc*x12*x2z-3./64.*oc*x12*x2zs-1./32.*oc*x12*txs
     #    -3./128.*oc*x2z*x12s-3./128.*oc*x2z*txs-7./64.*oc*x2z
     #    -3./128.*oc*x2zc)
      zz40q= zz40q+rwwz(7,7)*bxpi*vvq*yc*(9./64.*oc*x2zs
     #    +1./32.*oc*txs-3./128.*oq*x12*x2z+7./128.*oq*x2z-3./
     #    128.*oq*x2zs-1./128.*oq*txs+1./8.*x12*x2z*tx-7./64.*x12
     #    *x2z*txs+1./64.*x12*tx*x2zc-3./32.*x12*tx*x2zs-1./128.*
     #    x12*x12c*txs-1./128.*x12*x2zc*txs-3./64.*x12*x2zc+1./16.
     #    *x12*x2zs*txs+1./8.*x12*x2zs-5./32.*x2z*tx*x12s+3./64.*
     #    x2z*tx*x12c+11./128.*x2z*x12s*txs-3./128.*x2z*x12c*txs+
     #    1./16.*x2z*txs+1./16.*tx*x12s*x2zs-3./128.*x12s*x2zs*txs
     #    -5./128.*x12s*x2zs-1./32.*x12s*txs+1./32.*x12c*txs-1./
     #    128.*x2zq+1./128.*x2zc*txs+1./16.*x2zc-3./64.*x2zs*txs
     #    -3./32.*x2zs)
      zz40q= zz40q+rwwz(7,7)*vvq*yc*bxp*(-1./32.+1./
     #    64.*o*x12*x2zs-13./64.*o*x12+9./64.*o*x12s-1./32.*o*
     #    x12c-1./64.*o*x2zs+3./32.*o+9./64.*os*x12-3./64.*os*
     #    x12s+1./128.*os*x2zs-13./128.*os-1./32.*oc*x12+3./64.
     #    *oc-1./128.*oq-1./128.*x12*x12c-1./64.*x12*x2zs+3./32.
     #    *x12+1./128.*x12s*x2zs-13./128.*x12s+3./64.*x12c+1./
     #    128.*x2zs)
      zz40q= zz40q+rwwz(7,7)*vvq*yc*(1./128.*o*oq+13./
     #    32.*o*x12*x2z-1./64.*o*x12*tx*x2zs+1./8.*o*x12*tx-1./64.
     #    *o*x12*x2zc-1./32.*o*x12*x2zs-5./64.*o*x12*txs-11./64.*
     #    o*x2z*x12s+1./64.*o*x2z*x12c-17./64.*o*x2z-5./32.*o*tx*
     #    x12s+3./64.*o*tx*x12c+3./128.*o*x12s*txs+1./32.*o*x2zc
     #    -1./128.*o*x2zs*txs+1./32.*o*x2zs+1./16.*o*txs-1./4.*
     #    os*x12*x2z-5./64.*os*x12*tx-1./128.*os*x12*x2zs+3./128.
     #    *os*x12*txs+1./16.*os*x12+3./64.*os*x2z*x12s+17./64.*os
     #    *x2z+3./64.*os*tx*x12s-5./128.*os*x12s+1./128.*os*x12c
     #    -1./64.*os*x2zc-1./128.*os*x2zs-5./128.*os*txs-1./32.
     #    *os+3./64.*oc*x12*x2z+1./64.*oc*x12*tx-5./64.*oc*x12-
     #    7./64.*oc*x2z+3./128.*oc*x12s-1./128.*oc*x2zs+1./128.*
     #    oc*txs+1./16.*oc+3./128.*oq*x12+1./64.*oq*x2z-5./128.
     #    *oq-13./64.*x12*x2z+1./64.*x12*tx*x12c+1./64.*x12*tx*
     #    x2zs-1./16.*x12*tx+1./64.*x12*x2zc-1./128.*x12*x2zs*txs
     #    +1./32.*x12*x2zs)
      zz40q= zz40q+rwwz(7,7)*vvq*yc*(1./16.*x12*txs+9.
     #    /64.*x2z*x12s-1./32.*x2z*x12c+3./32.*x2z-1./64.*tx*x12s
     #    *x2zs+1./8.*tx*x12s-5./64.*tx*x12c-1./64.*x12s*x2zs-5.
     #    /128.*x12s*txs+1./128.*x12c*txs-1./64.*x2zc+1./128.*
     #    x2zs*txs-1./64.*x2zs-1./32.*txs)
      zz40q= zz40q+rwwz(7,11)*xx*vvq*yc*(-1./16.*o*
     #    x12*x2z*txs+1./32.*o*x12*x2zs-1./32.*o*x2z*tx*x12s+1./
     #    32.*o*tx*x2zc+1./32.*o*tx*x2zs-1./32.*o*x2zc-1./32.*o*
     #    x2zs*txs-1./16.*os*x12*x2z*tx+1./32.*os*x12*x2zs-1./32.
     #    *os*x2z*txs+1./32.*os*x2zc-1./32.*os*x2zs-1./32.*oc*x2z
     #    *tx+1./32.*oc*x2zs+1./32.*x12*tx*x2zs-1./32.*x12*x2zs*
     #    txs-1./32.*x2z*x12s*txs-1./32.*tx*x2zc+1./16.*x2zs*txs
     #    )
      zz40q= zz40q+rwwz(7,11)*bxpi*vvq*yc*(-1./8.*o*
     #    x12*x2z*tx+1./8.*o*x12*x2z*txs+3./32.*o*x12*x2z-1./32.*
     #    o*x12*tx*x2zs+1./32.*o*x12*x2zs-1./8.*o*x12*txs+1./32.*
     #    o*x2z*tx*x12s+3./32.*o*x2z*tx-1./16.*o*x2z*x12s-3./16.*
     #    o*x2z*txs-1./16.*o*tx*x12s+1./32.*o*tx*x12c-1./32.*o*tx
     #    *x2zc+3./32.*o*tx*x2zs+3./32.*o*x12s*txs+1./32.*o*x2zc
     #    +1./32.*o*x2zs*txs-3./32.*o*x2zs+1./16.*os*x12*x2z*tx
     #    +1./16.*os*x12*x2z-1./8.*os*x12*tx-1./16.*os*x12*x2zs
     #    +3./32.*os*x12*txs-1./16.*os*x2z*tx-1./32.*os*x2z*x12s
     #    +1./16.*os*x2z*txs-3./32.*os*x2z+3./32.*os*tx*x12s-1./
     #    32.*os*tx*x2zs-1./32.*os*x2zc+5./32.*os*x2zs-1./16.*os*
     #    txs-1./16.*oc*x12*x2z+3./32.*oc*x12*tx+1./32.*oc*x2z*tx
     #    +1./8.*oc*x2z-1./16.*oc*tx-1./16.*oc*x2zs+1./32.*oc*
     #    txs-1./32.*oq*x2z+1./32.*oq*tx+3./32.*x12*x2z*tx-3./
     #    16.*x12*x2z*txs+1./32.*x12*tx*x2zs+1./32.*x12*x2zs*txs-
     #    1./16.*x2z*tx*x12s)
      zz40q= zz40q+rwwz(7,11)*bxpi*vvq*yc*(1./16.*x2z*
     #    x12s*txs+3./16.*x2z*txs+1./32.*tx*x2zc-3./32.*tx*x2zs
     #    -1./16.*x12s*txs+1./32.*x12c*txs-1./16.*x2zs*txs)
      zz40q= zz40q+rwwz(7,11)*vvq*yc*(1./16.*o*x12*x2z*
     #    tx-3./32.*o*x12*x2z+3./16.*o*x12*tx-1./8.*o*x12*txs-1.
     #    /16.*o*x12-3./32.*o*x2z*tx+1./32.*o*x2z*x12s+1./16.*o*
     #    x2z-3./32.*o*tx*x12s-1./16.*o*tx+3./32.*o*x12s-1./32.
     #    *o*x12c+3./16.*o*txs+1./16.*os*x12*x2z-3./32.*os*x12*tx
     #    +1./32.*os*x2z*tx-3./32.*os*x2z+3./32.*os*tx-1./32.*
     #    os*x12s-1./16.*os*txs+1./16.*os+1./32.*oc*x12+1./32.*
     #    oc*x2z-1./32.*oc*tx-3./32.*oc+1./32.*oq-3./32.*x12*
     #    x2z*tx-1./16.*x12*tx+3./16.*x12*txs+1./32.*x2z*tx*x12s
     #    +1./16.*x2z*tx+3./32.*tx*x12s-1./32.*tx*x12c-1./16.*
     #    x12s*txs-1./8.*txs)
      zz40q= zz40q+rwwz(7,12)*xx*vvq*yc*(3./16.*o*x12*
     #    x2z*txs-1./16.*o*x12*tx*x2zs-1./16.*o*x12*x2zs-1./8.*o*
     #    x12*txs-1./8.*o*x2z*txs-1./16.*o*tx*x2zc+1./16.*o*tx*
     #    x2zs+3./32.*o*x12s*txs+1./16.*o*x2zs*txs+3./32.*o*x2zs
     #    -1./32.*os*x12*x2zs+3./32.*os*x12*txs+1./16.*os*x2z*tx
     #    +3./32.*os*x2z*txs-1./16.*os*tx*x2zs-1./32.*os*x2zc-1.
     #    /16.*os*txs-1./32.*oc*x2zs+1./32.*oc*txs+1./8.*x12*x2z*
     #    tx-1./8.*x12*x2z*txs-1./16.*x12*tx*x2zs+1./16.*x12*x2zs
     #    *txs+1./32.*x12*x2zs-1./16.*x2z*tx*x12s+3./32.*x2z*x12s
     #    *txs+1./8.*x2z*txs+1./16.*tx*x2zc-1./16.*tx*x2zs-1./
     #    16.*x12s*txs+1./32.*x12c*txs+1./32.*x2zc-1./8.*x2zs*txs
     #    -1./16.*x2zs)
      zz40q= zz40q+rwwz(7,12)*bxpi*vvq*yc*(1./8.*o*x12*
     #    x2z*tx-1./8.*o*x12*x2z*txs-5./16.*o*x12*x2z+1./32.*o*
     #    x12*tx*x2zs-3./16.*o*x12*tx+1./4.*o*x12*txs-1./32.*o*
     #    x2z*tx*x12s+3./32.*o*x2z*x12s+1./4.*o*x2z*txs+1./4.*o*
     #    x2z+3./16.*o*tx*x12s-1./32.*o*tx*x12c+1./32.*o*tx*x2zc
     #    -1./8.*o*tx*x2zs-3./32.*o*x12s*txs-1./32.*o*x2zc-1./
     #    32.*o*x2zs*txs-3./16.*o*txs-1./16.*os*x12*x2z*tx+3./16.
     #    *os*x12*tx+1./16.*os*x12*x2zs-3./32.*os*x12*txs+1./32.*
     #    os*x2z*tx+1./32.*os*x2z*x12s-1./16.*os*x2z*txs-1./16.*
     #    os*x2z-3./32.*os*tx*x12s+1./32.*os*tx*x2zs+1./32.*os*
     #    x2zc-1./8.*os*x2zs+1./8.*os*txs+1./16.*oc*x12*x2z-3./
     #    32.*oc*x12*tx-1./32.*oc*x2z*tx-3./32.*oc*x2z+1./16.*oc*
     #    tx+1./16.*oc*x2zs-1./32.*oc*txs+1./32.*oq*x2z-1./32.*
     #    oq*tx-1./16.*x12*x2z*tx+1./4.*x12*x2z*txs+3./16.*x12*
     #    x2z-1./16.*x12*tx*x2zs+1./8.*x12*tx-1./32.*x12*x2zs*txs
     #    -1./16.*x12*x2zs)
      zz40q= zz40q+rwwz(7,12)*bxpi*vvq*yc*(-3./16.*x12
     #    *txs+3./32.*x2z*tx*x12s-1./16.*x2z*tx-1./16.*x2z*x12s*
     #    txs-1./16.*x2z*x12s-1./4.*x2z*txs-1./8.*x2z-3./16.*tx
     #    *x12s+1./16.*tx*x12c-1./32.*tx*x2zc+1./8.*tx*x2zs+1./
     #    8.*x12s*txs-1./32.*x12c*txs+1./16.*x2zs*txs+1./16.*x2zs
     #    +1./8.*txs)
      zz40q= zz40q+rwwz(7,12)*vvq*yc*bxp*(-1./16.+1./
     #    16.*o*x12*x2z-1./4.*o*x12-1./16.*o*x2z+3./32.*o*x12s+
     #    5./32.*o+3./32.*os*x12+1./32.*os*x2z-1./8.*os+1./32.*
     #    oc-1./16.*x12*x2z+5./32.*x12+1./32.*x2z*x12s+1./32.*
     #    x2z-1./8.*x12s+1./32.*x12c)
      zz40q= zz40q+rwwz(7,12)*vvq*yc*(1./16.-1./16.*o
     #    *x12*x2z*tx+1./4.*o*x12*x2z-1./32.*o*x12*x2zs+5./16.*o*
     #    x12-1./16.*o*x2z*x12s-1./16.*o*x2z*txs-1./4.*o*x2z-1./
     #    32.*o*tx*x12s+1./32.*o*tx*x2zs+1./16.*o*tx-3./16.*o*
     #    x12s+1./32.*o*x12c+3./32.*o*x2zs-5./32.*o-1./8.*os*
     #    x12*x2z+1./32.*os*x12*tx-3./32.*os*x12+7./32.*os*x2z-
     #    3./32.*os*tx+1./32.*os*x12s-1./32.*os*x2zs+1./16.*os-
     #    1./32.*oc*x12-1./16.*oc*x2z+1./32.*oc*tx+1./16.*oc-1./
     #    32.*oq+1./16.*x12*x2z*tx-1./16.*x12*x2z*txs-1./8.*x12*
     #    x2z+1./32.*x12*tx*x2zs-1./16.*x12*tx+1./16.*x12*x2zs-
     #    5./32.*x12-1./16.*x2z*tx*x12s+1./32.*x2z*x12s+1./16.*
     #    x2z*txs+3./32.*x2z+3./32.*tx*x12s-1./32.*tx*x12c-1./
     #    32.*tx*x2zs+1./8.*x12s-1./32.*x12c-1./16.*x2zs)
      zz40q= zz40q+rwwz(7,13)*xx*vvq*yc*(-1./32.*o*
     #    x12*x2z*tx+5./32.*o*x12*x2z*txs-1./32.*o*x12*x2zs-1./16.
     #    *o*x12*txs-3./32.*o*x2z*txs+3./64.*o*x12s*txs-3./32.*o*
     #    x2zc+1./16.*o*x2zs*txs+5./64.*o*x2zs+3./64.*os*x12*x2zs
     #    +3./64.*os*x12*txs+5./64.*os*x2z*txs+3./64.*os*x2zc-3.
     #    /32.*os*x2zs-1./32.*os*txs+3./64.*oc*x2zs+1./64.*oc*txs
     #    +1./16.*x12*x2z*tx-3./32.*x12*x2z*txs-3./32.*x12*tx*
     #    x2zs+1./16.*x12*x2zs*txs+1./64.*x12*x2zs-1./32.*x2z*tx*
     #    x12s+5./64.*x2z*x12s*txs+1./16.*x2z*txs-1./32.*x12s*txs
     #    +1./64.*x12c*txs+3./64.*x2zc-1./16.*x2zs*txs-1./32.*
     #    x2zs)
      zz40q= zz40q+rwwz(7,13)*bxpi*vvq*yc*(5./32.*o*x12*
     #    x2z*tx-1./8.*o*x12*x2z*txs-5./32.*o*x12*x2z-3./32.*o*
     #    x12*tx+5./32.*o*x12*x2zs+3./16.*o*x12*txs+1./32.*o*x2z*
     #    x12s+5./32.*o*x2z*txs+5./32.*o*x2z+1./16.*o*tx*x12s-3.
     #    /32.*o*x12s*txs+1./16.*o*x2zc-1./32.*o*x2zs*txs-11./32.
     #    *o*x2zs-3./32.*o*txs+3./16.*os*x12*x2z+1./32.*os*x12*tx
     #    -1./16.*os*x12*x2zs-3./32.*os*x12*txs-1./32.*os*x2z*
     #    x12s-1./16.*os*x2z*txs-7./32.*os*x2z-1./32.*os*x2zc+1.
     #    /4.*os*x2zs+3./32.*os*txs-1./16.*oc*x12*x2z+5./32.*oc*
     #    x2z-1./16.*oc*x2zs-1./32.*oc*txs-1./32.*oq*x2z-7./32.
     #    *x12*x2z*tx+5./32.*x12*x2z*txs+3./32.*x12*x2z+1./16.*
     #    x12*tx*x2zs+1./16.*x12*tx-1./32.*x12*x2zs*txs-1./8.*x12
     #    *x2zs-3./32.*x12*txs+5./32.*x2z*tx*x12s-1./16.*x2z*x12s
     #    *txs-1./32.*x2z*x12s-1./8.*x2z*txs-1./16.*x2z-3./32.*
     #    tx*x12s+1./32.*tx*x12c+3./32.*x12s*txs-1./32.*x12c*txs
     #    -1./32.*x2zc)
      zz40q= zz40q+rwwz(7,13)*bxpi*vvq*yc*(1./32.*x2zs*
     #    txs+5./32.*x2zs+1./16.*txs)
      zz40q= zz40q+rwwz(7,13)*vvq*yc*bxp*(1./32.+1./32.
     #    *o*x12*x2z+1./8.*o*x12-1./32.*o*x2z-3./64.*o*x12s-5./
     #    64.*o-3./64.*os*x12+1./64.*os*x2z+1./16.*os-1./64.*oc
     #    -1./32.*x12*x2z-5./64.*x12+1./64.*x2z*x12s+1./64.*x2z
     #    +1./16.*x12s-1./64.*x12c)
      zz40q= zz40q+rwwz(7,13)*vvq*yc*(1./32.-1./32.*o
     #    *x12*x2z*tx-1./4.*o*x12*x2z-3./32.*o*x12*tx-1./32.*o*
     #    x12*x2zs+1./8.*o*x12+1./32.*o*x2z*x12s-1./32.*o*x2z*txs
     #    +1./4.*o*x2z+1./16.*o*tx*x12s-3./64.*o*x12s+1./16.*o*
     #    x2zs-5./64.*o+1./16.*os*x12*x2z+1./32.*os*x12*tx-9./
     #    64.*os*x12-11./64.*os*x2z+1./32.*os*x12s-1./32.*os*x2zs
     #    +1./8.*os+1./16.*oc*x12+1./32.*oc*x2z-7./64.*oc+1./
     #    32.*oq+1./32.*x12*x2z*tx-1./32.*x12*x2z*txs+3./16.*x12*
     #    x2z+1./16.*x12*tx+1./32.*x12*x2zs-5./64.*x12-1./32.*
     #    x2z*tx*x12s-5./64.*x2z*x12s+1./32.*x2z*txs-7./64.*x2z
     #    -3./32.*tx*x12s+1./32.*tx*x12c+1./16.*x12s-1./64.*
     #    x12c-1./32.*x2zs)
      zz40q= zz40q+rwwz(7,14)*xx*vvq*yc*(1./32.*o*x12*
     #    x2z*tx-3./32.*o*x12*x2z*txs-1./32.*o*x12*tx*x2zs+1./64.
     #    *o*x12*x2zs-1./64.*o*x2z*tx*x12s+1./32.*o*x2z*txs-1./64.
     #    *o*tx*x2zc+3./64.*o*tx*x2zs+5./64.*o*x2zc-3./64.*o*x2zs
     #    *txs-1./32.*o*x2zs-1./32.*os*x12*x2z*tx-3./64.*os*x12*
     #    x2zs+1./32.*os*x2z*tx-3./64.*os*x2z*txs-1./32.*os*tx*
     #    x2zs-3./64.*os*x2zc+5./64.*os*x2zs-1./64.*oc*x2z*tx-3.
     #    /64.*oc*x2zs+1./32.*x12*x2z*txs+5./64.*x12*tx*x2zs-3./
     #    64.*x12*x2zs*txs-3./64.*x2z*x12s*txs+1./64.*tx*x2zc-1./
     #    32.*tx*x2zs-1./32.*x2zc+1./32.*x2zs*txs)
      zz40q= zz40q+rwwz(7,14)*bxpi*vvq*yc*(-3./16.*o*
     #    x12*x2z*tx+1./8.*o*x12*x2z*txs+1./16.*o*x12*x2z+1./32.*
     #    o*x12*tx-9./64.*o*x12*x2zs-5./32.*o*x12*txs+3./32.*o*
     #    x2z*tx-1./64.*o*x2z*x12s-9./64.*o*x2z*txs-1./16.*o*x2z
     #    -1./64.*o*tx*x12s-1./32.*o*tx*x2zs+3./32.*o*x12s*txs-
     #    1./16.*o*x2zc+1./32.*o*x2zs*txs+5./16.*o*x2zs+1./32.*o*
     #    txs-11./64.*os*x12*x2z-1./32.*os*x12*tx+1./16.*os*x12*
     #    x2zs+3./32.*os*x12*txs-3./64.*os*x2z*tx+1./32.*os*x2z*
     #    x12s+1./16.*os*x2z*txs+3./16.*os*x2z+1./32.*os*tx+1./
     #    32.*os*x2zc-1./4.*os*x2zs-5./64.*os*txs+1./16.*oc*x12*
     #    x2z-5./32.*oc*x2z-1./64.*oc*tx+1./16.*oc*x2zs+1./32.*
     #    oc*txs+1./32.*oq*x2z+1./4.*x12*x2z*tx-9./64.*x12*x2z*
     #    txs-5./64.*x12*tx*x2zs+1./32.*x12*x2zs*txs+3./32.*x12*
     #    x2zs+1./32.*x12*txs-9./64.*x2z*tx*x12s-1./16.*x2z*tx+
     #    1./16.*x2z*x12s*txs+3./32.*x2z*txs+1./32.*tx*x2zs-5./64.
     #    *x12s*txs)
      zz40q= zz40q+rwwz(7,14)*bxpi*vvq*yc*(1./32.*x12c*
     #    txs+1./32.*x2zc-1./32.*x2zs*txs-1./8.*x2zs)
      zz40q= zz40q+rwwz(7,14)*vvq*yc*bxp*(-1./16.-1./
     #    64.*o*x12*x2z-1./32.*o*x12*tx-13./64.*o*x12-1./64.*o*
     #    x2z*tx+1./64.*o*x2z+3./64.*o*tx+5./64.*o*x12s+1./8.*o
     #    +1./16.*os*x12-1./64.*os*x2z-1./64.*os*tx-5./64.*os
     #    +1./64.*oc-1./64.*x12*x2z*tx+3./64.*x12*tx+5./32.*x12
     #    +1./64.*x2z*tx-1./64.*tx*x12s-1./32.*tx-1./8.*x12s+
     #    1./32.*x12c)
      zz40q= zz40q+rwwz(7,14)*vvq*yc*(1./16.*o*x12*x2z*
     #    tx+21./64.*o*x12*x2z+3./16.*o*x12*tx+1./64.*o*x12*x2zs
     #    -1./32.*o*x12*txs-3./64.*o*x12-5./64.*o*x2z*tx-3./64.
     #    *o*x2z*x12s+1./64.*o*x2z*txs-21./64.*o*x2z-7./64.*o*tx*
     #    x12s+1./32.*o*tx*x2zs-3./64.*o*tx+1./64.*o*x12s-1./32.
     #    *o*x2zs+1./16.*o*txs+1./32.*o-5./64.*os*x12*x2z-1./32.
     #    *os*x12*tx+1./8.*os*x12+3./64.*os*x2z*tx+13./64.*os*x2z
     #    -1./64.*os*tx-1./32.*os*x12s+1./32.*os*x2zs-1./64.*os
     #    *txs-7./64.*os-1./16.*oc*x12-1./32.*oc*x2z+1./64.*oc*
     #    tx+7./64.*oc-1./32.*oq-3./64.*x12*x2z*tx+1./64.*x12*
     #    x2z*txs-1./4.*x12*x2z+1./64.*x12*tx*x2zs-11./64.*x12*tx
     #    +1./16.*x12*txs+1./64.*x2z*tx*x12s+3./64.*x2z*tx+3./
     #    32.*x2z*x12s+5./32.*x2z+13./64.*tx*x12s-1./16.*tx*x12c
     #    -1./32.*tx*x2zs+1./32.*tx-1./64.*x12s*txs-1./16.*txs
     #    )
      zz40q= zz40q+rwwz(8,1)*xx*vvq*yc*(1./4.*o*x12*x2z
     #    *tx-1./4.*o*x2z*tx+1./4.*o*x2z*txs-1./4.*o*tx*x2zs+1./
     #    2.*o*x2zs+1./4.*os*x2z*tx-1./4.*os*x2zs+1./4.*x12*x2z*
     #    tx+1./4.*x12*x2z*txs-1./2.*x2z*txs+1./4.*tx*x2zs-1./4.
     #    *x2zs)
      zz40q= zz40q+rwwz(8,1)*bxpi*vvq*yc*(1./4.*o*x12*
     #    x2z*tx-5./8.*o*x12*x2z+1./4.*o*x12*tx-1./4.*o*x12*txs
     #    -5./8.*o*x2z*tx+1./8.*o*x2z*txs+5./4.*o*x2z-1./8.*o*
     #    tx*x12s-1./8.*o*tx*x2zs-1./4.*o*tx+3./8.*o*x2zs+3./4.
     #    *o*txs+1./8.*os*x12*x2z-1./4.*os*x12*tx+1./4.*os*x2z*tx
     #    -7./8.*os*x2z+1./2.*os*tx-1./8.*os*x2zs-1./8.*os*txs
     #    +1./8.*oc*x2z-1./8.*oc*tx+1./8.*x12*x2z*tx+1./8.*x12*
     #    x2z*txs+1./2.*x12*x2z+1./4.*x12*tx+3./4.*x12*txs-1./2.
     #    *x2z*txs-1./2.*x2z-1./4.*tx*x12s+3./8.*tx*x2zs-1./8.*
     #    x12s*txs-1./4.*x2zs-1./2.*txs)
      zz40q= zz40q+rwwz(8,1)*vvq*bxps*yc*(1./4.+1./2.*
     #    o*x12-1./2.*o+1./4.*os-1./2.*x12+1./4.*x12s)
      zz40q= zz40q+rwwz(8,1)*vvq*yc*bxp*(-1./2.-3./8.
     #    *o*x12*x2z-1./4.*o*x12*tx-11./8.*o*x12-3./8.*o*x2z*tx
     #    +7./8.*o*x2z+1./8.*o*tx+1./8.*o*x12s+1./2.*o*txs+5./
     #    4.*o+1./4.*os*x12-3./8.*os*x2z+1./8.*os*tx-7./8.*os
     #    +1./8.*oc-3./8.*x12*x2z*tx+1./2.*x12*x2z+5./8.*x12*tx
     #    +1./2.*x12*txs+x12+3./8.*x2z*tx-1./2.*x2z-3./8.*tx*
     #    x12s-1./4.*tx-1./2.*x12s-1./2.*txs)
      zz40q= zz40q+rwwz(8,1)*vvq*yc*(1./4.-1./4.*o*
     #    x12*x2z*tx+o*x12*x2z+1./4.*o*x12*txs+7./8.*o*x12+o*
     #    x2z*tx-1./8.*o*x2z*txs-17./8.*o*x2z+1./8.*o*tx*x12s+1.
     #    /8.*o*tx*x2zs+1./8.*o*tx-1./8.*o*x12s-3./8.*o*x2zs-5./
     #    4.*o*txs-3./4.*o-1./8.*os*x12*x2z+1./4.*os*x12*tx-1./
     #    4.*os*x12-1./4.*os*x2z*tx+5./4.*os*x2z-5./8.*os*tx+1./
     #    8.*os*x2zs+1./8.*os*txs+5./8.*os-1./8.*oc*x2z+1./8.*
     #    oc*tx-1./8.*oc+1./4.*x12*x2z*tx-1./8.*x12*x2z*txs-x12
     #    *x2z-7./8.*x12*tx-5./4.*x12*txs-1./2.*x12-3./8.*x2z*
     #    tx+1./2.*x2z*txs+x2z+5./8.*tx*x12s-3./8.*tx*x2zs+1./
     #    4.*tx+1./8.*x12s*txs+1./4.*x12s+1./4.*x2zs+txs)
      zz40q= zz40q+rwwz(8,4)*xx*vvq*yc*(-1./8.*o*x12*
     #    x2zs+1./8.*o*tx*x2zs-1./8.*o*x2zc-1./8.*x12*tx*x2zs-1.
     #    /8.*tx*x2zc+1./8.*x2zc+1./8.*x2zs*txs)
      zz40q= zz40q+rwwz(8,4)*bxpi*vvq*yc*(-1./4.*o*x12
     #    *x2z+1./8.*o*x12*x2zs+1./4.*o*x2z*tx+3./16.*o*x2z*x12s
     #    -3./16.*o*x2z*txs+1./4.*o*tx*x2zs-1./16.*o*x2zc-9./16.
     #    *o*x2zs+3./16.*os*x12*x2z-3./16.*os*x2z*tx+3./16.*os*
     #    x2zs-1./4.*x12*x2z*tx-3./16.*x12*x2z*txs+1./8.*x12*tx*
     #    x2zs-5./16.*x12*x2zs+3./16.*x2z*tx*x12s+1./4.*x2z*txs
     #    -1./16.*tx*x2zc-1./4.*tx*x2zs+1./16.*x2zc+1./16.*x2zs
     #    *txs+3./8.*x2zs)
      zz40q= zz40q+rwwz(8,4)*vvq*bxps*yc*(-1./8.-1./
     #    8.*o*x12*x2z-1./2.*o*x12+1./8.*o*x2z+3./16.*o*x12s+5./
     #    16.*o+3./16.*os*x12-1./16.*os*x2z-1./4.*os+1./16.*oc
     #    +1./8.*x12*x2z+5./16.*x12-1./16.*x2z*x12s-1./16.*x2z
     #    -1./4.*x12s+1./16.*x12c)
      zz40q= zz40q+rwwz(8,4)*vvq*yc*bxp*(1./8.-1./8.*o
     #    *x12*x2z*tx+3./4.*o*x12*x2z+1./16.*o*x12*x2zs+1./8.*o*
     #    x12*txs+3./8.*o*x12+1./4.*o*x2z*tx-1./16.*o*x2z*txs-7.
     #    /8.*o*x2z-1./16.*o*tx*x12s+1./16.*o*tx*x2zs+1./8.*o*tx
     #    -1./16.*o*x12c-3./16.*o*x2zs-3./16.*o*txs-5./16.*o-
     #    1./16.*os*x12*x2z+1./16.*os*x12*tx-1./8.*os*x2z*tx+1./2.
     #    *os*x2z-3./16.*os*tx-1./8.*os*x12s+1./16.*os*x2zs+1./
     #    16.*os*txs+1./4.*os-1./16.*oc*x12-1./16.*oc*x2z+1./16.
     #    *oc*tx-1./16.*oc+1./8.*x12*x2z*tx-1./16.*x12*x2z*txs-
     #    3./4.*x12*x2z+1./16.*x12*tx*x2zs-1./8.*x12*tx-1./8.*x12
     #    *x2zs-3./16.*x12*txs-5./16.*x12-1./8.*x2z*tx+5./16.*
     #    x2z*x12s+1./16.*x2z*txs+7./16.*x2z+3./16.*tx*x12s-1./
     #    16.*tx*x12c-1./16.*tx*x2zs+1./16.*x12s*txs+1./4.*x12s
     #    -1./16.*x12c+1./8.*x2zs+1./8.*txs)
      zz40q= zz40q+rwwz(8,4)*vvq*yc*(1./8.*o*x12*x2z*tx
     #    -3./8.*o*x12*x2z-3./16.*o*x12*x2zs-1./8.*o*x12*txs+1./
     #    8.*o*x12-1./2.*o*x2z*tx-3./16.*o*x2z*x12s+1./4.*o*x2z*
     #    txs+3./4.*o*x2z+1./16.*o*tx*x12s-5./16.*o*tx*x2zs-1./
     #    8.*o*tx-3./16.*o*x12s+1./16.*o*x12c+1./16.*o*x2zc+3./
     #    4.*o*x2zs+3./16.*o*txs-1./8.*os*x12*x2z-1./16.*os*x12*
     #    tx-3./16.*os*x12+5./16.*os*x2z*tx-7./16.*os*x2z+3./16.
     #    *os*tx+1./8.*os*x12s-1./4.*os*x2zs-1./16.*os*txs+1./
     #    16.*oc*x12+1./16.*oc*x2z-1./16.*oc*tx+1./8.*x12*x2z*tx
     #    +1./4.*x12*x2z*txs+5./8.*x12*x2z-3./16.*x12*tx*x2zs+1.
     #    /8.*x12*tx+7./16.*x12*x2zs+3./16.*x12*txs-3./16.*x2z*tx
     #    *x12s+1./8.*x2z*tx-1./4.*x2z*x12s-5./16.*x2z*txs-3./8.
     #    *x2z-3./16.*tx*x12s+1./16.*tx*x12c+1./16.*tx*x2zc+5./
     #    16.*tx*x2zs-1./16.*x12s*txs-1./16.*x2zc-1./16.*x2zs*txs
     #    -1./2.*x2zs-1./8.*txs)
      zz40q= zz40q+rwwz(8,7)*xx*vvq*yc*(1./16.*o*x12*
     #    x2z*txs-1./32.*o*x12*x2zs+1./32.*o*x2z*tx*x12s-1./32.*o
     #    *tx*x2zc-1./32.*o*tx*x2zs+1./32.*o*x2zc+1./32.*o*x2zs*
     #    txs+1./16.*os*x12*x2z*tx-1./32.*os*x12*x2zs+1./32.*os*
     #    x2z*txs-1./32.*os*x2zc+1./32.*os*x2zs+1./32.*oc*x2z*tx
     #    -1./32.*oc*x2zs-1./32.*x12*tx*x2zs+1./32.*x12*x2zs*txs
     #    +1./32.*x2z*x12s*txs+1./32.*tx*x2zc-1./16.*x2zs*txs)
      zz40q= zz40q+rwwz(8,7)*bxpi*vvq*yc*(3./32.*o*x12*
     #    x2z*tx-1./16.*o*x12*x2z+1./64.*o*x12*tx*x2zs-1./16.*o*
     #    x12*x2zs+1./16.*o*x12*txs+1./64.*o*x2z*tx*x12s-1./16.*o
     #    *x2z*tx+3./64.*o*x2z*x12s+1./8.*o*x2z*txs+1./32.*o*tx*
     #    x12s-1./64.*o*tx*x12c-1./64.*o*tx*x2zc-3./32.*o*tx*x2zs
     #    -3./64.*o*x12s*txs+1./64.*o*x2zc+1./64.*o*x2zs*txs+1./
     #    16.*o*x2zs+1./32.*os*x12*x2z*tx-1./32.*os*x12*x2z+1./16.
     #    *os*x12*tx-3./64.*os*x12*txs+3./64.*os*x2z*tx+1./64.*os
     #    *x2z*x12s+1./16.*os*x2z-3./64.*os*tx*x12s+1./64.*os*tx*
     #    x2zs-1./64.*os*x2zc-1./16.*os*x2zs+1./32.*os*txs+1./
     #    32.*oc*x12*x2z-3./64.*oc*x12*tx+1./64.*oc*x2z*tx-5./64.
     #    *oc*x2z+1./32.*oc*tx-1./64.*oc*txs+1./64.*oq*x2z-1./
     #    64.*oq*tx-1./16.*x12*x2z*tx+1./8.*x12*x2z*txs-1./16.*
     #    x12*tx*x2zs+1./64.*x12*x2zs*txs+3./64.*x2z*tx*x12s-1./8.
     #    *x2z*txs+1./64.*tx*x2zc+1./16.*tx*x2zs+1./32.*x12s*txs
     #    -1./64.*x12c*txs)
      zz40q= zz40q+rwwz(8,7)*bxpi*vvq*yc*(-1./32.*x2zs
     #    *txs)
      zz40q= zz40q+rwwz(8,7)*vvq*yc*bxp*(1./16.*o*x12*
     #    x2z*tx-1./16.*o*x12*x2z+3./32.*o*x12*tx-1./64.*o*x12*
     #    x2zs-1./16.*o*x12*txs-1./32.*o*x12-1./16.*o*x2z*tx+1./
     #    32.*o*x2z*x12s+1./32.*o*x2z*txs+1./32.*o*x2z-3./64.*o*
     #    tx*x12s-1./64.*o*tx*x2zs-1./32.*o*tx+3./64.*o*x12s-1./
     #    64.*o*x12c+1./64.*o*x2zs+3./32.*o*txs+1./32.*os*x12*x2z
     #    -3./64.*os*x12*tx+1./32.*os*x2z*tx-1./32.*os*x2z+3./
     #    64.*os*tx-1./64.*os*x12s-1./64.*os*x2zs-1./32.*os*txs
     #    +1./32.*os+1./64.*oc*x12-1./64.*oc*tx-3./64.*oc+1./
     #    64.*oq-1./16.*x12*x2z*tx+1./32.*x12*x2z*txs-1./64.*x12*
     #    tx*x2zs-1./32.*x12*tx+3./32.*x12*txs+1./32.*x2z*tx*x12s
     #    +1./32.*x2z*tx-1./32.*x2z*txs+3./64.*tx*x12s-1./64.*
     #    tx*x12c+1./64.*tx*x2zs-1./32.*x12s*txs-1./16.*txs)
      zz40q= zz40q+rwwz(8,7)*vvq*yc*(-5./32.*o*x12*
     #    x2z*tx+1./8.*o*x12*x2z-1./64.*o*x12*tx*x2zs-3./32.*o*
     #    x12*tx+5./64.*o*x12*x2zs+1./32.*o*x12-1./64.*o*x2z*tx*
     #    x12s+1./8.*o*x2z*tx-5./64.*o*x2z*x12s-5./32.*o*x2z*txs
     #    -1./32.*o*x2z+1./64.*o*tx*x12s+1./64.*o*tx*x12c+1./64.
     #    *o*tx*x2zc+7./64.*o*tx*x2zs+1./32.*o*tx+3./64.*o*x12s*
     #    txs-3./64.*o*x12s+1./64.*o*x12c-1./64.*o*x2zc-1./64.*
     #    o*x2zs*txs-5./64.*o*x2zs-3./32.*o*txs-1./32.*os*x12*x2z
     #    *tx-1./64.*os*x12*tx+3./64.*os*x12*txs-5./64.*os*x2z*tx
     #    -1./64.*os*x2z*x12s-1./32.*os*x2z+3./64.*os*tx*x12s-1.
     #    /64.*os*tx*x2zs-3./64.*os*tx+1./64.*os*x12s+1./64.*os*
     #    x2zc+5./64.*os*x2zs-1./32.*os-1./32.*oc*x12*x2z+3./64.
     #    *oc*x12*tx-1./64.*oc*x12-1./64.*oc*x2z*tx+5./64.*oc*x2z
     #    -1./64.*oc*tx+1./64.*oc*txs+3./64.*oc-1./64.*oq*x2z
     #    +1./64.*oq*tx-1./64.*oq+1./8.*x12*x2z*tx-5./32.*x12*
     #    x2z*txs)
      zz40q= zz40q+rwwz(8,7)*vvq*yc*(5./64.*x12*tx*x2zs
     #    +1./32.*x12*tx-1./64.*x12*x2zs*txs-3./32.*x12*txs-5./
     #    64.*x2z*tx*x12s-1./32.*x2z*tx+5./32.*x2z*txs-3./64.*tx*
     #    x12s+1./64.*tx*x12c-1./64.*tx*x2zc-5./64.*tx*x2zs+1./
     #    64.*x12c*txs+1./32.*x2zs*txs+1./16.*txs)
      zz40q= zz40q+rwwz(8,11)*bxpi*vvq*yc*(1./8.*o*x12*
     #    x2z-1./8.*o*x2z*tx+1./8.*o*x2zs+1./8.*x12*x2z*tx-1./8.
     #    *x2z*txs+1./8.*tx*x2zs-1./8.*x2zs)
      zz40q= zz40q+rwwz(8,11)*vvq*bxps*yc*(1./8.+1./4.
     #    *o*x12-1./4.*o+1./8.*os-1./4.*x12+1./8.*x12s)
      zz40q= zz40q+rwwz(8,11)*vvq*yc*bxp*(-1./8.-1./
     #    8.*o*x12*x2z-1./8.*o*x12-1./8.*o*x2z*tx+3./8.*o*x2z-1.
     #    /8.*o*tx-1./8.*o*x12s+1./8.*o*txs+1./4.*o-1./8.*os*
     #    x12-1./8.*os*x2z+1./8.*os*tx-1./8.*os-1./8.*x12*x2z*
     #    tx+1./4.*x12*x2z+1./8.*x12*tx+1./8.*x12*txs+1./4.*x12
     #    +1./8.*x2z*tx-1./4.*x2z-1./8.*tx*x12s-1./8.*x12s-1./
     #    8.*txs)
      zz40q= zz40q+rwwz(8,11)*vvq*yc*(-1./8.*o*x12+
     #    1./4.*o*x2z*tx-3./8.*o*x2z+1./8.*o*tx+1./8.*o*x12s-1./
     #    8.*o*x2zs-1./8.*o*txs+1./8.*os*x12+1./8.*os*x2z-1./8.
     #    *os*tx-1./4.*x12*x2z-1./8.*x12*tx-1./8.*x12*txs-1./8.
     #    *x2z*tx+1./8.*x2z*txs+1./4.*x2z+1./8.*tx*x12s-1./8.*
     #    tx*x2zs+1./8.*x2zs+1./8.*txs)
      zz40q= zz40q+rwwz(8,12)*xx*vvq*yc*(-1./8.*o*x2z
     #    *tx+1./8.*o*x2zs+1./8.*x12*x2z*tx-1./4.*x2z*txs+1./4.
     #    *tx*x2zs-1./8.*x2zs)
      zz40q= zz40q+rwwz(8,12)*bxpi*vvq*yc*(-1./4.*o*
     #    x12*x2z-1./4.*o*x2z*tx+3./8.*o*x2z-1./8.*o*tx+1./4.*o
     #    *txs-1./8.*os*x2z+1./8.*os*tx-1./4.*x12*x2z*tx+1./4.*
     #    x12*x2z+1./8.*x12*tx+1./4.*x12*txs+1./4.*x2z*tx-1./8.
     #    *x2z*txs-1./4.*x2z-1./8.*tx*x12s+1./8.*tx*x2zs-1./4.*
     #    txs)
      zz40q= zz40q+rwwz(8,12)*vvq*yc*bxp*(-1./8.-3./
     #    8.*o*x12-1./8.*o*x2z*tx+1./8.*o*x12s+1./8.*o*txs+1./4.
     #    *o+1./8.*os*x12-1./8.*os-1./8.*x12*x2z*tx+1./8.*x12*
     #    txs+1./4.*x12+1./8.*x2z*tx-1./8.*x12s-1./8.*txs)
      zz40q= zz40q+rwwz(8,12)*vvq*yc*(1./8.+1./4.*o*
     #    x12*x2z+3./8.*o*x12+3./8.*o*x2z*tx-3./8.*o*x2z+1./8.*
     #    o*tx-1./8.*o*x12s-3./8.*o*txs-1./4.*o-1./8.*os*x12+
     #    1./8.*os*x2z-1./8.*os*tx+1./8.*os+3./8.*x12*x2z*tx-1./
     #    4.*x12*x2z-1./8.*x12*tx-3./8.*x12*txs-1./4.*x12-3./8.
     #    *x2z*tx+1./8.*x2z*txs+1./4.*x2z+1./8.*tx*x12s-1./8.*
     #    tx*x2zs+1./8.*x12s+3./8.*txs)
      zz40q= zz40q+rwwz(8,13)*xx*vvq*yc*(1./16.*o*x12*
     #    x2z*tx-1./16.*o*x2z*tx+1./16.*o*x2z*txs-1./16.*o*tx*
     #    x2zs+1./8.*o*x2zs+1./16.*os*x2z*tx-1./16.*os*x2zs+1./
     #    16.*x12*x2z*tx+1./16.*x12*x2z*txs-1./8.*x2z*txs+1./16.*
     #    tx*x2zs-1./16.*x2zs)
      zz40q= zz40q+rwwz(8,13)*bxpi*vvq*yc*(1./16.*o*x12*
     #    x2z*tx-3./32.*o*x12*x2z-1./16.*o*x12*txs-3./32.*o*x2z*
     #    tx+1./32.*o*x2z*txs+1./4.*o*x2z-1./32.*o*tx*x12s-1./
     #    32.*o*tx*x2zs-1./16.*o*tx+3./32.*o*x2zs+1./8.*o*txs+1.
     #    /32.*os*x12*x2z-1./16.*os*x12*tx+1./16.*os*x2z*tx-5./32.
     #    *os*x2z+1./16.*os*tx-1./32.*os*x2zs-1./32.*os*txs+1./
     #    32.*oc*x2z-1./32.*oc*tx+1./32.*x12*x2z*tx+1./32.*x12*
     #    x2z*txs+1./8.*x12*x2z+1./16.*x12*tx+1./8.*x12*txs+1./
     #    16.*x2z*tx-1./16.*x2z*txs-1./8.*x2z-1./16.*tx*x12s+1./
     #    32.*tx*x2zs-1./32.*x12s*txs-1./16.*x2zs-1./8.*txs)
      zz40q= zz40q+rwwz(8,13)*vvq*bxps*yc*(1./16.+1./8.
     #    *o*x12-1./8.*o+1./16.*os-1./8.*x12+1./16.*x12s)
      zz40q= zz40q+rwwz(8,13)*vvq*yc*bxp*(-1./8.-3./
     #    32.*o*x12*x2z-1./16.*o*x12*tx-7./32.*o*x12-1./32.*o*x2z
     #    *tx+7./32.*o*x2z-1./32.*o*tx-1./32.*o*x12s+1./16.*o*
     #    txs+1./4.*o-3./32.*os*x2z+1./32.*os*tx-5./32.*os+1./
     #    32.*oc-1./32.*x12*x2z*tx+1./8.*x12*x2z+3./32.*x12*tx+
     #    1./16.*x12*txs+1./4.*x12+1./32.*x2z*tx-1./8.*x2z-3./
     #    32.*tx*x12s-1./8.*x12s-1./16.*txs)
      zz40q= zz40q+rwwz(8,13)*vvq*yc*(1./16.-1./16.*o
     #    *x12*x2z*tx+3./16.*o*x12*x2z+1./16.*o*x12*tx+1./16.*o*
     #    x12*txs+3./32.*o*x12+1./8.*o*x2z*tx-1./32.*o*x2z*txs-
     #    15./32.*o*x2z+1./32.*o*tx*x12s+1./32.*o*tx*x2zs+3./32.*
     #    o*tx+1./32.*o*x12s-3./32.*o*x2zs-3./16.*o*txs-1./8.*o
     #    -1./32.*os*x12*x2z+1./16.*os*x12*tx-1./16.*os*x2z*tx+
     #    1./4.*os*x2z-3./32.*os*tx+1./32.*os*x2zs+1./32.*os*txs
     #    +3./32.*os-1./32.*oc*x2z+1./32.*oc*tx-1./32.*oc-1./
     #    32.*x12*x2z*txs-1./4.*x12*x2z-5./32.*x12*tx-3./16.*x12*
     #    txs-1./8.*x12-3./32.*x2z*tx+1./16.*x2z*txs+1./4.*x2z
     #    +5./32.*tx*x12s-1./32.*tx*x2zs+1./32.*x12s*txs+1./16.
     #    *x12s+1./16.*x2zs+3./16.*txs)
      zz40q= zz40q+rwwz(8,14)*xx*vvq*yc*(-1./16.*o*
     #    x12*x2z*tx-1./16.*o*x2z*txs+1./16.*o*tx*x2zs-1./16.*o*
     #    x2zs-1./16.*os*x2z*tx+1./16.*os*x2zs-1./16.*x12*x2z*txs
     #    +1./16.*tx*x2zs)
      zz40q= zz40q+rwwz(8,14)*bxpi*vvq*yc*(-1./16.*o*
     #    x12*x2z*tx+1./32.*o*x12*x2z-1./16.*o*x12*tx+1./16.*o*
     #    x12*txs-1./32.*o*x2z*tx-1./32.*o*x2z*txs-1./8.*o*x2z+
     #    1./32.*o*tx*x12s+1./32.*o*tx*x2zs-1./32.*o*x2zs-1./16.*
     #    o*txs-1./32.*os*x12*x2z+1./16.*os*x12*tx-1./16.*os*x2z*
     #    tx+5./32.*os*x2z-1./16.*os*tx+1./32.*os*x2zs+1./32.*
     #    os*txs-1./32.*oc*x2z+1./32.*oc*tx-3./32.*x12*x2z*tx-1.
     #    /32.*x12*x2z*txs-1./16.*x12*txs+1./8.*x2z*tx-1./16.*x2z
     #    *txs+3./32.*tx*x2zs+1./32.*x12s*txs)
      zz40q= zz40q+rwwz(8,14)*vvq*bxps*yc*(-1./16.*o*
     #    x12+1./16.*o*tx+1./16.*o-1./16.*os+1./16.*x12*tx-1./
     #    16.*tx)
      zz40q= zz40q+rwwz(8,14)*vvq*yc*bxp*(1./32.*o*x12*
     #    x2z+3./32.*o*x12-1./32.*o*x2z*tx-3./32.*o*x2z-5./32.*
     #    o*tx+1./32.*o*x12s-1./8.*o+3./32.*os*x2z-1./32.*os*tx
     #    +5./32.*os-1./32.*oc-3./32.*x12*x2z*tx-5./32.*x12*tx
     #    +5./32.*x2z*tx+1./32.*tx*x12s+1./8.*tx-1./16.*txs)
      zz40q= zz40q+rwwz(8,14)*vvq*yc*(1./16.*o*x12*x2z*
     #    tx-1./16.*o*x12*x2z+1./16.*o*x12*tx-1./16.*o*x12*txs-
     #    1./32.*o*x12+1./16.*o*x2z*tx+1./32.*o*x2z*txs+7./32.*o*
     #    x2z-1./32.*o*tx*x12s-1./32.*o*tx*x2zs+3./32.*o*tx-1./
     #    32.*o*x12s+1./32.*o*x2zs+1./16.*o*txs+1./16.*o+1./32.
     #    *os*x12*x2z-1./16.*os*x12*tx+1./16.*os*x2z*tx-1./4.*os*
     #    x2z+3./32.*os*tx-1./32.*os*x2zs-1./32.*os*txs-3./32.*
     #    os+1./32.*oc*x2z-1./32.*oc*tx+1./32.*oc+3./16.*x12*
     #    x2z*tx+1./32.*x12*x2z*txs+3./32.*x12*tx+1./16.*x12*txs
     #    -9./32.*x2z*tx+1./16.*x2z*txs-1./32.*tx*x12s-3./32.*
     #    tx*x2zs-1./16.*tx-1./32.*x12s*txs+1./16.*txs)
      zz40q= zz40q+rwwz(9,1)*xx*vvq*yc*(-1./2.*o*x2z*
     #    tx-1./2.*o*txs-1./2.*x12*txs+1./2.*x2z*tx)
      zz40q= zz40q+rwwz(9,1)*bxpi*vvq*yc*(1./2.*o*x12*tx
     #    -3./2.*o*tx-1./2.*o*txs+1./2.*os*tx-1./2.*x12*tx-1./
     #    2.*x12*txs+1./2.*x2z*tx+1./2.*tx)
      zz40q= zz40q+rwwz(9,1)*vvq*yc*bxp*(-1./2.*o*tx
     #    -1./2.*x12*tx+1./2.*tx)
      zz40q= zz40q+rwwz(9,1)*vvq*yc*(-1./2.*o*x12*tx
     #    +2*o*tx+1./2.*o*txs-1./2.*os*tx+x12*tx+1./2.*x12*
     #    txs-1./2.*x2z*tx-tx)
      zz40q= zz40q+rwwz(9,4)*xx*vvq*yc*(1./8.*o*x12*x2z
     #    *tx+1./8.*o*x2z*txs-1./8.*o*tx*x2zs+1./8.*o*x2zs+1./8.
     #    *os*x2z*tx-1./8.*os*x2zs+1./8.*x12*x2z*txs-1./8.*tx*
     #    x2zs)
      zz40q= zz40q+rwwz(9,4)*bxpi*vvq*yc*(1./8.*o*x12*
     #    x2z*tx-3./16.*o*x12*x2z+1./8.*o*x12*tx-1./8.*o*x12*txs
     #    +1./16.*o*x2z*tx+1./16.*o*x2z*txs+1./4.*o*x2z-1./16.*
     #    o*tx*x12s-1./16.*o*tx*x2zs+1./16.*o*x2zs+1./8.*o*txs+
     #    1./16.*os*x12*x2z-1./8.*os*x12*tx+1./8.*os*x2z*tx-5./16.
     #    *os*x2z+1./8.*os*tx-1./16.*os*x2zs-1./16.*os*txs+1./
     #    16.*oc*x2z-1./16.*oc*tx+3./16.*x12*x2z*tx+1./16.*x12*
     #    x2z*txs+1./8.*x12*txs-1./4.*x2z*tx-1./16.*tx*x2zs-1./
     #    16.*x12s*txs)
      zz40q= zz40q+rwwz(9,4)*vvq*yc*bxp*(-1./16.*o*x12
     #    *x2z-1./8.*o*x12*tx-3./16.*o*x12+1./16.*o*x2z*tx+1./
     #    16.*o*x2z+3./16.*o*tx+1./16.*o*x12s+1./8.*o+1./8.*os*
     #    x12-1./16.*os*x2z-1./16.*os*tx-3./16.*os+1./16.*oc+
     #    1./16.*x12*x2z*tx+3./16.*x12*tx-1./16.*x2z*tx-1./16.*tx
     #    *x12s-1./8.*tx)
      zz40q= zz40q+rwwz(9,4)*vvq*yc*(-1./8.*o*x12*x2z
     #    *tx+1./4.*o*x12*x2z+1./8.*o*x12*txs+3./16.*o*x12-1./8.
     #    *o*x2z*tx-1./16.*o*x2z*txs-5./16.*o*x2z+1./16.*o*tx*
     #    x12s+1./16.*o*tx*x2zs-3./16.*o*tx-1./16.*o*x12s-1./16.
     #    *o*x2zs-1./8.*o*txs-1./8.*o-1./16.*os*x12*x2z+1./8.*
     #    os*x12*tx-1./8.*os*x12-1./8.*os*x2z*tx+3./8.*os*x2z-1.
     #    /16.*os*tx+1./16.*os*x2zs+1./16.*os*txs+3./16.*os-1./
     #    16.*oc*x2z+1./16.*oc*tx-1./16.*oc-1./4.*x12*x2z*tx-1./
     #    16.*x12*x2z*txs-3./16.*x12*tx-1./8.*x12*txs+5./16.*x2z*
     #    tx+1./16.*tx*x12s+1./16.*tx*x2zs+1./8.*tx+1./16.*x12s
     #    *txs)
      zz40q= zz40q+rwwz(9,7)*xx*vvq*yc*(-1./16.*o*x12
     #    *x2z*tx-1./16.*o*x2z*txs-1./16.*o*tx*x2zs+1./16.*o*x2zs
     #    -1./16.*os*x2z*tx-1./16.*os*x2zs-1./16.*x12*x2z*txs+1.
     #    /16.*tx*x2zs)
      zz40q= zz40q+rwwz(9,7)*bxpi*vvq*yc*(-3./32.*o*
     #    x12*x2z-1./16.*o*x12*tx+1./16.*o*x12*txs-5./32.*o*x2z*
     #    tx-1./32.*o*x2z*txs+1./8.*o*x2z+1./32.*o*tx*x12s-1./
     #    32.*o*tx*x2zs+1./32.*o*x2zs-1./16.*o*txs+1./32.*os*x12*
     #    x2z+1./16.*os*x12*tx-5./32.*os*x2z-1./16.*os*tx-1./32.
     #    *os*x2zs+1./32.*os*txs+1./32.*oc*x2z+1./32.*oc*tx-3./
     #    32.*x12*x2z*tx-1./32.*x12*x2z*txs-1./16.*x12*txs+1./8.*
     #    x2z*tx+1./32.*tx*x2zs+1./32.*x12s*txs)
      zz40q= zz40q+rwwz(9,7)*vvq*yc*bxp*(-1./32.*o*x12
     #    *x2z+1./16.*o*x12*tx-3./32.*o*x12-1./32.*o*x2z*tx+1./
     #    32.*o*x2z-3./32.*o*tx+1./32.*o*x12s+1./16.*o+1./16.*
     #    os*x12-1./32.*os*x2z+1./32.*os*tx-3./32.*os+1./32.*oc
     #    -1./32.*x12*x2z*tx-3./32.*x12*tx+1./32.*x2z*tx+1./32.
     #    *tx*x12s+1./16.*tx)
      zz40q= zz40q+rwwz(9,7)*vvq*yc*(1./8.*o*x12*x2z-
     #    1./16.*o*x12*txs+3./32.*o*x12+3./16.*o*x2z*tx+1./32.*o*
     #    x2z*txs-5./32.*o*x2z-1./32.*o*tx*x12s+1./32.*o*tx*x2zs
     #    +3./32.*o*tx-1./32.*o*x12s-1./32.*o*x2zs+1./16.*o*txs
     #    -1./16.*o-1./32.*os*x12*x2z-1./16.*os*x12*tx-1./16.*
     #    os*x12+3./16.*os*x2z+1./32.*os*tx+1./32.*os*x2zs-1./
     #    32.*os*txs+3./32.*os-1./32.*oc*x2z-1./32.*oc*tx-1./32.
     #    *oc+1./8.*x12*x2z*tx+1./32.*x12*x2z*txs+3./32.*x12*tx
     #    +1./16.*x12*txs-5./32.*x2z*tx-1./32.*tx*x12s-1./32.*
     #    tx*x2zs-1./16.*tx-1./32.*x12s*txs)
      zz40q= zz40q+rwwz(9,11)*bxpi*vvq*yc*(-1./8.*o*
     #    x12*tx+1./8.*o*x2z*tx-1./8.*o*x2z-1./8.*o*txs+1./8.*
     #    os*x2z-1./8.*os*tx-1./8.*x12*txs+1./8.*x2z*tx)
      zz40q= zz40q+rwwz(9,11)*vvq*yc*bxp*(1./8.*o*x12-
     #    1./8.*o*tx-1./8.*o+1./8.*os-1./8.*x12*tx+1./8.*tx)
      zz40q= zz40q+rwwz(9,11)*vvq*yc*(1./8.*o*x12*tx-
     #    1./8.*o*x12-1./8.*o*x2z*tx+1./8.*o*x2z+1./8.*o*tx+1./
     #    8.*o*txs+1./8.*o-1./8.*os*x2z+1./8.*os*tx-1./8.*os+
     #    1./8.*x12*tx+1./8.*x12*txs-1./8.*x2z*tx-1./8.*tx)
      zz40q= zz40q+rwwz(9,12)*xx*vvq*yc*(1./4.*o*x2z*tx
     #    -1./4.*o*txs-1./4.*x12*txs+1./4.*x2z*tx)
      zz40q= zz40q+rwwz(9,12)*bxpi*vvq*yc*(1./8.*o*x12*
     #    tx+1./8.*o*x2z*tx+1./8.*o*x2z-1./4.*o*tx-1./8.*o*txs
     #    -1./8.*os*x2z+1./8.*os*tx-1./4.*x12*tx-1./8.*x12*txs
     #    +1./8.*x2z*tx+1./4.*tx)
      zz40q= zz40q+rwwz(9,12)*vvq*yc*bxp*(-1./8.*o*x12
     #    -1./8.*o*tx+1./8.*o-1./8.*os-1./8.*x12*tx+1./8.*tx
     #    )
      zz40q= zz40q+rwwz(9,12)*vvq*yc*(-1./8.*o*x12*tx
     #    +1./8.*o*x12-1./8.*o*x2z*tx-1./8.*o*x2z+3./8.*o*tx+
     #    1./8.*o*txs-1./8.*o+1./8.*os*x2z-1./8.*os*tx+1./8.*os
     #    +3./8.*x12*tx+1./8.*x12*txs-1./8.*x2z*tx-3./8.*tx)
      zz40q= zz40q+rwwz(9,13)*xx*vvq*yc*(-1./8.*o*x2z
     #    *tx-1./8.*o*txs-1./8.*x12*txs+1./8.*x2z*tx)
      zz40q= zz40q+rwwz(9,13)*bxpi*vvq*yc*(1./16.*o*x12*
     #    tx-1./16.*o*x2z*tx-1./16.*o*x2z-1./8.*o*tx-1./16.*o*
     #    txs+1./16.*os*x2z+1./16.*os*tx-1./8.*x12*tx-1./16.*
     #    x12*txs+1./16.*x2z*tx+1./8.*tx)
      zz40q= zz40q+rwwz(9,13)*vvq*yc*bxp*(1./16.*o*x12
     #    -1./16.*o*tx-1./16.*o+1./16.*os-1./16.*x12*tx+1./16.
     #    *tx)
      zz40q= zz40q+rwwz(9,13)*vvq*yc*(-1./16.*o*x12*
     #    tx-1./16.*o*x12+1./16.*o*x2z*tx+1./16.*o*x2z+3./16.*o
     #    *tx+1./16.*o*txs+1./16.*o-1./16.*os*x2z-1./16.*os*tx
     #    -1./16.*os+3./16.*x12*tx+1./16.*x12*txs-1./16.*x2z*tx
     #    -3./16.*tx)
      zz40q= zz40q+rwwz(9,14)*xx*vvq*yc*(1./4.*o*x2z*tx
     #    )
      zz40q= zz40q+rwwz(9,14)*bxpi*vvq*yc*(-1./16.*o*
     #    x12*tx+3./16.*o*x2z*tx+1./16.*o*x2z+1./4.*o*tx-1./16.
     #    *o*txs-1./16.*os*x2z-1./16.*os*tx-1./16.*x12*txs+1./
     #    16.*x2z*tx)
      zz40q= zz40q+rwwz(9,14)*vvq*yc*bxp*(-1./16.*o*
     #    x12+3./16.*o*tx+1./16.*o-1./16.*os-1./16.*x12*tx+1./
     #    16.*tx)
      zz40q= zz40q+rwwz(9,14)*vvq*yc*(1./16.*o*x12*tx
     #    +1./16.*o*x12-3./16.*o*x2z*tx-1./16.*o*x2z-7./16.*o*
     #    tx+1./16.*o*txs-1./16.*o+1./16.*os*x2z+1./16.*os*tx
     #    +1./16.*os+1./16.*x12*tx+1./16.*x12*txs-1./16.*x2z*tx
     #    -1./16.*tx)
      zz40q= zz40q+rwwz(10,1)*xx*vvq*yc*(1./8.*o*x12*
     #    x2z*tx-1./2.*o*x12*x2z*txs-1./8.*o*x12*tx*x2zs+3./16.*o
     #    *x12*x2zs-1./16.*o*x2z*tx*x12s+1./8.*o*x2z*txs-1./16.*o
     #    *tx*x2zc+1./16.*o*tx*x2zs-3./16.*o*x12s*txs+3./16.*o*
     #    x2zc-3./16.*o*x2zs*txs-1./16.*o*x2zs-1./8.*os*x12*x2z*
     #    tx-1./8.*os*x12*x2zs-3./16.*os*x12*txs-1./4.*os*x2z*txs
     #    -1./8.*os*tx*x2zs-1./8.*os*x2zc+3./16.*os*x2zs-1./16.
     #    *oc*x2z*tx-1./8.*oc*x2zs-1./16.*oc*txs+1./8.*x12*x2z*
     #    txs+3./16.*x12*tx*x2zs-3./16.*x12*x2zs*txs-1./16.*x12*
     #    x2zs+1./8.*x2z*tx*x12s-1./4.*x2z*x12s*txs+1./16.*tx*
     #    x2zc-1./16.*x12c*txs-1./16.*x2zc+1./8.*x2zs*txs)
      zz40q= zz40q+rwwz(10,1)*bxpi*vvq*yc*(-3./4.*o*
     #    x12*x2z*tx+1./4.*o*x12*x2z*txs+9./16.*o*x12*x2z+3./16.*
     #    o*x12*tx*x2zs+1./8.*o*x12*tx-5./16.*o*x12*x2zs-3./4.*o*
     #    x12*txs+3./16.*o*x2z*tx*x12s+3./16.*o*x2z*tx-1./4.*o*
     #    x2z*x12s-5./8.*o*x2z*txs-1./8.*o*x2z-3./8.*o*tx*x12s+
     #    1./16.*o*tx*x12c+1./16.*o*tx*x2zc-7./16.*o*tx*x2zs+3./
     #    16.*o*x12s*txs-1./16.*o*x2zc+1./16.*o*x2zs*txs+13./16.*
     #    o*x2zs+1./8.*o*txs+3./8.*os*x12*x2z*tx-5./8.*os*x12*x2z
     #    -3./8.*os*x12*tx+1./8.*os*x12*x2zs+3./16.*os*x12*txs-
     #    1./2.*os*x2z*tx+1./16.*os*x2z*x12s+1./8.*os*x2z*txs+7./
     #    16.*os*x2z+3./16.*os*tx*x12s+3./16.*os*tx*x2zs+1./16.*
     #    os*x2zc-11./16.*os*x2zs-3./8.*os*txs+1./8.*oc*x12*x2z
     #    +3./16.*oc*x12*tx+3./16.*oc*x2z*tx-3./8.*oc*x2z-1./8.
     #    *oc*tx+1./8.*oc*x2zs+1./16.*oc*txs+1./16.*oq*x2z+1./
     #    16.*oq*tx+9./16.*x12*x2z*tx-5./8.*x12*x2z*txs-1./8.*x12
     #    *x2z)
      zz40q= zz40q+rwwz(10,1)*bxpi*vvq*yc*(-3./16.*x12
     #    *tx*x2zs+1./16.*x12*x2zs*txs+1./8.*x12*x2zs+1./8.*x12*
     #    txs-1./4.*x2z*tx*x12s+1./8.*x2z*x12s*txs+1./8.*x2z*x12s
     #    +3./8.*x2z*txs+1./8.*tx*x12s-1./8.*tx*x12c-1./16.*tx*
     #    x2zc+5./16.*tx*x2zs-3./8.*x12s*txs+1./16.*x12c*txs-1./
     #    4.*x2zs)
      zz40q= zz40q+rwwz(10,1)*vvq*bxps*yc*(1./8.+1./4.
     #    *o*x12-1./4.*o+1./8.*os-1./4.*x12+1./8.*x12s)
      zz40q= zz40q+rwwz(10,1)*vvq*yc*bxp*(-1./8.-3./
     #    8.*o*x12*x2z-3./8.*o*x12+5./8.*o*x2z-3./8.*o*tx-1./16.
     #    *o*x12s-1./4.*o*txs+7./16.*o+1./16.*os*x12-5./16.*os*
     #    x2z+1./8.*os*tx-3./8.*os+1./16.*oc+3./8.*x12*x2z-1./
     #    8.*x12*tx-1./4.*x12*txs+3./16.*x12-1./16.*x2z*x12s-5./
     #    16.*x2z-1./8.*tx*x12s+1./4.*tx-1./16.*x12c+1./4.*txs
     #    )
      zz40q= zz40q+rwwz(10,1)*vvq*yc*(-1./8.*o*x12*
     #    x2z*tx+7./16.*o*x12*x2z+3./4.*o*x12*tx+1./8.*o*x12*x2zs
     #    +1./4.*o*x12*txs-3./8.*o*x12+11./16.*o*x2z*tx+1./16.*
     #    o*x2z*x12s+3./8.*o*x2z*txs-o*x2z-1./16.*o*tx*x12s-1./
     #    8.*o*tx+3./8.*o*x12s-1./16.*o*x12c-1./2.*o*x2zs+3./8.
     #    *o*txs+1./16.*o-5./16.*os*x12*tx+9./16.*os*x12-3./16.
     #    *os*x2z*tx+3./4.*os*x2z+7./16.*os*tx-3./16.*os*x12s+1.
     #    /4.*os*x2zs+1./8.*os*txs-1./4.*os-3./16.*oc*x12-1./16.
     #    *oc*x2z-3./16.*oc*tx+1./4.*oc-1./16.*oq+1./16.*x12*
     #    x2z*tx+3./8.*x12*x2z*txs-1./4.*x12*x2z-3./8.*x12*tx-1.
     #    /8.*x12*x2zs+3./8.*x12*txs+1./16.*x12+1./16.*x2z*tx*
     #    x12s-1./2.*x2z*tx-1./16.*x2z*x12s-3./8.*x2z*txs+5./16.
     #    *x2z+5./16.*tx*x12s+1./16.*tx*x12c+1./8.*x12s*txs-1./
     #    8.*x12s+1./16.*x12c+1./4.*x2zs-1./4.*txs)
      zz40q= zz40q+rwwz(10,4)*xx*vvq*yc*(-1./32.*o*
     #    x12*tx*x2zc-1./16.*o*x12*tx*x2zs+1./8.*o*x12*x2zs*txs+1.
     #    /32.*o*x2z*tx*x12c+3./32.*o*x2z*x12s*txs+1./32.*o*tx*x12s
     #    *x2zs-1./32.*o*tx*x2zq-1./32.*o*x12s*x2zs+1./32.*o*x2zq
     #    +1./32.*o*x2zc*txs-1./16.*o*x2zs*txs+3./32.*os*x12*x2z*
     #    txs+1./16.*os*x12*tx*x2zs-1./16.*os*x12*x2zc+3./32.*os*
     #    x2z*tx*x12s-1./32.*os*tx*x2zc-1./32.*os*tx*x2zs-1./32.*
     #    os*x12s*x2zs-1./32.*os*x2zq+1./16.*os*x2zc+1./16.*os*
     #    x2zs*txs+3./32.*oc*x12*x2z*tx-1./16.*oc*x12*x2zs+1./32.
     #    *oc*x2z*txs+1./32.*oc*tx*x2zs-1./16.*oc*x2zc+1./32.*oc*
     #    x2zs+1./32.*oq*x2z*tx-1./32.*oq*x2zs+1./32.*x12*x2zc*
     #    txs-1./16.*x12*x2zs*txs+1./32.*x2z*x12c*txs-1./32.*tx*
     #    x12s*x2zs+1./32.*tx*x2zq+1./16.*x12s*x2zs*txs-1./16.*
     #    x2zc*txs)
      zz40q= zz40q+rwwz(10,4)*bxpi*vvq*yc*(1./64.*o*oq*
     #    x2z-1./64.*o*oq*tx-1./8.*o*x12*x2z*tx+7./16.*o*x12*x2z*
     #    txs-1./64.*o*x12*tx*x12c+1./32.*o*x12*tx*x2zc-3./64.*o*
     #    x12*x2zc-3./32.*o*x12*x2zs*txs-1./16.*o*x12*x2zs+15./64.
     #    *o*x2z*tx*x12s-1./32.*o*x2z*tx*x12c-9./64.*o*x2z*x12s*txs
     #    -1./16.*o*x2z*x12s+3./64.*o*x2z*x12c-1./8.*o*x2z*txs+
     #    1./32.*o*tx*x12c+1./64.*o*tx*x2zq-9./64.*o*tx*x2zc-1./
     #    16.*o*tx*x2zs+1./64.*o*x12s*x2zs+3./32.*o*x12s*txs-1./
     #    16.*o*x12c*txs-1./64.*o*x2zq-1./64.*o*x2zc*txs+1./8.*o*
     #    x2zc+7./32.*o*x2zs*txs+21./64.*os*x12*x2z*tx-9./64.*os*
     #    x12*x2z*txs+3./64.*os*x12*x2zc-7./32.*os*x12*x2zs+3./32.
     #    *os*x12*txs-3./32.*os*x2z*tx*x12s-1./16.*os*x2z*tx+1./
     #    64.*os*x2z*x12s+1./64.*os*x2z*x12c+7./32.*os*x2z*txs+3./
     #    32.*os*tx*x12s-1./16.*os*tx*x12c+1./32.*os*tx*x2zc-1./
     #    64.*os*tx*x2zs+3./64.*os*x12s*x2zs-3./32.*os*x12s*txs+1.
     #    /64.*os*x2zq)
      zz40q= zz40q+rwwz(10,4)*bxpi*vvq*yc*(-11./64.*os
     #    *x2zc-3./64.*os*x2zs*txs+3./16.*os*x2zs-3./32.*oc*x12*
     #    x2z*tx-7./64.*oc*x12*x2z+3./32.*oc*x12*tx+3./32.*oc*x12
     #    *x2zs-1./16.*oc*x12*txs+9./64.*oc*x2z*tx+3./64.*oc*x2z*
     #    x12s-3./64.*oc*x2z*txs+1./16.*oc*x2z-3./32.*oc*tx*x12s
     #    +3./64.*oc*x2zc-15./64.*oc*x2zs+1./32.*oc*txs+3./64.*
     #    oq*x12*x2z-1./16.*oq*x12*tx-1./32.*oq*x2z*tx-5./64.*oq*
     #    x2z+1./32.*oq*tx+3./64.*oq*x2zs-1./64.*oq*txs-1./8.*
     #    x12*x2z*txs-3./64.*x12*tx*x2zc-1./16.*x12*tx*x2zs-1./64.
     #    *x12*x12c*txs-1./64.*x12*x2zc*txs+7./32.*x12*x2zs*txs-1.
     #    /16.*x2z*tx*x12s+3./64.*x2z*tx*x12c+7./32.*x2z*x12s*txs
     #    -3./64.*x2z*x12c*txs+1./64.*tx*x12s*x2zs-1./64.*tx*x2zq
     #    +1./8.*tx*x2zc-3./64.*x12s*x2zs*txs+1./32.*x12c*txs+1.
     #    /32.*x2zc*txs-1./4.*x2zs*txs)
      zz40q= zz40q+rwwz(10,4)*vvq*yc*bxp*(1./8.*o*x12*
     #    x2z*tx-1./8.*o*x12*x2z+3./16.*o*x12*tx-1./32.*o*x12*
     #    x2zs-1./8.*o*x12*txs-1./16.*o*x12-1./8.*o*x2z*tx+1./
     #    16.*o*x2z*x12s+1./16.*o*x2z*txs+1./16.*o*x2z-3./32.*o*
     #    tx*x12s-1./32.*o*tx*x2zs-1./16.*o*tx+3./32.*o*x12s-1./
     #    32.*o*x12c+1./32.*o*x2zs+3./16.*o*txs+1./16.*os*x12*x2z
     #    -3./32.*os*x12*tx+1./16.*os*x2z*tx-1./16.*os*x2z+3./
     #    32.*os*tx-1./32.*os*x12s-1./32.*os*x2zs-1./16.*os*txs
     #    +1./16.*os+1./32.*oc*x12-1./32.*oc*tx-3./32.*oc+1./
     #    32.*oq-1./8.*x12*x2z*tx+1./16.*x12*x2z*txs-1./32.*x12*
     #    tx*x2zs-1./16.*x12*tx+3./16.*x12*txs+1./16.*x2z*tx*x12s
     #    +1./16.*x2z*tx-1./16.*x2z*txs+3./32.*tx*x12s-1./32.*
     #    tx*x12c+1./32.*tx*x2zs-1./16.*x12s*txs-1./8.*txs)
      zz40q= zz40q+rwwz(10,4)*vvq*yc*(-1./64.*o*oq-
     #    5./32.*o*x12*x2z*tx+1./8.*o*x12*x2z-1./16.*o*x12*tx*x2zs
     #    +1./16.*o*x12*tx+1./64.*o*x12*x12c+1./64.*o*x12*x2zc+
     #    11./64.*o*x12*x2zs-5./16.*o*x12*txs-5./64.*o*x2z*tx*x12s
     #    +1./8.*o*x2z*tx-5./64.*o*x2z*x12s-1./64.*o*x2z*x12c-5.
     #    /16.*o*x2z*txs-13./64.*o*tx*x12s+3./32.*o*tx*x12c+3./64.
     #    *o*tx*x2zc+15./64.*o*tx*x2zs-1./64.*o*x12s*x2zs+3./16.*
     #    o*x12s*txs+1./32.*o*x12s-3./64.*o*x12c-3./64.*o*x2zc-
     #    1./16.*o*x2zs*txs-5./32.*o*x2zs+1./16.*o*txs-7./64.*os*
     #    x12*x2z*tx+5./32.*os*x12*x2z-17./64.*os*x12*tx+3./16.*
     #    os*x12*txs-5./64.*os*x2z*tx-5./64.*os*x2z*x12s-3./16.*
     #    os*x2z+3./16.*os*tx*x12s-3./64.*os*tx*x2zs+1./32.*os*tx
     #    -3./64.*os*x12s+1./32.*os*x12c+3./64.*os*x2zc+9./64.*
     #    os*x2zs-5./32.*os*txs-7./64.*oc*x12*x2z+5./32.*oc*x12*
     #    tx+3./64.*oc*x12-3./64.*oc*x2z*tx+15./64.*oc*x2z-7./
     #    64.*oc*tx)
      zz40q= zz40q+rwwz(10,4)*vvq*yc*(1./64.*oc*x2zs+
     #    1./16.*oc*txs-1./32.*oc-1./32.*oq*x12-3./64.*oq*x2z+3.
     #    /64.*oq*tx+3./64.*oq+1./8.*x12*x2z*tx-5./16.*x12*x2z*
     #    txs+1./64.*x12*tx*x12c+1./64.*x12*tx*x2zc+11./64.*x12*
     #    tx*x2zs-1./16.*x12*x2zs*txs+1./16.*x12*txs-5./64.*x2z*
     #    tx*x12s-1./64.*x2z*tx*x12c+5./16.*x2z*txs-1./64.*tx*
     #    x12s*x2zs+1./32.*tx*x12s-3./64.*tx*x12c-3./64.*tx*x2zc
     #    -5./32.*tx*x2zs-5./32.*x12s*txs+1./16.*x12c*txs+3./32.
     #    *x2zs*txs)
      zz40q= zz40q+rwwz(10,7)*xx*vvq*yc*(1./16.*o*x12*
     #    x2z*txs+1./16.*o*x12*tx*x2zs+1./16.*o*x12*x2zc-1./8.*o*
     #    x12*x2zs*txs-3./32.*o*x2z*x12s*txs+1./16.*o*x2zq-1./32.
     #    *o*x2zc*txs-3./32.*o*x2zc+1./16.*o*x2zs*txs-3./32.*os*
     #    x12*x2z*txs-1./16.*os*x12*x2zc+1./16.*os*x12*x2zs+1./32.
     #    *os*x2z*txs-1./32.*os*x12s*x2zs-1./32.*os*x2zq+1./8.*os
     #    *x2zc-1./16.*os*x2zs*txs-1./32.*os*x2zs-1./16.*oc*x12*
     #    x2zs-1./32.*oc*x2z*txs-1./16.*oc*x2zc+1./16.*oc*x2zs-
     #    1./32.*oq*x2zs+1./16.*x12*tx*x2zc-1./16.*x12*tx*x2zs-1./
     #    32.*x12*x2zc*txs-1./32.*x12*x2zc+1./16.*x12*x2zs*txs+1./
     #    32.*x2z*x12s*txs-1./32.*x2z*x12c*txs+1./16.*tx*x12s*x2zs
     #    -1./16.*x12s*x2zs*txs-1./32.*x2zq+1./32.*x2zc*txs+1./
     #    32.*x2zc-1./32.*x2zs*txs)
      zz40q= zz40q+rwwz(10,7)*bxpi*vvq*yc*(1./64.*o*oq*
     #    x2z+7./32.*o*x12*x2z*tx-11./32.*o*x12*x2z*txs-1./8.*o*
     #    x12*tx*x2zs-1./8.*o*x12*x2zc+3./32.*o*x12*x2zs*txs+3./8.
     #    *o*x12*x2zs+1./16.*o*x12*txs-3./16.*o*x2z*tx*x12s+9./64.
     #    *o*x2z*x12s*txs+9./64.*o*x2z*txs-3./32.*o*x12s*x2zs-9./
     #    64.*o*x12s*txs+1./16.*o*x12c*txs-1./32.*o*x2zq+1./64.*o
     #    *x2zc*txs+5./16.*o*x2zc-9./64.*o*x2zs*txs-19./64.*o*
     #    x2zs-3./32.*os*x12*x2z*tx+9./64.*os*x12*x2z*txs+9./64.*
     #    os*x12*x2z+3./64.*os*x12*x2zc-3./8.*os*x12*x2zs-9./64.*
     #    os*x12*txs-3./32.*os*x2z*x12s+1./64.*os*x2z*x12c-11./64.
     #    *os*x2z*txs-1./16.*os*x2z+3./64.*os*x12s*x2zs+3./32.*os
     #    *x12s*txs+1./64.*os*x2zq-7./32.*os*x2zc+3./64.*os*x2zs*
     #    txs+7./16.*os*x2zs+1./32.*os*txs-3./16.*oc*x12*x2z+3./
     #    32.*oc*x12*x2zs+1./16.*oc*x12*txs+3./64.*oc*x2z*x12s+3./
     #    64.*oc*x2z*txs+9./64.*oc*x2z+3./64.*oc*x2zc-9./32.*oc*
     #    x2zs)
      zz40q= zz40q+rwwz(10,7)*bxpi*vvq*yc*(-3./64.*oc*
     #    txs+3./64.*oq*x12*x2z-3./32.*oq*x2z+3./64.*oq*x2zs+1./
     #    64.*oq*txs-1./8.*x12*x2z*tx+9./64.*x12*x2z*txs-1./32.*
     #    x12*tx*x2zc+7./32.*x12*tx*x2zs+1./64.*x12*x12c*txs+1./
     #    64.*x12*x2zc*txs+3./32.*x12*x2zc-9./64.*x12*x2zs*txs-11.
     #    /64.*x12*x2zs+7./32.*x2z*tx*x12s-3./32.*x2z*tx*x12c-11./
     #    64.*x2z*x12s*txs+3./64.*x2z*x12c*txs-1./16.*x2z*txs-1./
     #    8.*tx*x12s*x2zs+3./64.*x12s*x2zs*txs+5./64.*x12s*x2zs+1.
     #    /32.*x12s*txs-3./64.*x12c*txs+1./64.*x2zq-1./64.*x2zc*
     #    txs-9./64.*x2zc+7./64.*x2zs*txs+3./32.*x2zs)
      zz40q= zz40q+rwwz(10,7)*vvq*bxps*yc*(1./32.+1./
     #    32.*o*x12*x2z+1./8.*o*x12-1./32.*o*x2z-3./64.*o*x12s-
     #    5./64.*o-3./64.*os*x12+1./64.*os*x2z+1./16.*os-1./64.
     #    *oc-1./32.*x12*x2z-5./64.*x12+1./64.*x2z*x12s+1./64.*
     #    x2z+1./16.*x12s-1./64.*x12c)
      zz40q= zz40q+rwwz(10,7)*vvq*yc*bxp*(1./32.-1./32.
     #    *o*x12*x2z*tx-1./4.*o*x12*x2z-3./32.*o*x12*tx-1./16.*o*
     #    x12*x2zs+1./32.*o*x12*txs+9./32.*o*x12+1./32.*o*x2z*
     #    x12s-1./64.*o*x2z*txs+1./4.*o*x2z+1./16.*o*tx*x12s-15.
     #    /64.*o*x12s+1./16.*o*x12c+3./32.*o*x2zs-3./64.*o*txs-
     #    7./64.*o+3./64.*os*x12*x2z+1./32.*os*x12*tx-9./32.*os*
     #    x12-5./32.*os*x2z+7./64.*os*x12s-3./64.*os*x2zs+1./64.
     #    *os*txs+11./64.*os+3./32.*oc*x12+1./64.*oc*x2z-1./8.*
     #    oc+1./32.*oq+1./32.*x12*x2z*tx-1./64.*x12*x2z*txs+3./
     #    16.*x12*x2z+1./16.*x12*tx+1./64.*x12*x12c+1./16.*x12*
     #    x2zs-3./64.*x12*txs-7./64.*x12-1./32.*x2z*tx*x12s-5./
     #    64.*x2z*x12s+1./64.*x2z*txs-7./64.*x2z-3./32.*tx*x12s
     #    +1./32.*tx*x12c-1./64.*x12s*x2zs+1./64.*x12s*txs+9./
     #    64.*x12s-5./64.*x12c-3./64.*x2zs+1./32.*txs)
      zz40q= zz40q+rwwz(10,7)*vvq*yc*(-1./64.*o*oq+
     #    1./8.*o*x12*x2z*tx-19./32.*o*x12*x2z+1./32.*o*x12*tx*x2zs
     #    -5./32.*o*x12*tx+1./32.*o*x12*x2zc+3./16.*o*x12*x2zs+
     #    3./16.*o*x12*txs+5./16.*o*x2z*x12s-1./32.*o*x2z*x12c+3./
     #    32.*o*x2z*txs+5./16.*o*x2z+1./4.*o*tx*x12s-3./32.*o*tx*
     #    x12c-3./32.*o*x12s*txs-3./32.*o*x2zc+1./32.*o*x2zs*txs
     #    -21./64.*o*x2zs-5./64.*o*txs+17./32.*os*x12*x2z+1./8.
     #    *os*x12*tx+1./64.*os*x12*x2zs-3./32.*os*x12*txs-5./64.*
     #    os*x12-7./64.*os*x2z*x12s-29./64.*os*x2z-3./32.*os*tx*
     #    x12s+1./16.*os*x12s-1./64.*os*x12c+3./64.*os*x2zc+5./
     #    32.*os*x2zs+3./32.*os*txs+1./32.*os-1./8.*oc*x12*x2z-
     #    1./32.*oc*x12*tx+1./8.*oc*x12+9./32.*oc*x2z-3./64.*oc*
     #    x12s+1./64.*oc*x2zs-1./32.*oc*txs-5./64.*oc-3./64.*oq
     #    *x12-3./64.*oq*x2z+1./16.*oq-5./32.*x12*x2z*tx+3./32.
     #    *x12*x2z*txs+1./4.*x12*x2z-1./32.*x12*tx*x12c-1./16.*
     #    x12*tx*x2zs)
      zz40q= zz40q+rwwz(10,7)*vvq*yc*(1./16.*x12*tx-1.
     #    /32.*x12*x2zc+1./32.*x12*x2zs*txs-11./64.*x12*x2zs-5./
     #    64.*x12*txs+1./8.*x2z*tx*x12s-7./32.*x2z*x12s+1./16.*
     #    x2z*x12c-5./64.*x2z*txs-3./32.*x2z+1./32.*tx*x12s*x2zs
     #    -5./32.*tx*x12s+1./8.*tx*x12c+1./32.*x12s*x2zs+3./32.
     #    *x12s*txs-1./32.*x12c*txs+3./64.*x2zc-1./32.*x2zs*txs
     #    +5./32.*x2zs+1./32.*txs)
      zz40q= zz40q+rwwz(10,8)*xx*vvq*yc*(-1./16.*o*
     #    x12*x2z*txs+1./32.*o*x12*x2zs-1./32.*o*x2z*tx*x12s+1./
     #    32.*o*tx*x2zc+1./32.*o*tx*x2zs-1./32.*o*x2zc-1./32.*o*
     #    x2zs*txs-1./16.*os*x12*x2z*tx+1./32.*os*x12*x2zs-1./32.
     #    *os*x2z*txs+1./32.*os*x2zc-1./32.*os*x2zs-1./32.*oc*x2z
     #    *tx+1./32.*oc*x2zs+1./32.*x12*tx*x2zs-1./32.*x12*x2zs*
     #    txs-1./32.*x2z*x12s*txs-1./32.*tx*x2zc+1./16.*x2zs*txs
     #    )
      zz40q= zz40q+rwwz(10,8)*bxpi*vvq*yc*(-3./32.*o*
     #    x12*x2z*tx+1./16.*o*x12*x2z-1./64.*o*x12*tx*x2zs+1./16.
     #    *o*x12*x2zs-1./16.*o*x12*txs-1./64.*o*x2z*tx*x12s+1./16.
     #    *o*x2z*tx-3./64.*o*x2z*x12s-1./8.*o*x2z*txs-1./32.*o*tx
     #    *x12s+1./64.*o*tx*x12c+1./64.*o*tx*x2zc+3./32.*o*tx*
     #    x2zs+3./64.*o*x12s*txs-1./64.*o*x2zc-1./64.*o*x2zs*txs
     #    -1./16.*o*x2zs-1./32.*os*x12*x2z*tx+1./32.*os*x12*x2z
     #    -1./16.*os*x12*tx+3./64.*os*x12*txs-3./64.*os*x2z*tx-
     #    1./64.*os*x2z*x12s-1./16.*os*x2z+3./64.*os*tx*x12s-1./
     #    64.*os*tx*x2zs+1./64.*os*x2zc+1./16.*os*x2zs-1./32.*os*
     #    txs-1./32.*oc*x12*x2z+3./64.*oc*x12*tx-1./64.*oc*x2z*tx
     #    +5./64.*oc*x2z-1./32.*oc*tx+1./64.*oc*txs-1./64.*oq*
     #    x2z+1./64.*oq*tx+1./16.*x12*x2z*tx-1./8.*x12*x2z*txs+
     #    1./16.*x12*tx*x2zs-1./64.*x12*x2zs*txs-3./64.*x2z*tx*x12s
     #    +1./8.*x2z*txs-1./64.*tx*x2zc-1./16.*tx*x2zs-1./32.*
     #    x12s*txs)
      zz40q= zz40q+rwwz(10,8)*bxpi*vvq*yc*(1./64.*x12c*
     #    txs+1./32.*x2zs*txs)
      zz40q= zz40q+rwwz(10,8)*vvq*yc*bxp*(-1./16.*o*
     #    x12*x2z*tx+1./16.*o*x12*x2z-3./32.*o*x12*tx+1./64.*o*
     #    x12*x2zs+1./16.*o*x12*txs+1./32.*o*x12+1./16.*o*x2z*tx
     #    -1./32.*o*x2z*x12s-1./32.*o*x2z*txs-1./32.*o*x2z+3./
     #    64.*o*tx*x12s+1./64.*o*tx*x2zs+1./32.*o*tx-3./64.*o*
     #    x12s+1./64.*o*x12c-1./64.*o*x2zs-3./32.*o*txs-1./32.*
     #    os*x12*x2z+3./64.*os*x12*tx-1./32.*os*x2z*tx+1./32.*os*
     #    x2z-3./64.*os*tx+1./64.*os*x12s+1./64.*os*x2zs+1./32.
     #    *os*txs-1./32.*os-1./64.*oc*x12+1./64.*oc*tx+3./64.*
     #    oc-1./64.*oq+1./16.*x12*x2z*tx-1./32.*x12*x2z*txs+1./
     #    64.*x12*tx*x2zs+1./32.*x12*tx-3./32.*x12*txs-1./32.*x2z
     #    *tx*x12s-1./32.*x2z*tx+1./32.*x2z*txs-3./64.*tx*x12s+
     #    1./64.*tx*x12c-1./64.*tx*x2zs+1./32.*x12s*txs+1./16.*
     #    txs)
      zz40q= zz40q+rwwz(10,8)*vvq*yc*(5./32.*o*x12*x2z*
     #    tx-1./8.*o*x12*x2z+1./64.*o*x12*tx*x2zs+3./32.*o*x12*tx
     #    -5./64.*o*x12*x2zs-1./32.*o*x12+1./64.*o*x2z*tx*x12s-
     #    1./8.*o*x2z*tx+5./64.*o*x2z*x12s+5./32.*o*x2z*txs+1./32.
     #    *o*x2z-1./64.*o*tx*x12s-1./64.*o*tx*x12c-1./64.*o*tx*
     #    x2zc-7./64.*o*tx*x2zs-1./32.*o*tx-3./64.*o*x12s*txs+3.
     #    /64.*o*x12s-1./64.*o*x12c+1./64.*o*x2zc+1./64.*o*x2zs*
     #    txs+5./64.*o*x2zs+3./32.*o*txs+1./32.*os*x12*x2z*tx+1.
     #    /64.*os*x12*tx-3./64.*os*x12*txs+5./64.*os*x2z*tx+1./64.
     #    *os*x2z*x12s+1./32.*os*x2z-3./64.*os*tx*x12s+1./64.*os*
     #    tx*x2zs+3./64.*os*tx-1./64.*os*x12s-1./64.*os*x2zc-5./
     #    64.*os*x2zs+1./32.*os+1./32.*oc*x12*x2z-3./64.*oc*x12*
     #    tx+1./64.*oc*x12+1./64.*oc*x2z*tx-5./64.*oc*x2z+1./64.
     #    *oc*tx-1./64.*oc*txs-3./64.*oc+1./64.*oq*x2z-1./64.*
     #    oq*tx+1./64.*oq-1./8.*x12*x2z*tx+5./32.*x12*x2z*txs-5.
     #    /64.*x12*tx*x2zs)
      zz40q= zz40q+rwwz(10,8)*vvq*yc*(-1./32.*x12*tx
     #    +1./64.*x12*x2zs*txs+3./32.*x12*txs+5./64.*x2z*tx*x12s
     #    +1./32.*x2z*tx-5./32.*x2z*txs+3./64.*tx*x12s-1./64.*
     #    tx*x12c+1./64.*tx*x2zc+5./64.*tx*x2zs-1./64.*x12c*txs
     #    -1./32.*x2zs*txs-1./16.*txs)
      zz40q= zz40q+rwwz(10,9)*xx*vvq*yc*(1./16.*o*x12*
     #    x2z*tx+1./16.*o*x2z*txs+1./16.*o*tx*x2zs-1./16.*o*x2zs
     #    +1./16.*os*x2z*tx+1./16.*os*x2zs+1./16.*x12*x2z*txs-1.
     #    /16.*tx*x2zs)
      zz40q= zz40q+rwwz(10,9)*bxpi*vvq*yc*(3./32.*o*x12*
     #    x2z+1./16.*o*x12*tx-1./16.*o*x12*txs+5./32.*o*x2z*tx+
     #    1./32.*o*x2z*txs-1./8.*o*x2z-1./32.*o*tx*x12s+1./32.*o*
     #    tx*x2zs-1./32.*o*x2zs+1./16.*o*txs-1./32.*os*x12*x2z-
     #    1./16.*os*x12*tx+5./32.*os*x2z+1./16.*os*tx+1./32.*os*
     #    x2zs-1./32.*os*txs-1./32.*oc*x2z-1./32.*oc*tx+3./32.*
     #    x12*x2z*tx+1./32.*x12*x2z*txs+1./16.*x12*txs-1./8.*x2z*
     #    tx-1./32.*tx*x2zs-1./32.*x12s*txs)
      zz40q= zz40q+rwwz(10,9)*vvq*yc*bxp*(1./32.*o*x12*
     #    x2z-1./16.*o*x12*tx+3./32.*o*x12+1./32.*o*x2z*tx-1./
     #    32.*o*x2z+3./32.*o*tx-1./32.*o*x12s-1./16.*o-1./16.*
     #    os*x12+1./32.*os*x2z-1./32.*os*tx+3./32.*os-1./32.*oc
     #    +1./32.*x12*x2z*tx+3./32.*x12*tx-1./32.*x2z*tx-1./32.
     #    *tx*x12s-1./16.*tx)
      zz40q= zz40q+rwwz(10,9)*vvq*yc*(-1./8.*o*x12*
     #    x2z+1./16.*o*x12*txs-3./32.*o*x12-3./16.*o*x2z*tx-1./
     #    32.*o*x2z*txs+5./32.*o*x2z+1./32.*o*tx*x12s-1./32.*o*tx
     #    *x2zs-3./32.*o*tx+1./32.*o*x12s+1./32.*o*x2zs-1./16.*
     #    o*txs+1./16.*o+1./32.*os*x12*x2z+1./16.*os*x12*tx+1./
     #    16.*os*x12-3./16.*os*x2z-1./32.*os*tx-1./32.*os*x2zs+
     #    1./32.*os*txs-3./32.*os+1./32.*oc*x2z+1./32.*oc*tx+1./
     #    32.*oc-1./8.*x12*x2z*tx-1./32.*x12*x2z*txs-3./32.*x12*
     #    tx-1./16.*x12*txs+5./32.*x2z*tx+1./32.*tx*x12s+1./32.
     #    *tx*x2zs+1./16.*tx+1./32.*x12s*txs)
      zz40q= zz40q+rwwz(10,10)*xx*vvq*yc*(-1./32.*o*
     #    x12*tx*x2zs-1./32.*o*x12*x2zc+1./16.*o*x12*x2zs*txs+3./
     #    64.*o*x2z*x12s*txs-1./32.*o*x2zq+1./64.*o*x2zc*txs+1./
     #    64.*o*x2zc-1./64.*o*x2zs*txs+3./64.*os*x12*x2z*txs+1./
     #    32.*os*x12*x2zc-1./64.*os*x12*x2zs+1./64.*os*x12s*x2zs+
     #    1./64.*os*x2zq-3./64.*os*x2zc+1./32.*os*x2zs*txs+1./32.
     #    *oc*x12*x2zs+1./64.*oc*x2z*txs+1./32.*oc*x2zc-1./64.*oc
     #    *x2zs+1./64.*oq*x2zs-1./32.*x12*tx*x2zc+1./64.*x12*x2zc
     #    *txs+1./64.*x12*x2zc-1./64.*x12*x2zs*txs+1./64.*x2z*
     #    x12c*txs-1./32.*tx*x12s*x2zs+1./32.*x12s*x2zs*txs+1./64.
     #    *x2zq-1./64.*x2zc*txs)
      zz40q= zz40q+rwwz(10,10)*bxpi*vvq*yc*(-1./128.*o
     #    *oq*x2z-1./16.*o*x12*x2z*tx+11./64.*o*x12*x2z*txs+1./16.
     #    *o*x12*tx*x2zs+1./16.*o*x12*x2zc-3./64.*o*x12*x2zs*txs-
     #    9./64.*o*x12*x2zs+3./32.*o*x2z*tx*x12s-9./128.*o*x2z*x12s
     #    *txs-1./32.*o*x2z*txs+3./64.*o*x12s*x2zs+3./64.*o*x12s*
     #    txs-1./32.*o*x12c*txs+1./64.*o*x2zq-1./128.*o*x2zc*txs
     #    -11./64.*o*x2zc+5./64.*o*x2zs*txs+3./64.*o*x2zs+3./64.
     #    *os*x12*x2z*tx-9./128.*os*x12*x2z*txs-1./32.*os*x12*x2z
     #    -3./128.*os*x12*x2zc+3./16.*os*x12*x2zs+3./64.*os*x12*
     #    txs+5./128.*os*x2z*x12s-1./128.*os*x2z*x12c+11./128.*os
     #    *x2z*txs-3./128.*os*x12s*x2zs-3./64.*os*x12s*txs-1./128.
     #    *os*x2zq+15./128.*os*x2zc-3./128.*os*x2zs*txs-21./128.*
     #    os*x2zs+5./64.*oc*x12*x2z-3./64.*oc*x12*x2zs-1./32.*oc*
     #    x12*txs-3./128.*oc*x2z*x12s-3./128.*oc*x2z*txs-1./32.*
     #    oc*x2z-3./128.*oc*x2zc+9./64.*oc*x2zs+1./64.*oc*txs-3.
     #    /128.*oq*x12*x2z)
      zz40q= zz40q+rwwz(10,10)*bxpi*vvq*yc*(5./128.*oq*
     #    x2z-3./128.*oq*x2zs-1./128.*oq*txs-1./32.*x12*x2z*txs
     #    +1./64.*x12*tx*x2zc-1./8.*x12*tx*x2zs-1./128.*x12*x12c*
     #    txs-1./128.*x12*x2zc*txs-3./64.*x12*x2zc+5./64.*x12*
     #    x2zs*txs+3./64.*x12*x2zs-1./16.*x2z*tx*x12s+3./64.*x2z*
     #    tx*x12c+11./128.*x2z*x12s*txs-3./128.*x2z*x12c*txs+1./
     #    16.*tx*x12s*x2zs-3./128.*x12s*x2zs*txs-5./128.*x12s*x2zs
     #    +1./64.*x12c*txs-1./128.*x2zq+1./128.*x2zc*txs+5./64.
     #    *x2zc-1./16.*x2zs*txs)
      zz40q= zz40q+rwwz(10,10)*vvq*bxps*yc*(-1./32.-
     #    1./32.*o*x12*x2z-1./8.*o*x12+1./32.*o*x2z+3./64.*o*x12s
     #    +5./64.*o+3./64.*os*x12-1./64.*os*x2z-1./16.*os+1./
     #    64.*oc+1./32.*x12*x2z+5./64.*x12-1./64.*x2z*x12s-1./
     #    64.*x2z-1./16.*x12s+1./64.*x12c)
      zz40q= zz40q+rwwz(10,10)*vvq*yc*bxp*(1./32.*o*x12*
     #    x2z*tx+1./4.*o*x12*x2z+3./32.*o*x12*tx+3./64.*o*x12*
     #    x2zs-1./32.*o*x12*txs-5./64.*o*x12-1./32.*o*x2z*x12s+
     #    1./64.*o*x2z*txs-1./4.*o*x2z-1./16.*o*tx*x12s+3./32.*o*
     #    x12s-1./32.*o*x12c-5./64.*o*x2zs+3./64.*o*txs+1./64.*
     #    o-3./64.*os*x12*x2z-1./32.*os*x12*tx+9./64.*os*x12+5./
     #    32.*os*x2z-1./16.*os*x12s+5./128.*os*x2zs-1./64.*os*txs
     #    -9./128.*os-1./16.*oc*x12-1./64.*oc*x2z+5./64.*oc-3.
     #    /128.*oq-1./32.*x12*x2z*tx+1./64.*x12*x2z*txs-3./16.*
     #    x12*x2z-1./16.*x12*tx-1./128.*x12*x12c-3./64.*x12*x2zs
     #    +3./64.*x12*txs+1./64.*x12+1./32.*x2z*tx*x12s+5./64.*
     #    x2z*x12s-1./64.*x2z*txs+7./64.*x2z+3./32.*tx*x12s-1./
     #    32.*tx*x12c+1./128.*x12s*x2zs-1./64.*x12s*txs-5./128.*
     #    x12s+1./32.*x12c+5./128.*x2zs-1./32.*txs)
      zz40q= zz40q+rwwz(10,10)*vvq*yc*(1./128.*o*oq-1.
     #    /8.*o*x12*x2z*tx+3./16.*o*x12*x2z-1./64.*o*x12*tx*x2zs+
     #    1./32.*o*x12*tx-1./64.*o*x12*x2zc-5./32.*o*x12*x2zs-7./
     #    64.*o*x12*txs-9./64.*o*x2z*x12s+1./64.*o*x2z*x12c-3./32.
     #    *o*x2z*txs-3./64.*o*x2z-3./32.*o*tx*x12s+3./64.*o*tx*
     #    x12c+9./128.*o*x12s*txs+1./16.*o*x2zc-3./128.*o*x2zs*
     #    txs+19./64.*o*x2zs+1./64.*o*txs-9./32.*os*x12*x2z-3./
     #    64.*os*x12*tx-1./128.*os*x12*x2zs+9./128.*os*x12*txs+1./
     #    64.*os*x12+1./16.*os*x2z*x12s+3./16.*os*x2z+3./64.*os*
     #    tx*x12s-3./128.*os*x12s+1./128.*os*x12c-1./32.*os*x2zc
     #    -19./128.*os*x2zs-7./128.*os*txs+5./64.*oc*x12*x2z+1./
     #    64.*oc*x12*tx-3./64.*oc*x12-11./64.*oc*x2z+3./128.*oc*
     #    x12s-1./128.*oc*x2zs+3./128.*oc*txs+1./64.*oc+3./128.
     #    *oq*x12+1./32.*oq*x2z-3./128.*oq+5./32.*x12*x2z*tx-3./
     #    32.*x12*x2z*txs-3./64.*x12*x2z+1./64.*x12*tx*x12c+3./64.
     #    *x12*tx*x2zs)
      zz40q= zz40q+rwwz(10,10)*vvq*yc*(1./64.*x12*x2zc
     #    -3./128.*x12*x2zs*txs+9./64.*x12*x2zs+1./64.*x12*txs-
     #    1./8.*x2z*tx*x12s+5./64.*x2z*x12s-1./32.*x2z*x12c+5./64.
     #    *x2z*txs-1./64.*tx*x12s*x2zs+1./32.*tx*x12s-3./64.*tx*
     #    x12c-1./64.*x12s*x2zs-7./128.*x12s*txs+3./128.*x12c*txs
     #    -1./32.*x2zc+3./128.*x2zs*txs-9./64.*x2zs)
      zz40q= zz40q+rwwz(10,11)*xx*vvq*yc*(1./16.*o*x12*
     #    x2z*txs-1./32.*o*x12*x2zs+1./32.*o*x2z*tx*x12s-1./32.*o
     #    *tx*x2zc-1./32.*o*tx*x2zs+1./32.*o*x2zc+1./32.*o*x2zs*
     #    txs+1./16.*os*x12*x2z*tx-1./32.*os*x12*x2zs+1./32.*os*
     #    x2z*txs-1./32.*os*x2zc+1./32.*os*x2zs+1./32.*oc*x2z*tx
     #    -1./32.*oc*x2zs-1./32.*x12*tx*x2zs+1./32.*x12*x2zs*txs
     #    +1./32.*x2z*x12s*txs+1./32.*tx*x2zc-1./16.*x2zs*txs)
      zz40q= zz40q+rwwz(10,11)*bxpi*vvq*yc*(1./8.*o*x12*
     #    x2z*tx-1./8.*o*x12*x2z*txs-1./16.*o*x12*x2z+1./32.*o*
     #    x12*tx*x2zs-1./32.*o*x12*x2zs+1./16.*o*x12*txs-1./32.*o
     #    *x2z*tx*x12s-1./16.*o*x2z*tx+1./16.*o*x2z*x12s+5./32.*o
     #    *x2z*txs+1./32.*o*tx*x12s-1./32.*o*tx*x12c+1./32.*o*tx*
     #    x2zc-1./16.*o*tx*x2zs-3./32.*o*x12s*txs-1./32.*o*x2zc
     #    -1./32.*o*x2zs*txs+1./16.*o*x2zs-1./16.*os*x12*x2z*tx
     #    -1./32.*os*x12*x2z+1./16.*os*x12*tx+1./16.*os*x12*x2zs
     #    -3./32.*os*x12*txs+1./16.*os*x2z*tx+1./32.*os*x2z*x12s
     #    -1./16.*os*x2z*txs+1./16.*os*x2z-3./32.*os*tx*x12s+1./
     #    32.*os*tx*x2zs+1./32.*os*x2zc-1./8.*os*x2zs+1./32.*os*
     #    txs+1./16.*oc*x12*x2z-3./32.*oc*x12*tx-1./32.*oc*x2z*tx
     #    -3./32.*oc*x2z+1./32.*oc*tx+1./16.*oc*x2zs-1./32.*oc*
     #    txs+1./32.*oq*x2z-1./32.*oq*tx-1./16.*x12*x2z*tx+5./
     #    32.*x12*x2z*txs-1./32.*x12*tx*x2zs-1./32.*x12*x2zs*txs+
     #    1./16.*x2z*tx*x12s)
      zz40q= zz40q+rwwz(10,11)*bxpi*vvq*yc*(-1./16.*
     #    x2z*x12s*txs-1./8.*x2z*txs-1./32.*tx*x2zc+1./16.*tx*
     #    x2zs+1./32.*x12s*txs-1./32.*x12c*txs+1./16.*x2zs*txs)
      zz40q= zz40q+rwwz(10,11)*vvq*yc*bxp*(1./32.*o*x12*
     #    x2z-1./16.*o*x12*tx+1./32.*o*x12+1./32.*o*x2z*tx-1./
     #    32.*o*x2z+1./32.*o*tx-1./32.*o*x12s-1./16.*o*txs+1./
     #    32.*os*x2z-1./32.*os*tx-1./32.*os+1./32.*oc+1./32.*
     #    x12*x2z*tx+1./32.*x12*tx-1./16.*x12*txs-1./32.*x2z*tx
     #    -1./32.*tx*x12s+1./16.*txs)
      zz40q= zz40q+rwwz(10,11)*vvq*yc*(-1./16.*o*x12*
     #    x2z*tx+1./32.*o*x12*x2z-1./8.*o*x12*tx+3./16.*o*x12*txs
     #    +1./32.*o*x12+1./32.*o*x2z*tx-1./32.*o*x2z*x12s+1./32.
     #    *o*x2z*txs-1./32.*o*x2z+1./8.*o*tx*x12s-1./32.*o*tx*
     #    x2zs+1./32.*o*tx-1./16.*o*x12s+1./32.*o*x12c+1./32.*o
     #    *x2zs-1./8.*o*txs-3./32.*os*x12*x2z+5./32.*os*x12*tx-
     #    1./32.*os*x2z*tx+3./32.*os*x2z-1./16.*os*tx+1./32.*os*
     #    x12s-1./32.*os*x2zs+3./32.*os*txs-1./32.*os-1./32.*oc
     #    *x12-1./16.*oc*x2z+1./16.*oc*tx+1./16.*oc-1./32.*oq
     #    +1./32.*x12*x2z*tx+1./32.*x12*x2z*txs+1./32.*x12*tx-1.
     #    /8.*x12*txs-1./32.*x2z*tx*x12s-1./32.*x2z*tx-1./16.*x2z
     #    *txs-1./16.*tx*x12s+1./32.*tx*x12c+1./32.*tx*x2zs+3./
     #    32.*x12s*txs+1./16.*txs)
      zz40q= zz40q+rwwz(10,12)*xx*vvq*yc*(1./16.*o*x12*
     #    x2z*tx-3./16.*o*x12*x2z*txs+1./16.*o*x12*tx*x2zs+1./16.
     #    *o*x12*x2zs+1./16.*o*x2z*txs+1./16.*o*tx*x2zc-3./32.*o*
     #    x12s*txs-1./16.*o*x2zs*txs-1./32.*o*x2zs+1./32.*os*x12*
     #    x2zs-3./32.*os*x12*txs-3./32.*os*x2z*txs+1./16.*os*tx*
     #    x2zs+1./32.*os*x2zc+1./32.*oc*x2zs-1./32.*oc*txs+1./
     #    16.*x12*x2z*txs+1./16.*x12*tx*x2zs-1./16.*x12*x2zs*txs-
     #    1./32.*x12*x2zs+1./16.*x2z*tx*x12s-3./32.*x2z*x12s*txs-
     #    1./16.*tx*x2zc-1./32.*x12c*txs-1./32.*x2zc+1./8.*x2zs*
     #    txs)
      zz40q= zz40q+rwwz(10,12)*bxpi*vvq*yc*(-1./16.*o*
     #    x12*x2z*tx+1./8.*o*x12*x2z*txs+7./32.*o*x12*x2z-1./32.*
     #    o*x12*tx*x2zs+1./16.*o*x12*tx-5./16.*o*x12*txs+1./32.*o
     #    *x2z*tx*x12s+1./32.*o*x2z*tx-3./32.*o*x2z*x12s-9./32.*o
     #    *x2z*txs-1./16.*o*x2z-5./32.*o*tx*x12s+1./32.*o*tx*x12c
     #    -1./32.*o*tx*x2zc+5./32.*o*tx*x2zs+3./32.*o*x12s*txs+
     #    1./32.*o*x2zc+1./32.*o*x2zs*txs+3./32.*o*x2zs+1./16.*o*
     #    txs+1./16.*os*x12*x2z*tx-1./32.*os*x12*x2z-1./8.*os*x12
     #    *tx-1./16.*os*x12*x2zs+3./32.*os*x12*txs+1./32.*os*x2z*
     #    tx-1./32.*os*x2z*x12s+1./16.*os*x2z*txs+1./32.*os*x2z
     #    +3./32.*os*tx*x12s-1./32.*os*tx*x2zs-1./32.*os*x2zc+3.
     #    /32.*os*x2zs-5./32.*os*txs-1./16.*oc*x12*x2z+3./32.*oc*
     #    x12*tx+1./32.*oc*x2z*tx+1./16.*oc*x2z-1./32.*oc*tx-1./
     #    16.*oc*x2zs+1./32.*oc*txs-1./32.*oq*x2z+1./32.*oq*tx+
     #    7./32.*x12*x2z*tx-9./32.*x12*x2z*txs-1./16.*x12*x2z+1./
     #    16.*x12*tx*x2zs)
      zz40q= zz40q+rwwz(10,12)*bxpi*vvq*yc*(1./32.*x12*
     #    x2zs*txs+1./16.*x12*x2zs+1./16.*x12*txs-3./32.*x2z*tx*
     #    x12s+1./16.*x2z*x12s*txs+1./16.*x2z*x12s+5./16.*x2z*txs
     #    +1./16.*tx*x12s-1./16.*tx*x12c+1./32.*tx*x2zc-5./32.*
     #    tx*x2zs-5./32.*x12s*txs+1./32.*x12c*txs-1./16.*x2zs*txs
     #    -1./8.*x2zs)
      zz40q= zz40q+rwwz(10,12)*vvq*bxps*yc*(1./16.+1./
     #    8.*o*x12-1./8.*o+1./16.*os-1./8.*x12+1./16.*x12s)
      zz40q= zz40q+rwwz(10,12)*vvq*yc*bxp*(-1./16.-5.
     #    /32.*o*x12*x2z-1./16.*o*x12*tx-1./32.*o*x12+1./32.*o*
     #    x2z*tx+9./32.*o*x2z-1./32.*o*tx-1./16.*o*x12s-1./16.*
     #    o*txs+3./32.*o-3./32.*os*x12-1./8.*os*x2z+1./32.*os*
     #    tx+1./32.*os-1./16.*oc+1./32.*x12*x2z*tx+3./16.*x12*
     #    x2z+3./32.*x12*tx-1./16.*x12*txs+3./32.*x12-1./32.*
     #    x2z*tx-1./32.*x2z*x12s-5./32.*x2z-3./32.*tx*x12s-1./
     #    32.*x12c+1./16.*txs)
      zz40q= zz40q+rwwz(10,12)*vvq*yc*(-1./16.*o*x12*
     #    x2z+3./16.*o*x12*tx+1./32.*o*x12*x2zs+1./16.*o*x12*txs
     #    -5./32.*o*x12-1./16.*o*x2z*tx+1./16.*o*x2z*x12s+3./32.
     #    *o*x2z*txs-5./32.*o*x2z-1./16.*o*tx*x2zs-1./32.*o*tx+
     #    5./32.*o*x12s-1./32.*o*x12c-3./16.*o*x2zs+3./16.*o*txs
     #    +1./32.*o+5./32.*os*x12*x2z-3./32.*os*x12*tx+3./32.*
     #    os*x12-1./16.*os*x2z*tx-3./32.*os*x2z+1./16.*os*tx-1./
     #    32.*os*x12s+1./16.*os*x2zs+1./32.*os*txs-1./32.*os+1./
     #    32.*oc*x12+3./32.*oc*x2z-1./16.*oc*tx-1./32.*oc+1./32.
     #    *oq-1./4.*x12*x2z*tx+3./32.*x12*x2z*txs-1./8.*x12*x2z
     #    -1./32.*x12*tx*x2zs-5./32.*x12*tx-1./16.*x12*x2zs+3./
     #    16.*x12*txs+1./32.*x12+1./16.*x2z*tx*x12s+3./32.*x2z*tx
     #    -1./32.*x2z*x12s-1./8.*x2z*txs+5./32.*x2z+1./8.*tx*
     #    x12s+1./32.*tx*x12c+1./16.*tx*x2zs+1./32.*x12s*txs-1./
     #    16.*x12s+1./32.*x12c+1./8.*x2zs-3./16.*txs)
      zz40q= zz40q+rwwz(10,13)*xx*vvq*yc*(1./32.*o*x12*
     #    x2z*tx-5./32.*o*x12*x2z*txs+1./32.*o*x12*x2zs+1./32.*o*
     #    x2z*txs-3./64.*o*x12s*txs+3./32.*o*x2zc-1./16.*o*x2zs*
     #    txs-1./64.*o*x2zs-3./64.*os*x12*x2zs-3./64.*os*x12*txs
     #    -5./64.*os*x2z*txs-3./64.*os*x2zc+1./16.*os*x2zs-3./
     #    64.*oc*x2zs-1./64.*oc*txs+1./32.*x12*x2z*txs+3./32.*x12
     #    *tx*x2zs-1./16.*x12*x2zs*txs-1./64.*x12*x2zs+1./32.*x2z
     #    *tx*x12s-5./64.*x2z*x12s*txs-1./64.*x12c*txs-3./64.*
     #    x2zc+1./16.*x2zs*txs)
      zz40q= zz40q+rwwz(10,13)*bxpi*vvq*yc*(-5./32.*o*
     #    x12*x2z*tx+1./8.*o*x12*x2z*txs+3./32.*o*x12*x2z+1./32.*
     #    o*x12*tx-5./32.*o*x12*x2zs-3./16.*o*x12*txs-1./32.*o*
     #    x2z*x12s-3./16.*o*x2z*txs-1./32.*o*x2z-1./16.*o*tx*x12s
     #    +3./32.*o*x12s*txs-1./16.*o*x2zc+1./32.*o*x2zs*txs+11.
     #    /32.*o*x2zs+1./32.*o*txs-5./32.*os*x12*x2z-1./32.*os*
     #    x12*tx+1./16.*os*x12*x2zs+3./32.*os*x12*txs+1./32.*os*
     #    x2z*x12s+1./16.*os*x2z*txs+1./8.*os*x2z+1./32.*os*x2zc
     #    -1./4.*os*x2zs-3./32.*os*txs+1./16.*oc*x12*x2z-1./8.*
     #    oc*x2z+1./16.*oc*x2zs+1./32.*oc*txs+1./32.*oq*x2z+7./
     #    32.*x12*x2z*tx-3./16.*x12*x2z*txs-1./32.*x12*x2z-1./16.
     #    *x12*tx*x2zs+1./32.*x12*x2zs*txs+1./8.*x12*x2zs+1./32.*
     #    x12*txs-5./32.*x2z*tx*x12s+1./16.*x2z*x12s*txs+1./32.*
     #    x2z*x12s+5./32.*x2z*txs+1./32.*tx*x12s-1./32.*tx*x12c
     #    -3./32.*x12s*txs+1./32.*x12c*txs+1./32.*x2zc-1./32.*
     #    x2zs*txs)
      zz40q= zz40q+rwwz(10,13)*bxpi*vvq*yc*(-5./32.*
     #    x2zs)
      zz40q= zz40q+rwwz(10,13)*vvq*yc*bxp*(-1./16.-1.
     #    /32.*o*x12*x2z-3./16.*o*x12+1./32.*o*x2z+3./64.*o*x12s
     #    -1./32.*o*txs+9./64.*o+5./64.*os*x12-1./64.*os*x2z-
     #    1./8.*os+3./64.*oc+1./32.*x12*x2z-1./32.*x12*txs+9./
     #    64.*x12-1./64.*x2z*x12s-1./64.*x2z-3./32.*x12s+1./64.
     #    *x12c+1./32.*txs)
      zz40q= zz40q+rwwz(10,13)*vvq*yc*(1./32.*o*x12*x2z
     #    *tx+5./16.*o*x12*x2z+5./32.*o*x12*tx+1./32.*o*x12*x2zs
     #    -1./16.*o*x12-1./32.*o*x2z*x12s+1./16.*o*x2z*txs-3./8.
     #    *o*x2z-1./16.*o*tx*x12s+3./64.*o*x12s-1./16.*o*x2zs+3.
     #    /32.*o*txs+1./64.*o-3./32.*os*x12*x2z-1./32.*os*x12*tx
     #    +7./64.*os*x12+17./64.*os*x2z-1./32.*os*x12s+1./32.*
     #    os*x2zs-1./16.*os-1./16.*oc*x12-1./16.*oc*x2z+5./64.*
     #    oc-1./32.*oq-1./32.*x12*x2z*tx+1./16.*x12*x2z*txs-1./
     #    4.*x12*x2z-1./8.*x12*tx-1./32.*x12*x2zs+3./32.*x12*txs
     #    +1./64.*x12+1./32.*x2z*tx*x12s+5./64.*x2z*x12s-1./16.
     #    *x2z*txs+11./64.*x2z+5./32.*tx*x12s-1./32.*tx*x12c-1./
     #    32.*x12s+1./64.*x12c+1./32.*x2zs-3./32.*txs)
      zz40q= zz40q+rwwz(10,14)*xx*vvq*yc*(3./32.*o*x12*
     #    x2z*txs+1./32.*o*x12*tx*x2zs-1./64.*o*x12*x2zs+1./64.*o
     #    *x2z*tx*x12s+1./64.*o*tx*x2zc-1./64.*o*tx*x2zs-5./64.*o
     #    *x2zc+3./64.*o*x2zs*txs+1./32.*os*x12*x2z*tx+3./64.*os*
     #    x12*x2zs+3./64.*os*x2z*txs+1./32.*os*tx*x2zs+3./64.*os*
     #    x2zc-3./64.*os*x2zs+1./64.*oc*x2z*tx+3./64.*oc*x2zs-5.
     #    /64.*x12*tx*x2zs+3./64.*x12*x2zs*txs+3./64.*x2z*x12s*txs
     #    -1./64.*tx*x2zc+1./32.*x2zc-1./32.*x2zs*txs)
      zz40q= zz40q+rwwz(10,14)*bxpi*vvq*yc*(7./32.*o*x12
     #    *x2z*tx-1./8.*o*x12*x2z*txs-1./32.*o*x12*x2z+9./64.*o*
     #    x12*x2zs+3./32.*o*x12*txs-1./32.*o*x2z*tx+1./64.*o*x2z*
     #    x12s+9./64.*o*x2z*txs+1./64.*o*tx*x12s+1./16.*o*tx*x2zs
     #    -3./32.*o*x12s*txs+1./16.*o*x2zc-1./32.*o*x2zs*txs-9./
     #    32.*o*x2zs+9./64.*os*x12*x2z+1./32.*os*x12*tx-1./16.*os
     #    *x12*x2zs-3./32.*os*x12*txs+5./64.*os*x2z*tx-1./32.*os*
     #    x2z*x12s-1./16.*os*x2z*txs-3./32.*os*x2z-1./32.*os*x2zc
     #    +1./4.*os*x2zs+3./64.*os*txs-1./16.*oc*x12*x2z+1./8.*
     #    oc*x2z+1./64.*oc*tx-1./16.*oc*x2zs-1./32.*oc*txs-1./
     #    32.*oq*x2z-5./32.*x12*x2z*tx+9./64.*x12*x2z*txs+5./64.*
     #    x12*tx*x2zs-1./32.*x12*x2zs*txs-3./32.*x12*x2zs+9./64.*
     #    x2z*tx*x12s-1./16.*x2z*x12s*txs-1./16.*x2z*txs-1./16.*
     #    tx*x2zs+3./64.*x12s*txs-1./32.*x12c*txs-1./32.*x2zc+1.
     #    /32.*x2zs*txs+3./32.*x2zs)
      zz40q= zz40q+rwwz(10,14)*vvq*bxps*yc*(1./32.+1./
     #    32.*o*x12-1./32.*o*tx-1./32.*o-1./32.*x12*tx-1./16.*
     #    x12+1./32.*tx+1./32.*x12s)
      zz40q= zz40q+rwwz(10,14)*vvq*yc*bxp*(1./32.-1./
     #    64.*o*x12*x2z+13./64.*o*x12+5./64.*o*x2z*tx+3./64.*o*
     #    x2z+1./64.*o*tx-5./64.*o*x12s-1./8.*o-3./32.*os*x12
     #    +1./64.*os*x2z+3./64.*os*tx+9./64.*os-3./64.*oc+3./
     #    64.*x12*x2z*tx+1./16.*x12*x2z+5./64.*x12*tx-3./32.*x12
     #    -5./64.*x2z*tx-1./16.*x2z-3./64.*tx*x12s-1./32.*tx+
     #    3./32.*x12s-1./32.*x12c+1./32.*txs)
      zz40q= zz40q+rwwz(10,14)*vvq*yc*(-3./32.*o*x12*
     #    x2z*tx-21./64.*o*x12*x2z-3./16.*o*x12*tx-1./64.*o*x12*
     #    x2zs+3./32.*o*x12*txs+1./64.*o*x12-3./64.*o*x2z*tx+3./
     #    64.*o*x2z*x12s-1./64.*o*x2z*txs+21./64.*o*x2z+7./64.*o*
     #    tx*x12s-1./16.*o*tx*x2zs+1./64.*o*tx-1./64.*o*x12s-3./
     #    32.*o*txs+7./64.*os*x12*x2z+1./32.*os*x12*tx-3./32.*os*
     #    x12-5./64.*os*x2z*tx-19./64.*os*x2z-3./64.*os*tx+1./
     #    32.*os*x12s-1./32.*os*x2zs+3./64.*os*txs+3./64.*os+1./
     #    16.*oc*x12+1./16.*oc*x2z-1./64.*oc*tx-5./64.*oc+1./32.
     #    *oq-5./64.*x12*x2z*tx-1./64.*x12*x2z*txs+3./16.*x12*x2z
     #    -1./64.*x12*tx*x2zs+5./64.*x12*tx-3./32.*x12*txs-1./
     #    64.*x2z*tx*x12s+5./64.*x2z*tx-3./32.*x2z*x12s-1./32.*
     #    x2z*txs-3./32.*x2z-9./64.*tx*x12s+1./16.*tx*x12c+1./
     #    16.*tx*x2zs+3./64.*x12s*txs+1./32.*x2zs+1./32.*txs)
      zz40q= zz40q+rwwz(11,1)*xx*vvq*yc*(-1./4.*o*x12
     #    *x2z*tx+1./4.*o*x2z*tx-1./4.*o*x2z*txs+1./4.*o*tx*x2zs
     #    -1./2.*o*x2zs-1./4.*os*x2z*tx+1./4.*os*x2zs-1./4.*x12
     #    *x2z*tx-1./4.*x12*x2z*txs+1./2.*x2z*txs-1./4.*tx*x2zs
     #    +1./4.*x2zs)
      zz40q= zz40q+rwwz(11,1)*bxpi*vvq*yc*(3./4.*o*x12*
     #    x2z-1./4.*o*x12*tx+1./2.*o*x12*txs+1./4.*o*x2z*tx+1./
     #    4.*o*x2z*txs-5./4.*o*x2z+1./4.*o*tx*x12s-1./4.*o*tx*
     #    x2zs+1./4.*o*tx+1./4.*o*x2zs-3./4.*o*txs-1./4.*os*x12
     #    *x2z+1./2.*os*x12*tx+os*x2z-1./2.*os*tx-1./4.*os*x2zs
     #    +1./4.*os*txs-1./4.*oc*x2z+1./4.*oc*tx+1./4.*x12*x2z*
     #    txs-1./2.*x12*x2z-1./4.*x12*tx-3./4.*x12*txs+1./2.*
     #    x2z+1./4.*tx*x12s-1./4.*tx*x2zs+1./4.*x12s*txs+1./2.*
     #    txs)
      zz40q= zz40q+rwwz(11,1)*vvq*yc*bxp*(1./4.+1./4.*
     #    o*x12+1./4.*o*tx-1./4.*o+1./4.*x12*tx-1./2.*x12-1./
     #    4.*tx+1./4.*x12s)
      zz40q= zz40q+rwwz(11,1)*vvq*yc*(-1./4.-1./4.*
     #    o*x12*x2z-3./4.*o*x12*tx-o*x12-1./4.*o*x2z*tx+1./2.*o
     #    *x2z+1./4.*o*tx+1./4.*o*x12s+1./4.*o*txs+3./4.*o+1./
     #    2.*os*x12-1./4.*os*tx-3./4.*os+1./4.*oc-1./2.*x12*x2z
     #    *tx+1./2.*x12*x2z+3./4.*x12*tx+1./4.*x12*txs+1./2.*
     #    x12+3./4.*x2z*tx-1./2.*x2z-1./2.*tx*x12s-1./4.*tx-1.
     #    /4.*x12s-1./2.*txs)
      zz40q= zz40q+rwwz(12,1)*xx*vvq*yc*(1./2.*o*x12*
     #    txs-1./2.*o*x2z*tx+1./2.*o*x2z*txs-1./2.*o*tx*x2zs+1./
     #    2.*o*x2zs-1./4.*os*x2zs+1./4.*os*txs+1./2.*x12*x2z*txs
     #    -1./2.*x2z*txs+1./4.*x12s*txs-1./4.*x2zs)
      zz40q= zz40q+rwwz(12,1)*bxpi*vvq*yc*(-3./4.*o*
     #    x12*x2z+3./4.*o*x12*tx-1./2.*o*x12*txs-1./2.*o*x2z*tx
     #    -1./4.*o*x2z*txs+5./4.*o*x2z-1./4.*o*tx*x12s+1./4.*o*
     #    tx*x2zs-1./2.*o*tx-1./4.*o*x2zs+5./4.*o*txs+1./4.*os*
     #    x12*x2z-1./2.*os*x12*tx-os*x2z+3./4.*os*tx+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.*x12*x2z+5./4.*x12*txs-
     #    3./4.*x2z*tx-1./2.*x2z+1./4.*tx*x2zs-1./4.*x12s*txs-1.
     #    /2.*txs)
      zz40q= zz40q+rwwz(12,1)*vvq*yc*bxp*(-1./4.-1./
     #    4.*o*x12+1./4.*o*tx+1./4.*o+1./4.*x12*tx+1./2.*x12-
     #    1./4.*tx-1./4.*x12s)
      zz40q= zz40q+rwwz(12,1)*vvq*yc*(1./4.+1./4.*o*
     #    x12*x2z+1./4.*o*x12*tx+o*x12+1./2.*o*x2z*tx-1./2.*o*
     #    x2z-1./2.*o*tx-1./4.*o*x12s-3./4.*o*txs-3./4.*o-1./
     #    2.*os*x12+3./4.*os-1./4.*oc+1./4.*x12*x2z*tx-1./2.*
     #    x12*x2z-x12*tx-3./4.*x12*txs-1./2.*x12+1./2.*x2z+1./
     #    4.*tx*x12s+3./4.*tx+1./4.*x12s+1./2.*txs)
      zz40q= zz40q+rwwz(13,1)*xx*vvq*yc*(1./8.*o*x12*
     #    x2z*tx+1./2.*o*x12*txs-1./8.*o*x2z*tx+3./8.*o*x2z*txs
     #    +1./8.*o*tx*x2zs-1./4.*o*x2zs+1./8.*os*x2z*tx+1./8.*
     #    os*x2zs+1./4.*os*txs-3./8.*x12*x2z*tx+3./8.*x12*x2z*txs
     #    -1./4.*x2z*txs-1./8.*tx*x2zs+1./4.*x12s*txs+1./8.*
     #    x2zs)
      zz40q= zz40q+rwwz(13,1)*bxpi*vvq*yc*(-1./4.*o*
     #    x12*x2z*tx+3./8.*o*x12*x2z+5./8.*o*x12*tx-1./4.*o*x12*
     #    txs+5./8.*o*x2z*tx-1./8.*o*x2z*txs-5./8.*o*x2z-1./8.*
     #    o*tx*x12s-1./8.*o*tx*x2zs-1./8.*o*tx+1./8.*o*x2zs+5./
     #    8.*o*txs-1./8.*os*x12*x2z-1./4.*os*x12*tx-1./4.*os*x2z*
     #    tx+1./2.*os*x2z+1./4.*os*tx-1./8.*os*x2zs-1./8.*os*
     #    txs-1./8.*oc*x2z-1./8.*oc*tx+1./4.*x12*x2z*tx-1./8.*
     #    x12*x2z*txs-1./4.*x12*x2z-3./8.*x12*tx+5./8.*x12*txs-
     #    1./2.*x2z*tx+1./4.*x2z+3./8.*tx*x12s+1./8.*tx*x2zs-1./
     #    8.*x12s*txs-1./4.*txs)
      zz40q= zz40q+rwwz(13,1)*vvq*yc*bxp*(1./8.+1./8.*
     #    o*x12+1./8.*o*tx-1./8.*o+1./8.*x12*tx-1./4.*x12-1./
     #    8.*tx+1./8.*x12s)
      zz40q= zz40q+rwwz(13,1)*vvq*yc*(-1./8.-1./8.*
     #    o*x12*x2z-1./8.*o*x12*tx-1./2.*o*x12-1./8.*o*x2z*tx+1.
     #    /4.*o*x2z-3./8.*o*tx+1./8.*o*x12s-3./8.*o*txs+3./8.*o
     #    +1./4.*os*x12+1./8.*os*tx-3./8.*os+1./8.*oc+1./4.*
     #    x12*x2z-1./8.*x12*tx-3./8.*x12*txs+1./4.*x12+1./8.*
     #    x2z*tx-1./4.*x2z-1./4.*tx*x12s+3./8.*tx-1./8.*x12s+
     #    1./4.*txs)
      zz40q= zz40q+rwwz(13,4)*xx*vvq*yc*(-1./8.*o*x12
     #    *x2z*txs-1./32.*o*x12*x2zs-1./16.*o*x2z*tx*x12s+1./16.*
     #    o*x2z*txs+1./16.*o*tx*x2zc+1./32.*o*tx*x2zs-3./32.*o*
     #    x2zc-1./16.*o*x2zs*txs+1./32.*o*x2zs-1./8.*os*x12*x2z*
     #    tx+1./16.*os*x12*x2zs+1./32.*os*x2z*tx-1./16.*os*x2z*
     #    txs+1./16.*os*x2zc-3./32.*os*x2zs-1./16.*oc*x2z*tx+1./
     #    16.*oc*x2zs+1./16.*x12*x2z*txs-1./32.*x12*tx*x2zs-1./16.
     #    *x12*x2zs*txs+1./32.*x12*x2zs-1./32.*x2z*tx*x12s-1./16.
     #    *x2z*x12s*txs-1./16.*tx*x2zc+1./32.*x2zc+1./8.*x2zs*txs
     #    )
      zz40q= zz40q+rwwz(13,4)*bxpi*vvq*yc*(-1./8.*o*
     #    x12*x2z*tx+1./8.*o*x12*x2z*txs-1./8.*o*x12*x2z-1./32.*o
     #    *x12*tx*x2zs+3./32.*o*x12*x2zs-3./16.*o*x12*txs+1./32.*
     #    o*x2z*tx*x12s+1./8.*o*x2z*tx-9./32.*o*x2z*txs+1./16.*o*
     #    x2z+1./32.*o*tx*x12c-1./32.*o*tx*x2zc+5./32.*o*tx*x2zs
     #    +3./32.*o*x12s*txs+1./32.*o*x2zc+1./32.*o*x2zs*txs-5./
     #    16.*o*x2zs+1./16.*o*txs+1./16.*os*x12*x2z*tx+5./32.*os*
     #    x12*x2z-3./32.*os*x12*tx-1./16.*os*x12*x2zs+3./32.*os*
     #    x12*txs-1./8.*os*x2z*tx-1./32.*os*x2z*x12s+1./16.*os*
     #    x2z*txs-3./16.*os*x2z+3./32.*os*tx*x12s-1./32.*os*tx*
     #    x2zs+1./32.*os*tx-1./32.*os*x2zc+1./4.*os*x2zs-3./32.
     #    *os*txs-1./16.*oc*x12*x2z+3./32.*oc*x12*tx+1./32.*oc*
     #    x2z*tx+5./32.*oc*x2z-1./16.*oc*tx-1./16.*oc*x2zs+1./
     #    32.*oc*txs-1./32.*oq*x2z+1./32.*oq*tx-1./16.*x12*x2z*tx
     #    -9./32.*x12*x2z*txs+1./16.*x12*x2z+1./16.*x12*tx*x2zs
     #    +1./32.*x12*x2zs*txs)
      zz40q= zz40q+rwwz(13,4)*bxpi*vvq*yc*(-1./16.*x12
     #    *x2zs+1./16.*x12*txs+1./16.*x2z*x12s*txs-1./16.*x2z*
     #    x12s+5./16.*x2z*txs-1./32.*tx*x12s+1./32.*tx*x12c+1./
     #    32.*tx*x2zc-5./32.*tx*x2zs-3./32.*x12s*txs+1./32.*x12c*
     #    txs-1./16.*x2zs*txs+1./8.*x2zs)
      zz40q= zz40q+rwwz(13,4)*vvq*bxps*yc*(-1./16.-1.
     #    /8.*o*x12+1./8.*o-1./16.*os+1./8.*x12-1./16.*x12s)
      zz40q= zz40q+rwwz(13,4)*vvq*yc*bxp*(1./16.+5./32.
     #    *o*x12*x2z+1./16.*o*x12*tx-1./32.*o*x12+1./32.*o*x2z*tx
     #    -9./32.*o*x2z+1./32.*o*tx+1./8.*o*x12s-1./16.*o*txs
     #    -3./32.*o+3./32.*os*x12+1./8.*os*x2z-1./32.*os*tx+1.
     #    /32.*os+1./32.*x12*x2z*tx-3./16.*x12*x2z-3./32.*x12*tx
     #    -1./16.*x12*txs-3./32.*x12-1./32.*x2z*tx+1./32.*x2z*
     #    x12s+5./32.*x2z+3./32.*tx*x12s+1./32.*x12c+1./16.*txs
     #    )
      zz40q= zz40q+rwwz(13,4)*vvq*yc*(1./16.*o*x12*x2z*
     #    tx-1./32.*o*x12*x2z+1./8.*o*x12*tx-1./16.*o*x12*x2zs-
     #    1./16.*o*x12*txs+3./32.*o*x12-5./32.*o*x2z*tx-1./32.*o*
     #    x2z*x12s+3./32.*o*x2z*txs+9./32.*o*x2z-5./32.*o*tx*x12s
     #    -1./16.*o*tx*x2zs-3./32.*o*tx-1./32.*o*x12s-1./32.*o*
     #    x12c+7./32.*o*x2zs+3./16.*o*txs-1./32.*o-1./32.*os*
     #    x12*x2z-1./8.*os*x12*tx-3./32.*os*x12+3./32.*os*x2z*tx
     #    -1./8.*os*x2z+3./32.*os*tx-1./32.*os*x12s-3./32.*os*
     #    x2zs-1./32.*os*txs+3./32.*os+1./32.*oc*x12-1./32.*oc*
     #    tx-3./32.*oc+1./32.*oq+1./32.*x12*x2z*tx+3./32.*x12*
     #    x2z*txs+1./8.*x12*x2z-1./32.*x12*tx*x2zs+1./32.*x12*tx
     #    +1./16.*x12*x2zs+3./16.*x12*txs-1./32.*x12-1./32.*x2z
     #    *tx*x12s+3./32.*x2z*tx+1./32.*x2z*x12s-1./8.*x2z*txs-
     #    5./32.*x2z+1./32.*tx*x12s-1./16.*tx*x12c+1./16.*tx*x2zs
     #    -1./32.*x12s*txs+1./16.*x12s-1./32.*x12c-1./8.*x2zs
     #    -3./16.*txs)
      zz40q= zz40q+rwwz(13,11)*xx*vvq*yc*(-1./16.*o*
     #    x12*x2z*tx+1./16.*o*x2z*tx-1./16.*o*x2z*txs+1./16.*o*tx
     #    *x2zs-1./8.*o*x2zs-1./16.*os*x2z*tx+1./16.*os*x2zs-1./
     #    16.*x12*x2z*tx-1./16.*x12*x2z*txs+1./8.*x2z*txs-1./16.*
     #    tx*x2zs+1./16.*x2zs)
      zz40q= zz40q+rwwz(13,11)*bxpi*vvq*yc*(1./16.*o*x12
     #    *x2z+1./8.*o*x12*txs+1./16.*o*x2z*txs-1./4.*o*x2z+1./
     #    16.*o*tx*x12s-1./16.*o*tx*x2zs+1./16.*o*tx+1./16.*o*
     #    x2zs-1./8.*o*txs-1./16.*os*x12*x2z+1./8.*os*x12*tx+3./
     #    16.*os*x2z-1./16.*os*tx-1./16.*os*x2zs+1./16.*os*txs-
     #    1./16.*oc*x2z+1./16.*oc*tx+1./16.*x12*x2z*txs-1./8.*x12
     #    *x2z-1./16.*x12*tx-1./8.*x12*txs-1./16.*x2z*tx-1./8.*
     #    x2z*txs+1./8.*x2z+1./16.*tx*x12s+1./16.*tx*x2zs+1./16.
     #    *x12s*txs+1./8.*txs)
      zz40q= zz40q+rwwz(13,11)*vvq*yc*bxp*(1./16.+1./8.
     #    *o*x12-1./8.*o+1./16.*os-1./8.*x12+1./16.*x12s)
      zz40q= zz40q+rwwz(13,11)*vvq*yc*(-1./16.-1./
     #    16.*o*x12*x2z-1./8.*o*x12*tx-1./16.*o*x12+3./16.*o*x2z
     #    -1./16.*o*x12s+1./8.*o-1./16.*os*x2z-1./8.*os+1./16.
     #    *oc+1./8.*x12*x2z+1./8.*x12*tx+1./8.*x12-1./8.*x2z-
     #    1./8.*tx*x12s-1./16.*x12s)
      zz40q= zz40q+rwwz(13,12)*xx*vvq*yc*(1./8.*o*x12*
     #    txs-1./16.*o*x2z*tx+1./8.*o*x2z*txs-1./8.*o*tx*x2zs+1.
     #    /16.*o*x2zs-1./16.*os*x2zs+1./16.*os*txs-1./16.*x12*x2z
     #    *tx+1./8.*x12*x2z*txs-1./4.*x2z*txs+1./8.*tx*x2zs+1./
     #    16.*x12s*txs)
      zz40q= zz40q+rwwz(13,12)*bxpi*vvq*yc*(1./8.*o*x12*
     #    tx-1./8.*o*x12*txs-1./16.*o*x2z*tx-1./16.*o*x2z*txs+1.
     #    /16.*o*x2z-1./16.*o*tx*x12s+1./16.*o*tx*x2zs-1./16.*o*
     #    tx-1./16.*o*x2zs+1./4.*o*txs+1./16.*os*x12*x2z-1./8.*
     #    os*x12*tx-1./8.*os*x2z+1./16.*os*tx+1./16.*os*x2zs-1./
     #    16.*os*txs+1./16.*oc*x2z-1./16.*oc*tx-1./16.*x12*x2z*tx
     #    -1./16.*x12*x2z*txs-1./16.*x12*tx+1./4.*x12*txs+1./8.
     #    *x2z*tx+1./8.*x2z*txs+1./16.*tx*x12s-1./16.*tx*x2zs-1.
     #    /16.*x12s*txs-1./4.*txs)
      zz40q= zz40q+rwwz(13,12)*vvq*yc*(-1./16.*o*x12
     #    +1./16.*o*x2z*tx+1./16.*o*x12s-1./8.*o*txs+1./16.*os
     #    -1./16.*oc+1./16.*x12*x2z*tx-1./8.*x12*txs-1./16.*x2z
     #    *tx+1./8.*txs)
      zz40q= zz40q+rwwz(14,1)*xx*vvq*yc*(-1./4.*o*x12
     #    *x2z*tx-1./4.*o*x12*txs-1./4.*o*x2z*txs-1./4.*o*tx*x2zs
     #    +1./4.*o*x2zs-1./4.*os*x2z*tx-1./8.*os*x2zs-1./8.*os*
     #    txs+1./4.*x12*x2z*tx-1./4.*x12*x2z*txs+1./4.*x2z*txs-
     #    1./8.*x12s*txs-1./8.*x2zs)
      zz40q= zz40q+rwwz(14,1)*bxpi*vvq*yc*(1./4.*o*x12*
     #    x2z*tx-3./8.*o*x12*x2z-5./8.*o*x12*tx+1./4.*o*x12*txs
     #    -o*x2z*tx+1./8.*o*x2z*txs+5./8.*o*x2z+1./8.*o*tx*x12s
     #    +1./8.*o*tx*x2zs-1./8.*o*x2zs-3./8.*o*txs+1./8.*os*
     #    x12*x2z+1./4.*os*x12*tx+1./4.*os*x2z*tx-1./2.*os*x2z-
     #    3./8.*os*tx+1./8.*os*x2zs+1./8.*os*txs+1./8.*oc*x2z+1.
     #    /8.*oc*tx-1./8.*x12*x2z*tx+1./8.*x12*x2z*txs+1./4.*x12*
     #    x2z+1./4.*x12*tx-3./8.*x12*txs+1./8.*x2z*tx-1./4.*x2z
     #    -1./4.*tx*x12s-1./8.*tx*x2zs+1./8.*x12s*txs+1./4.*txs
     #    )
      zz40q= zz40q+rwwz(14,1)*vvq*yc*bxp*(-1./8.-1./
     #    8.*o*x12-3./8.*o*tx+1./8.*o+1./8.*x12*tx+1./4.*x12-
     #    1./8.*tx-1./8.*x12s)
      zz40q= zz40q+rwwz(14,1)*vvq*yc*(1./8.+1./8.*o*
     #    x12*x2z+1./8.*o*x12*tx+1./2.*o*x12+1./2.*o*x2z*tx-1./
     #    4.*o*x2z+3./4.*o*tx-1./8.*o*x12s+1./8.*o*txs-3./8.*o
     #    -1./4.*os*x12+3./8.*os-1./8.*oc-1./8.*x12*x2z*tx-1./
     #    4.*x12*x2z+1./8.*x12*txs-1./4.*x12+1./4.*x2z*tx+1./4.
     #    *x2z+1./8.*tx*x12s-1./8.*tx+1./8.*x12s-1./4.*txs)
      zz40q= zz40q+rwwz(14,4)*xx*vvq*yc*(1./8.*o*x12*
     #    x2z*txs+1./16.*o*x2z*tx*x12s-1./16.*o*tx*x2zc-1./16.*o*
     #    tx*x2zs+1./16.*o*x2zc+1./16.*o*x2zs*txs+1./8.*os*x12*
     #    x2z*tx-1./16.*os*x12*x2zs+1./16.*os*x2z*txs-1./16.*os*
     #    x2zc+1./16.*os*x2zs+1./16.*oc*x2z*tx-1./16.*oc*x2zs-1.
     #    /16.*x12*tx*x2zs+1./16.*x12*x2zs*txs+1./16.*x2z*x12s*txs
     #    -1./16.*x2zs*txs)
      zz40q= zz40q+rwwz(14,4)*bxpi*vvq*yc*(1./4.*o*x12*
     #    x2z*tx-1./8.*o*x12*x2z*txs+1./32.*o*x12*tx*x2zs-1./16.*
     #    o*x12*x2zs+1./8.*o*x12*txs-1./32.*o*x2z*tx*x12s-1./8.*o
     #    *x2z*tx+1./32.*o*x2z*x12s+1./4.*o*x2z*txs+1./16.*o*tx*
     #    x12s-1./32.*o*tx*x12c+1./32.*o*tx*x2zc-1./8.*o*tx*x2zs
     #    -3./32.*o*x12s*txs-1./32.*o*x2zc-1./32.*o*x2zs*txs+3./
     #    16.*o*x2zs-1./16.*os*x12*x2z*tx-1./8.*os*x12*x2z+1./8.*
     #    os*x12*tx+1./16.*os*x12*x2zs-3./32.*os*x12*txs+5./32.*
     #    os*x2z*tx+1./32.*os*x2z*x12s-1./16.*os*x2z*txs+1./8.*os
     #    *x2z-3./32.*os*tx*x12s+1./32.*os*tx*x2zs+1./32.*os*x2zc
     #    -1./4.*os*x2zs+1./16.*os*txs+1./16.*oc*x12*x2z-3./32.
     #    *oc*x12*tx-1./32.*oc*x2z*tx-5./32.*oc*x2z+1./16.*oc*tx
     #    +1./16.*oc*x2zs-1./32.*oc*txs+1./32.*oq*x2z-1./32.*oq
     #    *tx-1./8.*x12*x2z*tx+1./4.*x12*x2z*txs-1./32.*x12*x2zs*
     #    txs+3./32.*x2z*tx*x12s-1./16.*x2z*x12s*txs-1./8.*x2z*
     #    txs)
      zz40q= zz40q+rwwz(14,4)*bxpi*vvq*yc*(-1./32.*tx*
     #    x2zc-1./16.*tx*x2zs+1./16.*x12s*txs-1./32.*x12c*txs+1.
     #    /16.*x2zs*txs)
      zz40q= zz40q+rwwz(14,4)*vvq*bxps*yc*(1./16.*o*x12
     #    -1./16.*o*tx-1./16.*o+1./16.*os-1./16.*x12*tx+1./16.
     #    *tx)
      zz40q= zz40q+rwwz(14,4)*vvq*yc*bxp*(-1./16.*o*
     #    x12*x2z+1./16.*o*x12*tx+1./16.*o*x2z*tx+1./8.*o*x2z+1.
     #    /16.*o*tx-1./16.*o*x12s+1./16.*o-1./16.*os*x12-1./8.*
     #    os*x2z+1./16.*os*tx-1./16.*os+1./8.*x12*x2z*tx+1./16.
     #    *x12*tx-3./16.*x2z*tx-1./16.*tx+1./16.*txs)
      zz40q= zz40q+rwwz(14,4)*vvq*yc*(-3./16.*o*x12*
     #    x2z*tx+1./16.*o*x12*x2z-1./4.*o*x12*tx+1./32.*o*x12*
     #    x2zs+1./8.*o*x12*txs+1./16.*o*x2z*tx-1./16.*o*x2z*txs
     #    -3./16.*o*x2z+3./32.*o*tx*x12s+1./32.*o*tx*x2zs+1./16.
     #    *o*tx-1./32.*o*x12s+1./32.*o*x12c-3./32.*o*x2zs-3./16.
     #    *o*txs+3./32.*os*x12*tx+1./16.*os*x12-1./8.*os*x2z*tx
     #    +3./16.*os*x2z-5./32.*os*tx+1./32.*os*x12s+3./32.*os*
     #    x2zs+1./16.*os*txs-1./16.*os-1./32.*oc*x12+1./32.*oc*
     #    tx+3./32.*oc-1./32.*oq-1./16.*x12*x2z*txs-1./32.*x12*
     #    tx*x2zs+1./16.*x12*tx-3./16.*x12*txs-1./16.*x2z*tx*x12s
     #    +1./8.*x2z*tx-1./16.*x2z*txs-3./32.*tx*x12s+1./32.*tx
     #    *x12c+5./32.*tx*x2zs+1./16.*x12s*txs+1./16.*txs)
      zz40q= zz40q+rwwz(14,11)*xx*vvq*yc*(1./16.*o*x12*
     #    x2z*tx+1./16.*o*x2z*txs-1./16.*o*tx*x2zs+1./16.*o*x2zs
     #    +1./16.*os*x2z*tx-1./16.*os*x2zs+1./16.*x12*x2z*txs-1.
     #    /16.*tx*x2zs)
      zz40q= zz40q+rwwz(14,11)*bxpi*vvq*yc*(1./16.*o*x12
     #    *tx-1./8.*o*x12*txs+1./16.*o*x2z*tx-1./16.*o*x2z*txs+
     #    1./8.*o*x2z-1./16.*o*tx*x12s+1./16.*o*tx*x2zs-1./16.*o*
     #    x2zs+1./16.*o*txs+1./16.*os*x12*x2z-1./8.*os*x12*tx-3.
     #    /16.*os*x2z+1./16.*os*tx+1./16.*os*x2zs-1./16.*os*txs
     #    +1./16.*oc*x2z-1./16.*oc*tx+1./8.*x12*x2z*tx-1./16.*
     #    x12*x2z*txs+1./16.*x12*txs-1./8.*x2z*tx+1./8.*x2z*txs
     #    -1./16.*tx*x2zs-1./16.*x12s*txs)
      zz40q= zz40q+rwwz(14,11)*vvq*yc*bxp*(-1./16.*o*
     #    x12+1./16.*o*tx+1./16.*o-1./16.*os+1./16.*x12*tx-1./
     #    16.*tx)
      zz40q= zz40q+rwwz(14,11)*vvq*yc*(1./16.*o*x12*tx
     #    -1./16.*o*x2z*tx-1./16.*o*x2z-1./8.*o*tx+1./16.*o*
     #    x12s+1./16.*o*txs-1./16.*o+1./16.*os*x2z+1./8.*os-1.
     #    /16.*oc-1./8.*x12*x2z*tx-1./8.*x12*tx+1./16.*x12*txs+
     #    3./16.*x2z*tx+1./16.*tx*x12s+1./16.*tx-1./8.*txs)
      zz40q= zz40q+rwwz(14,12)*xx*vvq*yc*(-1./8.*o*
     #    x12*txs-1./8.*o*x2z*txs+1./8.*o*tx*x2zs+1./16.*os*x2zs
     #    -1./16.*os*txs+1./8.*x12*x2z*tx-1./8.*x12*x2z*txs+1./
     #    8.*x2z*txs-1./16.*x12s*txs-1./16.*x2zs)
      zz40q= zz40q+rwwz(14,12)*bxpi*vvq*yc*(-1./16.*o*
     #    x12*x2z-3./16.*o*x12*tx+1./8.*o*x12*txs+1./16.*o*x2z*
     #    txs+1./16.*o*x2z+1./16.*o*tx*x12s-1./16.*o*tx*x2zs+1./
     #    16.*o*x2zs-3./16.*o*txs-1./16.*os*x12*x2z+1./8.*os*x12*
     #    tx+1./8.*os*x2z-1./16.*os*tx-1./16.*os*x2zs+1./16.*os
     #    *txs-1./16.*oc*x2z+1./16.*oc*tx-1./16.*x12*x2z*tx+1./
     #    16.*x12*x2z*txs+1./8.*x12*x2z+1./8.*x12*tx-3./16.*x12*
     #    txs+1./16.*x2z*tx-1./8.*x2z*txs-1./8.*x2z-1./8.*tx*
     #    x12s+1./16.*tx*x2zs+1./16.*x12s*txs+1./8.*txs)
      zz40q= zz40q+rwwz(14,12)*vvq*yc*bxp*(-1./16.-1.
     #    /16.*o*x12-1./16.*o*tx+1./16.*o-1./16.*x12*tx+1./8.*
     #    x12+1./16.*tx-1./16.*x12s)
      zz40q= zz40q+rwwz(14,12)*vvq*yc*(1./16.+1./16.*
     #    o*x12*x2z+1./16.*o*x12*tx+1./8.*o*x12-1./8.*o*x2z+1./
     #    8.*o*tx-1./16.*o*x12s+1./16.*o*txs-1./16.*o-1./16.*os
     #    +1./16.*oc+1./16.*x12*x2z*tx-1./8.*x12*x2z+1./16.*x12
     #    *txs-1./8.*x12-1./8.*x2z*tx+1./8.*x2z+1./16.*tx*x12s
     #    -1./16.*tx+1./16.*x12s)
*
*------------------------------------------------------------------
*
       else if(jj.eq.2) then
*
*------------------------------------------------------------------
*
      zz11s= xx*rl1*vvs*cqti*vut*y*(1./8.*zi*os*x12
     #    -1./8.*zi*os-1./4.*zi*oc*x12+1./4.*zi*oc
     #    -1./4.*zi*oq+1./8.*os-1./8.*oc)
      zz11s= zz11s+xx*rl3*vvc*gtm2*ys*csti*vut*(
     #    -1./16.*os*x2z-1./16.*oc*x12+1./16.*oc*x2z-1./16.*oq
     #    )
      zz11s= zz11s+xx*vvs*gtm2*pwsm2*cqti*vdt*vut*y*
     #  zxi*(1./32.*os*x12-1./16.*oc*x12+1./32.*oc)
      zz11s= zz11s+xx*vvs*gtm2*pwsm2*cqti*vdt*vut*y
     # *(1./32.*os-1./32.*oc)
      zz11s= zz11s+xx*vvs*gtm2*pwsm2*cqti*vuts*y*(
     #    -3./32.*oc)
      zz11s= zz11s+bxpi*rl1*vvs*cqti*vet*vut*y*(-
     #    1./32.*oc)
      zz11s= zz11s+bxpi*rl1*vvs*cqti*vut*y*(1./8.*
     #    zi*o*x12-1./8.*zi*o-1./4.*zi*os*x12+1./8.
     #    *zi*os-1./4.*zi*oc+1./8.*o-1./8.*os+1./8.*
     #    oc)
      zz11s= zz11s+bxpi*rl3*vvc*gtm2*ys*csti*vut*(
     #    -1./16.*o*x2z-1./16.*os*x12+1./16.*os*x2z-1./16.*os
     #    -1./16.*oc*x12-1./16.*oc*x2z+1./16.*oc-1./16.*oq)
      zz11s= zz11s+bxpi*vvs*gtm2*pwsm2*cqti*vdt*vut*y*
     #  zxi*(1./32.*o*x12-1./16.*os*x12+1./16.*os)
      zz11s= zz11s+bxpi*vvs*gtm2*pwsm2*cqti*vdt*vut*y
     # *(1./32.*o-1./32.*os+1./32.*oc)
      zz11s= zz11s+bxpi*vvs*gtm2*pwsm2*cqti*vuts*y
     # *(-1./16.*os+1./32.*oc)
      zz11s= zz11s+rl1*vvs*cqti*vet*vut*y*(1./32.*
     #    oc)
      zz11s= zz11s+rl1*vvs*cqti*vut*y*bxp*(-1./8.
     #    *zi*o*x12+1./8.*zi*o-1./4.*zi*os-1./16.*
     #    zi)
      zz11s= zz11s+rl1*vvs*cqti*vut*y*(-1./16.
     #    +1./8.*zi*o*x12+1./8.*zi*os*x12+1./8.*zi
     #    *os+1./4.*zi*oc-1./16.*zi*x12+1./16.*zi
     #    +1./16.*o-1./8.*os)
      zz11s= zz11s+rl3*vvc*gtm2*ys*csti*vut*bxp*(
     #    -1./32.-1./16.*o*x12+1./16.*o-1./8.*os)
      zz11s= zz11s+rl3*vvc*gtm2*ys*csti*vut*(1./32.
     #    *o*x12-1./32.*o*x2z+1./16.*o+1./8.*os*x12+1./16.*os*
     #    x2z-1./32.*os+1./8.*oc+1./32.*x2z)
      zz11s= zz11s+vvs*gtm2*pwsm2*cqti*vdt*vut*y*bxp*
     #  zxi*(1./64.-1./32.*o*x12+1./32.*os)
      zz11s= zz11s+vvs*gtm2*pwsm2*cqti*vdt*vut*y*zxi
     # *(1./32.*o*x12-3./64.*o+1./32.*os*x12-1./32.*os-1./32.
     #    *oc-1./64.*x12)
      zz11s= zz11s+vvs*gtm2*pwsm2*cqti*vdt*vut*y*(
     #    -1./64.+1./64.*o-1./32.*os)
      zz11s= zz11s+vvs*gtm2*pwsm2*cqti*vuts*y*(1./
     #    64.*o+1./32.*os)
*
      zz21s= xx*rl1*vvs*cqti*vut*y*(3./8.*zi*os*x12
     #    -3./8.*zi*os-3./4.*zi*oc*x12+3./4.*zi*oc
     #    -3./4.*zi*oq+3./8.*os-3./8.*oc)
      zz21s= zz21s+xx*rl3*vvc*gtm2*ys*csti*vut*(
     #    -3./16.*os*x2z-3./16.*oc*x12+3./16.*oc*x2z-3./16.*oq
     #    )
      zz21s= zz21s+xx*vvs*gtm2*pwsm2*cqti*vdt*vut*y*
     #  zxi*(3./32.*os*x12-3./16.*oc*x12+3./32.*oc)
      zz21s= zz21s+xx*vvs*gtm2*pwsm2*cqti*vdt*vut*y
     # *(3./32.*os-3./32.*oc)
      zz21s= zz21s+xx*vvs*gtm2*pwsm2*cqti*vuts*y*(
     #    -9./32.*oc)
      zz21s= zz21s+bxpi*rl1*vvs*cqti*vet*vut*y*(-
     #    3./32.*oc)
      zz21s= zz21s+bxpi*rl1*vvs*cqti*vut*y*(3./8.*
     #    zi*o*x12-3./8.*zi*o-3./4.*zi*os*x12+3./8.
     #    *zi*os-3./4.*zi*oc+3./8.*o-3./8.*os+3./8.*
     #    oc)
      zz21s= zz21s+bxpi*rl3*vvc*gtm2*ys*csti*vut*(
     #    -3./16.*o*x2z-3./16.*os*x12+3./16.*os*x2z-3./16.*os
     #    -3./16.*oc*x12-3./16.*oc*x2z+3./16.*oc-3./16.*oq)
      zz21s= zz21s+bxpi*vvs*gtm2*pwsm2*cqti*vdt*vut*y*
     #  zxi*(3./32.*o*x12-3./16.*os*x12+3./16.*os)
      zz21s= zz21s+bxpi*vvs*gtm2*pwsm2*cqti*vdt*vut*y
     # *(3./32.*o-3./32.*os+3./32.*oc)
      zz21s= zz21s+bxpi*vvs*gtm2*pwsm2*cqti*vuts*y
     # *(-3./16.*os+3./32.*oc)
      zz21s= zz21s+rl1*vvs*cqti*vet*vut*y*(1./16.*
     #    os+1./32.*oc)
      zz21s= zz21s+rl1*vvs*cqti*vut*y*bxp*(-1./8.
     #    *zi*o*x12-1./8.*zi*o-1./4.*zi*os-1./16.*
     #    zi)
      zz21s= zz21s+rl1*vvs*cqti*vut*y*(-1./16.
     #    -1./8.*zi*o*x12+1./2.*zi*o+5./8.*zi*os*
     #    x12-1./8.*zi*os+3./4.*zi*oc-1./16.*zi*
     #    x12+1./16.*zi-3./16.*o-1./8.*os)
      zz21s= zz21s+rl3*vvc*gtm2*ys*csti*vut*bxp*(
     #    -1./32.-1./16.*o*x12-1./16.*o-1./8.*os)
      zz21s= zz21s+rl3*vvc*gtm2*ys*csti*vut*(1./32.
     #    *o*x12+3./32.*o*x2z+3./16.*o+3./8.*os*x12+1./16.*os*
     #    x2z-5./32.*os+3./8.*oc+1./32.*x2z)
      zz21s= zz21s+vvs*gtm2*pwsm2*cqti*vdt*vut*y*bxp*
     #  zxi*(1./64.-1./32.*o*x12+1./16.*o+1./32.*os)
      zz21s= zz21s+vvs*gtm2*pwsm2*cqti*vdt*vut*y*zxi
     # *(-1./32.*o*x12-7./64.*o+5./32.*os*x12-5./32.*os-1./
     #    32.*oc-1./64.*x12)
      zz21s= zz21s+vvs*gtm2*pwsm2*cqti*vdt*vut*y*(
     #    -1./64.-3./64.*o-1./32.*os)
      zz21s= zz21s+vvs*gtm2*pwsm2*cqti*vuts*y*(1./
     #    64.*o+3./32.*os)
*
      zz31s= bxpi*rl1*vvs*cqti*vet*vut*y*(-1./32.*oc)
      zz31s= zz31s+bxpi*rl1*vvs*cqti*vut*y*(-5./
     #    32.*zi*o*x12-3./32.*zi*o*x12s+1./4.*zi*o
     #    +5./32.*zi*os*x12-5./8.*zi*os+1./4.*zi*
     #    oc-3./32.*o*x12-1./4.*o+3./8.*os)
      zz31s= zz31s+bxpi*rl2*vvs*pwsc*cqti*vut*y*(
     #    -3./32.*zi*o*x12+5./32.*zi*o*x12s-1./16.*
     #    zi*o+5./32.*zi*os*x12+1./8.*zi*os+5./32.
     #    *o*x12+1./16.*o-1./16.*os)
      zz31s= zz31s+bxpi*rl3*vvc*gtm2*ys*csti*vut*(
     #    -1./64.*o*x12*x2z+1./16.*o*x2z+1./64.*os*x12-1./8.*os
     #    *x2z+1./16.*oc)
      zz31s= zz31s+bxpi*vvs*gs*gtc*pws*pwt*cqti*vut*y
     # *(-3./64.*zi*o*x12+5./64.*zi*o*x12s-1./32.*
     #    zi*o+5./64.*zi*os*x12+1./16.*zi*os+5./64.
     #    *o*x12+1./32.*o-1./32.*os)
      zz31s= zz31s+bxpi*vvs*gtm2*pwsm2*cqti*vdt*vut*y*
     #  zxi*(-1./16.*o*x12+3./128.*o*x12s+1./16.*os*x12-3./64.
     #    *os+1./32.*oc-1./64.*x12s+1./64.*x12c)
      zz31s= zz31s+bxpi*vvs*gtm2*pwsm2*cqti*vdt*vut*y
     # *(1./128.*o*x12-1./64.*o*x2z-3./64.*o+1./16.*os-1./64.
     #    *x12*x2z-1./64.*x12+1./64.*x2z+1./64.*x12s)
      zz31s= zz31s+bxpi*vvs*gtm2*pwsm2*cqti*vuts*y
     # *(1./16.*os)
      zz31s= zz31s+rl1*vvs*bxps*cqti*vut*y*(9./32.*
     #    zi*o+1./16.*zi*x12-9./64.*zi)
      zz31s= zz31s+rl1*vvs*cqti*vet*vut*y*(1./32.*
     #    oc)
      zz31s= zz31s+rl1*vvs*cqti*vut*y*bxp*(-9./64.
     #    -3./16.*zi*o*x12-21./64.*zi*o-13./32.*zi
     #    *os-3./32.*zi*x12-1./16.*zi*x12s+17./64.*
     #    zi+9./64.*o-1./32.*x12)
      zz31s= zz31s+rl1*vvs*cqti*vut*y*(1./8.+17./
     #    64.*zi*o*x12+3./32.*zi*o*x12s-13./64.*zi*o
     #    -5./32.*zi*os*x12+33./32.*zi*os-1./4.*zi
     #    *oc+3./64.*zi*x12+5./64.*zi*x12s-1./8.*
     #    zi+3./64.*o*x12+5./64.*o-21./64.*os+5./64.*x12)
      zz31s= zz31s+rl2*vvs*pwsc*bxps*cqti*vut*y*(
     #    -5./32.*zi*o-1./32.*zi*x12+5./64.*zi)
      zz31s= zz31s+rl2*vvs*pwsc*cqti*vut*y*bxp*(5./
     #    64.+3./16.*zi*o*x12-1./64.*zi*o+7./32.*
     #    zi*os-5./32.*zi*x12+1./8.*zi*x12s-3./64.
     #    *zi-5./64.*o+1./16.*x12)
      zz31s= zz31s+rl2*vvs*pwsc*cqti*vut*y*(1./32.
     #    -7./64.*zi*o*x12-5./32.*zi*o*x12s+15./64.*
     #    zi*o-5./32.*zi*os*x12-11./32.*zi*os+13./
     #    64.*zi*x12-11./64.*zi*x12s-1./32.*zi-5./
     #    64.*o*x12-9./64.*o+7./64.*os-11./64.*x12)
      zz31s= zz31s+rl3*vvc*gtm2*bxps*ys*csti*vut*(
     #    -1./32.+1./16.*o+1./128.*x12)
      zz31s= zz31s+rl3*vvc*gtm2*ys*csti*vut*bxp*(3./
     #    64.-5./128.*o*x12-9./128.*o-5./64.*os+3./128.*x12*x2z
     #    -1./64.*x12+1./64.*x2z-1./128.*x12s)
      zz31s= zz31s+rl3*vvc*gtm2*ys*csti*vut*(-1./
     #    128.*o*x12*x2z+1./16.*o*x12+3./128.*o*x2z-1./128.*o*
     #    x12s-1./64.*o*x2zs-1./16.*o-1./16.*os*x12+9./128.*os*
     #    x2z+11./64.*os-13./128.*oc-1./128.*x12*x2z-3./64.*x2z
     #    +1./64.*x2zs)
      zz31s= zz31s+vvs*gs*gtc*pws*pwt*bxps*cqti*vut*y
     # *(-5./64.*zi*o-1./64.*zi*x12+5./128.*zi
     #    )
      zz31s= zz31s+vvs*gs*gtc*pws*pwt*cqti*vut*y*bxp
     # *(5./128.+3./32.*zi*o*x12-1./128.*zi*o+7./64.
     #    *zi*os-5./64.*zi*x12+1./16.*zi*x12s-3./
     #    128.*zi-5./128.*o+1./32.*x12)
      zz31s= zz31s+vvs*gs*gtc*pws*pwt*cqti*vut*y*(
     #    1./64.-7./128.*zi*o*x12-5./64.*zi*o*x12s+15./
     #    128.*zi*o-5./64.*zi*os*x12-11./64.*zi*os
     #    +13./128.*zi*x12-11./128.*zi*x12s-1./64.*
     #    zi-5./128.*o*x12-9./128.*o+7./128.*os-11./128.*
     #    x12)
      zz31s= zz31s+vvs*gtm2*pwsm2*bxps*cqti*vdt*vut*y*
     #  zxi*(5./256.+1./64.*x12)
      zz31s= zz31s+vvs*gtm2*pwsm2*cqti*vdt*vut*y*bxp*
     #  zxi*(-5./128.-1./128.*o*x12-1./32.*o+1./32.*os-3./
     #    64.*x12+1./64.*x12s)
      zz31s= zz31s+vvs*gtm2*pwsm2*cqti*vdt*vut*y*bxp
     # *(-3./256.+1./256.*o)
      zz31s= zz31s+vvs*gtm2*pwsm2*cqti*vdt*vut*y*zxi
     # *(1./32.*o*x12-3./128.*o*x12s+11./128.*o-1./16.*os*x12
     #    -5./256.*os-1./32.*oc+7./128.*x12-1./256.*x12s-1./
     #    64.*x12c)
      zz31s= zz31s+vvs*gtm2*pwsm2*cqti*vdt*vut*y*(
     #    3./128.-3./256.*o*x12+1./128.*o*x2z+1./256.*o-9./256.
     #    *os+7./256.*x12-1./128.*x2z-1./64.*x12s)
      zz31s= zz31s+vvs*gtm2*pwsm2*cqti*vuts*y*(-
     #    1./64.*o-1./32.*os)
      zz31s= zz31s+re(gs*gtc*pws*pwt)*bxpi*vvs*cqti*
     #  vut*y*(3./32.*zi*o*x12-5./32.*zi*o*x12s+1./16.*
     #    zi*o-5./32.*zi*os*x12-1./8.*zi*os-5./32.
     #    *o*x12-1./16.*o+1./16.*os)
      zz31s= zz31s+re(gs*gtc*pws*pwt)*vvs*bxps*cqti*
     #  vut*y*(5./32.*zi*o+1./32.*zi*x12-5./64.*zi
     #    )
      zz31s= zz31s+re(gs*gtc*pws*pwt)*vvs*cqti*vut*y*
     #  bxp*(-5./64.-3./16.*zi*o*x12+1./64.*zi*o-7./
     #    32.*zi*os+5./32.*zi*x12-1./8.*zi*x12s+3./
     #    64.*zi+5./64.*o-1./16.*x12)
      zz31s= zz31s+re(gs*gtc*pws*pwt)*vvs*cqti*vut*y
     # *(-1./32.+7./64.*zi*o*x12+5./32.*zi*o*x12s-
     #    15./64.*zi*o+5./32.*zi*os*x12+11./32.*zi*
     #    os-13./64.*zi*x12+11./64.*zi*x12s+1./32.*
     #    zi+5./64.*o*x12+9./64.*o-7./64.*os+11./64.*x12)
*
      zz41s= xx*rl1*vvs*cqti*vet*vut*y*(-1./16.*oc)
      zz41s= zz41s+xx*rl1*vvs*cqti*vut*y*(1./4.*oc
     #    )
      zz41s= zz41s+xx*rl3*vvc*gtm2*ys*csti*vut*(
     #    -1./8.*oc*x12-1./8.*oc*x2z+1./8.*oc-1./8.*oq)
      zz41s= zz41s+xx*vvs*gtm2*pwsm2*cqti*vdt*vut*y
     # *(1./16.*oc)
      zz41s= zz41s+xx*vvs*gtm2*pwsm2*cqti*vuts*y*(
     #    1./16.*oc)
      zz41s= zz41s+bxpi*rl1*vvs*cqti*vet*vut*y*(-
     #    1./16.*os)
      zz41s= zz41s+bxpi*rl1*vvs*cqti*vut*y*(1./4.*
     #    os)
      zz41s= zz41s+bxpi*rl3*vvc*gtm2*ys*csti*vut*(
     #    -1./8.*os*x12-1./8.*os*x2z+1./8.*os-1./4.*oc)
      zz41s= zz41s+bxpi*vvs*gtm2*pwsm2*cqti*vdt*vut*y
     # *(1./16.*os)
      zz41s= zz41s+bxpi*vvs*gtm2*pwsm2*cqti*vuts*y
     # *(1./16.*os)
      zz41s= zz41s+rl1*vvs*cqti*vet*vut*y*(1./16.*
     #    os)
      zz41s= zz41s+rl1*vvs*cqti*vut*y*(-1./4.*os
     #    )
      zz41s= zz41s+rl3*vvc*gtm2*ys*csti*vut*bxp*(
     #    -1./8.*os)
      zz41s= zz41s+rl3*vvc*gtm2*ys*csti*vut*(1./8.
     #    *os*x12+1./8.*os*x2z+1./4.*oc)
      zz41s= zz41s+vvs*gtm2*pwsm2*cqti*vdt*vut*y*(
     #    -1./16.*os)
      zz41s= zz41s+vvs*gtm2*pwsm2*cqti*vuts*y*(-
     #    1./16.*os)
*
      zz11c= rs1wz(1)*xx*vvc*gtm2*ys*csti*vut*(-1./8.*
     #    os*x2z-1./8.*oc*x12+1./8.*oc*x2z-1./8.*oq)
      zz11c= zz11c+rs1wz(1)*bxpi*vvc*gtm2*ys*csti*vut
     # *(-1./8.*o*x2z-1./8.*os*x12+1./8.*os*x2z-1./8.*os-1.
     #    /8.*oc*x12-1./8.*oc*x2z+1./8.*oc-1./8.*oq)
      zz11c= zz11c+rs1wz(1)*vvc*gtm2*ys*csti*vut*bxp
     # *(-1./16.-1./8.*o*x12+1./8.*o-1./4.*os)
      zz11c= zz11c+rs1wz(1)*vvc*gtm2*ys*csti*vut*(
     #    1./16.*o*x12-1./16.*o*x2z+1./8.*o+1./4.*os*x12+1./8.*
     #    os*x2z-1./16.*os+1./4.*oc+1./16.*x2z)
      zz11c= zz11c+rs1wz(4)*xx*vvc*gtm2*ys*csti*vut
     # *(1./16.*os*x2zs)
      zz11c= zz11c+rs1wz(4)*bxpi*vvc*gtm2*ys*csti*vut
     # *(1./32.*o*x2zs-1./16.*os*x12*x2z+1./8.*os*x2z-1./16.*
     #    oc*x2z)
      zz11c= zz11c+rs1wz(4)*vvc*gtm2*bxps*ys*csti*vut
     # *(-1./64.-1./32.*o*x12+1./32.*o-1./32.*os)
      zz11c= zz11c+rs1wz(4)*vvc*gtm2*ys*csti*vut*bxp
     # *(1./32.*o*x12*x2z-1./32.*o*x2z+1./32.*o+1./32.*os*x2z
     #    +1./32.*x2z)
      zz11c= zz11c+rs1wz(4)*vvc*gtm2*ys*csti*vut*(
     #    -1./16.*o*x2z+1./32.*os*x12*x2z+1./16.*os*x12-1./16.*
     #    os*x2z-1./64.*os*x12s-1./64.*os*x2zs-1./16.*os-1./32.
     #    *oc*x12+1./32.*oc*x2z+1./16.*oc-1./64.*oq-1./64.*x2zs
     #    )
      zz11c= zz11c+rs1wz(7)*bxpi*vvc*gtm2*ys*csti*vut
     # *(-1./64.*o*x2zs-1./64.*os*x12*x2z+1./64.*os*x2zs-1./
     #    64.*oc*x2z)
      zz11c= zz11c+rs1wz(7)*vvc*gtm2*bxps*ys*csti*vut
     # *(1./128.+1./64.*o*x12-1./64.*o+1./64.*os)
      zz11c= zz11c+rs1wz(7)*vvc*gtm2*ys*csti*vut*bxp
     # *(-1./64.*o*x12*x2z-1./128.*o*x12+3./128.*o*x2z-1./64.
     #    *o-1./32.*os*x12-1./64.*os*x2z+3./128.*os-1./32.*oc
     #    -1./64.*x2z)
      zz11c= zz11c+rs1wz(7)*vvc*gtm2*ys*csti*vut*(
     #    1./128.*o*x12*x2z+1./32.*o*x2z-1./128.*o*x2zs+1./32.*os
     #    *x12*x2z+1./64.*os*x12-5./128.*os*x2z+1./32.*oc*x2z+1.
     #    /64.*oc+1./128.*x2zs)
      zz11c= zz11c+rs1wz(10)*bxpi*vvc*gtm2*ys*csti*vut
     # *(1./64.*o*x2zs+1./64.*os*x12*x2z-1./64.*os*x2zs+1./64.
     #    *oc*x2z)
      zz11c= zz11c+rs1wz(10)*vvc*gtm2*bxps*ys*csti*vut
     # *(-1./128.-1./64.*o*x12+1./64.*o-1./64.*os)
      zz11c= zz11c+rs1wz(10)*vvc*gtm2*ys*csti*vut*bxp
     # *(1./64.*o*x12*x2z+1./128.*o*x12-3./128.*o*x2z+1./64.*o
     #    +1./32.*os*x12+1./64.*os*x2z-3./128.*os+1./32.*oc+1.
     #    /64.*x2z)
      zz11c= zz11c+rs1wz(10)*vvc*gtm2*ys*csti*vut
     # *(-1./128.*o*x12*x2z-1./32.*o*x2z+1./128.*o*x2zs-1./
     #    32.*os*x12*x2z-1./64.*os*x12+5./128.*os*x2z-1./32.*oc*
     #    x2z-1./64.*oc-1./128.*x2zs)
      zz11c= zz11c+rs1wz(11)*bxpi*vvc*gtm2*ys*csti*vut
     # *(-1./16.*os*x2z)
      zz11c= zz11c+rs1wz(11)*vvc*gtm2*ys*csti*vut*bxp
     # *(-1./16.*os)
      zz11c= zz11c+rs1wz(11)*vvc*gtm2*ys*csti*vut
     # *(1./16.*os*x2z+1./16.*os)
      zz11c= zz11c+rs1wz(12)*xx*vvc*gtm2*ys*csti*vut
     # *(-1./16.*os*x2z-1./16.*oc*x12-1./16.*oc*x2z-1./16.*
     #    oq)
      zz11c= zz11c+rs1wz(12)*bxpi*vvc*gtm2*ys*csti*vut
     # *(-1./16.*o*x2z-1./16.*os*x12-1./16.*os-1./16.*oc)
      zz11c= zz11c+rs1wz(12)*vvc*gtm2*ys*csti*vut*bxp
     # *(-1./32.-1./16.*o*x12+1./32.*o-1./16.*os)
      zz11c= zz11c+rs1wz(12)*vvc*gtm2*ys*csti*vut
     # *(1./32.*o*x12+1./16.*o+3./32.*os*x12+1./32.*os*x2z+1.
     #    /32.*os+3./32.*oc+1./32.*x2z)
      zz11c= zz11c+rs1wz(13)*xx*vvc*gtm2*ys*csti*vut
     # *(-1./32.*os*x2z-1./32.*oc*x12+1./32.*oc*x2z-1./32.*
     #    oq)
      zz11c= zz11c+rs1wz(13)*bxpi*vvc*gtm2*ys*csti*vut
     # *(-1./32.*o*x2z-1./32.*os*x12+1./32.*os*x2z-1./32.*os
     #    -1./32.*oc)
      zz11c= zz11c+rs1wz(13)*vvc*gtm2*ys*csti*vut*bxp
     # *(-1./64.-1./32.*o*x12+1./32.*o-1./32.*os)
      zz11c= zz11c+rs1wz(13)*vvc*gtm2*ys*csti*vut
     # *(1./64.*o*x12-1./64.*o*x2z+1./32.*o+1./16.*os*x12-1./
     #    64.*os+1./16.*oc+1./64.*x2z)
      zz11c= zz11c+rs1wz(14)*xx*vvc*gtm2*ys*csti*vut
     # *(-1./16.*oc*x2z)
      zz11c= zz11c+rs1wz(14)*bxpi*vvc*gtm2*ys*csti*vut
     # *(-1./16.*os*x2z-1./16.*oc)
      zz11c= zz11c+rs1wz(14)*vvc*gtm2*ys*csti*vut*bxp
     # *(-1./64.*o-1./32.*os)
      zz11c= zz11c+rs1wz(14)*vvc*gtm2*ys*csti*vut
     # *(1./64.*o*x2z-1./64.*os*x12+3./64.*os*x2z+1./16.*os+
     #    3./64.*oc)
*
      zz21c= rs1wz(1)*xx*vvc*gtm2*ys*csti*vut*(-3./8.*
     #    os*x2z-3./8.*oc*x12+3./8.*oc*x2z-3./8.*oq)
      zz21c= zz21c+rs1wz(1)*bxpi*vvc*gtm2*ys*csti*vut
     # *(-3./8.*o*x2z-3./8.*os*x12+3./8.*os*x2z-3./8.*os-3.
     #    /8.*oc*x12-3./8.*oc*x2z+3./8.*oc-3./8.*oq)
      zz21c= zz21c+rs1wz(1)*vvc*gtm2*ys*csti*vut*bxp
     # *(-1./16.-1./8.*o*x12-1./8.*o-1./4.*os)
      zz21c= zz21c+rs1wz(1)*vvc*gtm2*ys*csti*vut*(
     #    1./16.*o*x12+3./16.*o*x2z+3./8.*o+3./4.*os*x12+1./8.*
     #    os*x2z-5./16.*os+3./4.*oc+1./16.*x2z)
      zz21c= zz21c+rs1wz(4)*xx*vvc*gtm2*ys*csti*vut
     # *(3./16.*os*x2zs)
      zz21c= zz21c+rs1wz(4)*bxpi*vvc*gtm2*ys*csti*vut
     # *(3./32.*o*x2zs-3./16.*os*x12*x2z+3./8.*os*x2z-3./16.*
     #    oc*x2z)
      zz21c= zz21c+rs1wz(4)*vvc*gtm2*bxps*ys*csti*vut
     # *(-1./64.-1./32.*o*x12+1./32.*o-1./32.*os)
      zz21c= zz21c+rs1wz(4)*vvc*gtm2*ys*csti*vut*bxp
     # *(1./32.*o*x12*x2z-1./32.*o*x12+3./32.*o+1./32.*os*x2z
     #    -1./32.*os+1./32.*x2z)
      zz21c= zz21c+rs1wz(4)*vvc*gtm2*ys*csti*vut*(
     #    1./32.*o*x12*x2z-3./16.*o*x2z-1./32.*o*x2zs+3./32.*os*
     #    x12*x2z+3./16.*os*x12-5./32.*os*x2z-3./64.*os*x12s-3./
     #    64.*os*x2zs-3./16.*os-3./32.*oc*x12+3./32.*oc*x2z+3./
     #    16.*oc-3./64.*oq-1./64.*x2zs)
      zz21c= zz21c+rs1wz(7)*bxpi*vvc*gtm2*ys*csti*vut
     # *(-3./64.*o*x2zs-3./64.*os*x12*x2z+3./64.*os*x2zs-3./
     #    64.*oc*x2z)
      zz21c= zz21c+rs1wz(7)*vvc*gtm2*bxps*ys*csti*vut
     # *(1./128.+1./64.*o*x12-1./64.*o+1./64.*os)
      zz21c= zz21c+rs1wz(7)*vvc*gtm2*ys*csti*vut*bxp
     # *(-1./64.*o*x12*x2z+1./128.*o*x12+1./128.*o*x2z-3./64.
     #    *o-1./32.*os*x12-1./64.*os*x2z+5./128.*os-1./32.*oc
     #    -1./64.*x2z)
      zz21c= zz21c+rs1wz(7)*vvc*gtm2*ys*csti*vut*(
     #    -1./128.*o*x12*x2z+3./32.*o*x2z+1./128.*o*x2zs+1./16.
     #    *os*x12*x2z+3./64.*os*x12-11./128.*os*x2z-1./64.*os*
     #    x12s-1./64.*os*x2zs-1./32.*oc*x12+1./16.*oc*x2z+3./64.
     #    *oc-1./64.*oq+1./128.*x2zs)
      zz21c= zz21c+rs1wz(10)*bxpi*vvc*gtm2*ys*csti*vut
     # *(3./64.*o*x2zs+3./64.*os*x12*x2z-3./64.*os*x2zs+3./64.
     #    *oc*x2z)
      zz21c= zz21c+rs1wz(10)*vvc*gtm2*bxps*ys*csti*vut
     # *(-1./128.-1./64.*o*x12+1./64.*o-1./64.*os)
      zz21c= zz21c+rs1wz(10)*vvc*gtm2*ys*csti*vut*bxp
     # *(1./64.*o*x12*x2z-1./128.*o*x12-1./128.*o*x2z+3./64.*o
     #    +1./32.*os*x12+1./64.*os*x2z-5./128.*os+1./32.*oc+1.
     #    /64.*x2z)
      zz21c= zz21c+rs1wz(10)*vvc*gtm2*ys*csti*vut
     # *(1./128.*o*x12*x2z-3./32.*o*x2z-1./128.*o*x2zs-1./16.*
     #    os*x12*x2z-3./64.*os*x12+11./128.*os*x2z+1./64.*os*x12s
     #    +1./64.*os*x2zs+1./32.*oc*x12-1./16.*oc*x2z-3./64.*oc
     #    +1./64.*oq-1./128.*x2zs)
      zz21c= zz21c+rs1wz(11)*bxpi*vvc*gtm2*ys*csti*vut
     # *(-3./16.*os*x2z)
      zz21c= zz21c+rs1wz(11)*vvc*gtm2*ys*csti*vut*bxp
     # *(-1./16.*o-1./16.*os)
      zz21c= zz21c+rs1wz(11)*vvc*gtm2*ys*csti*vut
     # *(1./16.*o*x2z-1./16.*os*x12+1./8.*os*x2z+3./16.*os-1.
     #    /16.*oc)
      zz21c= zz21c+rs1wz(12)*xx*vvc*gtm2*ys*csti*vut
     # *(-3./16.*os*x2z-3./16.*oc*x12-3./16.*oc*x2z-3./16.*
     #    oq)
      zz21c= zz21c+rs1wz(12)*bxpi*vvc*gtm2*ys*csti*vut
     # *(-3./16.*o*x2z-3./16.*os*x12-3./16.*os-3./16.*oc)
      zz21c= zz21c+rs1wz(12)*vvc*gtm2*ys*csti*vut*bxp
     # *(-1./32.-1./16.*o*x12-1./32.*o-1./16.*os)
      zz21c= zz21c+rs1wz(12)*vvc*gtm2*ys*csti*vut
     # *(1./32.*o*x12+1./16.*o*x2z+3./16.*o+9./32.*os*x12+3./
     #    32.*os*x2z+1./32.*os+9./32.*oc+1./32.*x2z)
      zz21c= zz21c+rs1wz(13)*xx*vvc*gtm2*ys*csti*vut
     # *(-3./32.*os*x2z-3./32.*oc*x12+3./32.*oc*x2z-3./32.*
     #    oq)
      zz21c= zz21c+rs1wz(13)*bxpi*vvc*gtm2*ys*csti*vut
     # *(-3./32.*o*x2z-3./32.*os*x12+3./32.*os*x2z-3./32.*os
     #    -3./32.*oc)
      zz21c= zz21c+rs1wz(13)*vvc*gtm2*ys*csti*vut*bxp
     # *(-1./64.-1./32.*o*x12-1./32.*os)
      zz21c= zz21c+rs1wz(13)*vvc*gtm2*ys*csti*vut
     # *(1./64.*o*x12+1./64.*o*x2z+3./32.*o+3./32.*os*x12-1./
     #    32.*os*x2z+3./64.*os+3./32.*oc+1./64.*x2z)
      zz21c= zz21c+rs1wz(14)*xx*vvc*gtm2*ys*csti*vut
     # *(-3./16.*oc*x2z)
      zz21c= zz21c+rs1wz(14)*bxpi*vvc*gtm2*ys*csti*vut
     # *(-3./16.*os*x2z-3./16.*oc)
      zz21c= zz21c+rs1wz(14)*vvc*gtm2*ys*csti*vut*bxp
     # *(-3./64.*o-5./32.*os)
      zz21c= zz21c+rs1wz(14)*vvc*gtm2*ys*csti*vut
     # *(3./64.*o*x2z+1./64.*os*x12+9./64.*os*x2z+3./16.*os+
     #    13./64.*oc)
*
      zz31c= rs1wz(1)*bxpi*vvc*gtm2*ys*csti*vut*(-1./16.
     #    *o*x12*x2z+1./8.*o*x2z-1./4.*os*x2z+1./8.*oc)
      zz31c= zz31c+rs1wz(1)*vvc*gtm2*bxps*ys*csti*vut
     # *(-1./32.+1./16.*o)
      zz31c= zz31c+rs1wz(1)*vvc*gtm2*ys*csti*vut*bxp
     # *(1./8.-1./32.*o*x12+3./32.*o*x2z-7./32.*o-3./32.*os
     #    +1./16.*x12*x2z-3./32.*x12-1./32.*x2z)
      zz31c= zz31c+rs1wz(1)*vvc*gtm2*ys*csti*vut*(
     #    -1./32.*o*x12*x2z+3./16.*o*x12+3./32.*o*x2z-1./32.*o*
     #    x12s-1./16.*o*x2zs-1./8.*o-1./8.*os*x12+3./32.*os*x2z
     #    +3./8.*os-7./32.*oc+1./32.*x12*x2z-1./8.*x2z+1./16.
     #    *x2zs)
      zz31c= zz31c+rs1wz(4)*bxpi*vvc*gtm2*ys*csti*vut
     # *(-1./32.*o*x2zs)
      zz31c= zz31c+rs1wz(4)*vvc*gtm2*bxps*ys*csti*vut*
     # bxp*(1./128.-1./64.*o-1./64.*x12)
      zz31c= zz31c+rs1wz(4)*vvc*gtm2*bxps*ys*csti*vut
     # *(-1./128.*o*x12+3./128.*o*x2z+3./128.*o-1./128.*os
     #    +1./64.*x12*x2z+1./128.*x12-1./64.*x2z)
      zz31c= zz31c+rs1wz(4)*vvc*gtm2*ys*csti*vut*bxp
     # *(1./64.*o*x12*x2z+1./32.*o*x12-7./128.*o*x2z-1./128.*o
     #    *x12s-1./128.*o*x2zs-1./32.*o-1./64.*os*x12+1./64.*os
     #    *x2z+1./32.*os-1./128.*oc-1./128.*x12*x2z+1./128.*
     #    x2zs)
      zz31c= zz31c+rs1wz(4)*vvc*gtm2*ys*csti*vut*(
     #    -1./32.*o*x12*x2z+1./16.*o*x2z+1./32.*o*x2zs-1./32.*
     #    os*x2z)
      zz31c= zz31c+rs1wz(7)*bxpi*vvc*gtm2*ys*csti*vut
     # *(1./128.*o*x12*x2zs+1./128.*o*x2zc-1./128.*o*x2zs+1./
     #    128.*os*x12*x2z+1./64.*os*x2zs+1./128.*oc*x2z-1./128.*
     #    x2zc)
      zz31c= zz31c+rs1wz(7)*vvc*gtm2*bxps*ys*csti*vut
     # *(1./256.-1./64.*o-1./128.*x12)
      zz31c= zz31c+rs1wz(7)*vvc*gtm2*ys*csti*vut*bxp
     # *(-1./128.*o*x12*x2z+3./128.*o*x12+5./128.*o*x2z-1./
     #    128.*o*x12s-1./128.*o-3./128.*os*x12+5./128.*os-1./64.
     #    *oc+1./64.*x12*x2z-1./64.*x2z)
      zz31c= zz31c+rs1wz(7)*vvc*gtm2*ys*csti*vut*(
     #    -1./32.*o*x12*x2z+1./128.*o*x12*x2zs+1./128.*o*x2z*x12s
     #    +1./64.*o*x2z-1./32.*o*x2zs+1./64.*os*x12*x2z-1./128.
     #    *os*x12-7./128.*os*x2z+1./256.*os*x12s+1./256.*os*x2zs
     #    +1./128.*oc*x12+1./128.*oc*x2z-1./128.*oc+1./256.*oq
     #    -1./128.*x12*x2zs+5./256.*x2zs)
      zz31c= zz31c+rs1wz(10)*bxpi*vvc*gtm2*ys*csti*vut
     # *(-1./128.*o*x12*x2zs-1./128.*o*x2zc+1./128.*o*x2zs-1.
     #    /128.*os*x12*x2z-1./64.*os*x2zs-1./128.*oc*x2z+1./128.*
     #    x2zc)
      zz31c= zz31c+rs1wz(10)*vvc*gtm2*bxps*ys*csti*vut
     # *(-1./256.+1./64.*o+1./128.*x12)
      zz31c= zz31c+rs1wz(10)*vvc*gtm2*ys*csti*vut*bxp
     # *(1./128.*o*x12*x2z-3./128.*o*x12-5./128.*o*x2z+1./128.
     #    *o*x12s+1./128.*o+3./128.*os*x12-5./128.*os+1./64.*oc
     #    -1./64.*x12*x2z+1./64.*x2z)
      zz31c= zz31c+rs1wz(10)*vvc*gtm2*ys*csti*vut
     # *(1./32.*o*x12*x2z-1./128.*o*x12*x2zs-1./128.*o*x2z*x12s
     #    -1./64.*o*x2z+1./32.*o*x2zs-1./64.*os*x12*x2z+1./128.
     #    *os*x12+7./128.*os*x2z-1./256.*os*x12s-1./256.*os*x2zs
     #    -1./128.*oc*x12-1./128.*oc*x2z+1./128.*oc-1./256.*oq
     #    +1./128.*x12*x2zs-5./256.*x2zs)
      zz31c= zz31c+rs1wz(11)*bxpi*vvc*gtm2*ys*csti*vut
     # *(-1./32.*os*x12-1./16.*os*x2z)
      zz31c= zz31c+rs1wz(11)*vvc*gtm2*bxps*ys*csti*vut
     # *(-1./32.+1./16.*o+1./64.*x12)
      zz31c= zz31c+rs1wz(11)*vvc*gtm2*ys*csti*vut*bxp
     # *(1./32.-1./32.*o*x12-1./32.*o*x2z-1./16.*o-3./32.*os
     #    -1./64.*x12+1./32.*x2z)
      zz31c= zz31c+rs1wz(11)*vvc*gtm2*ys*csti*vut
     # *(1./32.*o*x12+1./32.*o*x2z+1./32.*os*x12+1./16.*os*x2z
     #    +3./32.*os-1./32.*x2z)
      zz31c= zz31c+rs1wz(12)*bxpi*vvc*gtm2*ys*csti*vut
     # *(-1./32.*o*x12*x2z+1./16.*o*x2z+1./32.*os*x12+1./16.
     #    *oc)
      zz31c= zz31c+rs1wz(12)*vvc*gtm2*bxps*ys*csti*vut
     # *(1./64.-1./32.*o-1./64.*x12)
      zz31c= zz31c+rs1wz(12)*vvc*gtm2*ys*csti*vut*bxp
     # *(1./32.+1./64.*o*x12+5./64.*o*x2z-1./64.*o+3./64.*os
     #    +1./32.*x12*x2z-1./32.*x12-3./64.*x2z)
      zz31c= zz31c+rs1wz(12)*vvc*gtm2*ys*csti*vut
     # *(-1./64.*o*x12*x2z+1./16.*o*x12-1./64.*o*x2z-1./64.*
     #    o*x12s-1./32.*o*x2zs-1./16.*o-1./16.*os*x12-3./64.*os
     #    *x2z+1./32.*os-5./64.*oc+1./64.*x12*x2z-1./32.*x2z+
     #    1./32.*x2zs)
      zz31c= zz31c+rs1wz(13)*bxpi*vvc*gtm2*ys*csti*vut
     # *(-1./64.*o*x12*x2z+1./64.*o*x2z+1./64.*o*x2zs+1./64.
     #    *os*x12-1./64.*oc-1./64.*x2zs)
      zz31c= zz31c+rs1wz(13)*vvc*gtm2*ys*csti*vut*bxp
     # *(-1./128.+1./32.*o+1./128.*x12)
      zz31c= zz31c+rs1wz(13)*vvc*gtm2*ys*csti*vut
     # *(3./128.*o*x12*x2z+1./128.*o*x12-7./128.*o*x2z-1./128.
     #    *o*x12s-1./64.*o-3./128.*os*x12+1./64.*os*x2z-1./128.
     #    *os+1./64.*oc-1./128.*x12*x2z+3./128.*x2z)
      zz31c= zz31c+rs1wz(14)*bxpi*vvc*gtm2*ys*csti*vut
     # *(1./64.*o*x12*x2z-1./64.*o*x2zs-1./64.*os*x2z+1./64.*
     #    x2zs)
      zz31c= zz31c+rs1wz(14)*vvc*gtm2*bxps*ys*csti*vut
     # *(1./128.-1./64.*o)
      zz31c= zz31c+rs1wz(14)*vvc*gtm2*ys*csti*vut*bxp
     # *(1./64.+3./128.*o*x12+1./128.*o*x2z-3./64.*o+5./128.
     #    *os-1./128.*x12-1./128.*x2z)
      zz31c= zz31c+rs1wz(14)*vvc*gtm2*ys*csti*vut
     # *(-3./128.*o*x12*x2z-1./64.*o*x12+1./16.*o*x2z+1./128.
     #    *o*x12s-1./128.*os*x12-1./64.*os*x2z+1./64.*os-1./64.
     #    *oc+1./128.*x12*x2z-1./32.*x2z)
*
      zz41c= rs1wz(1)*xx*vvc*gtm2*ys*csti*vut*(-1./4.*
     #    oc*x12-1./4.*oc*x2z-1./4.*oq)
      zz41c= zz41c+rs1wz(1)*bxpi*vvc*gtm2*ys*csti*vut
     # *(-1./4.*os*x12-1./4.*os*x2z-3./4.*oc)
      zz41c= zz41c+rs1wz(1)*vvc*gtm2*ys*csti*vut*bxp
     # *(-1./2.*os)
      zz41c= zz41c+rs1wz(1)*vvc*gtm2*ys*csti*vut*(
     #    1./4.*os*x12+1./4.*os*x2z+1./2.*os+3./4.*oc)
      zz41c= zz41c+rs1wz(4)*xx*vvc*gtm2*ys*csti*vut
     # *(-1./16.*os*x12*x2z-1./16.*os*x2zs-1./16.*oc*x2z)
      zz41c= zz41c+rs1wz(4)*bxpi*vvc*gtm2*ys*csti*vut
     # *(-1./32.*o*x12*x2z-1./32.*o*x2zs-1./16.*os*x12-7./32.
     #    *os*x2z+1./32.*os*x12s-1./32.*os*x2zs+1./16.*oc*x12-1.
     #    /16.*oc+1./32.*oq)
      zz41c= zz41c+rs1wz(4)*vvc*gtm2*bxps*ys*csti*vut
     # *(1./16.*o)
      zz41c= zz41c+rs1wz(4)*vvc*gtm2*ys*csti*vut*bxp
     # *(-1./32.*o*x12-3./32.*o*x2z-1./16.*o+1./16.*os*x12
     #    -1./16.*os*x2z-5./32.*os+1./16.*oc)
      zz41c= zz41c+rs1wz(4)*vvc*gtm2*ys*csti*vut*(
     #    1./32.*o*x12*x2z+1./32.*o*x12+3./32.*o*x2z+1./32.*o*
     #    x2zs+9./32.*os*x2z-1./32.*os*x12s+1./32.*os*x2zs+5./
     #    32.*os-1./16.*oc*x12-1./32.*oq)
      zz41c= zz41c+rs1wz(7)*bxpi*vvc*gtm2*ys*csti*vut
     # *(1./64.*o*x12*x2z-1./32.*o*x2z+1./64.*o*x2zs-1./32.*os
     #    *x12+3./64.*os*x2z+1./64.*os*x12s-1./64.*os*x2zs+1./
     #    32.*oc*x12-1./32.*oc+1./64.*oq)
      zz41c= zz41c+rs1wz(7)*vvc*gtm2*ys*csti*vut*bxp
     # *(1./64.*o*x12+1./64.*o*x2z-1./32.*o+1./64.*os)
      zz41c= zz41c+rs1wz(7)*vvc*gtm2*ys*csti*vut*(
     #    -1./64.*o*x12*x2z-1./64.*o*x12+1./64.*o*x2z-1./64.*o*
     #    x2zs+1./32.*o+1./32.*os*x12-3./64.*os*x2z-1./64.*os*
     #    x12s+1./64.*os*x2zs-1./64.*os-1./32.*oc*x12+1./32.*oc
     #    -1./64.*oq)
      zz41c= zz41c+rs1wz(8)*xx*vvc*gtm2*ys*csti*vut
     # *(1./8.*os*x2z)
      zz41c= zz41c+rs1wz(8)*bxpi*vvc*gtm2*ys*csti*vut
     # *(1./16.*o*x2z-1./16.*os*x12+3./16.*os*x2z+1./8.*os-1.
     #    /16.*oc)
      zz41c= zz41c+rs1wz(8)*vvc*gtm2*bxps*ys*csti*vut
     # *(-1./16.*o)
      zz41c= zz41c+rs1wz(8)*vvc*gtm2*ys*csti*vut*bxp
     # *(1./16.*o*x2z+1./8.*o-1./16.*os*x12+1./16.*os*x2z+1./
     #    8.*os-1./16.*oc)
      zz41c= zz41c+rs1wz(8)*vvc*gtm2*ys*csti*vut*(
     #    -1./8.*o*x2z-1./16.*o+1./8.*os*x12-1./4.*os*x2z-1./
     #    4.*os+1./8.*oc)
      zz41c= zz41c+rs1wz(9)*xx*vvc*gtm2*ys*csti*vut
     # *(1./4.*oc)
      zz41c= zz41c+rs1wz(9)*bxpi*vvc*gtm2*ys*csti*vut
     # *(1./4.*os+1./4.*oc)
      zz41c= zz41c+rs1wz(9)*vvc*gtm2*ys*csti*vut*bxp
     # *(1./4.*os)
      zz41c= zz41c+rs1wz(9)*vvc*gtm2*ys*csti*vut*(
     #    -1./2.*os-1./4.*oc)
      zz41c= zz41c+rs1wz(10)*bxpi*vvc*gtm2*ys*csti*vut
     # *(-1./64.*o*x12*x2z-1./64.*o*x2zs-1./64.*os*x2z-1./64.
     #    *os*x12s+1./64.*os*x2zs-1./32.*oc*x12-1./64.*oq)
      zz41c= zz41c+rs1wz(10)*vvc*gtm2*bxps*ys*csti*vut
     # *(1./32.*o)
      zz41c= zz41c+rs1wz(10)*vvc*gtm2*ys*csti*vut*bxp
     # *(-1./64.*o*x12-3./64.*o*x2z-1./32.*o-1./32.*os*x12
     #    +1./32.*os*x2z-1./64.*os-1./32.*oc)
      zz41c= zz41c+rs1wz(10)*vvc*gtm2*ys*csti*vut
     # *(1./64.*o*x12*x2z+1./64.*o*x12+3./64.*o*x2z+1./64.*o*
     #    x2zs+1./32.*os*x12-1./64.*os*x2z+1./64.*os*x12s-1./64.
     #    *os*x2zs+1./64.*os+1./32.*oc*x12+1./32.*oc+1./64.*oq
     #    )
      zz41c= zz41c+rs1wz(11)*xx*vvc*gtm2*ys*csti*vut
     # *(-1./8.*os*x2z)
      zz41c= zz41c+rs1wz(11)*bxpi*vvc*gtm2*ys*csti*vut
     # *(-1./16.*o*x2z+1./16.*os*x12-1./16.*os*x2z-1./8.*os
     #    +1./16.*oc)
      zz41c= zz41c+rs1wz(11)*vvc*gtm2*ys*csti*vut*bxp
     # *(-1./16.*o)
      zz41c= zz41c+rs1wz(11)*vvc*gtm2*ys*csti*vut
     # *(1./16.*o*x2z+1./16.*o-1./16.*os*x12+1./16.*os*x2z+1.
     #    /8.*os-1./16.*oc)
      zz41c= zz41c+rs1wz(12)*xx*vvc*gtm2*ys*csti*vut
     # *(1./8.*os*x2z)
      zz41c= zz41c+rs1wz(12)*bxpi*vvc*gtm2*ys*csti*vut
     # *(1./16.*o*x2z-1./16.*os*x12+1./16.*os*x2z+1./8.*os-1.
     #    /16.*oc)
      zz41c= zz41c+rs1wz(12)*vvc*gtm2*ys*csti*vut*bxp
     # *(1./16.*o)
      zz41c= zz41c+rs1wz(12)*vvc*gtm2*ys*csti*vut
     # *(-1./16.*o*x2z-1./16.*o+1./16.*os*x12-1./16.*os*x2z
     #    -1./8.*os+1./16.*oc)
      zz41c= zz41c+rs1wz(13)*bxpi*vvc*gtm2*ys*csti*vut
     # *(1./32.*o*x2z+1./32.*os*x12-1./32.*os*x2z+1./32.*oc)
      zz41c= zz41c+rs1wz(13)*vvc*gtm2*ys*csti*vut*bxp
     # *(1./32.*o)
      zz41c= zz41c+rs1wz(13)*vvc*gtm2*ys*csti*vut
     # *(-1./32.*o*x2z-1./32.*o-1./32.*os*x12+1./32.*os*x2z
     #    -1./32.*oc)
      zz41c= zz41c+rs1wz(14)*bxpi*vvc*gtm2*ys*csti*vut
     # *(-1./32.*o*x2z-1./32.*os*x12+1./32.*os*x2z-1./32.*oc
     #    )
      zz41c= zz41c+rs1wz(14)*vvc*gtm2*ys*csti*vut*bxp
     # *(-1./32.*o)
      zz41c= zz41c+rs1wz(14)*vvc*gtm2*ys*csti*vut
     # *(1./32.*o*x2z+1./32.*o+1./32.*os*x12-1./32.*os*x2z+1.
     #    /32.*oc)
      zz11q= 0.d0
      zz21q= 0.d0
      zz31q= 0.d0
      zz41q= 0.d0
*
*----------------------------------------------------------------
*
       else if(jj.eq.3) then
*
*----------------------------------------------------------------
*
      zz12s= xx*vvs*ums*gtm2*pwsm2*cqti*vuts*(1./
     #    32.*oc)
      zz12s= zz12s+xx*vvs*gtm2*pwsm2*cqti*vuts*y*(
     #    1./32.*oq)
      zz12s= zz12s+bxpi*vvs*ums*gtm2*pwsm2*
     #  cqti*vuts*(1./32.*os)
      zz12s= zz12s+bxpi*vvs*gtm2*pwsm2*cqti*vuts*y
     # *(1./32.*oc)
      zz12s= zz12s+vvs*ums*gtm2*pwsm2*cqti*
     #  vut*aut*(-1./32.*os)
      zz12s= zz12s+vvs*ums*gtm2*pwsm2*cqti*
     #  vuts*bxp*(1./32.*o)
      zz12s= zz12s+vvs*ums*gtm2*pwsm2*cqti*
     #  vuts*(-1./64.*o-3./64.*os)
      zz12s= zz12s+vvs*ums*gtm2*pwsm2*cqti*
     #  auts*bxp*(-1./64.*o)
      zz12s= zz12s+vvs*ums*gtm2*pwsm2*cqti*
     #  auts*(1./64.*os)
      zz12s= zz12s+vvs*gtm2*pwsm2*cqti*vuts*y*bxp*(
     #    1./64.*os)
      zz12s= zz12s+vvs*gtm2*pwsm2*cqti*vuts*y*(-
     #    1./64.*os-1./32.*oc)
*
      zz22s= xx*vvs*ums*gtm2*pwsm2*cqti*vuts*(3./
     #    32.*oc)
      zz22s= zz22s+xx*vvs*gtm2*pwsm2*cqti*vuts*y*(
     #    3./32.*oq)
      zz22s= zz22s+bxpi*vvs*ums*gtm2*pwsm2*
     #  cqti*vut*aut*(1./32.*os)
      zz22s= zz22s+bxpi*vvs*ums*gtm2*pwsm2*
     #  cqti*vuts*(5./64.*os)
      zz22s= zz22s+bxpi*vvs*ums*gtm2*pwsm2*
     #  cqti*auts*(-1./64.*os)
      zz22s= zz22s+bxpi*vvs*gtm2*pwsm2*cqti*vuts*y
     # *(3./32.*oc)
      zz22s= zz22s+vvs*ums*gtm2*pwsm2*cqti*
     #  vuts*bxp*(1./32.*o)
      zz22s= zz22s+vvs*ums*gtm2*pwsm2*cqti*
     #  vuts*(-1./64.*o-5./32.*os)
      zz22s= zz22s+vvs*ums*gtm2*pwsm2*cqti*
     #  auts*bxp*(-1./64.*o)
      zz22s= zz22s+vvs*ums*gtm2*pwsm2*cqti*
     #  auts*(1./32.*os)
      zz22s= zz22s+vvs*gtm2*pwsm2*cqti*vuts*y*bxp*(
     #    1./64.*os)
      zz22s= zz22s+vvs*gtm2*pwsm2*cqti*vuts*y*(-
     #    1./64.*os-3./32.*oc)
*
      zz32s= bxpi*vvs*ums*gtm2*pwsm2*cqti*vuts*(
     #    -1./32.*os)
      zz32s= zz32s+bxpi*vvs*gtm2*pwsm2*cqti*vuts*y
     # *(-1./32.*oc)
      zz32s= zz32s+vvs*ums*gtm2*pwsm2*cqti*
     #  vut*aut*(-1./32.*os)
      zz32s= zz32s+vvs*ums*gtm2*pwsm2*cqti*
     #  vuts*bxp*(-1./32.*o)
      zz32s= zz32s+vvs*ums*gtm2*pwsm2*cqti*
     #  vuts*(1./64.*o+3./64.*os)
      zz32s= zz32s+vvs*ums*gtm2*pwsm2*cqti*
     #  auts*bxp*(-1./64.*o)
      zz32s= zz32s+vvs*ums*gtm2*pwsm2*cqti*
     #  auts*(1./64.*os)
      zz32s= zz32s+vvs*gtm2*pwsm2*cqti*vuts*y*bxp*(
     #    -1./64.*os)
      zz32s= zz32s+vvs*gtm2*pwsm2*cqti*vuts*y*(1./
     #    64.*os+1./32.*oc)
*
      zz42s= bxpi*vvs*ums*gtm2*pwsm2*cqti*vuts*(
     #    -1./32.*os)
      zz42s= zz42s+bxpi*vvs*gtm2*pwsm2*cqti*vuts*y
     # *(-1./32.*oc)
      zz42s= zz42s+vvs*ums*gtm2*pwsm2*cqti*
     #  vut*aut*(-1./32.*os)
      zz42s= zz42s+vvs*ums*gtm2*pwsm2*cqti*
     #  vuts*bxp*(-1./32.*o)
      zz42s= zz42s+vvs*ums*gtm2*pwsm2*cqti*
     #  vuts*(1./64.*o+3./64.*os)
      zz42s= zz42s+vvs*ums*gtm2*pwsm2*cqti*
     #  auts*bxp*(-1./64.*o)
      zz42s= zz42s+vvs*ums*gtm2*pwsm2*cqti*
     #  auts*(1./64.*os)
      zz42s= zz42s+vvs*gtm2*pwsm2*cqti*vuts*y*bxp*(
     #    -1./64.*os)
      zz42s= zz42s+vvs*gtm2*pwsm2*cqti*vuts*y*(1./
     #    64.*os+1./32.*oc)
      zz12c= 0.d0
      zz22c= 0.d0
      zz32c= 0.d0
      zz42c= 0.d0
      zz12q= 0.d0
      zz22q= 0.d0
      zz32q= 0.d0
      zz42q= 0.d0
*
*---------------------------------------------------------------------      
*
       else if(jj.eq.4) then
*
*---------------------------------------------------------------------      
*
      zz10s= xx*rl1*vvs*cqti*vdt*y*(1./4.-1./4.*
     #    zi*o*x12*ux-3./4.*zi*o*x12+1./8.*zi*o*ux
     #    +3./4.*zi*o*x12s-1./8.*zi*o*uxs+1./2.*zi
     #    *o+1./4.*zi*os*x12-1./2.*zi*os*ux+1./8.*
     #    zi*os-1./2.*zi*oc-1./8.*zi*x12*uxs+3./8.
     #    *zi*x12+1./4.*zi*ux*x12s+1./8.*zi*ux-1./
     #    2.*zi*x12s-1./4.*zi+3./8.*o*x12+1./8.*o*x2z
     #    -1./4.*o*ux-1./4.*o-3./8.*os-1./8.*x12*x2z-1./8.*
     #    x12*ux-1./8.*x12+1./4.*x2z-1./8.*ux+3./8.*x12s)
      zz10s= zz10s+xx*rl3*vvc*gtm2*csti*vdt*ys*(
     #    -3./16.*o*x12*x2z+1./16.*o*x12*ux+1./8.*o*x2z*ux+1./
     #    16.*o*x2z-1./16.*o*x2zs-1./16.*o*uxs+1./8.*os*x12+1./
     #    8.*os*x2z-1./8.*os*ux-1./16.*oc+1./16.*x12*x2z*ux-1./
     #    8.*x12*x2z+1./16.*x12*x2zs-1./16.*x12*uxs+1./16.*x2z*ux
     #    -1./8.*x2z*x12s+3./16.*ux*x12s-3./16.*x12c-1./8.*x2zs
     #    )
      zz10s= zz10s+xx*vvs*gtm2*pwsm2*cqti*vdt*vut*y*
     #  zxi*(3./16.*o*x12*ux-3./32.*o*x12-1./32.*o*ux-1./32.*o*
     #    uxs+5./16.*os*x12-1./8.*os*ux-3./32.*os-1./8.*oc-1./
     #    32.*x12*ux+1./32.*x12*uxs)
      zz10s= zz10s+xx*vvs*gtm2*pwsm2*cqti*vdt*vut*y
     # *(9./32.*o*x12+1./32.*o*x2z-1./16.*o*ux-3./32.*o-3./
     #    32.*os-3./32.*x12*x2z+3./32.*x12*ux+1./16.*x2z-1./32.
     #    *ux-3./32.*x12s)
      zz10s= zz10s+xx*vvs*gtm2*pwsm2*cqti*vdts*y*(
     #    -1./32.*o*x12+1./16.*x12*x2z-1./32.*x12*ux+3./32.*
     #    x12s)
      zz10s= zz10s+bxpi*rl1*vvs*cqti*vet*vdt*y*(3./
     #    64.*o*x12+1./64.*o*x2z-1./64.*o*ux-1./64.*os-1./32.*
     #    x12*x2z+1./64.*x12*ux+1./64.*x2z-1./32.*x12s)
      zz10s= zz10s+bxpi*rl1*vvs*cqti*vdt*y*(7./16.
     #    +5./16.*zi*o*x12*ux-11./16.*zi*o*x12-1./4.*
     #    zi*o*ux+1./16.*zi*o*uxs+13./16.*zi*o+3./
     #    8.*zi*os*x12+5./16.*zi*os*ux-9./16.*zi*os
     #    +3./8.*zi*oc-3./16.*zi*x12*ux+1./16.*zi*
     #    x12*uxs+3./8.*zi*x12+3./16.*zi*ux-1./4.*
     #    zi*x12s-7./16.*zi-1./16.*o*x12-3./16.*o*x2z
     #    +1./4.*o*ux-1./4.*o+3./8.*os+1./16.*x12*x2z+1./16.*
     #    x12*ux-3./16.*x12-1./16.*ux+1./16.*x12s)
      zz10s= zz10s+bxpi*rl3*vvc*gtm2*csti*vdt*ys*(3.
     #    /32.*o*x12*x2z-1./4.*o*x12-1./8.*o*x2z*ux+1./16.*o*ux
     #    +3./32.*o*x2zs+1./32.*o*uxs+1./16.*o+1./32.*os*x12-
     #    3./32.*os*x2z+1./32.*os*ux+1./16.*os-1./32.*x12*x2z*ux
     #    +3./16.*x12*x2z-1./16.*x12*ux-1./32.*x12*x2zs+1./32.*
     #    x12*uxs-1./8.*x12+1./32.*x2z*ux-1./16.*x2z*x12s-1./4.
     #    *x2z-1./32.*ux*x12s+1./16.*ux+1./16.*x12s-1./32.*x12c
     #    )
      zz10s= zz10s+bxpi*vvs*gtm2*pwsm2*cqti*vdt*vut*y*
     #  zxi*(-5./64.*o*x12*ux+11./32.*o*x12-5./64.*o*ux+3./64.
     #    *o*uxs-5./32.*o-3./32.*os*x12+11./64.*os*ux-5./32.*os
     #    +5./32.*oc+7./64.*x12*ux-1./64.*x12*uxs-1./16.*x12-
     #    1./32.*ux)
      zz10s= zz10s+bxpi*vvs*gtm2*pwsm2*cqti*vdt*vut*y
     # *(-9./64.*o*x12-3./64.*o*x2z+3./32.*o*ux+1./8.*os+3.
     #    /64.*x12*x2z-3./64.*x12*ux-1./32.*x12-1./32.*x2z+1./
     #    64.*ux+3./64.*x12s)
      zz10s= zz10s+bxpi*vvs*gtm2*pwsm2*cqti*vdts*y
     # *(3./64.*o*x12+1./64.*o*x2z-1./64.*o*ux-1./64.*os-1./
     #    32.*x12*x2z+1./64.*x12*ux+1./16.*x12+1./64.*x2z-1./32.
     #    *x12s)
      zz10s= zz10s+rl1*vvs*cqti*vet*vdt*y*bxp*(1./
     #    64.-1./64.*o-3./64.*x12)
      zz10s= zz10s+rl1*vvs*cqti*vet*vdt*y*(-1./
     #    64.+1./64.*o*x2z-1./64.*o*ux-1./64.*o+1./32.*x12*x2z
     #    -1./64.*x12*ux+3./64.*x12-1./64.*x2z+1./32.*x12s)
      zz10s= zz10s+rl1*vvs*cqti*vdt*bxps*y*(1./8.*
     #    zi)
      zz10s= zz10s+rl1*vvs*cqti*vdt*y*bxp*(1./4.+
     #    1./2.*zi*o+1./8.*zi*ux-1./2.*zi)
      zz10s= zz10s+rl1*vvs*cqti*vdt*y*(-5./8.+
     #    3./8.*zi*o*x12+3./16.*zi*o*ux-21./16.*zi*o
     #    +1./2.*zi*os+1./16.*zi*x12*ux-5./16.*zi*
     #    x12-5./16.*zi*ux+1./4.*zi*x12s+13./16.*
     #    zi+7./16.*o-1./16.*x12-1./8.*x2z+1./8.*ux)
      zz10s= zz10s+rl3*vvc*gtm2*csti*vdt*bxps*ys*(1.
     #    /16.)
      zz10s= zz10s+rl3*vvc*gtm2*csti*vdt*ys*bxp*(
     #    -5./32.+5./32.*o-1./32.*x12-1./8.*x2z+1./16.*ux)
      zz10s= zz10s+rl3*vvc*gtm2*csti*vdt*ys*(1./8.
     #    -3./16.*o*x2z+1./16.*o*ux-3./32.*o+1./32.*os+1./32.
     #    *x12*x2z+1./32.*x12-1./16.*x2z*ux+9./32.*x2z-3./32.*
     #    ux+3./32.*x12s+1./16.*x2zs)
      zz10s= zz10s+vvs*gtm2*pwsm2*cqti*vdt*vut*y*bxp*
     #  zxi*(-1./64.-1./64.*o+1./64.*x12)
      zz10s= zz10s+vvs*gtm2*pwsm2*cqti*vdt*vut*y*zxi
     # *(1./16.-9./64.*o*x12-1./32.*o*ux+5./32.*o-1./64.*os
     #    -1./32.*x12*ux-1./16.*x12+1./64.*ux)
      zz10s= zz10s+vvs*gtm2*pwsm2*cqti*vdt*vut*y*(
     #    -1./64.+1./32.*o+3./64.*x12)
      zz10s= zz10s+vvs*gtm2*pwsm2*cqti*vdts*y*bxp*(
     #    1./64.)
      zz10s= zz10s+vvs*gtm2*pwsm2*cqti*vdts*y*(-
     #    1./64.-1./64.*o-3./64.*x12-1./64.*x2z)
*
      zz20s= xx*rl1*vvs*cqti*vdt*y*(3./4.-3./4.*
     #    zi*o*x12*ux-9./4.*zi*o*x12+3./8.*zi*o*ux
     #    +9./4.*zi*o*x12s-3./8.*zi*o*uxs+3./2.*zi
     #    *o+3./4.*zi*os*x12-3./2.*zi*os*ux+3./8.*
     #    zi*os-3./2.*zi*oc-3./8.*zi*x12*uxs+9./8.
     #    *zi*x12+3./4.*zi*ux*x12s+3./8.*zi*ux-3./
     #    2.*zi*x12s-3./4.*zi+9./8.*o*x12+3./8.*o*x2z
     #    -3./4.*o*ux-3./4.*o-9./8.*os-3./8.*x12*x2z-3./8.*
     #    x12*ux-3./8.*x12+3./4.*x2z-3./8.*ux+9./8.*x12s)
      zz20s= zz20s+xx*rl3*vvc*gtm2*csti*vdt*ys*(
     #    -9./16.*o*x12*x2z+3./16.*o*x12*ux+3./8.*o*x2z*ux+3./
     #    16.*o*x2z-3./16.*o*x2zs-3./16.*o*uxs+3./8.*os*x12+3./
     #    8.*os*x2z-3./8.*os*ux-3./16.*oc+3./16.*x12*x2z*ux-3./
     #    8.*x12*x2z+3./16.*x12*x2zs-3./16.*x12*uxs+3./16.*x2z*ux
     #    -3./8.*x2z*x12s+9./16.*ux*x12s-9./16.*x12c-3./8.*x2zs
     #    )
      zz20s= zz20s+xx*vvs*gtm2*pwsm2*cqti*vdt*vut*y*
     #  zxi*(9./16.*o*x12*ux-9./32.*o*x12-3./32.*o*ux-3./32.*o*
     #    uxs+15./16.*os*x12-3./8.*os*ux-9./32.*os-3./8.*oc-3.
     #    /32.*x12*ux+3./32.*x12*uxs)
      zz20s= zz20s+xx*vvs*gtm2*pwsm2*cqti*vdt*vut*y
     # *(27./32.*o*x12+3./32.*o*x2z-3./16.*o*ux-9./32.*o-9./
     #    32.*os-9./32.*x12*x2z+9./32.*x12*ux+3./16.*x2z-3./32.
     #    *ux-9./32.*x12s)
      zz20s= zz20s+xx*vvs*gtm2*pwsm2*cqti*vdts*y*(
     #    -3./32.*o*x12+3./16.*x12*x2z-3./32.*x12*ux+9./32.*
     #    x12s)
      zz20s= zz20s+bxpi*rl1*vvs*cqti*vet*vdt*y*(7./
     #    64.*o*x12+1./64.*o*x2z-1./64.*o*ux-1./64.*os-3./32.*
     #    x12*x2z+3./64.*x12*ux+3./64.*x2z-3./32.*x12s)
      zz20s= zz20s+bxpi*rl1*vvs*cqti*vdt*y*(21./16.
     #    +15./16.*zi*o*x12*ux-33./16.*zi*o*x12-3./4.*
     #    zi*o*ux+3./16.*zi*o*uxs+39./16.*zi*o+9./
     #    8.*zi*os*x12+15./16.*zi*os*ux-27./16.*zi*
     #    os+9./8.*zi*oc-9./16.*zi*x12*ux+3./16.*
     #    zi*x12*uxs+9./8.*zi*x12+9./16.*zi*ux-3./
     #    4.*zi*x12s-21./16.*zi-1./16.*o*x12-7./16.*o*
     #    x2z+5./8.*o*ux-3./4.*o+os+3./16.*x12*x2z+3./16.*x12
     #    *ux-9./16.*x12-3./16.*ux+3./16.*x12s)
      zz20s= zz20s+bxpi*rl3*vvc*gtm2*csti*vdt*ys*(5.
     #    /32.*o*x12*x2z+1./16.*o*x12*ux-11./16.*o*x12-5./16.*o*
     #    x2z*ux+1./16.*o*x2z+1./8.*o*ux-1./16.*o*x12s+7./32.*o
     #    *x2zs+3./32.*o*uxs+3./16.*o+3./32.*os*x12-9./32.*os*
     #    x2z+5./32.*os*ux+1./8.*os+1./16.*oc-3./32.*x12*x2z*ux
     #    +9./16.*x12*x2z-3./16.*x12*ux-3./32.*x12*x2zs+3./32.*
     #    x12*uxs-3./8.*x12+3./32.*x2z*ux-3./16.*x2z*x12s-3./4.
     #    *x2z-3./32.*ux*x12s+3./16.*ux+3./16.*x12s-3./32.*x12c
     #    )
      zz20s= zz20s+bxpi*vvs*gtm2*pwsm2*cqti*vdt*vut*y*
     #  zxi*(-15./64.*o*x12*ux+33./32.*o*x12-15./64.*o*ux+7./
     #    64.*o*uxs-15./32.*o-9./32.*os*x12+27./64.*os*ux-15./
     #    32.*os+13./32.*oc+21./64.*x12*ux-3./64.*x12*uxs-3./16.
     #    *x12-3./32.*ux)
      zz20s= zz20s+bxpi*vvs*gtm2*pwsm2*cqti*vdt*vut*y
     # *(-25./64.*o*x12-7./64.*o*x2z+7./32.*o*ux+5./16.*os
     #    +9./64.*x12*x2z-9./64.*x12*ux-3./32.*x12-3./32.*x2z
     #    +3./64.*ux+9./64.*x12s)
      zz20s= zz20s+bxpi*vvs*gtm2*pwsm2*cqti*vdts*y
     # *(1./8.*o*x12+1./32.*o*x2z-1./32.*o*ux-1./32.*os-3./
     #    32.*x12*x2z+3./64.*x12*ux+3./16.*x12+3./64.*x2z-3./32.
     #    *x12s)
      zz20s= zz20s+rl1*vvs*cqti*vet*vdt*y*bxp*(1./
     #    64.-1./64.*o-3./64.*x12)
      zz20s= zz20s+rl1*vvs*cqti*vet*vdt*y*(-3./
     #    64.+1./64.*o*x2z-1./64.*o*ux-1./64.*o+1./32.*x12*x2z
     #    -1./64.*x12*ux+7./64.*x12-1./64.*x2z+1./32.*x12s)
      zz20s= zz20s+rl1*vvs*cqti*vdt*bxps*y*(1./8.*
     #    zi)
      zz20s= zz20s+rl1*vvs*cqti*vdt*y*bxp*(1./4.+
     #    1./2.*zi*o+1./8.*zi*ux-3./4.*zi)
      zz20s= zz20s+rl1*vvs*cqti*vdt*y*(-11./8.
     #    +9./8.*zi*o*x12+5./16.*zi*o*ux-43./16.*
     #    zi*o+3./4.*zi*os+3./16.*zi*x12*ux-15./16.
     #    *zi*x12-11./16.*zi*ux+3./4.*zi*x12s+31./
     #    16.*zi+9./16.*o+1./16.*x12-1./8.*x2z+1./8.*ux)
      zz20s= zz20s+rl3*vvc*gtm2*csti*vdt*bxps*ys*(1.
     #    /16.)
      zz20s= zz20s+rl3*vvc*gtm2*csti*vdt*ys*bxp*(
     #    -9./32.+5./32.*o-1./32.*x12-1./8.*x2z+1./16.*ux)
      zz20s= zz20s+rl3*vvc*gtm2*csti*vdt*ys*(3./8.
     #    +1./4.*o*x12-1./4.*o*x2z+1./8.*o*ux-11./32.*o+3./32.
     #    *os-1./32.*x12*x2z+1./16.*x12*ux+1./32.*x12-1./16.*
     #    x2z*ux+21./32.*x2z-9./32.*ux+9./32.*x12s+1./16.*x2zs
     #    )
      zz20s= zz20s+vvs*gtm2*pwsm2*cqti*vdt*vut*y*bxp*
     #  zxi*(-5./64.-1./64.*o+5./64.*x12)
      zz20s= zz20s+vvs*gtm2*pwsm2*cqti*vdt*vut*y*zxi
     # *(3./16.-33./64.*o*x12-1./32.*o*ux+15./32.*o-1./64.*
     #    os-1./8.*x12*ux-1./8.*x12+3./64.*ux)
      zz20s= zz20s+vvs*gtm2*pwsm2*cqti*vdt*vut*y*(
     #    -1./64.+1./32.*o+5./64.*x12)
      zz20s= zz20s+vvs*gtm2*pwsm2*cqti*vdts*y*bxp*(
     #    1./64.)
      zz20s= zz20s+vvs*gtm2*pwsm2*cqti*vdts*y*(-
     #    3./64.-1./64.*o-7./64.*x12-1./64.*x2z)
*
      zz30s= bxpi*rl1*vvs*cqti*vet*vdt*y*(1./64.*o*x12-
     #    1./64.*o*x2z+1./64.*o*ux+1./64.*os-5./64.*x12*x2z+3./
     #    64.*x12*ux+3./64.*x2z-3./32.*x12s)
      zz30s= zz30s+bxpi*rl1*vvs*cqti*vdt*y*(1./2.
     #    -1./2.*zi*o*x12-1./4.*zi*o*ux+zi*o-1./
     #    2.*zi*os-1./4.*zi*x12*ux+1./2.*zi*x12+1./
     #    4.*zi*ux-1./2.*zi-1./2.*o+1./4.*x2z-1./4.*
     #    ux)
      zz30s= zz30s+bxpi*rl2*vvs*pwsc*cqti*vet*vdt*y
     # *(1./64.*o*x12-1./64.*o*ux-1./64.*os+1./64.*x12*x2z-1.
     #    /64.*x12*ux-1./64.*x2z+1./32.*x12s)
      zz30s= zz30s+bxpi*rl2*vvs*pwsc*cqti*vdt*y*(
     #    -1./4.+1./2.*zi*o*x12+1./4.*zi*o*ux-1./2.*
     #    zi*o+1./2.*zi*os+1./4.*zi*x12*ux-3./4.*
     #    zi*x12+1./4.*zi+1./4.*o+1./2.*x12)
      zz30s= zz30s+bxpi*rl3*vvc*gtm2*csti*vdt*ys*(
     #    -3./32.*o*x12+3./32.*o*ux+3./32.*os-19./64.*x12*x2z
     #    +3./32.*x12*ux+1./8.*x2z*ux-1./32.*x2z-3./16.*x12s-
     #    1./8.*x2zs)
      zz30s= zz30s+bxpi*vvs*gs*gtc*pws*pwt*cqti*vet*
     #  vdt*y*(1./128.*o*x12-1./128.*o*ux-1./128.*os+1./128.*
     #    x12*x2z-1./128.*x12*ux-1./128.*x2z+1./64.*x12s)
      zz30s= zz30s+bxpi*vvs*gs*gtc*pws*pwt*cqti*vdt*y
     # *(-1./8.+1./4.*zi*o*x12+1./8.*zi*o*ux-1./4.
     #    *zi*o+1./4.*zi*os+1./8.*zi*x12*ux-3./8.*
     #    zi*x12+1./8.*zi+1./8.*o+1./4.*x12)
      zz30s= zz30s+bxpi*vvs*gtm2*pwsm2*cqti*vdt*vut*y*
     #  zxi*(3./128.*o*x12+1./32.*o*ux-1./128.*o+5./64.*os+1./
     #    128.*x12*ux-1./128.*x12+1./64.*x12s)
      zz30s= zz30s+bxpi*vvs*gtm2*pwsm2*cqti*vdt*vut*y
     # *(-1./128.+3./64.*o+1./32.*x12)
      zz30s= zz30s+bxpi*vvs*gtm2*pwsm2*cqti*vdts*y
     # *(1./32.*o+1./32.*x12+1./32.*x2z)
      zz30s= zz30s+rl1*vvs*cqti*vet*vdt*y*bxp*(1./
     #    32.-3./64.*o-3./32.*x12)
      zz30s= zz30s+rl1*vvs*cqti*vet*vdt*y*(-3./
     #    64.+1./64.*o*x12+1./32.*o*x2z-1./32.*o*ux+5./128.*o
     #    -3./128.*os+1./16.*x12*x2z-1./32.*x12*ux+15./128.*x12
     #    -1./32.*x2z+9./128.*x12s)
      zz30s= zz30s+rl1*vvs*cqti*vdt*bxps*y*(1./8.*
     #    zi)
      zz30s= zz30s+rl1*vvs*cqti*vdt*y*bxp*(1./4.+
     #    1./2.*zi*o+1./4.*zi*x12+1./8.*zi*ux-5./8.
     #    *zi)
      zz30s= zz30s+rl1*vvs*cqti*vdt*y*(-3./4.+
     #    1./2.*zi*o*x12+1./4.*zi*o*ux-3./2.*zi*o+
     #    1./2.*zi*os+1./4.*zi*x12*ux-3./4.*zi*x12
     #    -3./8.*zi*ux+zi+3./8.*o+1./8.*x12-1./8.*
     #    x2z+1./8.*ux)
      zz30s= zz30s+rl2*vvs*pwsc*cqti*vet*vdt*y*bxp
     # *(1./128.+1./32.*o+1./32.*x12)
      zz30s= zz30s+rl2*vvs*pwsc*cqti*vet*vdt*y*(1./
     #    64.-1./128.*o*ux-3./128.*o-1./128.*os+1./128.*x12*x2z
     #    -1./128.*x12*ux-7./128.*x12-1./128.*x2z+1./128.*x12s
     #    )
      zz30s= zz30s+rl2*vvs*pwsc*cqti*vdt*y*bxp*(-
     #    1./4.*zi*o-1./2.*zi*x12+1./4.*zi)
      zz30s= zz30s+rl2*vvs*pwsc*cqti*vdt*y*(1./4.
     #    -1./2.*zi*o*x12-1./4.*zi*o*ux+3./4.*zi*o
     #    -1./2.*zi*os-1./4.*zi*x12*ux+5./4.*zi*
     #    x12-1./2.*zi-1./4.*o-1./2.*x12)
      zz30s= zz30s+rl3*vvc*gtm2*csti*vdt*bxps*ys*(1.
     #    /16.)
      zz30s= zz30s+rl3*vvc*gtm2*csti*vdt*ys*bxp*(
     #    -9./64.+1./64.*o-1./8.*x12-1./8.*x2z+1./16.*ux)
      zz30s= zz30s+rl3*vvc*gtm2*csti*vdt*ys*(1./32.
     #    +5./64.*o*x12-3./128.*o*x2z+1./64.*o*ux-3./64.*o+1./
     #    128.*os+5./32.*x12*x2z+1./64.*x12*ux+7./32.*x12-1./16.
     #    *x2z*ux+17./64.*x2z-1./8.*ux+9./128.*x12s+1./16.*x2zs
     #    )
      zz30s= zz30s+vvs*gs*gtc*pws*pwt*cqti*vet*vdt*y*
     #  bxp*(1./256.+1./64.*o+1./64.*x12)
      zz30s= zz30s+vvs*gs*gtc*pws*pwt*cqti*vet*vdt*y
     # *(1./128.-1./256.*o*ux-3./256.*o-1./256.*os+1./256.*
     #    x12*x2z-1./256.*x12*ux-7./256.*x12-1./256.*x2z+1./256.
     #    *x12s)
      zz30s= zz30s+vvs*gs*gtc*pws*pwt*cqti*vdt*y*bxp
     # *(-1./8.*zi*o-1./4.*zi*x12+1./8.*zi)
      zz30s= zz30s+vvs*gs*gtc*pws*pwt*cqti*vdt*y*(
     #    1./8.-1./4.*zi*o*x12-1./8.*zi*o*ux+3./8.*
     #    zi*o-1./4.*zi*os-1./8.*zi*x12*ux+5./8.*
     #    zi*x12-1./4.*zi-1./8.*o-1./4.*x12)
      zz30s= zz30s+vvs*gtm2*pwsm2*cqti*vdt*vut*y*bxp*
     #  zxi*(-1./256.+5./256.*o+7./256.*x12)
      zz30s= zz30s+vvs*gtm2*pwsm2*cqti*vdt*vut*y*zxi
     # *(1./128.-1./64.*o*x12-1./256.*o*ux-3./64.*o-1./32.*
     #    os-1./256.*x12*ux-5./128.*x12-1./128.*x12s)
      zz30s= zz30s+vvs*gtm2*pwsm2*cqti*vdt*vut*y*(
     #    1./256.-3./256.*o-1./64.*x12)
      zz30s= zz30s+vvs*gtm2*pwsm2*cqti*vdts*y*bxp*(
     #    1./64.)
      zz30s= zz30s+vvs*gtm2*pwsm2*cqti*vdts*y*(-
     #    1./32.-1./64.*o-1./64.*x12-1./64.*x2z)
      zz30s= zz30s+re(gs*gtc*pws*pwt)*bxpi*vvs*cqti*
    #  vet*vdt*y*(-1./64.*o*x12+1./64.*o*ux+1./64.*os-1./64.
     #    *x12*x2z+1./64.*x12*ux+1./64.*x2z-1./32.*x12s)
      zz30s= zz30s+re(gs*gtc*pws*pwt)*bxpi*vvs*cqti*
     #  vdt*y*(1./4.-1./2.*zi*o*x12-1./4.*zi*o*ux+1./
     #    2.*zi*o-1./2.*zi*os-1./4.*zi*x12*ux+3./4.
     #    *zi*x12-1./4.*zi-1./4.*o-1./2.*x12)
      zz30s= zz30s+re(gs*gtc*pws*pwt)*vvs*cqti*vet*
     #  vdt*y*bxp*(-1./128.-1./32.*o-1./32.*x12)
      zz30s= zz30s+re(gs*gtc*pws*pwt)*vvs*cqti*vet*
     #  vdt*y*(-1./64.+1./128.*o*ux+3./128.*o+1./128.*os-1./
     #    128.*x12*x2z+1./128.*x12*ux+7./128.*x12+1./128.*x2z-1.
     #    /128.*x12s)
      zz30s= zz30s+re(gs*gtc*pws*pwt)*vvs*cqti*vdt*y*
     #  bxp*(1./4.*zi*o+1./2.*zi*x12-1./4.*zi)
      zz30s= zz30s+re(gs*gtc*pws*pwt)*vvs*cqti*vdt*y
     # *(-1./4.+1./2.*zi*o*x12+1./4.*zi*o*ux-3./4.
     #    *zi*o+1./2.*zi*os+1./4.*zi*x12*ux-5./4.*
     #    zi*x12+1./2.*zi+1./4.*o+1./2.*x12)
*
      zz40s= xx*rl1*vvs*cqti*vet*vdt*y*(3./32.*o*x12+1.
     #    /32.*o*x2z-1./32.*o*ux-1./32.*os-1./16.*x12*x2z+1./32.
     #    *x12*ux+1./32.*x2z-1./16.*x12s)
      zz40s= zz40s+xx*rl1*vvs*cqti*vdt*y*(1./8.+
     #    5./8.*zi*o*x12*ux-7./8.*zi*o*x12-1./2.*zi*
     #    o*ux+1./8.*zi*o*uxs+5./8.*zi*o+3./4.*zi*
     #    os*x12+5./8.*zi*os*ux-9./8.*zi*os+3./4.*
     #    zi*oc-3./8.*zi*x12*ux+1./8.*zi*x12*uxs+1.
     #    /4.*zi*x12+1./8.*zi*ux-1./8.*zi-1./8.*o*
     #    x12-3./8.*o*x2z+1./2.*o*ux-1./2.*o+3./4.*os+1./8.*
     #    x12*x2z+1./8.*x12*ux-1./8.*x12-1./8.*ux+1./8.*x12s)
      zz40s= zz40s+xx*rl3*vvc*gtm2*csti*vdt*ys*(3./
     #    16.*o*x12*x2z-3./16.*o*x12-1./4.*o*x2z*ux+1./16.*o*x2z
     #    +1./16.*o*ux+3./16.*o*x2zs+1./16.*o*uxs+1./16.*os*x12
     #    -3./16.*os*x2z+1./16.*os*ux+1./16.*os-1./16.*x12*x2z*
     #    ux+1./8.*x12*x2z-1./16.*x12*ux-1./16.*x12*x2zs+1./16.
     #    *x12*uxs+1./16.*x2z*ux-1./8.*x2z*x12s-1./16.*x2z-1./
     #    16.*ux*x12s+1./8.*x12s-1./16.*x12c)
      zz40s= zz40s+xx*vvs*gtm2*pwsm2*cqti*vdt*vut*y*
     #  zxi*(-5./32.*o*x12*ux+1./16.*o*x12+1./32.*o*ux+3./32.
     #    *o*uxs-3./16.*os*x12+11./32.*os*ux+1./16.*os+5./16.*
     #    oc+1./32.*x12*ux-1./32.*x12*uxs)
      zz40s= zz40s+xx*vvs*gtm2*pwsm2*cqti*vdt*vut*y
     # *(-9./32.*o*x12-3./32.*o*x2z+3./16.*o*ux+1./16.*o+1.
     #    /4.*os+3./32.*x12*x2z-3./32.*x12*ux-1./16.*x2z+1./32.
     #    *ux+3./32.*x12s)
      zz40s= zz40s+xx*vvs*gtm2*pwsm2*cqti*vdts*y*(
     #    3./32.*o*x12+1./32.*o*x2z-1./32.*o*ux-1./32.*os-1./16.
     #    *x12*x2z+1./32.*x12*ux+1./32.*x2z-1./16.*x12s)
      zz40s= zz40s+bxpi*rl1*vvs*cqti*vet*vdt*y*(1./
     #    32.-1./16.*o*x12-1./16.*o*x2z+1./16.*o*ux+1./16.*os
     #    -1./16.*x12)
      zz40s= zz40s+bxpi*rl1*vvs*cqti*vdt*y*(-1./4.
     #    *zi*o*x12-1./8.*zi*o*ux+3./8.*zi*o-1./4.
     #    *zi*os-1./8.*zi*x12*ux+1./8.*zi*x12+1./8.
     #    *zi*ux-1./8.*zi+1./4.*o*x12+1./4.*o*x2z-1./
     #    4.*o*ux-1./8.*o-1./4.*os+1./8.*x12)
      zz40s= zz40s+bxpi*rl3*vvc*gtm2*csti*vdt*ys*(
     #    -1./16.-1./4.*o*x12*x2z+1./8.*o*x12*ux+1./4.*o*x12+
     #    1./8.*o*x2z*ux+5./16.*o*x2z-5./16.*o*ux-1./8.*o*x12s-
     #    1./8.*o*x2zs+1./8.*o+1./8.*os*ux-5./16.*os+1./8.*oc
     #    -3./16.*x12*x2z+1./8.*x12+1./16.*x2z+1./16.*ux-3./
     #    16.*x12s)
      zz40s= zz40s+bxpi*vvs*gtm2*pwsm2*cqti*vdt*vut*y*
     #  zxi*(-1./4.*o*x12+9./32.*o*ux-1./16.*o*uxs+1./8.*o-
     #    3./16.*os*ux+1./2.*os-1./8.*oc-3./32.*x12*ux+1./16.*
     #    x12+1./32.*ux)
      zz40s= zz40s+bxpi*vvs*gtm2*pwsm2*cqti*vdt*vut*y
     # *(1./16.*o*x12+1./16.*o*x2z-1./8.*o*ux+3./32.*o-1./8.
     #    *os+1./32.*x12)
      zz40s= zz40s+bxpi*vvs*gtm2*pwsm2*cqti*vdts*y
     # *(1./32.-1./32.*o*x12-1./32.*o*x2z+1./32.*o*ux+1./32.
     #    *os-1./16.*x12)
      zz40s= zz40s+rl1*vvs*cqti*vet*vdt*y*(-1./
     #    32.+1./16.*x12)
      zz40s= zz40s+rl1*vvs*cqti*vdt*y*(1./4.*
     #    zi*o*x12+1./8.*zi*o*ux-3./8.*zi*o+1./4.*
     #    zi*os+1./8.*zi*x12*ux-1./8.*zi*x12-1./8.
     #    *zi*ux+1./8.*zi+1./8.*o-1./8.*x12)
      zz40s= zz40s+rl3*vvc*gtm2*csti*vdt*ys*bxp*(1./
     #    16.-1./8.*x12)
      zz40s= zz40s+rl3*vvc*gtm2*csti*vdt*ys*(-1./
     #    16.*o*x2z+1./16.*o*ux-1./8.*o+1./16.*os+3./16.*x12*
     #    x2z-1./16.*x2z-1./16.*ux+3./16.*x12s)
      zz40s= zz40s+vvs*gtm2*pwsm2*cqti*vdt*vut*y*bxp*
     #  zxi*(1./16.+1./16.*o-1./16.*x12)
      zz40s= zz40s+vvs*gtm2*pwsm2*cqti*vdt*vut*y*zxi
     # *(-1./16.+1./4.*o*x12-3./32.*o*ux-5./16.*o-1./4.*os
     #    +3./32.*x12*ux-1./32.*ux)
      zz40s= zz40s+vvs*gtm2*pwsm2*cqti*vdt*vut*y*(
     #    -1./32.*o-1./32.*x12)
      zz40s= zz40s+vvs*gtm2*pwsm2*cqti*vdts*y*(-
     #    1./32.+1./16.*x12)
*
      zz10c= rs1wz(1)*xx*vvc*gtm2*csti*vdt*ys*(-3./8.*
     #    o*x12*x2z+1./8.*o*x12*ux+1./4.*o*x2z*ux+1./8.*o*x2z-1.
     #    /8.*o*x2zs-1./8.*o*uxs+1./4.*os*x12+1./4.*os*x2z-1./4.
     #    *os*ux-1./8.*oc+1./8.*x12*x2z*ux-1./4.*x12*x2z+1./8.*
     #    x12*x2zs-1./8.*x12*uxs+1./8.*x2z*ux-1./4.*x2z*x12s+3./
     #    8.*ux*x12s-3./8.*x12c-1./4.*x2zs)
      zz10c= zz10c+rs1wz(1)*bxpi*vvc*gtm2*csti*vdt*ys
     # *(3./16.*o*x12*x2z-1./2.*o*x12-1./4.*o*x2z*ux+1./8.*o*
     #    ux+3./16.*o*x2zs+1./16.*o*uxs+1./8.*o+1./16.*os*x12
     #    -3./16.*os*x2z+1./16.*os*ux+1./8.*os-1./16.*x12*x2z*
     #    ux+3./8.*x12*x2z-1./8.*x12*ux-1./16.*x12*x2zs+1./16.*
     #    x12*uxs-1./4.*x12+1./16.*x2z*ux-1./8.*x2z*x12s-1./2.*
     #    x2z-1./16.*ux*x12s+1./8.*ux+1./8.*x12s-1./16.*x12c)
      zz10c= zz10c+rs1wz(1)*vvc*gtm2*csti*vdt*bxps*ys
     # *(1./8.)
      zz10c= zz10c+rs1wz(1)*vvc*gtm2*csti*vdt*ys*bxp
     # *(-5./16.+5./16.*o-1./16.*x12-1./4.*x2z+1./8.*ux)
      zz10c= zz10c+rs1wz(1)*vvc*gtm2*csti*vdt*ys*(
     #    1./4.-3./8.*o*x2z+1./8.*o*ux-3./16.*o+1./16.*os+1./
     #    16.*x12*x2z+1./16.*x12-1./8.*x2z*ux+9./16.*x2z-3./16.
     #    *ux+3./16.*x12s+1./8.*x2zs)
      zz10c= zz10c+rs1wz(4)*xx*vvc*gtm2*csti*vdt*ys
     # *(-1./16.*o*x12*x2z*ux+1./32.*o*x12*x2zs+1./16.*o*x2z*
     #    x12s+1./32.*o*x2z*uxs-1./32.*o*ux*x2zs+1./32.*o*x2zs-
     #    1./32.*os*x12*x2z+1./32.*os*x2z*ux-1./32.*os*x2zs+1./32.
     #    *x12*x2z*uxs-1./16.*x12*ux*x2zs+1./32.*x12*x2zc+1./32.*
     #    x12*x2zs-3./32.*x2z*ux*x12s+3./32.*x2z*x12c-1./32.*ux*
     #    x2zs+1./8.*x12s*x2zs+1./32.*x2zc)
      zz10c= zz10c+rs1wz(4)*bxpi*vvc*gtm2*csti*vdt*ys
     # *(3./32.*o*x12*x2z*ux+1./32.*o*x12*x2z-1./16.*o*x12*ux-
     #    1./32.*o*x12*x2zs-1./32.*o*x12*uxs-1./64.*o*x2z*ux-7./
     #    64.*o*x2z*x12s-1./32.*o*x2z*uxs+1./16.*o*x2z+5./64.*o*
     #    ux*x12s+1./32.*o*ux*x2zs+1./16.*o*x12s-5./64.*o*x12c-
     #    1./16.*o*x2zs+1./32.*o*uxs+1./32.*os*x12*x2z+1./64.*os*
     #    x12*ux-1./32.*os*x12-1./64.*os*x2z*ux-5./64.*os*x2z+1.
     #    /32.*os*ux-1./64.*os*x12s+1./32.*os*x2zs-1./64.*os*uxs
     #    +1./64.*oc*x12+1./64.*oc*x2z-1./64.*oc*ux-3./64.*x12*
     #    x2z*ux-1./32.*x12*x2z*uxs+1./16.*x12*x2z+1./16.*x12*ux*
     #    x2zs-3./64.*x12*x12c-1./32.*x12*x2zc+3./64.*x12*x2zs+
     #    1./32.*x12*uxs+7./64.*x2z*ux*x12s-1./16.*x2z*ux+11./64.
     #    *x2z*x12s-1./8.*x2z*x12c-3./32.*ux*x12s+3./64.*ux*x12c
     #    -7./64.*x12s*x2zs-1./64.*x12s*uxs+3./32.*x12c+3./32.*
     #    x2zs)
      zz10c= zz10c+rs1wz(4)*vvc*gtm2*csti*vdt*bxps*ys
     # *(-1./32.+1./32.*o+1./32.*x12)
      zz10c= zz10c+rs1wz(4)*vvc*gtm2*csti*vdt*ys*bxp
     # *(1./32.-1./32.*o*x12-1./16.*o*x2z+1./32.*o*ux-1./32.
     #    *o+1./64.*os-1./16.*x12*x2z+1./32.*x12*ux+1./32.*x12
     #    +3./32.*x2z-1./32.*ux-3./64.*x12s)
      zz10c= zz10c+rs1wz(4)*vvc*gtm2*csti*vdt*ys*(
     #    1./64.*o*x12*x2z-1./32.*o*x2z*ux+1./16.*o*x2z-1./64.*o*
     #    ux+3./64.*o*x12s+1./32.*o*x2zs-1./32.*o-1./64.*os*x2z
     #    +3./64.*os-1./64.*oc-1./32.*x12*x2z*ux-5./64.*x12*x2z
     #    -1./64.*x12*ux+1./32.*x12*x2zs-1./32.*x12+1./16.*x2z*
     #    ux+1./32.*x2z*x12s-3./32.*x2z+1./32.*ux-3./64.*x12s
     #    +1./32.*x12c-3./32.*x2zs)
      zz10c= zz10c+rs1wz(7)*xx*vvc*gtm2*csti*vdt*ys
     # *(-1./64.*o*x12*x2zs+1./64.*o*x2z*x12s-1./64.*o*x2z*uxs
     #    +1./32.*o*ux*x2zs-1./64.*o*x2zc+1./32.*o*x2zs+1./64.*
     #    os*x12*x2z-1./32.*os*x2z*ux+1./64.*os*x2zs-1./64.*oc*
     #    x2z-1./64.*x12*x2z*uxs+1./64.*x12*ux*x2zs+1./64.*x12*
     #    x2zc-1./16.*x12*x2zs+1./32.*x2z*ux*x12s-1./64.*x2z*x12c
     #    +1./64.*ux*x2zs-1./32.*x2zc)
      zz10c= zz10c+rs1wz(7)*bxpi*vvc*gtm2*csti*vdt*ys
     # *(-1./32.*o*x12*x2z*ux+1./64.*o*x12*x2z+3./128.*o*x12*
     #    x2zs+1./64.*o*x12*uxs+3./128.*o*x2z*ux+1./64.*o*x2z*uxs
     #    +1./16.*o*x2z-1./64.*o*ux*x12s-5./128.*o*ux*x2zs+1./
     #    64.*o*x12s+3./128.*o*x2zc-1./64.*o*x2zs-1./64.*o*uxs-
     #    1./64.*os*x12*x2z+1./64.*os*x12*ux+1./64.*os*x12+1./128.
     #    *os*x2z*ux-1./64.*os*x2z-1./32.*os*ux-1./64.*os*x12s-
     #    1./128.*os*x2zs+1./128.*os*uxs+1./64.*oc*ux-1./64.*oc
     #    +1./128.*oq+1./128.*x12*x2z*ux+1./64.*x12*x2z*uxs-1./
     #    8.*x12*x2z-3./128.*x12*ux*x2zs+1./128.*x12*x12c+9./128.
     #    *x12*x2zs-1./64.*x12*uxs-5./128.*x2z*ux*x12s+1./32.*x2z
     #    *ux+1./16.*x2z*x12s+1./64.*x2z*x12c+1./32.*ux*x12s-1./
     #    64.*ux*x12c+1./128.*x12s*x2zs+1./128.*x12s*uxs-1./64.*
     #    x12c+1./128.*x2zc-5./64.*x2zs)
      zz10c= zz10c+rs1wz(7)*vvc*gtm2*csti*vdt*bxps*ys
     # *(1./64.-1./64.*o-1./64.*x12)
      zz10c= zz10c+rs1wz(7)*vvc*gtm2*csti*vdt*ys*bxp
     # *(-1./64.+3./64.*o*x12+3./64.*o*x2z-1./64.*o*ux+3./
     #    128.*o-1./128.*os+3./64.*x12*x2z-1./64.*x12*ux-5./128.
     #    *x12-7./128.*x2z+1./64.*ux+7./128.*x12s)
      zz10c= zz10c+rs1wz(7)*vvc*gtm2*csti*vdt*ys*(
     #    -7./128.*o*x12*x2z+1./64.*o*x12*ux-1./32.*o*x12+3./
     #    128.*o*x2z*ux-7./128.*o*x2z+1./128.*o*ux-5./128.*o*x2zs
     #    -1./32.*o+1./128.*os*x2z+1./128.*os*ux+1./32.*os+3./
     #    128.*x12*x2z*ux+3./64.*x12*x2z+1./128.*x12*ux-3./64.*
     #    x12*x2zs+1./16.*x12-1./32.*x2z*ux-1./16.*x2z*x12s+1./
     #    16.*x2z+1./128.*ux*x12s-1./64.*ux-1./16.*x12s+1./16.*
     #    x2zs)
      zz10c= zz10c+rs1wz(10)*xx*vvc*gtm2*csti*vdt*ys
     # *(1./64.*o*x12*x2zs-1./64.*o*x2z*x12s+1./64.*o*x2z*uxs-
     #    1./32.*o*ux*x2zs+1./64.*o*x2zc-1./32.*o*x2zs-1./64.*os*
     #    x12*x2z+1./32.*os*x2z*ux-1./64.*os*x2zs+1./64.*oc*x2z
     #    +1./64.*x12*x2z*uxs-1./64.*x12*ux*x2zs-1./64.*x12*x2zc
     #    +1./16.*x12*x2zs-1./32.*x2z*ux*x12s+1./64.*x2z*x12c-1.
     #    /64.*ux*x2zs+1./32.*x2zc)
      zz10c= zz10c+rs1wz(10)*bxpi*vvc*gtm2*csti*vdt*ys
     # *(1./32.*o*x12*x2z*ux-1./64.*o*x12*x2z-3./128.*o*x12*x2zs
     #    -1./64.*o*x12*uxs-3./128.*o*x2z*ux-1./64.*o*x2z*uxs-1.
     #    /16.*o*x2z+1./64.*o*ux*x12s+5./128.*o*ux*x2zs-1./64.*o*
     #    x12s-3./128.*o*x2zc+1./64.*o*x2zs+1./64.*o*uxs+1./64.
     #    *os*x12*x2z-1./64.*os*x12*ux-1./64.*os*x12-1./128.*os*
     #    x2z*ux+1./64.*os*x2z+1./32.*os*ux+1./64.*os*x12s+1./
     #    128.*os*x2zs-1./128.*os*uxs-1./64.*oc*ux+1./64.*oc-1./
     #    128.*oq-1./128.*x12*x2z*ux-1./64.*x12*x2z*uxs+1./8.*x12
     #    *x2z+3./128.*x12*ux*x2zs-1./128.*x12*x12c-9./128.*x12*
     #    x2zs+1./64.*x12*uxs+5./128.*x2z*ux*x12s-1./32.*x2z*ux
     #    -1./16.*x2z*x12s-1./64.*x2z*x12c-1./32.*ux*x12s+1./64.
     #    *ux*x12c-1./128.*x12s*x2zs-1./128.*x12s*uxs+1./64.*x12c
     #    -1./128.*x2zc+5./64.*x2zs)
      zz10c= zz10c+rs1wz(10)*vvc*gtm2*csti*vdt*bxps*ys
     # *(-1./64.+1./64.*o+1./64.*x12)
      zz10c= zz10c+rs1wz(10)*vvc*gtm2*csti*vdt*ys*bxp
     # *(1./64.-3./64.*o*x12-3./64.*o*x2z+1./64.*o*ux-3./128.
     #    *o+1./128.*os-3./64.*x12*x2z+1./64.*x12*ux+5./128.*
     #    x12+7./128.*x2z-1./64.*ux-7./128.*x12s)
      zz10c= zz10c+rs1wz(10)*vvc*gtm2*csti*vdt*ys
     # *(7./128.*o*x12*x2z-1./64.*o*x12*ux+1./32.*o*x12-3./128.
     #    *o*x2z*ux+7./128.*o*x2z-1./128.*o*ux+5./128.*o*x2zs+1.
     #    /32.*o-1./128.*os*x2z-1./128.*os*ux-1./32.*os-3./128.
     #    *x12*x2z*ux-3./64.*x12*x2z-1./128.*x12*ux+3./64.*x12*
     #    x2zs-1./16.*x12+1./32.*x2z*ux+1./16.*x2z*x12s-1./16.*
     #    x2z-1./128.*ux*x12s+1./64.*ux+1./16.*x12s-1./16.*x2zs
     #    )
      zz10c= zz10c+rs1wz(11)*bxpi*vvc*gtm2*csti*vdt*ys
     # *(-1./32.*o*x12*x2z+1./16.*o*x12*ux+1./32.*o*x2z*ux-1.
     #    /32.*o*x2z-1./16.*o*x12s-1./32.*o*uxs+1./32.*os*x12+1.
     #    /32.*os*x2z-1./32.*os*ux+1./16.*x12*x2z*ux-1./32.*x12*
     #    x2z-1./32.*x12*x2zs-1./32.*x12*uxs+1./32.*x2z*ux-1./8.
     #    *x2z*x12s+3./32.*ux*x12s-3./32.*x12c-1./32.*x2zs)
      zz10c= zz10c+rs1wz(11)*vvc*gtm2*csti*vdt*bxps*ys
     # *(1./16.)
      zz10c= zz10c+rs1wz(11)*vvc*gtm2*csti*vdt*ys*bxp
     # *(-1./32.+1./32.*o-5./32.*x12-1./8.*x2z+1./16.*ux)
      zz10c= zz10c+rs1wz(11)*vvc*gtm2*csti*vdt*ys
     # *(-1./32.*o*x2z+1./32.*o-1./32.*os+3./16.*x12*x2z-1.
     #    /16.*x12*ux+1./32.*x12-1./16.*x2z*ux+1./16.*x2z-1./32.
     #    *ux+5./32.*x12s+1./16.*x2zs)
      zz10c= zz10c+rs1wz(12)*xx*vvc*gtm2*csti*vdt*ys
     # *(1./16.*o*x12*ux+1./16.*o*x2z*ux+1./16.*o*x2z-1./16.*o
     #    *uxs+1./8.*os*x12+1./16.*os*x2z-1./8.*os*ux-1./16.*oc
     #    +1./8.*x12*x2z*ux-1./8.*x12*x2z-1./16.*x12*x2zs-1./16.
     #    *x12*uxs+1./16.*x2z*ux-1./4.*x2z*x12s+3./16.*ux*x12s-
     #    3./16.*x12c-1./16.*x2zs)
      zz10c= zz10c+rs1wz(12)*bxpi*vvc*gtm2*csti*vdt*ys
     # *(-1./16.*o*x12*ux-1./16.*o*x12-1./16.*o*x2z*ux+1./16.
     #    *o*x2z+1./32.*o*x12s+1./16.*o*uxs+1./16.*o-1./16.*os*
     #    x12-1./16.*os*x2z+3./32.*os*ux+1./32.*oc-1./8.*x12*
     #    x2z*ux-1./16.*x12*x2z+1./16.*x12*x2zs+1./16.*x12*uxs-
     #    1./8.*x12+3./16.*x2z*x12s-1./8.*x2z-5./32.*ux*x12s+1./
     #    16.*ux-1./16.*x12s+1./8.*x12c)
      zz10c= zz10c+rs1wz(12)*vvc*gtm2*csti*vdt*ys*bxp
     # *(-3./32.+1./16.*o+1./16.*x12)
      zz10c= zz10c+rs1wz(12)*vvc*gtm2*csti*vdt*ys
     # *(1./16.-1./32.*o*x12-1./16.*o*x2z+1./32.*o*ux-3./32.
     #    *o+1./32.*os-1./32.*x12*x2z+1./32.*x12*ux+5./32.*x12
     #    +5./32.*x2z-1./16.*ux-1./16.*x12s)
      zz10c= zz10c+rs1wz(13)*xx*vvc*gtm2*csti*vdt*ys
     # *(-3./32.*o*x12*x2z+1./32.*o*x12*ux+1./16.*o*x2z*ux+1.
     #    /32.*o*x2z-1./32.*o*x2zs-1./32.*o*uxs+1./16.*os*x12+1.
     #    /16.*os*x2z-1./16.*os*ux-1./32.*oc+1./32.*x12*x2z*ux-
     #    1./16.*x12*x2z+1./32.*x12*x2zs-1./32.*x12*uxs+1./32.*
     #    x2z*ux-1./16.*x2z*x12s+3./32.*ux*x12s-3./32.*x12c-1./
     #    16.*x2zs)
      zz10c= zz10c+rs1wz(13)*bxpi*vvc*gtm2*csti*vdt*ys
     # *(1./32.*o*x12*x2z-1./32.*o*x12-5./64.*o*x2z*ux-1./64.*
     #    o*x2z-1./32.*o*x12s+3./64.*o*x2zs+1./32.*o*uxs+1./32.
     #    *o-1./32.*os*x12-1./16.*os*x2z+1./16.*os*ux+1./32.*oc
     #    -3./64.*x12*x2z*ux+5./64.*x12*x2z+1./32.*x12*uxs-1./
     #    16.*x12+1./32.*x2z*x12s-3./32.*x2z-1./16.*ux*x12s+1./
     #    32.*ux-1./32.*x12s+1./32.*x12c+1./64.*x2zs)
      zz10c= zz10c+rs1wz(13)*vvc*gtm2*csti*vdt*ys*bxp
     # *(-1./32.)
      zz10c= zz10c+rs1wz(13)*vvc*gtm2*csti*vdt*ys
     # *(1./32.+1./32.*o*x12-1./64.*o*x2z-1./32.*o-3./64.*
     #    x12*x2z+1./16.*x12+5./64.*x2z-1./32.*ux+1./32.*x12s)
      zz10c= zz10c+rs1wz(14)*xx*vvc*gtm2*csti*vdt*ys
     # *(3./32.*o*x12*x2z-1./32.*o*x2z*ux+1./32.*o*x2zs-1./32.
     #    *os*x2z+1./32.*x12*x2z*ux-1./16.*x12*x2zs-1./16.*x2z*
     #    x12s+1./32.*x2zs)
      zz10c= zz10c+rs1wz(14)*bxpi*vvc*gtm2*csti*vdt*ys
     # *(-3./64.*o*x12*x2z+3./32.*o*x12+1./16.*o*x2z*ux+1./
     #    16.*o*x2z-1./32.*o*ux+1./64.*o*x12s-3./64.*o*x2zs-1./
     #    64.*o*uxs+1./64.*os*x12+3./64.*os*x2z-1./32.*os*ux-1./
     #    32.*os-1./64.*oc+1./64.*x12*x2z*ux-3./16.*x12*x2z+1./
     #    32.*x12*ux+1./64.*x12*x2zs-1./64.*x12*uxs+1./64.*x2z*ux
     #    +1./16.*x2z+1./32.*ux*x12s-1./16.*x12s-1./64.*x12c-
     #    1./32.*x2zs)
      zz10c= zz10c+rs1wz(14)*vvc*gtm2*csti*vdt*bxps*ys
     # *(1./32.)
      zz10c= zz10c+rs1wz(14)*vvc*gtm2*csti*vdt*ys*bxp
     # *(1./64.*o-9./64.*x12-1./16.*x2z+1./32.*ux)
      zz10c= zz10c+rs1wz(14)*vvc*gtm2*csti*vdt*ys
     # *(-1./32.-3./64.*o*x12-1./64.*o*ux-1./32.*o+3./16.*
     #    x12*x2z-3./64.*x12*ux+1./8.*x12-1./32.*x2z*ux-1./64.*
     #    ux+5./64.*x12s+1./32.*x2zs)

      zz20c= rs1wz(1)*xx*vvc*gtm2*csti*vdt*ys*(-9./8.*
     #    o*x12*x2z+3./8.*o*x12*ux+3./4.*o*x2z*ux+3./8.*o*x2z-3.
     #    /8.*o*x2zs-3./8.*o*uxs+3./4.*os*x12+3./4.*os*x2z-3./4.
     #    *os*ux-3./8.*oc+3./8.*x12*x2z*ux-3./4.*x12*x2z+3./8.*
     #    x12*x2zs-3./8.*x12*uxs+3./8.*x2z*ux-3./4.*x2z*x12s+9./
     #    8.*ux*x12s-9./8.*x12c-3./4.*x2zs)
      zz20c= zz20c+rs1wz(1)*bxpi*vvc*gtm2*csti*vdt*ys
     # *(5./16.*o*x12*x2z+1./8.*o*x12*ux-3./2.*o*x12-5./8.*o*
     #    x2z*ux+3./8.*o*ux-1./8.*o*x12s+7./16.*o*x2zs+3./16.*o
     #    *uxs+3./8.*o+3./16.*os*x12-9./16.*os*x2z+5./16.*os*ux
     #    +3./8.*os+1./8.*oc-3./16.*x12*x2z*ux+9./8.*x12*x2z-
     #    3./8.*x12*ux-3./16.*x12*x2zs+3./16.*x12*uxs-3./4.*x12
     #    +3./16.*x2z*ux-3./8.*x2z*x12s-3./2.*x2z-3./16.*ux*
     #    x12s+3./8.*ux+3./8.*x12s-3./16.*x12c)
      zz20c= zz20c+rs1wz(1)*vvc*gtm2*csti*vdt*bxps*ys
     # *(1./8.)
      zz20c= zz20c+rs1wz(1)*vvc*gtm2*csti*vdt*ys*bxp
     # *(-9./16.+5./16.*o-1./16.*x12-1./4.*x2z+1./8.*ux)
      zz20c= zz20c+rs1wz(1)*vvc*gtm2*csti*vdt*ys*(
     #    3./4.+1./2.*o*x12-1./2.*o*x2z+1./4.*o*ux-11./16.*o+
     #    3./16.*os-1./16.*x12*x2z+1./8.*x12*ux+1./16.*x12-1./8.
     #    *x2z*ux+21./16.*x2z-9./16.*ux+9./16.*x12s+1./8.*x2zs
     #    )
      zz20c= zz20c+rs1wz(4)*xx*vvc*gtm2*csti*vdt*ys
     # *(-3./16.*o*x12*x2z*ux+3./32.*o*x12*x2zs+3./16.*o*x2z*
     #    x12s+3./32.*o*x2z*uxs-3./32.*o*ux*x2zs+3./32.*o*x2zs-
     #    3./32.*os*x12*x2z+3./32.*os*x2z*ux-3./32.*os*x2zs+3./32.
     #    *x12*x2z*uxs-3./16.*x12*ux*x2zs+3./32.*x12*x2zc+3./32.*
     #    x12*x2zs-9./32.*x2z*ux*x12s+9./32.*x2z*x12c-3./32.*ux*
     #    x2zs+3./8.*x12s*x2zs+3./32.*x2zc)
      zz20c= zz20c+rs1wz(4)*bxpi*vvc*gtm2*csti*vdt*ys
     # *(7./32.*o*x12*x2z*ux+7./64.*o*x12*x2z-3./16.*o*x12*ux-
     #    5./64.*o*x12*x2zs-1./16.*o*x12*uxs-1./32.*o*x2z*ux-19./
     #    64.*o*x2z*x12s-5./64.*o*x2z*uxs+3./16.*o*x2z+3./16.*o*
     #    ux*x12s+5./64.*o*ux*x2zs+3./16.*o*x12s-7./32.*o*x12c-
     #    11./64.*o*x2zs+3./32.*o*uxs+1./16.*os*x12*x2z+3./64.*os
     #    *x12*ux-3./32.*os*x12-3./64.*os*x2z*ux-13./64.*os*x2z
     #    +3./32.*os*ux-1./16.*os*x12s+5./64.*os*x2zs-1./32.*os
     #    *uxs+1./32.*oc*x12+1./32.*oc*x2z-1./32.*oc*ux-1./8.*
     #    x12*x2z*ux-5./64.*x12*x2z*uxs+3./16.*x12*x2z+5./32.*x12
     #    *ux*x2zs-1./8.*x12*x12c-5./64.*x12*x2zc+7./64.*x12*x2zs
     #    +3./32.*x12*uxs+17./64.*x2z*ux*x12s-3./16.*x2z*ux+1./
     #    2.*x2z*x12s-21./64.*x2z*x12c-9./32.*ux*x12s+7./64.*ux*
     #    x12c+1./64.*ux*x2zs-9./32.*x12s*x2zs-1./32.*x12s*uxs+
     #    9./32.*x12c-1./64.*x2zc+9./32.*x2zs)
      zz20c= zz20c+rs1wz(4)*vvc*gtm2*csti*vdt*bxps*ys
     # *(-1./32.+1./32.*o+1./32.*x12)
      zz20c= zz20c+rs1wz(4)*vvc*gtm2*csti*vdt*ys*bxp
     # *(3./32.-1./32.*o*x12-1./16.*o*x2z+1./32.*o*ux-1./16.
     #    *o+1./64.*os-1./16.*x12*x2z+1./32.*x12*ux+1./8.*x2z
     #    -1./32.*ux-3./64.*x12s)
      zz20c= zz20c+rs1wz(4)*vvc*gtm2*csti*vdt*ys*(
     #    -1./32.*o*x12*x2z+1./32.*o*x12*ux-1./64.*o*x12-3./64.
     #    *o*x2z*ux+9./64.*o*x2z-1./16.*o*ux+9./64.*o*x12s+3./
     #    64.*o*x2zs-3./32.*o+3./64.*os*x12-1./32.*os*x2z+1./64.
     #    *os*ux+7./64.*os-1./64.*oc-3./64.*x12*x2z*ux-7./64.*
     #    x12*x2z-1./16.*x12*ux+1./64.*x12*x2zs-3./32.*x12+7./
     #    64.*x2z*ux-9./32.*x2z+1./64.*ux*x12s+3./32.*ux-1./8.*
     #    x12s+5./64.*x12c-11./64.*x2zs)
      zz20c= zz20c+rs1wz(7)*xx*vvc*gtm2*csti*vdt*ys
     # *(-3./64.*o*x12*x2zs+3./64.*o*x2z*x12s-3./64.*o*x2z*uxs
     #    +3./32.*o*ux*x2zs-3./64.*o*x2zc+3./32.*o*x2zs+3./64.*
     #    os*x12*x2z-3./32.*os*x2z*ux+3./64.*os*x2zs-3./64.*oc*
     #    x2z-3./64.*x12*x2z*uxs+3./64.*x12*ux*x2zs+3./64.*x12*
     #    x2zc-3./16.*x12*x2zs+3./32.*x2z*ux*x12s-3./64.*x2z*x12c
     #    +3./64.*ux*x2zs-3./32.*x2zc)
      zz20c= zz20c+rs1wz(7)*bxpi*vvc*gtm2*csti*vdt*ys
     # *(-3./64.*o*x12*x2z*ux+11./128.*o*x12*x2z-1./64.*o*x12*
     #    ux+1./32.*o*x12*x2zs+1./32.*o*x12*uxs+1./64.*o*x2z*ux
     #    -1./32.*o*x2z*x12s+5./128.*o*x2z*uxs+3./16.*o*x2z-3./
     #    128.*o*ux*x12s-3./32.*o*ux*x2zs+3./64.*o*x12s-1./128.*o
     #    *x12c+7./128.*o*x2zc-1./128.*o*x2zs-1./32.*o*uxs-3./
     #    64.*os*x12*x2z+3./64.*os*x12*ux+1./32.*os*x12+5./128.*
     #    os*x2z*ux-1./16.*os*x2z-5./64.*os*ux-5./128.*os*x12s-
     #    1./32.*os*x2zs+1./64.*os*uxs+1./128.*oc*x12+1./128.*oc*
     #    x2z+5./128.*oc*ux-3./64.*oc+3./128.*oq-1./64.*x12*x2z
     #    *ux+5./128.*x12*x2z*uxs-25./64.*x12*x2z-7./128.*x12*ux*
     #    x2zs+1./64.*x12*x12c-1./128.*x12*x2zc+31./128.*x12*x2zs
     #    -1./32.*x12*uxs-11./128.*x2z*ux*x12s+7./64.*x2z*ux+29.
     #    /128.*x2z*x12s+3./128.*x2z*x12c+1./16.*ux*x12s-1./32.*
     #    ux*x12c-1./128.*ux*x2zs+1./64.*x12s*uxs-1./32.*x12c+1.
     #    /32.*x2zc)
      zz20c= zz20c+rs1wz(7)*bxpi*vvc*gtm2*csti*vdt*ys
     # *(-1./4.*x2zs)
      zz20c= zz20c+rs1wz(7)*vvc*gtm2*csti*vdt*bxps*ys
     # *(1./64.-1./64.*o-1./64.*x12)
      zz20c= zz20c+rs1wz(7)*vvc*gtm2*csti*vdt*ys*bxp
     # *(-3./64.+3./64.*o*x12+3./64.*o*x2z-1./64.*o*ux+5./
     #    128.*o-1./128.*os+3./64.*x12*x2z-1./64.*x12*ux-3./128.
     #    *x12-9./128.*x2z+1./64.*ux+7./128.*x12s)
      zz20c= zz20c+rs1wz(7)*vvc*gtm2*csti*vdt*ys*(
     #    -3./64.*o*x12*x2z-15./128.*o*x12+1./32.*o*x2z*ux-5./
     #    32.*o*x2z+3./64.*o*ux+1./16.*o*x12s-3./64.*o*x2zs-3./
     #    32.*o+1./128.*os*x12+1./32.*os*x2z+3./32.*os-1./64.*
     #    oc+1./32.*x12*x2z*ux+1./64.*x12*x2z+3./64.*x12*ux-9./
     #    128.*x12*x2zs+13./64.*x12-7./128.*x2z*ux-5./64.*x2z*
     #    x12s+13./64.*x2z-1./16.*ux-27./128.*x12s+5./128.*x12c
     #    +15./128.*x2zs)
      zz20c= zz20c+rs1wz(8)*bxpi*vvc*gtm2*csti*vdt*ys
     # *(1./32.*o*x12*ux+1./32.*o*x2z*ux-1./16.*o*x2z-1./32.*o
     #    *uxs+1./32.*os*x12+1./32.*os*x2z-1./32.*os*ux+1./16.*
     #    x12*x2z*ux+1./32.*x12*x2z-1./32.*x12*x2zs-1./32.*x12*
     #    uxs-1./32.*x2z*ux-1./16.*x2z*x12s+1./16.*ux*x12s-1./
     #    32.*x12c+1./32.*x2zs)
      zz20c= zz20c+rs1wz(8)*vvc*gtm2*csti*vdt*ys*(
     #    -1./32.*o*x12+1./32.*o*x2z-1./32.*o*ux+1./16.*o-1./
     #    16.*os+1./32.*x12*x2z-1./32.*x12*ux-1./32.*x12-1./32.
     #    *x2z+1./32.*ux+1./32.*x12s)
      zz20c= zz20c+rs1wz(9)*bxpi*vvc*gtm2*csti*vdt*ys
     # *(1./8.*o*x12+1./8.*o*x2z-1./8.*o*ux-1./8.*os)
      zz20c= zz20c+rs1wz(10)*xx*vvc*gtm2*csti*vdt*ys
     # *(3./64.*o*x12*x2zs-3./64.*o*x2z*x12s+3./64.*o*x2z*uxs-
     #    3./32.*o*ux*x2zs+3./64.*o*x2zc-3./32.*o*x2zs-3./64.*os*
     #    x12*x2z+3./32.*os*x2z*ux-3./64.*os*x2zs+3./64.*oc*x2z
     #    +3./64.*x12*x2z*uxs-3./64.*x12*ux*x2zs-3./64.*x12*x2zc
     #    +3./16.*x12*x2zs-3./32.*x2z*ux*x12s+3./64.*x2z*x12c-3.
     #    /64.*ux*x2zs+3./32.*x2zc)
      zz20c= zz20c+rs1wz(10)*bxpi*vvc*gtm2*csti*vdt*ys
     # *(3./64.*o*x12*x2z*ux-7./128.*o*x12*x2z-1./32.*o*x12*x2zs
     #    -1./32.*o*x12*uxs-1./16.*o*x2z*ux+1./32.*o*x2z*x12s-5.
     #    /128.*o*x2z*uxs-3./16.*o*x2z+3./128.*o*ux*x12s+3./32.*o
     #    *ux*x2zs-3./64.*o*x12s+1./128.*o*x12c-7./128.*o*x2zc+
     #    5./128.*o*x2zs+3./64.*o*uxs+3./64.*os*x12*x2z-3./64.*os
     #    *x12*ux-3./64.*os*x12-5./128.*os*x2z*ux+3./64.*os*x2z
     #    +3./32.*os*ux+5./128.*os*x12s+1./32.*os*x2zs-1./64.*
     #    os*uxs-1./128.*oc*x12-1./128.*oc*x2z-5./128.*oc*ux+3./
     #    64.*oc-3./128.*oq-1./64.*x12*x2z*ux-5./128.*x12*x2z*uxs
     #    +3./8.*x12*x2z+7./128.*x12*ux*x2zs-1./64.*x12*x12c+1./
     #    128.*x12*x2zc-29./128.*x12*x2zs+3./64.*x12*uxs+11./128.
     #    *x2z*ux*x12s-3./32.*x2z*ux-25./128.*x2z*x12s-3./128.*
     #    x2z*x12c-3./32.*ux*x12s+1./32.*ux*x12c+1./128.*ux*x2zs
     #    -1./64.*x12s*uxs+3./64.*x12c-1./32.*x2zc+15./64.*x2zs
     #    )
      zz20c= zz20c+rs1wz(10)*vvc*gtm2*csti*vdt*bxps*ys
     # *(-1./64.+1./64.*o+1./64.*x12)
      zz20c= zz20c+rs1wz(10)*vvc*gtm2*csti*vdt*ys*bxp
     # *(3./64.-3./64.*o*x12-3./64.*o*x2z+1./64.*o*ux-5./128.
     #    *o+1./128.*os-3./64.*x12*x2z+1./64.*x12*ux+3./128.*
     #    x12+9./128.*x2z-1./64.*ux-7./128.*x12s)
      zz20c= zz20c+rs1wz(10)*vvc*gtm2*csti*vdt*ys
     # *(3./64.*o*x12*x2z+13./128.*o*x12-1./32.*o*x2z*ux+9./64.
     #    *o*x2z-1./32.*o*ux-1./16.*o*x12s+3./64.*o*x2zs+3./32.
     #    *o-1./128.*os*x12-1./32.*os*x2z-3./32.*os+1./64.*oc
     #    -1./32.*x12*x2z*ux-1./32.*x12*x2z-1./32.*x12*ux+9./
     #    128.*x12*x2zs-3./16.*x12+7./128.*x2z*ux+5./64.*x2z*x12s
     #    -3./16.*x2z+3./64.*ux+25./128.*x12s-5./128.*x12c-15.
     #    /128.*x2zs)
      zz20c= zz20c+rs1wz(11)*bxpi*vvc*gtm2*csti*vdt*ys
     # *(-3./32.*o*x12*x2z+5./32.*o*x12*ux+1./16.*o*x2z*ux-1.
     #    /32.*o*x2z-3./16.*o*x12s-1./16.*o*uxs+1./16.*os*x12+1.
     #    /16.*os*x2z-1./16.*os*ux+1./8.*x12*x2z*ux-1./8.*x12*x2z
     #    -1./16.*x12*x2zs-1./16.*x12*uxs+1./8.*x2z*ux-5./16.*
     #    x2z*x12s+7./32.*ux*x12s-1./4.*x12c-1./8.*x2zs)
      zz20c= zz20c+rs1wz(11)*vvc*gtm2*csti*vdt*bxps*ys
     # *(1./16.)
      zz20c= zz20c+rs1wz(11)*vvc*gtm2*csti*vdt*ys*bxp
     # *(-3./32.+1./32.*o-5./32.*x12-1./8.*x2z+1./16.*ux)
      zz20c= zz20c+rs1wz(11)*vvc*gtm2*csti*vdt*ys
     # *(3./32.*o*x12-1./16.*o*x2z+1./32.*o*ux+1./32.*o-1./
     #    32.*os+7./32.*x12*x2z-1./32.*x12*ux+1./8.*x12-1./16.*
     #    x2z*ux+7./32.*x2z-1./8.*ux+1./4.*x12s+1./16.*x2zs)
      zz20c= zz20c+rs1wz(12)*xx*vvc*gtm2*csti*vdt*ys
     # *(3./16.*o*x12*ux+3./16.*o*x2z*ux+3./16.*o*x2z-3./16.*o
     #    *uxs+3./8.*os*x12+3./16.*os*x2z-3./8.*os*ux-3./16.*oc
     #    +3./8.*x12*x2z*ux-3./8.*x12*x2z-3./16.*x12*x2zs-3./16.
     #    *x12*uxs+3./16.*x2z*ux-3./4.*x2z*x12s+9./16.*ux*x12s-
     #    9./16.*x12c-3./16.*x2zs)
      zz20c= zz20c+rs1wz(12)*bxpi*vvc*gtm2*csti*vdt*ys
     # *(-5./32.*o*x12*ux-3./16.*o*x12-5./32.*o*x2z*ux+1./8.
     #    *o*x2z+3./32.*o*x12s+5./32.*o*uxs+3./16.*o-5./32.*os*
     #    x12-5./32.*os*x2z+1./4.*os*ux+3./32.*oc-5./16.*x12*
     #    x2z*ux-5./32.*x12*x2z+5./32.*x12*x2zs+5./32.*x12*uxs-
     #    3./8.*x12-1./32.*x2z*ux+1./2.*x2z*x12s-3./8.*x2z-13./
     #    32.*ux*x12s+3./16.*ux-3./16.*x12s+11./32.*x12c+1./32.
     #    *x2zs)
      zz20c= zz20c+rs1wz(12)*vvc*gtm2*csti*vdt*ys*bxp
     # *(-5./32.+1./16.*o+1./16.*x12)
      zz20c= zz20c+rs1wz(12)*vvc*gtm2*csti*vdt*ys
     # *(3./16.-3./32.*o*x2z+1./16.*o*ux-9./32.*o+3./32.*os
     #    +1./16.*x12*ux+3./8.*x12+5./16.*x2z-5./32.*ux-3./32.
     #    *x12s)
      zz20c= zz20c+rs1wz(13)*xx*vvc*gtm2*csti*vdt*ys
     # *(-9./32.*o*x12*x2z+3./32.*o*x12*ux+3./16.*o*x2z*ux+3.
     #    /32.*o*x2z-3./32.*o*x2zs-3./32.*o*uxs+3./16.*os*x12+3.
     #    /16.*os*x2z-3./16.*os*ux-3./32.*oc+3./32.*x12*x2z*ux-
     #    3./16.*x12*x2z+3./32.*x12*x2zs-3./32.*x12*uxs+3./32.*
     #    x2z*ux-3./16.*x2z*x12s+9./32.*ux*x12s-9./32.*x12c-3./
     #    16.*x2zs)
      zz20c= zz20c+rs1wz(13)*bxpi*vvc*gtm2*csti*vdt*ys
     # *(1./16.*o*x12*x2z+1./64.*o*x12*ux-3./32.*o*x12-3./16.*
     #    o*x2z*ux-3./64.*o*x2z-3./32.*o*x12s+7./64.*o*x2zs+5./
     #    64.*o*uxs+3./32.*o-5./64.*os*x12-11./64.*os*x2z+11./
     #    64.*os*ux+3./32.*oc-7./64.*x12*x2z*ux+1./4.*x12*x2z-1.
     #    /64.*x12*x2zs+5./64.*x12*uxs-3./16.*x12-1./64.*x2z*ux
     #    +1./16.*x2z*x12s-9./32.*x2z-5./32.*ux*x12s+3./32.*ux
     #    -3./32.*x12s+5./64.*x12c+1./16.*x2zs)
      zz20c= zz20c+rs1wz(13)*vvc*gtm2*csti*vdt*ys*bxp
     # *(-1./16.)
      zz20c= zz20c+rs1wz(13)*vvc*gtm2*csti*vdt*ys
     # *(3./32.+9./64.*o*x12-1./32.*o*x2z+1./64.*o*ux-1./16.
     #    *o-3./32.*x12*x2z+1./64.*x12*ux+5./64.*x12+3./16.*x2z
     #    -5./64.*ux+9./64.*x12s)
      zz20c= zz20c+rs1wz(14)*xx*vvc*gtm2*csti*vdt*ys
     # *(9./32.*o*x12*x2z-3./32.*o*x2z*ux+3./32.*o*x2zs-3./32.
     #    *os*x2z+3./32.*x12*x2z*ux-3./16.*x12*x2zs-3./16.*x2z*
     #    x12s+3./32.*x2zs)
      zz20c= zz20c+rs1wz(14)*bxpi*vvc*gtm2*csti*vdt*ys
     # *(-7./64.*o*x12*x2z-1./64.*o*x12*ux+9./32.*o*x12+9./
     #    64.*o*x2z*ux+3./16.*o*x2z-3./32.*o*ux+3./64.*o*x12s-7.
     #    /64.*o*x2zs-1./32.*o*uxs+1./32.*os*x12+1./8.*os*x2z-5.
     #    /64.*os*ux-3./32.*os-3./64.*oc+1./64.*x12*x2z*ux-37./
     #    64.*x12*x2z+3./32.*x12*ux+1./16.*x12*x2zs-1./32.*x12*
     #    uxs+1./16.*x2z*ux+1./32.*x2z*x12s+3./16.*x2z+1./16.*
     #    ux*x12s-3./16.*x12s-1./32.*x12c-7./64.*x2zs)
      zz20c= zz20c+rs1wz(14)*vvc*gtm2*csti*vdt*bxps*ys
     # *(1./32.)
      zz20c= zz20c+rs1wz(14)*vvc*gtm2*csti*vdt*ys*bxp
     # *(1./32.+1./64.*o-17./64.*x12-1./16.*x2z+1./32.*ux)
      zz20c= zz20c+rs1wz(14)*vvc*gtm2*csti*vdt*ys
     # *(-3./32.-7./32.*o*x12-1./64.*o*x2z-3./32.*o+1./32.
     #    *os+25./64.*x12*x2z-3./32.*x12*ux+25./64.*x12-1./32.*
     #    x2z*ux-1./64.*x2z-1./16.*ux+1./8.*x12s+1./32.*x2zs)

      zz30c= rs1wz(1)*bxpi*vvc*gtm2*csti*vdt*ys*(-3./16.
     #    *o*x12+3./16.*o*ux+3./16.*os-19./32.*x12*x2z+3./16.*
     #    x12*ux+1./4.*x2z*ux-1./16.*x2z-3./8.*x12s-1./4.*x2zs
     #    )
      zz30c= zz30c+rs1wz(1)*vvc*gtm2*csti*vdt*bxps*ys
     # *(1./8.)
      zz30c= zz30c+rs1wz(1)*vvc*gtm2*csti*vdt*ys*bxp
     # *(-9./32.-1./4.*x12-1./4.*x2z+1./8.*ux)
      zz30c= zz30c+rs1wz(1)*vvc*gtm2*csti*vdt*ys*(
     #    1./16.+11./64.*o*x12-1./32.*o*x2z+1./32.*o*ux-3./32.*
     #    o+1./32.*os+5./16.*x12*x2z+1./32.*x12*ux+7./16.*x12
     #    -1./8.*x2z*ux+17./32.*x2z-1./4.*ux+9./64.*x12s+1./8.
     #    *x2zs)
      zz30c= zz30c+rs1wz(4)*bxpi*vvc*gtm2*csti*vdt*ys
     # *(1./32.*o*x12*x2z-1./32.*o*x2z*ux-1./64.*o*x2z+1./64.*
     #    o*x2zs-1./64.*os*x2z-1./32.*x12*x2z*ux+5./64.*x12*x2zs
     #    +3./64.*x2z*x12s-1./32.*ux*x2zs+1./32.*x2zc)
      zz30c= zz30c+rs1wz(4)*vvc*gtm2*csti*vdt*bxps*ys
     # *(-1./64.)
      zz30c= zz30c+rs1wz(4)*vvc*gtm2*csti*vdt*ys*bxp
     # *(-3./128.*o*x12-3./128.*o*x2z+1./64.*o*ux-1./128.*o
     #    +1./128.*os-1./128.*x12*x2z+1./64.*x12*ux+9./128.*x12
     #    +1./16.*x2z-1./32.*ux-1./32.*x12s)
      zz30c= zz30c+rs1wz(4)*vvc*gtm2*csti*vdt*ys*(
     #    3./64.*o*x12*x2z-1./32.*o*x12*ux-5./128.*o*x12-1./64.*o
     #    *x2z*ux-1./128.*o*x2z+1./32.*o*ux+5./128.*o*x12s+3./
     #    128.*o*x2zs+1./64.*o+1./128.*os*x12+1./64.*os*x2z-1./
     #    64.*os*ux+1./128.*os-1./128.*oc-1./64.*x12*x2z*ux-19./
     #    128.*x12*x2z+1./32.*x12*ux+1./128.*x12*x2zs+1./16.*x2z*
     #    ux+1./32.*x2z*x12s-1./64.*ux*x12s-3./64.*x12s+3./128.
     #    *x12c-5./64.*x2zs)
      zz30c= zz30c+rs1wz(7)*bxpi*vvc*gtm2*csti*vdt*ys
     # *(-1./128.*o*x12*x2z+1./128.*o*x2z*ux+1./128.*o*x2zs+
     #    1./128.*os*x2z+1./128.*x12*x2z*ux-1./32.*x12*x2zs-1./64.
     #    *x2z*x12s+1./64.*ux*x2zs-1./64.*x2zc-1./128.*x2zs)
      zz30c= zz30c+rs1wz(7)*vvc*gtm2*csti*vdt*bxps*ys
     # *(1./128.)
      zz30c= zz30c+rs1wz(7)*vvc*gtm2*csti*vdt*ys*bxp
     # *(-1./128.+1./128.*o*x2z-1./128.*o*ux+3./128.*o-3./
     #    256.*os-1./128.*x12*ux-3./128.*x12-1./32.*x2z+1./64.*
     #    ux+3./256.*x12s)
      zz30c= zz30c+rs1wz(7)*vvc*gtm2*csti*vdt*ys*(
     #    1./128.*o*x12*ux+1./128.*o*x12+1./128.*o*x2z*ux-1./32.*
     #    o*x2z-1./128.*o*ux-3./256.*o*x12s-1./128.*o*x2zs+1./
     #    128.*os*x2z+1./256.*os*ux-1./128.*os+1./256.*oc+1./
     #    128.*x12*x2z*ux+7./128.*x12*x2z-1./128.*x12*ux-1./32.*
     #    x2z*ux-1./128.*x2z*x12s+1./64.*x2z+1./256.*ux*x12s+1./
     #    64.*x12s-1./128.*x12c+5./128.*x2zs)
      zz30c= zz30c+rs1wz(10)*bxpi*vvc*gtm2*csti*vdt*ys
     # *(1./128.*o*x12*x2z-1./128.*o*x2z*ux-1./128.*o*x2zs-1./
     #    128.*os*x2z-1./128.*x12*x2z*ux+1./32.*x12*x2zs+1./64.*
     #    x2z*x12s-1./64.*ux*x2zs+1./64.*x2zc+1./128.*x2zs)
      zz30c= zz30c+rs1wz(10)*vvc*gtm2*csti*vdt*bxps*ys
     # *(-1./128.)
      zz30c= zz30c+rs1wz(10)*vvc*gtm2*csti*vdt*ys*bxp
     # *(1./128.-1./128.*o*x2z+1./128.*o*ux-3./128.*o+3./256.
     #    *os+1./128.*x12*ux+3./128.*x12+1./32.*x2z-1./64.*ux
     #    -3./256.*x12s)
      zz30c= zz30c+rs1wz(10)*vvc*gtm2*csti*vdt*ys
     # *(-1./128.*o*x12*ux-1./128.*o*x12-1./128.*o*x2z*ux+1./
     #    32.*o*x2z+1./128.*o*ux+3./256.*o*x12s+1./128.*o*x2zs-
     #    1./128.*os*x2z-1./256.*os*ux+1./128.*os-1./256.*oc-1./
     #    128.*x12*x2z*ux-7./128.*x12*x2z+1./128.*x12*ux+1./32.*
     #    x2z*ux+1./128.*x2z*x12s-1./64.*x2z-1./256.*ux*x12s-1./
     #    64.*x12s+1./128.*x12c-5./128.*x2zs)
      zz30c= zz30c+rs1wz(11)*bxpi*vvc*gtm2*csti*vdt*ys
     # *(-3./32.*x12*x2z+1./16.*x2z*ux-1./16.*x2zs)
      zz30c= zz30c+rs1wz(11)*vvc*gtm2*csti*vdt*bxps*ys
     # *(1./16.)
      zz30c= zz30c+rs1wz(11)*vvc*gtm2*csti*vdt*ys*bxp
     # *(-5./64.-3./32.*x12-1./8.*x2z+1./16.*ux)
      zz30c= zz30c+rs1wz(11)*vvc*gtm2*csti*vdt*ys
     # *(-1./64.*o*x2z+1./64.*o*ux+1./64.*os+3./32.*x12*x2z
     #    +1./64.*x12*ux+3./32.*x12-1./16.*x2z*ux+9./64.*x2z-
     #    1./16.*ux-1./64.*x12s+1./16.*x2zs)
      zz30c= zz30c+rs1wz(12)*bxpi*vvc*gtm2*csti*vdt*ys
     # *(-3./32.*o*x12-1./32.*o*x2z+3./32.*o*ux+3./32.*os-
     #    7./32.*x12*x2z+3./32.*x12*ux+1./16.*x2z*ux-1./32.*x2z
     #    -3./16.*x12s-1./16.*x2zs)
      zz30c= zz30c+rs1wz(12)*vvc*gtm2*csti*vdt*ys*bxp
     # *(-1./16.-1./32.*x12)
      zz30c= zz30c+rs1wz(12)*vvc*gtm2*csti*vdt*ys
     # *(1./32.+1./16.*o*x12-1./64.*o-1./64.*os+1./16.*x12*
     #    x2z+9./64.*x12+1./8.*x2z-1./16.*ux+5./64.*x12s)
      zz30c= zz30c+rs1wz(13)*bxpi*vvc*gtm2*csti*vdt*ys
     # *(1./64.*o*x12+1./32.*o*x2z+1./64.*o*ux+1./64.*os-3./
     #    64.*x12*x2z+3./64.*x12*ux+1./32.*x2z*ux-1./64.*x2z-3./
     #    32.*x12s-1./32.*x2zs)
      zz30c= zz30c+rs1wz(13)*vvc*gtm2*csti*vdt*ys*bxp
     # *(-1./64.+1./128.*o-3./128.*x12)
      zz30c= zz30c+rs1wz(13)*vvc*gtm2*csti*vdt*ys
     # *(1./64.+9./128.*o*x12-1./128.*o*x2z-1./64.*o*ux-9./
     #    128.*o+1./64.*os+1./128.*x12*x2z-1./64.*x12*ux+5./128.
     #    *x12+3./64.*x2z-1./32.*ux+11./128.*x12s)
      zz30c= zz30c+rs1wz(14)*bxpi*vvc*gtm2*csti*vdt*ys
     # *(1./64.*o*x2z-7./64.*x12*x2z+1./32.*x2z*ux-1./32.*x2zs
     #    )
      zz30c= zz30c+rs1wz(14)*vvc*gtm2*csti*vdt*bxps*ys
     # *(1./32.)
      zz30c= zz30c+rs1wz(14)*vvc*gtm2*csti*vdt*ys*bxp
     # *(-3./128.-7./64.*x12-1./16.*x2z+1./32.*ux)
      zz30c= zz30c+rs1wz(14)*vvc*gtm2*csti*vdt*ys
     # *(-3./128.*o*x12-1./128.*o*ux-1./64.*o-1./64.*os+13.
     #    /128.*x12*x2z-1./128.*x12*ux+7./64.*x12-1./32.*x2z*ux
     #    +7./128.*x2z-1./32.*ux-1./128.*x12s+1./32.*x2zs)

      zz40c= rs1wz(1)*xx*vvc*gtm2*csti*vdt*ys*(3./8.*o*
     #    x12*x2z-1./2.*o*x2z*ux+1./4.*o*x2z+3./8.*o*x2zs+1./8.
     #    *o*uxs+1./8.*os*x12-3./8.*os*x2z+1./8.*os*ux-1./8.*
     #    x12*x2z*ux-1./8.*x12*x2zs+1./8.*x12*uxs+1./8.*x2z*ux-
     #    1./4.*x2z*x12s-1./8.*ux*x12s-1./8.*x12c)
      zz40c= zz40c+rs1wz(1)*bxpi*vvc*gtm2*csti*vdt*ys
     # *(-1./2.*o*x12*x2z+1./4.*o*x12*ux+3./4.*o*x12+1./4.*o
     #    *x2z*ux+5./8.*o*x2z-5./8.*o*ux-1./4.*o*x12s-1./4.*o*
     #    x2zs+1./4.*o+1./4.*os*ux-5./8.*os+1./4.*oc-5./8.*
     #    x12*x2z+1./8.*x12*ux+1./4.*x2z+1./8.*ux-5./8.*x12s)
      zz40c= zz40c+rs1wz(1)*vvc*gtm2*csti*vdt*ys*bxp
     # *(1./4.-1./2.*x12)
      zz40c= zz40c+rs1wz(1)*vvc*gtm2*csti*vdt*ys*(
     #    -1./4.-1./4.*o*x12-1./8.*o*x2z+1./8.*o*ux-1./4.*o
     #    +1./8.*os+5./8.*x12*x2z-1./8.*x12*ux+1./2.*x12-1./4.
     #    *x2z-1./8.*ux+5./8.*x12s)
      zz40c= zz40c+rs1wz(4)*xx*vvc*gtm2*csti*vdt*ys
     # *(3./16.*o*x12*x2z*ux-1./16.*o*x12*x2z-1./16.*o*x12*x2zs
     #    -1./16.*o*x12*uxs+1./32.*o*x2z*ux-7./32.*o*x2z*x12s-1.
     #    /16.*o*x2z*uxs+5./32.*o*ux*x12s+1./16.*o*ux*x2zs-5./32.
     #    *o*x12c-1./8.*o*x2zs+1./16.*os*x12*x2z+1./32.*os*x12*ux
     #    -1./32.*os*x2z*ux-1./32.*os*x2z-1./32.*os*x12s+1./16.
     #    *os*x2zs-1./32.*os*uxs+1./32.*oc*x12+1./32.*oc*x2z-1./
     #    32.*oc*ux+1./32.*x12*x2z*ux-1./16.*x12*x2z*uxs+1./8.*
     #    x12*ux*x2zs-3./32.*x12*x12c-1./16.*x12*x2zc-1./32.*x12*
     #    x2zs+7./32.*x2z*ux*x12s-1./32.*x2z*x12s-1./4.*x2z*x12c
     #    +3./32.*ux*x12c-7./32.*x12s*x2zs-1./32.*x12s*uxs)
      zz40c= zz40c+rs1wz(4)*bxpi*vvc*gtm2*csti*vdt*ys
     # *(-1./8.*o*x12*x2z*ux-1./16.*o*x12*x2z+5./32.*o*x12*ux
     #    +1./32.*o*x12*x2zs+1./16.*o*x12*uxs-1./16.*o*x12+5./
     #    32.*o*x2z*ux+1./16.*o*x2z*x12s+1./32.*o*x2z*uxs-9./32.*
     #    o*x2z-3./32.*o*ux*x12s-1./32.*o*ux*x2zs+1./32.*o*ux-7.
     #    /32.*o*x12s+1./32.*o*x12c-3./32.*o*uxs-1./16.*os*x12*
     #    x2z+3./32.*os*x12+1./4.*os*x2z-3./32.*os*ux-1./32.*os
     #    *x12s-1./32.*os*x2zs+1./32.*os*uxs-1./32.*os-1./32.*
     #    oc*x12-1./32.*oc*x2z+1./32.*oc*ux+1./32.*oc+1./4.*x12
     #    *x2z*ux+1./32.*x12*x2z*uxs-3./32.*x12*x2z-1./16.*x12*ux
     #    *x2zs+1./32.*x12*ux+1./32.*x12*x12c+1./32.*x12*x2zc-7.
     #    /32.*x12*x2zs-3./32.*x12*uxs-1./8.*x2z*ux*x12s+1./32.*
     #    x2z*ux-15./32.*x2z*x12s+3./32.*x2z*x12c+1./4.*ux*x12s
     #    -1./16.*ux*x12c+1./32.*ux*x2zs+3./32.*x12s*x2zs+1./32.
     #    *x12s*uxs-1./32.*x12s-9./32.*x12c-1./32.*x2zc-1./16.*
     #    x2zs)
      zz40c= zz40c+rs1wz(4)*vvc*gtm2*csti*vdt*bxps*ys
     # *(1./16.)
      zz40c= zz40c+rs1wz(4)*vvc*gtm2*csti*vdt*ys*bxp
     # *(-1./16.-3./32.*o*x12+1./32.*o*x2z-1./32.*o*ux-1./
     #    32.*o-1./32.*x12*x2z-1./32.*x12*ux-1./8.*x12-3./16.*
     #    x2z+3./32.*ux-3./32.*x12s)
      zz40c= zz40c+rs1wz(4)*vvc*gtm2*csti*vdt*ys*(
     #    1./16.*o*x12*x2z-1./32.*o*x12*ux+1./16.*o*x12-1./32.*o*
     #    x2z*ux+5./32.*o*x2z-3./32.*o*ux+7./32.*o*x12s+1./32.*
     #    o*uxs+5./32.*o+1./16.*os*x12-3./32.*os*x2z+1./16.*os*
     #    ux-5./32.*os+1./32.*oc-1./16.*x12*x2z*ux+5./16.*x12*
     #    x2z-3./32.*x12*ux+1./16.*x12*x2zs+1./32.*x12*uxs+1./
     #    16.*x12-1./8.*x2z*ux+1./4.*x2z*x12s+1./8.*x2z-3./32.*
     #    ux*x12s-1./32.*ux+7./32.*x12s+3./16.*x12c+5./32.*x2zs
     #    )
      zz40c= zz40c+rs1wz(7)*xx*vvc*gtm2*csti*vdt*ys
     # *(-1./16.*o*x12*x2z*ux+3./64.*o*x12*x2zs+1./32.*o*x12*
     #    uxs+3./64.*o*x2z*ux+1./32.*o*x2z*uxs+1./16.*o*x2z-1./
     #    32.*o*ux*x12s-5./64.*o*ux*x2zs+1./32.*o*x12s+3./64.*o*
     #    x2zc-1./32.*o*x2zs-1./32.*o*uxs-1./32.*os*x12*x2z+1./
     #    32.*os*x12*ux+1./32.*os*x12+1./64.*os*x2z*ux-1./16.*os*
     #    ux-1./32.*os*x12s-1./64.*os*x2zs+1./64.*os*uxs+1./32.
     #    *oc*ux-1./32.*oc+1./64.*oq+1./64.*x12*x2z*ux+1./32.*
     #    x12*x2z*uxs-1./8.*x12*x2z-3./64.*x12*ux*x2zs+1./64.*x12
     #    *x12c+7./64.*x12*x2zs-1./32.*x12*uxs-5./64.*x2z*ux*x12s
     #    +1./32.*x2z*ux+1./16.*x2z*x12s+1./32.*x2z*x12c+1./16.
     #    *ux*x12s-1./32.*ux*x12c+1./64.*x12s*x2zs+1./64.*x12s*
     #    uxs-1./32.*x12c+1./64.*x2zc-1./16.*x2zs)
      zz40c= zz40c+rs1wz(7)*bxpi*vvc*gtm2*csti*vdt*ys
     # *(3./32.*o*x12*x2z*ux+1./16.*o*x12*x2z-1./32.*o*x12*ux-
     #    5./64.*o*x12*x2zs-1./32.*o*x12*uxs+1./16.*o*x12-1./8.*o
     #    *x2z*ux-1./16.*o*x2z*x12s-1./64.*o*x2z*uxs+1./64.*o*x2z
     #    +3./64.*o*ux*x12s+3./64.*o*ux*x2zs-1./64.*o*ux-3./64.
     #    *o*x12s-1./64.*o*x12c-1./32.*o*x2zc+3./32.*o*x2zs+1./
     #    32.*o*uxs+1./16.*o-1./32.*os*x12+1./32.*os*x2z*ux-1./
     #    64.*os*x2z+1./32.*os*ux+1./64.*os*x12s-1./64.*os*x2zs
     #    -1./64.*os*uxs-1./16.*os+1./64.*oc*x12+1./64.*oc*x2z
     #    -1./64.*oc*ux+1./64.*oc-3./32.*x12*x2z*ux-1./64.*x12*
     #    x2z*uxs+3./32.*x12*x2z+1./32.*x12*ux*x2zs-1./64.*x12*ux
     #    -1./64.*x12*x12c-1./64.*x12*x2zc+1./16.*x12*x2zs+1./
     #    32.*x12*uxs-1./8.*x12+1./16.*x2z*ux*x12s+1./32.*x2z*ux
     #    +3./64.*x2z*x12s-3./64.*x2z*x12c-3./32.*x2z-1./16.*ux
     #    *x12s+1./32.*ux*x12c-1./64.*ux*x2zs+1./32.*ux-3./64.*
     #    x12s*x2zs)
      zz40c= zz40c+rs1wz(7)*bxpi*vvc*gtm2*csti*vdt*ys
     # *(-1./64.*x12s*uxs+1./8.*x12s+1./64.*x2zc)
      zz40c= zz40c+rs1wz(7)*vvc*gtm2*csti*vdt*ys*bxp
     # *(-1./32.+1./64.*o+1./64.*x12+1./64.*x2z)
      zz40c= zz40c+rs1wz(7)*vvc*gtm2*csti*vdt*ys*(
     #    1./32.+1./16.*o*x12*x2z-1./32.*o*x12*ux-7./64.*o*x12-
     #    1./16.*o*x2z+1./16.*o*ux+5./64.*o*x12s-5./64.*o+1./64.
     #    *os*x12-1./64.*os*ux+1./16.*os-1./64.*oc-3./16.*x12*
     #    x2z+1./16.*x12*ux+1./64.*x12*x2zs+9./64.*x12+1./64.*
     #    x2z*ux+1./16.*x2z*x12s+7./64.*x2z-1./64.*ux*x12s-1./
     #    16.*ux-11./64.*x12s+3./64.*x12c-3./64.*x2zs)
      zz40c= zz40c+rs1wz(8)*xx*vvc*gtm2*csti*vdt*ys
     # *(1./16.*o*x12*x2z-1./8.*o*x12*ux-1./16.*o*x2z*ux+1./16.
     #    *o*x2z+1./8.*o*x12s+1./16.*o*uxs-1./16.*os*x12-1./16.
     #    *os*x2z+1./16.*os*ux-1./8.*x12*x2z*ux+1./16.*x12*x2z+
     #    1./16.*x12*x2zs+1./16.*x12*uxs-1./16.*x2z*ux+1./4.*x2z*
     #    x12s-3./16.*ux*x12s+3./16.*x12c+1./16.*x2zs)
      zz40c= zz40c+rs1wz(8)*bxpi*vvc*gtm2*csti*vdt*ys
     # *(1./16.*o*x12*x2z-3./32.*o*x12*ux+1./16.*o*x12-1./32.*
     #    o*x2z*ux+1./8.*o*x12s+1./32.*o*uxs+1./16.*o-1./32.*os
     #    *x12-1./32.*os*x2z+1./32.*os*ux-1./16.*os-1./16.*x12*
     #    x2z*ux+5./32.*x12*x2z+1./32.*x12*x2zs+1./32.*x12*uxs+
     #    1./16.*x12-3./32.*x2z*ux+3./16.*x2z*x12s+1./8.*x2z-1./
     #    8.*ux*x12s-1./16.*ux+1./8.*x12s+5./32.*x12c+3./32.*
     #    x2zs)
      zz40c= zz40c+rs1wz(8)*vvc*gtm2*csti*vdt*bxps*ys
     # *(-1./16.)
      zz40c= zz40c+rs1wz(8)*vvc*gtm2*csti*vdt*ys*bxp
     # *(1./8.+3./32.*o*x12-1./32.*o*x2z+1./32.*o*ux+1./32.*
     #    x12*x2z+1./32.*x12*ux+3./32.*x12+5./32.*x2z-3./32.*ux
     #    +3./32.*x12s)
      zz40c= zz40c+rs1wz(8)*vvc*gtm2*csti*vdt*ys*(
     #    -1./16.-1./16.*o*x12*x2z+3./32.*o*x12*ux-5./32.*o*x12
     #    +1./32.*o*x2z*ux+1./32.*o*x2z-1./32.*o*ux-1./8.*o*
     #    x12s-1./32.*o*uxs-1./16.*o+1./32.*os*x12+1./32.*os*
     #    x2z-1./32.*os*ux+1./16.*os+1./16.*x12*x2z*ux-3./16.*
     #    x12*x2z-1./32.*x12*ux-1./32.*x12*x2zs-1./32.*x12*uxs-
     #    5./32.*x12+3./32.*x2z*ux-3./16.*x2z*x12s-9./32.*x2z+1.
     #    /8.*ux*x12s+5./32.*ux-7./32.*x12s-5./32.*x12c-3./32.*
     #    x2zs)
      zz40c= zz40c+rs1wz(9)*xx*vvc*gtm2*csti*vdt*ys
     # *(-3./8.*o*x12-1./8.*o*x2z+1./8.*o*ux+1./8.*os+1./4.
     #    *x12*x2z-1./8.*x12*ux-1./8.*x2z+1./4.*x12s)
      zz40c= zz40c+rs1wz(9)*bxpi*vvc*gtm2*csti*vdt*ys
     # *(-1./8.-1./4.*o*x12+1./4.*x12*x2z-1./8.*x12*ux+1./
     #    4.*x12-1./8.*x2z+1./4.*x12s)
      zz40c= zz40c+rs1wz(9)*vvc*gtm2*csti*vdt*ys*bxp
     # *(-1./8.+1./4.*x12)
      zz40c= zz40c+rs1wz(9)*vvc*gtm2*csti*vdt*ys*(
     #    1./4.+1./4.*o*x12-1./4.*x12*x2z+1./8.*x12*ux-1./2.*
     #    x12+1./8.*x2z-1./4.*x12s)
      zz40c= zz40c+rs1wz(10)*xx*vvc*gtm2*csti*vdt*ys
     # *(1./16.*o*x12*x2z*ux-1./32.*o*x12*x2z-3./64.*o*x12*x2zs
     #    -1./32.*o*x12*uxs+1./64.*o*x2z*ux-1./32.*o*x2z*uxs+1./
     #    32.*o*ux*x12s+5./64.*o*ux*x2zs-3./64.*o*x2zc+1./32.*os*
     #    x12*x2z-1./32.*os*x12*ux-1./64.*os*x2z*ux+1./32.*os*x2z
     #    +1./32.*os*x12s+1./64.*os*x2zs-1./64.*os*uxs-1./32.*
     #    oc*ux-1./64.*oq+1./64.*x12*x2z*ux-1./32.*x12*x2z*uxs+
     #    3./64.*x12*ux*x2zs-1./64.*x12*x12c-5./64.*x12*x2zs+5./
     #    64.*x2z*ux*x12s-1./16.*x2z*x12s-1./32.*x2z*x12c+1./32.*
     #    ux*x12c-1./64.*x12s*x2zs-1./64.*x12s*uxs-1./64.*x2zc)
      zz40c= zz40c+rs1wz(10)*bxpi*vvc*gtm2*csti*vdt*ys
     # *(-3./32.*o*x12*x2z*ux-1./16.*o*x12*x2z+1./64.*o*x12*ux
     #    +5./64.*o*x12*x2zs+1./32.*o*x12*uxs-1./32.*o*x12+9./
     #    64.*o*x2z*ux+1./16.*o*x2z*x12s+1./64.*o*x2z*uxs+3./64.*
     #    o*x2z-3./64.*o*ux*x12s-3./64.*o*ux*x2zs+1./64.*o*ux+5.
     #    /64.*o*x12s+1./64.*o*x12c+1./32.*o*x2zc-3./32.*o*x2zs
     #    -3./64.*o*uxs+3./64.*os*x12-1./32.*os*x2z*ux+1./32.*
     #    os*x2z-5./64.*os*ux-1./64.*os*x12s+1./64.*os*x2zs+1./
     #    64.*os*uxs+1./32.*os-1./64.*oc*x12-1./64.*oc*x2z+1./
     #    64.*oc*ux-3./64.*oc+3./32.*x12*x2z*ux+1./64.*x12*x2z*
     #    uxs-13./64.*x12*x2z-1./32.*x12*ux*x2zs+1./64.*x12*ux+
     #    1./64.*x12*x12c+1./64.*x12*x2zc-1./64.*x12*x2zs-3./64.*
     #    x12*uxs-1./16.*x2z*ux*x12s+1./64.*x2z*ux-1./64.*x2z*
     #    x12s+3./64.*x2z*x12c+3./32.*ux*x12s-1./32.*ux*x12c+1./
     #    64.*ux*x2zs+3./64.*x12s*x2zs+1./64.*x12s*uxs-1./16.*
     #    x12s)
      zz40c= zz40c+rs1wz(10)*bxpi*vvc*gtm2*csti*vdt*ys
     # *(-1./64.*x12c-1./64.*x2zc-5./64.*x2zs)
      zz40c= zz40c+rs1wz(10)*vvc*gtm2*csti*vdt*bxps*ys
     # *(1./32.)
      zz40c= zz40c+rs1wz(10)*vvc*gtm2*csti*vdt*ys*bxp
     # *(-1./32.+3./64.*o*x12+1./64.*o*x2z-1./64.*o*ux+3./
     #    64.*o-1./32.*os+3./64.*x12*x2z-1./64.*x12*ux-5./32.*
     #    x12-1./8.*x2z+3./64.*ux+5./64.*x12s)
      zz40c= zz40c+rs1wz(10)*vvc*gtm2*csti*vdt*ys
     # *(-1./16.*o*x12*x2z+3./64.*o*x12*ux+1./32.*o*x12-1./
     #    64.*o*x2z*ux-1./64.*o*x2z-3./64.*o*ux-7./64.*o*x12s+1.
     #    /64.*o*uxs-3./64.*o-1./32.*os*x12-1./64.*os*x2z+1./16.
     #    *os*ux+3./64.*oc+1./4.*x12*x2z-3./64.*x12*ux-1./16.*
     #    x12*x2zs+1./64.*x12*uxs+1./8.*x12-1./16.*x2z*ux-3./32.
     #    *x2z*x12s+3./32.*x2z-1./64.*ux*x12s-1./64.*ux+1./32.*
     #    x12s-1./32.*x12c+1./8.*x2zs)
      zz40c= zz40c+rs1wz(11)*xx*vvc*gtm2*csti*vdt*ys
     # *(-1./16.*o*x12*x2z+1./8.*o*x12*ux+1./16.*o*x2z*ux-1./
     #    16.*o*x2z-1./8.*o*x12s-1./16.*o*uxs+1./16.*os*x12+1./
     #    16.*os*x2z-1./16.*os*ux+1./8.*x12*x2z*ux-1./16.*x12*x2z
     #    -1./16.*x12*x2zs-1./16.*x12*uxs+1./16.*x2z*ux-1./4.*
     #    x2z*x12s+3./16.*ux*x12s-3./16.*x12c-1./16.*x2zs)
      zz40c= zz40c+rs1wz(11)*bxpi*vvc*gtm2*csti*vdt*ys
     # *(-1./16.*o*x12*ux-1./16.*o*x12-1./16.*o*x2z*ux+1./8.
     #    *o*x2z+1./16.*o*uxs-1./16.*o-1./16.*os*x12-1./16.*os*
     #    x2z+1./16.*os*ux+1./16.*os-1./8.*x12*x2z*ux-1./8.*x12
     #    *x2z+1./16.*x12*x2zs+1./16.*x12*uxs-1./16.*x12+1./16.
     #    *x2z*ux+1./8.*x2z*x12s-1./8.*x2z-1./8.*ux*x12s+1./16.
     #    *ux-1./8.*x12s+1./16.*x12c-1./16.*x2zs)
      zz40c= zz40c+rs1wz(11)*vvc*gtm2*csti*vdt*ys*bxp
     # *(-1./16.)
      zz40c= zz40c+rs1wz(11)*vvc*gtm2*csti*vdt*ys
     # *(1./16.+1./8.*o*x12-1./16.*o*x2z+1./16.*o*ux-1./16.*
     #    o+1./16.*os+1./16.*x12*ux+1./8.*x12+3./16.*x2z-1./8.
     #    *ux+1./16.*x12s)
      zz40c= zz40c+rs1wz(12)*xx*vvc*gtm2*csti*vdt*ys
     # *(-1./8.*o*x12*ux-1./8.*o*x2z*ux+1./8.*o*x2z+1./16.*o
     #    *x12s+1./8.*o*uxs-1./8.*os*x12-1./8.*os*x2z+3./16.*os
     #    *ux+1./16.*oc-1./4.*x12*x2z*ux+1./8.*x12*x2zs+1./8.*
     #    x12*uxs+3./8.*x2z*x12s-5./16.*ux*x12s+1./4.*x12c)
      zz40c= zz40c+rs1wz(12)*bxpi*vvc*gtm2*csti*vdt*ys
     # *(1./16.*o*x12*ux+1./16.*o*x12+1./16.*o*x2z*ux-1./16.*o
     #    *x2z-1./16.*o*ux-1./16.*o*uxs+1./8.*o+1./16.*os*x12
     #    +1./16.*os*x2z-1./16.*os*ux-1./8.*os+1./8.*x12*x2z*ux
     #    +3./16.*x12*x2z-1./16.*x12*ux-1./16.*x12*x2zs-1./16.*
     #    x12*uxs-1./16.*x2z*ux-1./8.*x2z*x12s+1./16.*x2z+1./8.
     #    *ux*x12s+3./16.*x12s-1./16.*x12c+1./16.*x2zs)
      zz40c= zz40c+rs1wz(12)*vvc*gtm2*csti*vdt*ys*bxp
     # *(1./16.)
      zz40c= zz40c+rs1wz(12)*vvc*gtm2*csti*vdt*ys
     # *(-1./16.-1./8.*o*x12-1./16.*x12*x2z-1./16.*x12-1./
     #    8.*x2z+1./16.*ux-1./8.*x12s)
      zz40c= zz40c+rs1wz(13)*xx*vvc*gtm2*csti*vdt*ys
     # *(1./16.*o*x12*x2z-5./32.*o*x2z*ux-1./32.*o*x2z-1./16.*
     #    o*x12s+3./32.*o*x2zs+1./16.*o*uxs-1./16.*os*x12-1./8.
     #    *os*x2z+1./8.*os*ux+1./16.*oc-3./32.*x12*x2z*ux+3./32.
     #    *x12*x2z+1./16.*x12*uxs+1./16.*x2z*x12s-1./8.*ux*x12s
     #    +1./16.*x12c+1./32.*x2zs)
      zz40c= zz40c+rs1wz(13)*bxpi*vvc*gtm2*csti*vdt*ys
     # *(-1./16.*o*x12*x2z+1./32.*o*x12*ux-1./32.*o*x12+3./
     #    32.*o*x2z*ux+1./32.*o*x2z-1./32.*o*ux-1./16.*o*x2zs-1.
     #    /32.*o*uxs-1./32.*o+1./32.*os*x12+1./32.*os*x2z-1./32.
     #    *os*ux+1./16.*x12*x2z*ux+1./32.*x12*x2z-1./32.*x12*ux
     #    -1./32.*x12*x2zs-1./32.*x12*uxs+3./32.*x12-1./32.*x2z
     #    *ux-1./16.*x2z*x12s+1./16.*x2z+1./16.*ux*x12s-1./32.*
     #    x12s-1./32.*x12c+1./32.*x2zs)
      zz40c= zz40c+rs1wz(13)*vvc*gtm2*csti*vdt*ys*bxp
     # *(1./32.)
      zz40c= zz40c+rs1wz(13)*vvc*gtm2*csti*vdt*ys
     # *(-1./32.+1./16.*o*x12+1./32.*o+1./32.*x12*x2z-1./8.
     #    *x12-3./32.*x2z+1./32.*ux+1./16.*x12s)
      zz40c= zz40c+rs1wz(14)*xx*vvc*gtm2*csti*vdt*ys
     # *(-3./32.*o*x12*x2z+1./8.*o*x2z*ux+1./16.*o*x2z+1./32.
     #    *o*x12s-3./32.*o*x2zs-1./32.*o*uxs+1./32.*os*x12+3./
     #    32.*os*x2z-1./16.*os*ux-1./32.*oc+1./32.*x12*x2z*ux-1.
     #    /8.*x12*x2z+1./32.*x12*x2zs-1./32.*x12*uxs+1./32.*x2z*
     #    ux+1./16.*ux*x12s-1./32.*x12c-1./16.*x2zs)
      zz40c= zz40c+rs1wz(14)*bxpi*vvc*gtm2*csti*vdt*ys
     # *(1./16.*o*x12*x2z-1./32.*o*x12*ux-1./32.*o*x12-3./32.*
     #    o*x2z*ux-1./16.*o*x2z+1./16.*o*ux+1./16.*o*x2zs+1./32.
     #    *o*uxs+1./16.*o-1./32.*os*x12-1./32.*os*x2z+1./32.*os
     #    *ux+1./32.*os-1./16.*x12*x2z*ux+1./32.*x12*x2zs+1./32.
     #    *x12*uxs-1./8.*x12+1./32.*x2z*ux+1./16.*x2z*x12s-3./
     #    32.*x2z-1./16.*ux*x12s+1./32.*ux+1./16.*x12s+1./32.*
     #    x12c-1./32.*x2zs)
      zz40c= zz40c+rs1wz(14)*vvc*gtm2*csti*vdt*ys*bxp
     # *(-1./32.)
      zz40c= zz40c+rs1wz(14)*vvc*gtm2*csti*vdt*ys
     # *(1./32.+1./32.*o*x2z-1./32.*o*ux-1./16.*o-1./32.*os
     #    -1./16.*x12*x2z+1./32.*x12*ux+5./32.*x12+1./8.*x2z-
     #    1./16.*ux-3./32.*x12s)
*
      zz10q= 0.d0
      zz20q= 0.d0
      zz30q= 0.d0
      zz40q= 0.d0
*
*------------------------------------------------------------------------
*
       else if(jj.eq.5) then
*
*------------------------------------------------------------------------
*
      zz11s= xx*rl1*vvs*cqti*vdt*y*(-1./8.+3./4.*
     #    zi*o*x12-1./2.*zi*o*x12s-3./8.*zi*o-3./4.
     #    *zi*os*x12+1./4.*zi*os*x12s+3./8.*zi*os+
     #    1./4.*zi*oc*x12-1./8.*zi*oc-1./4.*zi*x12
     #    +1./4.*zi*x12s+1./8.*zi-1./4.*o*x12*x2z-3./
     #    8.*o*x12+1./8.*o*x2z+1./4.*o+1./4.*os*x12-1./8.*os+
     #    1./8.*x12*x2zs+1./8.*x12-1./8.*x2z-1./8.*x12s-1./8.*
     #    x12c-1./8.*x2zs)
      zz11s= zz11s+xx*rl3*vvc*gtm2*csti*vdt*ys*(1./
     #    16.*o*x12*x2zs+1./8.*o*x2z*x12s+1./16.*o*x12c+1./16.*
     #    x12*x12c-1./16.*x12*x2zc+1./8.*x12*x2zs+1./16.*x2z*x12s
     #    +1./16.*x2z*x12c-1./16.*x12s*x2zs+1./16.*x2zc)
      zz11s= zz11s+xx*vvs*gtm2*pwsm2*cqti*vdt*vut*y*
     #  zxi*(-1./32.*os*x12+1./16.*oc*x12-1./32.*oc)
      zz11s= zz11s+xx*vvs*gtm2*pwsm2*cqti*vdt*vut*y
     # *(-1./16.*o*x12*x2z+1./32.*o*x2z-1./16.*o*x12s+1./16.
     #    *os*x12-1./32.*os-1./32.*x12*x2z+1./32.*x12*x2zs+1./
     #    16.*x2z*x12s+1./32.*x12c-1./32.*x2zs)
      zz11s= zz11s+xx*vvs*gtm2*pwsm2*cqti*vdts*y*(
     #    -1./32.*x12*x2zs-1./8.*x2z*x12s-3./32.*x12c)
      zz11s= zz11s+bxpi*rl1*vvs*cqti*vet*vdt*y*(-
     #    1./64.*o*x12*x2z-1./64.*o*x12s-1./64.*x12*x2z+1./64.*
     #    x12*x2zs+1./32.*x2z*x12s+1./64.*x12c-1./64.*x2zs)
      zz11s= zz11s+bxpi*rl1*vvs*cqti*vdt*y*(-3./8.
     #    +zi*o*x12-1./2.*zi*o*x12s-3./4.*zi*o-1.
     #    /2.*zi*os*x12+3./8.*zi*os-1./2.*zi*x12+1.
     #    /2.*zi*x12s+3./8.*zi+1./16.*o*x12*x2z-1./2.*o
     #    *x12+1./16.*o*x12s+3./8.*o+5./16.*x12*x2z-1./16.*x12*
     #    x2zs+1./8.*x12-1./8.*x2z*x12s-3./8.*x2z-1./4.*x12s-
     #    1./16.*x12c+1./16.*x2zs)
      zz11s= zz11s+bxpi*rl3*vvc*gtm2*csti*vdt*ys*(5.
     #    /32.*o*x12*x2z+3./16.*o*x12s-1./32.*o*x2zs-1./32.*os*
     #    x12*x2z-1./32.*os*x12s+5./16.*x12*x2z+1./32.*x12*x12c
     #    +1./32.*x12*x2zc-1./4.*x12*x2zs-5./32.*x2z*x12s+3./32.
     #    *x2z*x12c+3./32.*x12s*x2zs+1./16.*x12s+1./16.*x12c-1./
     #    32.*x2zc+1./4.*x2zs)
      zz11s= zz11s+bxpi*vvs*gtm2*pwsm2*cqti*vdt*vut*y*
     #  zxi*(-1./32.*o*x12+1./16.*os*x12-1./16.*os)
      zz11s= zz11s+bxpi*vvs*gtm2*pwsm2*cqti*vdt*vut*y
     # *(1./64.*o*x12*x2z-1./16.*o*x12+1./64.*o*x12s+7./64.*
     #    x12*x2z-1./64.*x12*x2zs-1./32.*x12-1./32.*x2z*x12s-1./
     #    16.*x2z+3./32.*x12s-1./64.*x12c+1./64.*x2zs)
      zz11s= zz11s+bxpi*vvs*gtm2*pwsm2*cqti*vdts*y
     # *(-1./64.*o*x12*x2z-1./64.*o*x12s-9./64.*x12*x2z+1./
     #    64.*x12*x2zs+1./32.*x2z*x12s-3./16.*x12s+1./64.*x12c-
     #    1./64.*x2zs)
      zz11s= zz11s+rl1*vvs*cqti*vet*vdt*bxps*y*(1./
     #    32.-1./32.*o-1./16.*x12)
      zz11s= zz11s+rl1*vvs*cqti*vet*vdt*y*bxp*(-1.
     #    /32.+1./32.*o*x2z+1./64.*o+1./16.*x12*x2z+3./64.*x12
     #    -3./64.*x2z+1./16.*x12s)
      zz11s= zz11s+rl1*vvs*cqti*vet*vdt*y*(1./32.*
     #    o*x12-1./64.*o*x2z-1./64.*os*x12-3./64.*x12*x2z-1./64.
     #    *x12*x2zs+1./64.*x12-1./32.*x2z*x12s+3./64.*x2z-1./16.
     #    *x12s-1./64.*x12c+1./64.*x2zs)
      zz11s= zz11s+rl1*vvs*cqti*vdt*bxps*y*bxp*(1./8.
     #    *zi)
      zz11s= zz11s+rl1*vvs*cqti*vdt*bxps*y*(1./4.
     #    +3./8.*zi*o-1./2.*zi)
      zz11s= zz11s+rl1*vvs*cqti*vdt*y*bxp*(-11./
     #    16.+1./4.*zi*o*x12-9./8.*zi*o+3./8.*zi*
     #    os-1./4.*zi*x12+1./4.*zi*x12s+7./8.*zi
     #    +3./8.*o-1./8.*x12-1./8.*x2z)
      zz11s= zz11s+rl1*vvs*cqti*vdt*y*(7./8.-5./
     #    4.*zi*o*x12+1./2.*zi*o*x12s+3./2.*zi*o+1.
     #    /2.*zi*os*x12-3./4.*zi*os+1./8.*zi*oc+3./
     #    4.*zi*x12-3./4.*zi*x12s-7./8.*zi+5./16.*
     #    o*x12-1./8.*o*x2z-5./8.*o+1./8.*os-1./16.*x12*x2z-3.
     #    /16.*x12+3./8.*x2z+7./16.*x12s)
      zz11s= zz11s+rl3*vvc*gtm2*csti*vdt*bxps*ys*bxp
     # *(1./16.)
      zz11s= zz11s+rl3*vvc*gtm2*csti*vdt*bxps*ys*(
     #    -3./16.+1./8.*o-1./8.*x2z)
      zz11s= zz11s+rl3*vvc*gtm2*csti*vdt*ys*bxp*(5./
     #    32.-3./16.*o*x2z-1./16.*o+1./16.*x12+3./8.*x2z+1./
     #    16.*x12s+1./16.*x2zs)
      zz11s= zz11s+rl3*vvc*gtm2*csti*vdt*ys*(-1./
     #    16.*o*x12*x2z-1./8.*o*x12+3./32.*o*x2z-1./8.*o*x12s+1.
     #    /16.*o*x2zs+1./16.*os*x12-1./32.*x12*x2z+1./16.*x12*
     #    x2zs-3./16.*x12-1./8.*x2z*x12s-11./32.*x2z+1./16.*
     #    x12s-3./16.*x12c-7./32.*x2zs)
      zz11s= zz11s+vvs*gtm2*pwsm2*cqti*vdt*vut*y*bxp*
     #  zxi*(-1./64.+1./32.*o*x12-1./32.*os)
      zz11s= zz11s+vvs*gtm2*pwsm2*cqti*vdt*vut*y*bxp
     # *(-1./32.+1./32.*o+1./16.*x12)
      zz11s= zz11s+vvs*gtm2*pwsm2*cqti*vdt*vut*y*zxi
     # *(-1./32.*o*x12+3./64.*o-1./32.*os*x12+1./32.*os+1./
     #    32.*oc+1./64.*x12)
      zz11s= zz11s+vvs*gtm2*pwsm2*cqti*vdt*vut*y*(
     #    3./64.+1./32.*o*x12-1./32.*o*x2z-1./32.*o+1./32.*os
     #    -1./16.*x12*x2z-1./16.*x12+3./64.*x2z-1./16.*x12s)
      zz11s= zz11s+vvs*gtm2*pwsm2*cqti*vdts*bxps*y
     # *(1./32.)
      zz11s= zz11s+vvs*gtm2*pwsm2*cqti*vdts*y*bxp*(
     #    -1./32.-1./64.*o-7./64.*x12-3./64.*x2z)
      zz11s= zz11s+vvs*gtm2*pwsm2*cqti*vdts*y*(1./
     #    32.*o*x12+1./64.*o*x2z+7./64.*x12*x2z+1./8.*x12+3./64.
     #    *x2z+5./32.*x12s+1./64.*x2zs)
*
      zz21s= xx*rl1*vvs*cqti*vdt*y*(-3./8.+9./4.*
     #    zi*o*x12-3./2.*zi*o*x12s-9./8.*zi*o-9./4.
     #    *zi*os*x12+3./4.*zi*os*x12s+9./8.*zi*os+
     #    3./4.*zi*oc*x12-3./8.*zi*oc-3./4.*zi*x12
     #    +3./4.*zi*x12s+3./8.*zi-3./4.*o*x12*x2z-9./
     #    8.*o*x12+3./8.*o*x2z+3./4.*o+3./4.*os*x12-3./8.*os+
     #    3./8.*x12*x2zs+3./8.*x12-3./8.*x2z-3./8.*x12s-3./8.*
     #    x12c-3./8.*x2zs)
      zz21s= zz21s+xx*rl3*vvc*gtm2*csti*vdt*ys*(3./
     #    16.*o*x12*x2zs+3./8.*o*x2z*x12s+3./16.*o*x12c+3./16.*
     #    x12*x12c-3./16.*x12*x2zc+3./8.*x12*x2zs+3./16.*x2z*x12s
     #    +3./16.*x2z*x12c-3./16.*x12s*x2zs+3./16.*x2zc)
      zz21s= zz21s+xx*vvs*gtm2*pwsm2*cqti*vdt*vut*y*
     #  zxi*(-3./32.*os*x12+3./16.*oc*x12-3./32.*oc)
      zz21s= zz21s+xx*vvs*gtm2*pwsm2*cqti*vdt*vut*y
     # *(-3./16.*o*x12*x2z+3./32.*o*x2z-3./16.*o*x12s+3./16.
     #    *os*x12-3./32.*os-3./32.*x12*x2z+3./32.*x12*x2zs+3./
     #    16.*x2z*x12s+3./32.*x12c-3./32.*x2zs)
      zz21s= zz21s+xx*vvs*gtm2*pwsm2*cqti*vdts*y*(
     #    -3./32.*x12*x2zs-3./8.*x2z*x12s-9./32.*x12c)
      zz21s= zz21s+bxpi*rl1*vvs*cqti*vet*vdt*y*(-
     #    3./64.*o*x12*x2z-3./64.*o*x12s-3./64.*x12*x2z+3./64.*
     #    x12*x2zs+3./32.*x2z*x12s+3./64.*x12c-3./64.*x2zs)
      zz21s= zz21s+bxpi*rl1*vvs*cqti*vdt*y*(-9./8.
     #    +3*zi*o*x12-3./2.*zi*o*x12s-9./4.*zi*o
     #    -3./2.*zi*os*x12+9./8.*zi*os-3./2.*zi*
     #    x12+3./2.*zi*x12s+9./8.*zi+3./16.*o*x12*x2z
     #    -3./2.*o*x12+3./16.*o*x12s+9./8.*o+15./16.*x12*x2z-
     #    3./16.*x12*x2zs+3./8.*x12-3./8.*x2z*x12s-9./8.*x2z-3./
     #    4.*x12s-3./16.*x12c+3./16.*x2zs)
      zz21s= zz21s+bxpi*rl3*vvc*gtm2*csti*vdt*ys*(
     #    15./32.*o*x12*x2z+9./16.*o*x12s-3./32.*o*x2zs-3./32.*os
     #    *x12*x2z-3./32.*os*x12s+15./16.*x12*x2z+3./32.*x12*x12c
     #    +3./32.*x12*x2zc-3./4.*x12*x2zs-15./32.*x2z*x12s+9./
     #    32.*x2z*x12c+9./32.*x12s*x2zs+3./16.*x12s+3./16.*x12c
     #    -3./32.*x2zc+3./4.*x2zs)
      zz21s= zz21s+bxpi*vvs*gtm2*pwsm2*cqti*vdt*vut*y*
     #  zxi*(-3./32.*o*x12+3./16.*os*x12-3./16.*os)
      zz21s= zz21s+bxpi*vvs*gtm2*pwsm2*cqti*vdt*vut*y
     # *(3./64.*o*x12*x2z-3./16.*o*x12+3./64.*o*x12s+21./64.*
     #    x12*x2z-3./64.*x12*x2zs-3./32.*x12-3./32.*x2z*x12s-3./
     #    16.*x2z+9./32.*x12s-3./64.*x12c+3./64.*x2zs)
      zz21s= zz21s+bxpi*vvs*gtm2*pwsm2*cqti*vdts*y
     # *(-3./64.*o*x12*x2z-3./64.*o*x12s-27./64.*x12*x2z+3./
     #    64.*x12*x2zs+3./32.*x2z*x12s-9./16.*x12s+3./64.*x12c-
     #    3./64.*x2zs)
      zz21s= zz21s+rl1*vvs*cqti*vet*vdt*bxps*y*(1./
     #    32.-1./32.*o-1./16.*x12)
      zz21s= zz21s+rl1*vvs*cqti*vet*vdt*y*bxp*(-1.
     #    /16.+1./32.*o*x2z+1./64.*o+1./16.*x12*x2z+7./64.*x12
     #    -3./64.*x2z+1./16.*x12s)
      zz21s= zz21s+rl1*vvs*cqti*vet*vdt*y*(1./16.*
     #    o*x12-1./64.*o*x2z-1./64.*os*x12-9./64.*x12*x2z-1./64.
     #    *x12*x2zs+3./64.*x12-1./32.*x2z*x12s+7./64.*x2z-5./32.
     #    *x12s-1./64.*x12c+1./64.*x2zs)
      zz21s= zz21s+rl1*vvs*cqti*vdt*bxps*y*bxp*(1./8.
     #    *zi)
      zz21s= zz21s+rl1*vvs*cqti*vdt*bxps*y*(1./4.
     #    +3./8.*zi*o-3./4.*zi)
      zz21s= zz21s+rl1*vvs*cqti*vdt*y*bxp*(-21./
     #    16.+3./4.*zi*o*x12-15./8.*zi*o+3./8.*zi*
     #    os-3./4.*zi*x12+3./4.*zi*x12s+15./8.*zi
     #    +3./8.*o-1./8.*x12-1./8.*x2z)
      zz21s= zz21s+rl1*vvs*cqti*vdt*y*(19./8.-15.
     #    /4.*zi*o*x12+3./2.*zi*o*x12s+15./4.*zi*o
     #    +3./2.*zi*os*x12-3./2.*zi*os+1./8.*zi*oc
     #    +9./4.*zi*x12-9./4.*zi*x12s-19./8.*zi+
     #    19./16.*o*x12-1./8.*o*x2z-11./8.*o+1./8.*os-3./16.*
     #    x12*x2z-13./16.*x12+7./8.*x2z+21./16.*x12s)
      zz21s= zz21s+rl3*vvc*gtm2*csti*vdt*bxps*ys*bxp
     # *(1./16.)
      zz21s= zz21s+rl3*vvc*gtm2*csti*vdt*bxps*ys*(
     #    -5./16.+1./8.*o-1./8.*x2z)
      zz21s= zz21s+rl3*vvc*gtm2*csti*vdt*ys*bxp*(13.
     #    /32.+1./4.*o*x12-3./16.*o*x2z-1./8.*o+11./16.*x2z+5.
     #    /16.*x12s+1./16.*x2zs)
      zz21s= zz21s+rl3*vvc*gtm2*csti*vdt*ys*(-7./
     #    16.*o*x12*x2z-5./16.*o*x12+7./32.*o*x2z-1./2.*o*x12s+
     #    1./16.*o*x2zs+1./8.*os*x12+5./32.*x12*x2z+1./8.*x12*
     #    x2zs-9./16.*x12-1./2.*x2z*x12s-31./32.*x2z+1./4.*x12s
     #    -5./8.*x12c-15./32.*x2zs)
      zz21s= zz21s+vvs*gtm2*pwsm2*cqti*vdt*vut*y*bxp*
     #  zxi*(-1./64.+1./32.*o*x12-1./16.*o-1./32.*os)
      zz21s= zz21s+vvs*gtm2*pwsm2*cqti*vdt*vut*y*bxp
     # *(-1./16.+1./32.*o+1./8.*x12)
      zz21s= zz21s+vvs*gtm2*pwsm2*cqti*vdt*vut*y*zxi
     # *(1./32.*o*x12+7./64.*o-5./32.*os*x12+5./32.*os+1./32.
     #    *oc+1./64.*x12)
      zz21s= zz21s+vvs*gtm2*pwsm2*cqti*vdt*vut*y*(
     #    7./64.+1./8.*o*x12-1./32.*o*x2z-1./32.*o+1./32.*os-
     #    5./32.*x12*x2z-5./32.*x12+7./64.*x2z-5./32.*x12s)
      zz21s= zz21s+vvs*gtm2*pwsm2*cqti*vdts*bxps*y
     # *(1./32.)
      zz21s= zz21s+vvs*gtm2*pwsm2*cqti*vdts*y*bxp*(
     #    -1./16.-1./64.*o-15./64.*x12-3./64.*x2z)
      zz21s= zz21s+vvs*gtm2*pwsm2*cqti*vdts*y*(1./
     #    16.*o*x12+1./64.*o*x2z+17./64.*x12*x2z+11./32.*x12+7./
     #    64.*x2z+7./16.*x12s+1./64.*x2zs)
*
      zz31s= bxpi*rl1*vvs*cqti*vet*vdt*y*(1./64.*o*x12*
     #    x2z+1./64.*o*x12s-3./64.*x12*x2z+1./32.*x12*x2zs+5./
     #    64.*x2z*x12s+3./64.*x12c-1./32.*x2zs)
      zz31s= zz31s+bxpi*rl1*vvs*cqti*vdt*y*(-1./4.
     #    +1./4.*zi*o*x12-1./2.*zi*o+1./4.*zi*os
     #    -1./4.*zi*x12+1./4.*zi+1./4.*o-1./4.*x2z)
      zz31s= zz31s+bxpi*rl2*vvs*pwsc*cqti*vet*vdt*y
     # *(-1./64.*o*x12s+1./64.*x12*x2z-1./64.*x2z*x12s-1./64.
     #    *x12c)
      zz31s= zz31s+bxpi*rl2*vvs*pwsc*cqti*vdt*y*(1./
     #    4.-1./2.*zi*o*x12+1./2.*zi*o-1./4.*zi*os
     #    +1./2.*zi*x12-1./4.*zi-1./4.*o-1./4.*x12*
     #    x2z-1./4.*x12+1./4.*x2z-1./4.*x12s)
      zz31s= zz31s+bxpi*rl3*vvc*gtm2*csti*vdt*ys*(1.
     #    /8.*o*x12*x2z+3./32.*o*x12s-1./64.*o*x2zs+1./32.*x12*
     #    x2z+5./64.*x12*x2zs+11./64.*x2z*x12s+3./32.*x12c+3./
     #    64.*x2zs)
      zz31s= zz31s+bxpi*vvs*gs*gtc*pws*pwt*cqti*vet*
     #  vdt*y*(-1./128.*o*x12s+1./128.*x12*x2z-1./128.*x2z*x12s
     #    -1./128.*x12c)
      zz31s= zz31s+bxpi*vvs*gs*gtc*pws*pwt*cqti*vdt*y
     # *(1./8.-1./4.*zi*o*x12+1./4.*zi*o-1./8.*
     #    zi*os+1./4.*zi*x12-1./8.*zi-1./8.*o-1./
     #    8.*x12*x2z-1./8.*x12+1./8.*x2z-1./8.*x12s)
      zz31s= zz31s+bxpi*vvs*gtm2*pwsm2*cqti*vdt*vut*y*
     #  zxi*(-5./128.*o*x12+1./64.*o*x12s+1./128.*os*x12-3./
     #    128.*os+1./64.*oc-1./64.*x12s)
      zz31s= zz31s+bxpi*vvs*gtm2*pwsm2*cqti*vdt*vut*y
     # *(-1./128.*o*x12-1./64.*o*x2z-3./128.*o+1./64.*os-3.
     #    /128.*x12*x2z-1./64.*x12+3./128.*x2z-1./128.*x12s)
      zz31s= zz31s+bxpi*vvs*gtm2*pwsm2*cqti*vdts*y
     # *(-1./16.*o*x12-1./32.*o*x2z-3./32.*x12*x2z-1./16.*
     #    x12s-1./32.*x2zs)
      zz31s= zz31s+rl1*vvs*cqti*vet*vdt*bxps*y*(1./
     #    16.-1./16.*o-1./8.*x12)
      zz31s= zz31s+rl1*vvs*cqti*vet*vdt*y*bxp*(-9.
     #    /128.+1./16.*o*x12+3./64.*o*x2z+7./128.*o+1./8.*x12*
     #    x2z+13./128.*x12-3./32.*x2z+9./64.*x12s)
      zz31s= zz31s+rl1*vvs*cqti*vet*vdt*y*(-3./
     #    128.*o*x12*x2z-7./128.*o*x12-5./128.*o*x2z-1./64.*o*
     #    x12s-1./128.*os*x12-3./32.*x12*x2z-1./32.*x12*x2zs+3./
     #    64.*x12-9./128.*x2z*x12s+13./128.*x2z-21./128.*x12s-5.
     #    /128.*x12c+1./32.*x2zs)
      zz31s= zz31s+rl1*vvs*cqti*vdt*bxps*y*bxp*(1./8.
     #    *zi)
      zz31s= zz31s+rl1*vvs*cqti*vdt*bxps*y*(1./4.
     #    +3./8.*zi*o+1./4.*zi*x12-5./8.*zi)
      zz31s= zz31s+rl1*vvs*cqti*vdt*y*bxp*(-7./8.
     #    +1./4.*zi*o*x12-5./4.*zi*o+1./4.*zi*os
     #    -3./4.*zi*x12+9./8.*zi+1./4.*o+1./8.*x12-
     #    1./8.*x2z)
      zz31s= zz31s+rl1*vvs*cqti*vdt*y*(7./8.-1./
     #    2.*zi*o*x12+11./8.*zi*o-1./2.*zi*os+3./4.
     #    *zi*x12-7./8.*zi-1./2.*o-1./8.*x12+3./8.*
     #    x2z)
      zz31s= zz31s+rl2*vvs*pwsc*cqti*vet*vdt*bxps*y
     # *(-5./128.+1./32.*o+5./64.*x12)
      zz31s= zz31s+rl2*vvs*pwsc*cqti*vet*vdt*y*bxp
     # *(5./128.-5./128.*o*x12-1./64.*o-5./128.*x12*x2z-5./
     #    64.*x12+5./128.*x2z-5./128.*x12s)
      zz31s= zz31s+rl2*vvs*pwsc*cqti*vet*vdt*y*(5./
     #    128.*o*x12+5./128.*x12*x2z-1./64.*x12-5./128.*x2z+9./
     #    128.*x12s)
      zz31s= zz31s+rl2*vvs*pwsc*cqti*vdt*bxps*y*(
     #    -1./4.*zi*o-1./2.*zi*x12+1./4.*zi)
      zz31s= zz31s+rl2*vvs*pwsc*cqti*vdt*y*bxp*(1./
     #    2.-1./2.*zi*o*x12+zi*o-1./4.*zi*os+3./
     #    2.*zi*x12-3./4.*zi-1./4.*o-3./4.*x12)
      zz31s= zz31s+rl2*vvs*pwsc*cqti*vdt*y*(-3./
     #    4.+zi*o*x12-5./4.*zi*o+1./2.*zi*os-3./
     #    2.*zi*x12+3./4.*zi+1./2.*o+1./4.*x12*x2z+
     #    x12-1./4.*x2z+1./4.*x12s)
      zz31s= zz31s+rl3*vvc*gtm2*csti*vdt*bxps*ys*bxp
     # *(1./16.)
      zz31s= zz31s+rl3*vvc*gtm2*csti*vdt*bxps*ys*(
     #    -7./64.-3./64.*o-5./32.*x12-1./8.*x2z)
      zz31s= zz31s+rl3*vvc*gtm2*csti*vdt*ys*bxp*(1./
     #    16.+25./128.*o*x12+5./128.*o*x2z+3./128.*os+19./64.*
     #    x12*x2z+21./128.*x12+3./16.*x2z+3./16.*x12s+1./16.*
     #    x2zs)
      zz31s= zz31s+rl3*vvc*gtm2*csti*vdt*ys*(-21.
     #    /128.*o*x12*x2z-11./64.*o*x12+1./64.*o*x2z-5./64.*o*
     #    x12s+1./128.*os*x12-1./64.*os*x2z-33./128.*x12*x2z-7./
     #    64.*x12*x2zs-1./32.*x12-25./128.*x2z*x12s-7./64.*x2z-
     #    3./16.*x12s-11./128.*x12c-5./64.*x2zs)
      zz31s= zz31s+vvs*gs*gtc*pws*pwt*cqti*vet*vdt*
     #  bxps*y*(-5./256.+1./64.*o+5./128.*x12)
      zz31s= zz31s+vvs*gs*gtc*pws*pwt*cqti*vet*vdt*y*
     #  bxp*(5./256.-5./256.*o*x12-1./128.*o-5./256.*x12*x2z-5.
     #    /128.*x12+5./256.*x2z-5./256.*x12s)
      zz31s= zz31s+vvs*gs*gtc*pws*pwt*cqti*vet*vdt*y
     # *(5./256.*o*x12+5./256.*x12*x2z-1./128.*x12-5./256.*x2z
     #    +9./256.*x12s)
      zz31s= zz31s+vvs*gs*gtc*pws*pwt*cqti*vdt*bxps*y
     # *(-1./8.*zi*o-1./4.*zi*x12+1./8.*zi)
      zz31s= zz31s+vvs*gs*gtc*pws*pwt*cqti*vdt*y*bxp
     # *(1./4.-1./4.*zi*o*x12+1./2.*zi*o-1./8.*
     #    zi*os+3./4.*zi*x12-3./8.*zi-1./8.*o-3./
     #    8.*x12)
      zz31s= zz31s+vvs*gs*gtc*pws*pwt*cqti*vdt*y*(
     #    -3./8.+1./2.*zi*o*x12-5./8.*zi*o+1./4.*
     #    zi*os-3./4.*zi*x12+3./8.*zi+1./4.*o+1./
     #    8.*x12*x2z+1./2.*x12-1./8.*x2z+1./8.*x12s)
      zz31s= zz31s+vvs*gtm2*pwsm2*cqti*vdt*vut*bxps*y*
     #  zxi*(3./128.+1./128.*o)
      zz31s= zz31s+vvs*gtm2*pwsm2*cqti*vdt*vut*y*bxp*
     #  zxi*(-9./256.+1./32.*o*x12-15./256.*o+1./64.*os-1./
     #    32.*x12)
      zz31s= zz31s+vvs*gtm2*pwsm2*cqti*vdt*vut*y*bxp
     # *(-3./256.)
      zz31s= zz31s+vvs*gtm2*pwsm2*cqti*vdt*vut*y*zxi
     # *(1./256.*o*x12-1./64.*o*x12s+15./256.*o-1./128.*os*x12
     #    +3./256.*os-1./64.*oc+13./256.*x12+1./128.*x12s)
      zz31s= zz31s+vvs*gtm2*pwsm2*cqti*vdt*vut*y*(
     #    3./256.-1./128.*o*x12+11./256.*o-1./64.*os+3./256.*
     #    x12*x2z+5./256.*x12-3./256.*x2z+1./256.*x12s)
      zz31s= zz31s+vvs*gtm2*pwsm2*cqti*vdts*bxps*y
     # *(1./32.)
      zz31s= zz31s+vvs*gtm2*pwsm2*cqti*vdts*y*bxp*(
     #    -3./64.-1./32.*o-5./64.*x12-3./64.*x2z)
      zz31s= zz31s+vvs*gtm2*pwsm2*cqti*vdts*y*(3./
     #    64.*o*x12+1./64.*o*x2z+3./64.*o+1./16.*x12*x2z+7./64.
     #    *x12+5./64.*x2z+3./64.*x12s+1./64.*x2zs)
      zz31s= zz31s+re(gs*gtc*pws*pwt)*bxpi*vvs*cqti*
    #  vet*vdt*y*(1./64.*o*x12s-1./64.*x12*x2z+1./64.*x2z*x12s
     #    +1./64.*x12c)
      zz31s= zz31s+re(gs*gtc*pws*pwt)*bxpi*vvs*cqti*
     #  vdt*y*(-1./4.+1./2.*zi*o*x12-1./2.*zi*o+1./
     #    4.*zi*os-1./2.*zi*x12+1./4.*zi+1./4.*o
     #    +1./4.*x12*x2z+1./4.*x12-1./4.*x2z+1./4.*x12s)
      zz31s= zz31s+re(gs*gtc*pws*pwt)*vvs*cqti*vet*
     #  vdt*bxps*y*(5./128.-1./32.*o-5./64.*x12)
      zz31s= zz31s+re(gs*gtc*pws*pwt)*vvs*cqti*vet*
     #  vdt*y*bxp*(-5./128.+5./128.*o*x12+1./64.*o+5./128.*x12
     #    *x2z+5./64.*x12-5./128.*x2z+5./128.*x12s)
      zz31s= zz31s+re(gs*gtc*pws*pwt)*vvs*cqti*vet*
     #  vdt*y*(-5./128.*o*x12-5./128.*x12*x2z+1./64.*x12+5./
     #    128.*x2z-9./128.*x12s)
      zz31s= zz31s+re(gs*gtc*pws*pwt)*vvs*cqti*vdt*
     #  bxps*y*(1./4.*zi*o+1./2.*zi*x12-1./4.*zi)
      zz31s= zz31s+re(gs*gtc*pws*pwt)*vvs*cqti*vdt*y*
     #  bxp*(-1./2.+1./2.*zi*o*x12-zi*o+1./4.*
     #    zi*os-3./2.*zi*x12+3./4.*zi+1./4.*o+3./
     #    4.*x12)
      zz31s= zz31s+re(gs*gtc*pws*pwt)*vvs*cqti*vdt*y
     # *(3./4.-zi*o*x12+5./4.*zi*o-1./2.*zi*os
     #    +3./2.*zi*x12-3./4.*zi-1./2.*o-1./4.*x12*
     #    x2z-x12+1./4.*x2z-1./4.*x12s)
*
      zz41s= xx*rl1*vvs*cqti*vet*vdt*y*(-1./32.*o*x12*
     #    x2z-1./32.*o*x12s-1./32.*x12*x2z+1./32.*x12*x2zs+1./
     #    16.*x2z*x12s+1./32.*x12c-1./32.*x2zs)
      zz41s= zz41s+xx*rl1*vvs*cqti*vdt*y*(1./8.*o*
     #    x12*x2z+1./8.*o*x12s+1./8.*x12*x2z-1./8.*x12*x2zs-1./
     #    4.*x2z*x12s-1./8.*x12c+1./8.*x2zs)
      zz41s= zz41s+xx*rl3*vvc*gtm2*csti*vdt*ys*(1./
     #    16.*o*x12s-1./16.*o*x2zs-1./16.*os*x12*x2z-1./16.*os*
     #    x12s+1./16.*x12*x2z+1./16.*x12*x12c+1./16.*x12*x2zc-3.
     #    /16.*x12*x2zs-3./16.*x2z*x12s+3./16.*x2z*x12c+3./16.*
     #    x12s*x2zs-1./16.*x12c-1./16.*x2zc+1./16.*x2zs)
      zz41s= zz41s+xx*vvs*gtm2*pwsm2*cqti*vdt*vut*y
     # *(1./32.*o*x12*x2z+1./32.*o*x12s+1./32.*x12*x2z-1./32.*
     #    x12*x2zs-1./16.*x2z*x12s-1./32.*x12c+1./32.*x2zs)
      zz41s= zz41s+xx*vvs*gtm2*pwsm2*cqti*vdts*y*(
     #    -1./32.*o*x12*x2z-1./32.*o*x12s-1./32.*x12*x2z+1./32.
     #    *x12*x2zs+1./16.*x2z*x12s+1./32.*x12c-1./32.*x2zs)
      zz41s= zz41s+bxpi*rl1*vvs*cqti*vet*vdt*y*(-
     #    1./32.*o*x12+3./32.*x12*x2z-1./32.*x12-1./16.*x2z+3./
     #    32.*x12s)
      zz41s= zz41s+bxpi*rl1*vvs*cqti*vdt*y*(1./8.*o
     #    *x12-3./8.*x12*x2z+1./8.*x12+1./4.*x2z-3./8.*x12s)
      zz41s= zz41s+bxpi*rl3*vvc*gtm2*csti*vdt*ys*(1.
     #    /16.*o*x12*x2z-1./8.*o*x2z+1./16.*o*x12s-1./16.*os*x12
     #    -7./16.*x12*x2z+1./4.*x12*x2zs+1./16.*x12+1./2.*x2z*
     #    x12s+1./8.*x2z-1./4.*x12s+1./4.*x12c-3./16.*x2zs)
      zz41s= zz41s+bxpi*vvs*gtm2*pwsm2*cqti*vdt*vut*y
     # *(1./32.*o*x12-3./32.*x12*x2z+1./32.*x12+1./16.*x2z-3.
     #    /32.*x12s)
      zz41s= zz41s+bxpi*vvs*gtm2*pwsm2*cqti*vdts*y
     # *(-1./32.*o*x12+3./32.*x12*x2z-1./32.*x12-1./16.*x2z
     #    +3./32.*x12s)
      zz41s= zz41s+rl1*vvs*cqti*vet*vdt*y*bxp*(-1.
     #    /32.+1./16.*x12)
      zz41s= zz41s+rl1*vvs*cqti*vet*vdt*y*(1./32.
     #    +1./32.*o*x12-3./32.*x12*x2z-1./32.*x12+1./16.*x2z-
     #    3./32.*x12s)
      zz41s= zz41s+rl1*vvs*cqti*vdt*y*bxp*(1./8.-
     #    1./4.*x12)
      zz41s= zz41s+rl1*vvs*cqti*vdt*y*(-1./8.-
     #    1./8.*o*x12+3./8.*x12*x2z+1./8.*x12-1./4.*x2z+3./8.*
     #    x12s)
      zz41s= zz41s+rl3*vvc*gtm2*csti*vdt*bxps*ys*(1.
     #    /16.-1./8.*x12)
      zz41s= zz41s+rl3*vvc*gtm2*csti*vdt*ys*bxp*(1./
     #    16.*o*x12-1./16.*o+5./16.*x12*x2z-1./8.*x12-3./16.*
     #    x2z+5./16.*x12s)
      zz41s= zz41s+rl3*vvc*gtm2*csti*vdt*ys*(-1./
     #    16.-1./16.*o*x12*x2z-1./16.*o*x12+1./8.*o*x2z-1./16.*
     #    o*x12s+1./16.*o+1./16.*os*x12+1./8.*x12*x2z-1./4.*x12
     #    *x2zs+3./16.*x12-1./2.*x2z*x12s+1./16.*x2z-1./16.*
     #    x12s-1./4.*x12c+3./16.*x2zs)
      zz41s= zz41s+vvs*gtm2*pwsm2*cqti*vdt*vut*y*bxp
     # *(1./32.-1./16.*x12)
      zz41s= zz41s+vvs*gtm2*pwsm2*cqti*vdt*vut*y*(
     #    -1./32.-1./32.*o*x12+3./32.*x12*x2z+1./32.*x12-1./
     #    16.*x2z+3./32.*x12s)
      zz41s= zz41s+vvs*gtm2*pwsm2*cqti*vdts*y*bxp*(
     #    -1./32.+1./16.*x12)
      zz41s= zz41s+vvs*gtm2*pwsm2*cqti*vdts*y*(1./
     #    32.+1./32.*o*x12-3./32.*x12*x2z-1./32.*x12+1./16.*x2z
     #    -3./32.*x12s)
*
      zz11c= rs1wz(1)*xx*vvc*gtm2*csti*vdt*ys*(1./8.*o*
     #    x12*x2zs+1./4.*o*x2z*x12s+1./8.*o*x12c+1./8.*x12*x12c
     #    -1./8.*x12*x2zc+1./4.*x12*x2zs+1./8.*x2z*x12s+1./8.*
     #    x2z*x12c-1./8.*x12s*x2zs+1./8.*x2zc)
      zz11c= zz11c+rs1wz(1)*bxpi*vvc*gtm2*csti*vdt*ys
     # *(5./16.*o*x12*x2z+3./8.*o*x12s-1./16.*o*x2zs-1./16.*os
     #    *x12*x2z-1./16.*os*x12s+5./8.*x12*x2z+1./16.*x12*x12c
     #    +1./16.*x12*x2zc-1./2.*x12*x2zs-5./16.*x2z*x12s+3./16.
     #    *x2z*x12c+3./16.*x12s*x2zs+1./8.*x12s+1./8.*x12c-1./
     #    16.*x2zc+1./2.*x2zs)
      zz11c= zz11c+rs1wz(1)*vvc*gtm2*csti*vdt*bxps*ys*
     #  bxp*(1./8.)
      zz11c= zz11c+rs1wz(1)*vvc*gtm2*csti*vdt*bxps*ys
     # *(-3./8.+1./4.*o-1./4.*x2z)
      zz11c= zz11c+rs1wz(1)*vvc*gtm2*csti*vdt*ys*bxp
     # *(5./16.-3./8.*o*x2z-1./8.*o+1./8.*x12+3./4.*x2z+1./
     #    8.*x12s+1./8.*x2zs)
      zz11c= zz11c+rs1wz(1)*vvc*gtm2*csti*vdt*ys*(
     #    -1./8.*o*x12*x2z-1./4.*o*x12+3./16.*o*x2z-1./4.*o*
     #    x12s+1./8.*o*x2zs+1./8.*os*x12-1./16.*x12*x2z+1./8.*
     #    x12*x2zs-3./8.*x12-1./4.*x2z*x12s-11./16.*x2z+1./8.*
     #    x12s-3./8.*x12c-7./16.*x2zs)
      zz11c= zz11c+rs1wz(4)*xx*vvc*gtm2*csti*vdt*ys
     # *(-1./16.*o*x12*x2zs-1./16.*o*x2z*x12c-1./16.*o*x12s*
     #    x2zs-1./32.*os*x2z*x12s-1./32.*x12*x2z*x12c-1./32.*x12s
     #    *x2zc-1./16.*x12c*x2zs-1./32.*x2zc)
      zz11c= zz11c+rs1wz(4)*bxpi*vvc*gtm2*csti*vdt*ys
     # *(-1./8.*o*x12*x2z+3./64.*o*x12*x12c-1./16.*o*x12*x2zs
     #    -1./8.*o*x2z*x12s+3./32.*o*x2z*x12c+3./64.*o*x12s*x2zs
     #    -1./16.*o*x12c+1./64.*o*x2zs+1./32.*os*x12*x2z+3./64.
     #    *os*x2z*x12s-1./32.*os*x12s+3./64.*os*x12c+1./64.*oc*
     #    x12s+3./64.*x12*x2z*x12c-1./32.*x12*x12c-1./32.*x12*
     #    x2zc+3./64.*x12*x2zs-5./32.*x2z*x12c+1./64.*x12s*x12c
     #    +1./64.*x12s*x2zc-5./32.*x12s*x2zs+3./64.*x12c*x2zs-1.
     #    /64.*x2zc-3./32.*x2zs)
      zz11c= zz11c+rs1wz(4)*vvc*gtm2*csti*vdt*bxps*ys*
     #  bxp*(-1./32.+1./32.*o+1./32.*x12)
      zz11c= zz11c+rs1wz(4)*vvc*gtm2*csti*vdt*bxps*ys
     # *(3./64.-1./32.*o*x12-1./16.*o*x2z-1./32.*o-1./16.*
     #    x12*x2z+3./32.*x2z-1./32.*x12s)
      zz11c= zz11c+rs1wz(4)*vvc*gtm2*csti*vdt*ys*bxp
     # *(-1./32.+1./32.*o*x12*x2z-1./8.*o*x12+1./16.*o*x2z
     #    +1./8.*o*x12s+1./32.*o*x2zs+1./64.*o+1./16.*os*x12-
     #    1./32.*x12*x2z+1./32.*x12*x2zs+3./64.*x12+1./32.*x2z*
     #    x12s-9./64.*x2z-1./8.*x12s+1./16.*x12c-3./32.*x2zs)
      zz11c= zz11c+rs1wz(4)*vvc*gtm2*csti*vdt*ys*(
     #    1./4.*o*x12*x2z+1./16.*o*x12-3./32.*o*x2z*x12s-1./32.*o
     #    *x2z+1./16.*o*x12s-3./32.*o*x12c-1./32.*o*x2zs-1./16.
     #    *os*x12*x2z-1./32.*os*x12-3./64.*os*x12s-3./32.*x12*x2z
     #    -3./64.*x12*x12c+1./16.*x12*x2zs+1./4.*x2z*x12s-1./32.
     #    *x2z*x12c+3./32.*x2z+1./64.*x12s*x2zs+3./32.*x12c+1./
     #    32.*x2zc+9./64.*x2zs)
      zz11c= zz11c+rs1wz(7)*xx*vvc*gtm2*csti*vdt*ys
     # *(-1./64.*o*x12*x2zs+1./64.*o*x2zc+1./64.*os*x12*x2zs
     #    -1./64.*x12*x2zq+1./16.*x12*x2zc-1./32.*x12s*x2zc+3./
     #    64.*x12s*x2zs-1./64.*x12c*x2zs+1./64.*x2zq-1./64.*x2zc
     #    )
      zz11c= zz11c+rs1wz(7)*bxpi*vvc*gtm2*csti*vdt*ys
     # *(-1./32.*o*x12*x2z+1./128.*o*x12*x2zc-5./64.*o*x12*
     #    x2zs-1./32.*o*x2z*x12s+1./128.*o*x2z*x12c+1./64.*o*x12s
     #    *x2zs-1./64.*o*x2zc+7./128.*o*x2zs+5./128.*os*x12*x2z
     #    -1./128.*os*x12*x2zs-1./128.*os*x2z*x12s-1./128.*os*
     #    x2zs-1./128.*oc*x12*x2z+1./128.*x12*x2z*x12c+1./128.*
     #    x12*x2zq-11./128.*x12*x2zc+29./128.*x12*x2zs+3./32.*x2z
     #    *x12s-9./128.*x2z*x12c+3./128.*x12s*x2zc-19./128.*x12s*
     #    x2zs+3./128.*x12c*x2zs-1./128.*x2zq+9./128.*x2zc-3./
     #    64.*x2zs)
      zz11c= zz11c+rs1wz(7)*vvc*gtm2*csti*vdt*bxps*ys*
     #  bxp*(1./64.-1./64.*o-1./64.*x12)
      zz11c= zz11c+rs1wz(7)*vvc*gtm2*csti*vdt*bxps*ys
     # *(-1./128.+5./64.*o*x12+3./64.*o*x2z-1./128.*o+1./
     #    64.*os+3./64.*x12*x2z-7./128.*x12-7./128.*x2z+1./16.*
     #    x12s)
      zz11c= zz11c+rs1wz(7)*vvc*gtm2*csti*vdt*ys*bxp
     # *(-1./64.-9./64.*o*x12*x2z-13./128.*o*x12+1./64.*o*
     #    x2z-1./64.*o*x12s-3./64.*o*x2zs+3./128.*o+1./128.*os*
     #    x12-1./32.*os*x2z-1./128.*os+15./128.*x12*x2z-7./128.
     #    *x12*x2zs+13./128.*x12-7./64.*x2z*x12s+5./128.*x2z-1./
     #    16.*x12s-3./128.*x12c+9./128.*x2zs)
      zz11c= zz11c+rs1wz(7)*vvc*gtm2*csti*vdt*ys*(
     #    25./128.*o*x12*x2z+7./128.*o*x12*x2zs+1./64.*o*x12-1./
     #    16.*o*x2z+1./32.*o*x12s-1./128.*o*x12c+1./64.*o*x2zc-
     #    1./128.*o*x2zs-1./64.*os*x12*x2z-3./128.*os*x12+1./64.*
     #    os*x2z+1./128.*os*x12s+1./64.*os*x2zs+1./128.*oc*x12-
     #    17./64.*x12*x2z-1./128.*x12*x12c+1./32.*x12*x2zc-7./128.
     #    *x12*x2zs+17./128.*x2z*x12s+1./64.*x2z*x12c+3./64.*x2z
     #    +7./128.*x12s*x2zs-3./64.*x12s+7./128.*x12c-5./128.*
     #    x2zc-9./128.*x2zs)
      zz11c= zz11c+rs1wz(10)*xx*vvc*gtm2*csti*vdt*ys
     # *(1./64.*o*x12*x2zs-1./64.*o*x2zc-1./64.*os*x12*x2zs+1./
     #    64.*x12*x2zq-1./16.*x12*x2zc+1./32.*x12s*x2zc-3./64.*
     #    x12s*x2zs+1./64.*x12c*x2zs-1./64.*x2zq+1./64.*x2zc)
      zz11c= zz11c+rs1wz(10)*bxpi*vvc*gtm2*csti*vdt*ys
     # *(1./32.*o*x12*x2z-1./128.*o*x12*x2zc+5./64.*o*x12*x2zs
     #    +1./32.*o*x2z*x12s-1./128.*o*x2z*x12c-1./64.*o*x12s*
     #    x2zs+1./64.*o*x2zc-7./128.*o*x2zs-5./128.*os*x12*x2z+
     #    1./128.*os*x12*x2zs+1./128.*os*x2z*x12s+1./128.*os*x2zs
     #    +1./128.*oc*x12*x2z-1./128.*x12*x2z*x12c-1./128.*x12*
     #    x2zq+11./128.*x12*x2zc-29./128.*x12*x2zs-3./32.*x2z*
     #    x12s+9./128.*x2z*x12c-3./128.*x12s*x2zc+19./128.*x12s*
     #    x2zs-3./128.*x12c*x2zs+1./128.*x2zq-9./128.*x2zc+3./
     #    64.*x2zs)
      zz11c= zz11c+rs1wz(10)*vvc*gtm2*csti*vdt*bxps*ys
     #  *bxp*(-1./64.+1./64.*o+1./64.*x12)
      zz11c= zz11c+rs1wz(10)*vvc*gtm2*csti*vdt*bxps*ys
     # *(1./128.-5./64.*o*x12-3./64.*o*x2z+1./128.*o-1./64.*
     #    os-3./64.*x12*x2z+7./128.*x12+7./128.*x2z-1./16.*x12s
     #    )
      zz11c= zz11c+rs1wz(10)*vvc*gtm2*csti*vdt*ys*bxp
     # *(1./64.+9./64.*o*x12*x2z+13./128.*o*x12-1./64.*o*x2z
     #    +1./64.*o*x12s+3./64.*o*x2zs-3./128.*o-1./128.*os*x12
     #    +1./32.*os*x2z+1./128.*os-15./128.*x12*x2z+7./128.*
     #    x12*x2zs-13./128.*x12+7./64.*x2z*x12s-5./128.*x2z+1./
     #    16.*x12s+3./128.*x12c-9./128.*x2zs)
      zz11c= zz11c+rs1wz(10)*vvc*gtm2*csti*vdt*ys
     # *(-25./128.*o*x12*x2z-7./128.*o*x12*x2zs-1./64.*o*x12
     #    +1./16.*o*x2z-1./32.*o*x12s+1./128.*o*x12c-1./64.*o*
     #    x2zc+1./128.*o*x2zs+1./64.*os*x12*x2z+3./128.*os*x12-
     #    1./64.*os*x2z-1./128.*os*x12s-1./64.*os*x2zs-1./128.*oc
     #    *x12+17./64.*x12*x2z+1./128.*x12*x12c-1./32.*x12*x2zc
     #    +7./128.*x12*x2zs-17./128.*x2z*x12s-1./64.*x2z*x12c-3.
     #    /64.*x2z-7./128.*x12s*x2zs+3./64.*x12s-7./128.*x12c+5.
     #    /128.*x2zc+9./128.*x2zs)
      zz11c= zz11c+rs1wz(11)*bxpi*vvc*gtm2*csti*vdt*ys
     # *(1./16.*o*x12*x2z+1./16.*o*x2z*x12s+1./16.*o*x12c+1./
     #    32.*os*x12s+1./32.*x12*x12c+1./16.*x2z*x12c+1./32.*x12s
     #    *x2zs+1./32.*x2zs)
      zz11c= zz11c+rs1wz(11)*vvc*gtm2*csti*vdt*bxps*ys
     #  *bxp*(1./16.)
      zz11c= zz11c+rs1wz(11)*vvc*gtm2*csti*vdt*bxps*ys
     # *(-1./16.-1./8.*x12-1./8.*x2z)
      zz11c= zz11c+rs1wz(11)*vvc*gtm2*csti*vdt*ys*bxp
     # *(1./32.+1./8.*o*x12+3./16.*x12*x2z+1./8.*x2z+3./16.*
     #    x12s+1./16.*x2zs)
      zz11c= zz11c+rs1wz(11)*vvc*gtm2*csti*vdt*ys
     # *(-1./8.*o*x12*x2z-1./16.*o*x12-1./8.*o*x12s-1./16.*
     #    x12*x2zs-3./16.*x2z*x12s-1./16.*x2z-1./8.*x12c-1./16.
     #    *x2zs)
      zz11c= zz11c+rs1wz(12)*xx*vvc*gtm2*csti*vdt*ys
     # *(1./16.*o*x2z*x12s+1./16.*o*x12c+1./16.*x12*x12c+1./16.
     #    *x12*x2zs+1./16.*x2z*x12s+1./8.*x2z*x12c+1./16.*x12s*
     #    x2zs)
      zz11c= zz11c+rs1wz(12)*bxpi*vvc*gtm2*csti*vdt*ys
     # *(-1./16.*o*x2z*x12s+1./8.*o*x12s-1./16.*o*x12c-1./32.
     #    *os*x12s+3./16.*x12*x2z-1./32.*x12*x12c+1./16.*x12*x2zs
     #    +3./16.*x2z*x12s-1./16.*x2z*x12c-1./32.*x12s*x2zs+1./
     #    16.*x12s+1./8.*x12c+1./32.*x2zs)
      zz11c= zz11c+rs1wz(12)*vvc*gtm2*csti*vdt*bxps*ys
     # *(-3./32.+1./16.*o+1./16.*x12)
      zz11c= zz11c+rs1wz(12)*vvc*gtm2*csti*vdt*ys*bxp
     # *(1./16.-3./32.*o*x12-1./16.*o*x2z-1./32.*o-1./32.*
     #    x12*x2z+3./16.*x12+5./32.*x2z-3./32.*x12s)
      zz11c= zz11c+rs1wz(12)*vvc*gtm2*csti*vdt*ys
     # *(3./32.*o*x12*x2z-1./32.*o*x12+1./32.*o*x2z+1./32.*o*
     #    x12s+1./32.*os*x12-11./32.*x12*x2z-1./8.*x12-3./32.*
     #    x2z-5./32.*x12s-1./16.*x2zs)
      zz11c= zz11c+rs1wz(13)*xx*vvc*gtm2*csti*vdt*ys
     # *(1./32.*o*x12*x2zs+1./16.*o*x2z*x12s+1./32.*o*x12c+1./
     #    32.*x12*x12c-1./32.*x12*x2zc+1./16.*x12*x2zs+1./32.*x2z
     #    *x12s+1./32.*x2z*x12c-1./32.*x12s*x2zs+1./32.*x2zc)
      zz11c= zz11c+rs1wz(13)*bxpi*vvc*gtm2*csti*vdt*ys
     # *(5./64.*o*x12*x2z+1./16.*o*x12s-1./64.*o*x2zs-1./64.*
     #    os*x12*x2z+1./8.*x12*x2z+1./64.*x12*x2zc-1./8.*x12*x2zs
     #    -3./64.*x2z*x12s+1./64.*x2z*x12c+1./32.*x12s*x2zs+1./
     #    32.*x12s+1./16.*x12c-1./64.*x2zc+7./64.*x2zs)
      zz11c= zz11c+rs1wz(13)*vvc*gtm2*csti*vdt*bxps*ys
     # *(-1./32.)
      zz11c= zz11c+rs1wz(13)*vvc*gtm2*csti*vdt*ys*bxp
     # *(1./32.+1./32.*o*x12-1./32.*o*x2z-1./16.*x12*x2z+1./
     #    16.*x12+3./32.*x2z+1./32.*x12s)
      zz11c= zz11c+rs1wz(13)*vvc*gtm2*csti*vdt*ys
     # *(-1./16.*o*x12*x2z-1./32.*o*x12+1./64.*o*x2z-1./16.*
     #    o*x12s+1./32.*o*x2zs-1./64.*x12*x2z+1./16.*x12*x2zs-1.
     #    /16.*x12-7./64.*x2z-1./16.*x12s-1./16.*x12c-5./64.*
     #    x2zs)
      zz11c= zz11c+rs1wz(14)*xx*vvc*gtm2*csti*vdt*ys
     # *(-1./32.*o*x12*x2zs-1./32.*o*x2z*x12s+1./32.*x12*x2zc
     #    -1./32.*x12*x2zs+1./32.*x2z*x12c+1./16.*x12s*x2zs-1./
     #    32.*x2zc)
      zz11c= zz11c+rs1wz(14)*bxpi*vvc*gtm2*csti*vdt*ys
     # *(-5./64.*o*x12*x2z-1./32.*o*x12s+1./64.*o*x2zs+1./64.
     #    *os*x12*x2z-1./16.*x12*x2z-1./64.*x12*x2zc+3./16.*x12*
     #    x2zs+13./64.*x2z*x12s-1./64.*x2z*x12c-1./32.*x12s*x2zs
     #    +1./32.*x12c+1./64.*x2zc-7./64.*x2zs)
      zz11c= zz11c+rs1wz(14)*vvc*gtm2*csti*vdt*bxps*ys
     #  *bxp*(1./32.)
      zz11c= zz11c+rs1wz(14)*vvc*gtm2*csti*vdt*bxps*ys
     # *(1./64.-1./32.*o-5./32.*x12-1./16.*x2z)
      zz11c= zz11c+rs1wz(14)*vvc*gtm2*csti*vdt*ys*bxp
     # *(-3./64.-1./64.*o*x12+1./16.*o*x2z+1./64.*o+17./64.
     #    *x12*x2z+1./8.*x12-3./64.*x2z+9./64.*x12s+1./32.*x2zs
     #    )
      zz11c= zz11c+rs1wz(14)*vvc*gtm2*csti*vdt*ys
     # *(3./64.*o*x12*x2z+3./64.*o*x12-1./32.*o*x2z+1./64.*o*
     #    x12s-1./32.*o*x2zs-1./64.*os*x12-1./4.*x12*x2z-1./8.*
     #    x12*x2zs+1./32.*x12-5./32.*x2z*x12s+1./8.*x2z-9./64.*
     #    x12s-1./32.*x12c+3./64.*x2zs)
*
      zz21c= rs1wz(1)*xx*vvc*gtm2*csti*vdt*ys*(3./8.*o*
     #    x12*x2zs+3./4.*o*x2z*x12s+3./8.*o*x12c+3./8.*x12*x12c
     #    -3./8.*x12*x2zc+3./4.*x12*x2zs+3./8.*x2z*x12s+3./8.*
     #    x2z*x12c-3./8.*x12s*x2zs+3./8.*x2zc)
      zz21c= zz21c+rs1wz(1)*bxpi*vvc*gtm2*csti*vdt*ys
     # *(15./16.*o*x12*x2z+9./8.*o*x12s-3./16.*o*x2zs-3./16.*
     #    os*x12*x2z-3./16.*os*x12s+15./8.*x12*x2z+3./16.*x12*
     #    x12c+3./16.*x12*x2zc-3./2.*x12*x2zs-15./16.*x2z*x12s+
     #    9./16.*x2z*x12c+9./16.*x12s*x2zs+3./8.*x12s+3./8.*x12c
     #    -3./16.*x2zc+3./2.*x2zs)
      zz21c= zz21c+rs1wz(1)*vvc*gtm2*csti*vdt*bxps*ys*
     #  bxp*(1./8.)
      zz21c= zz21c+rs1wz(1)*vvc*gtm2*csti*vdt*bxps*ys
     # *(-5./8.+1./4.*o-1./4.*x2z)
      zz21c= zz21c+rs1wz(1)*vvc*gtm2*csti*vdt*ys*bxp
     # *(13./16.+1./2.*o*x12-3./8.*o*x2z-1./4.*o+11./8.*x2z
     #    +5./8.*x12s+1./8.*x2zs)
      zz21c= zz21c+rs1wz(1)*vvc*gtm2*csti*vdt*ys*(
     #    -7./8.*o*x12*x2z-5./8.*o*x12+7./16.*o*x2z-o*x12s+1./
     #    8.*o*x2zs+1./4.*os*x12+5./16.*x12*x2z+1./4.*x12*x2zs-
     #    9./8.*x12-x2z*x12s-31./16.*x2z+1./2.*x12s-5./4.*x12c
     #    -15./16.*x2zs)
      zz21c= zz21c+rs1wz(4)*xx*vvc*gtm2*csti*vdt*ys
     # *(-3./16.*o*x12*x2zs-3./16.*o*x2z*x12c-3./16.*o*x12s*
     #    x2zs-3./32.*os*x2z*x12s-3./32.*x12*x2z*x12c-3./32.*x12s
     #    *x2zc-3./16.*x12c*x2zs-3./32.*x2zc)
      zz21c= zz21c+rs1wz(4)*bxpi*vvc*gtm2*csti*vdt*ys
     # *(-3./8.*o*x12*x2z+9./64.*o*x12*x12c-3./16.*o*x12*x2zs
     #    -3./8.*o*x2z*x12s+9./32.*o*x2z*x12c+9./64.*o*x12s*x2zs
     #    -3./16.*o*x12c+3./64.*o*x2zs+3./32.*os*x12*x2z+9./64.
     #    *os*x2z*x12s-3./32.*os*x12s+9./64.*os*x12c+3./64.*oc*
     #    x12s+9./64.*x12*x2z*x12c-3./32.*x12*x12c-3./32.*x12*
     #    x2zc+9./64.*x12*x2zs-15./32.*x2z*x12c+3./64.*x12s*x12c
     #    +3./64.*x12s*x2zc-15./32.*x12s*x2zs+9./64.*x12c*x2zs-
     #    3./64.*x2zc-9./32.*x2zs)
      zz21c= zz21c+rs1wz(4)*vvc*gtm2*csti*vdt*bxps*ys*
     #  bxp*(-1./32.+1./32.*o+1./32.*x12)
      zz21c= zz21c+rs1wz(4)*vvc*gtm2*csti*vdt*bxps*ys
     # *(7./64.-1./32.*o*x12-1./16.*o*x2z-1./16.*o-1./16.*
     #    x12*x2z-1./32.*x12+1./8.*x2z-1./32.*x12s)
      zz21c= zz21c+rs1wz(4)*vvc*gtm2*csti*vdt*ys*bxp
     # *(-3./32.-1./32.*o*x12*x2z-11./32.*o*x12+1./8.*o*x2z
     #    +5./16.*o*x12s+1./32.*o*x2zs+3./64.*o+5./32.*os*x12
     #    +9./64.*x12-1./32.*x2z*x12s-23./64.*x2z-11./32.*x12s
     #    +5./32.*x12c-5./32.*x2zs)
      zz21c= zz21c+rs1wz(4)*vvc*gtm2*csti*vdt*ys*(
     #    23./32.*o*x12*x2z+1./16.*o*x12*x2zs+3./16.*o*x12-7./32.
     #    *o*x2z*x12s-3./32.*o*x2z+3./16.*o*x12s-9./32.*o*x12c-
     #    1./16.*o*x2zs-5./32.*os*x12*x2z-3./32.*os*x12-9./64.*os
     #    *x12s-9./32.*x12*x2z-9./64.*x12*x12c+1./32.*x12*x2zc+
     #    1./8.*x12*x2zs+23./32.*x2z*x12s-1./16.*x2z*x12c+9./32.*
     #    x2z+7./64.*x12s*x2zs+9./32.*x12c+1./16.*x2zc+25./64.*
     #    x2zs)
      zz21c= zz21c+rs1wz(7)*xx*vvc*gtm2*csti*vdt*ys
     # *(-3./64.*o*x12*x2zs+3./64.*o*x2zc+3./64.*os*x12*x2zs
     #    -3./64.*x12*x2zq+3./16.*x12*x2zc-3./32.*x12s*x2zc+9./
     #    64.*x12s*x2zs-3./64.*x12c*x2zs+3./64.*x2zq-3./64.*x2zc
     #    )
      zz21c= zz21c+rs1wz(7)*bxpi*vvc*gtm2*csti*vdt*ys
     # *(-3./32.*o*x12*x2z+3./128.*o*x12*x2zc-15./64.*o*x12*
     #    x2zs-3./32.*o*x2z*x12s+3./128.*o*x2z*x12c+3./64.*o*x12s
     #    *x2zs-3./64.*o*x2zc+21./128.*o*x2zs+15./128.*os*x12*x2z
     #    -3./128.*os*x12*x2zs-3./128.*os*x2z*x12s-3./128.*os*
     #    x2zs-3./128.*oc*x12*x2z+3./128.*x12*x2z*x12c+3./128.*
     #    x12*x2zq-33./128.*x12*x2zc+87./128.*x12*x2zs+9./32.*x2z
     #    *x12s-27./128.*x2z*x12c+9./128.*x12s*x2zc-57./128.*x12s
     #    *x2zs+9./128.*x12c*x2zs-3./128.*x2zq+27./128.*x2zc-9./
     #    64.*x2zs)
      zz21c= zz21c+rs1wz(7)*vvc*gtm2*csti*vdt*bxps*ys*
     #  bxp*(1./64.-1./64.*o-1./64.*x12)
      zz21c= zz21c+rs1wz(7)*vvc*gtm2*csti*vdt*bxps*ys
     # *(-5./128.+5./64.*o*x12+3./64.*o*x2z+1./128.*o+1./
     #    64.*os+3./64.*x12*x2z-5./128.*x12-9./128.*x2z+1./16.*
     #    x12s)
      zz21c= zz21c+rs1wz(7)*vvc*gtm2*csti*vdt*ys*bxp
     # *(-3./64.-11./64.*o*x12*x2z-39./128.*o*x12-1./64.*o*
     #    x2z+5./64.*o*x12s-3./64.*o*x2zs+9./128.*o+7./128.*os*
     #    x12-1./32.*os*x2z-3./128.*os+17./128.*x12*x2z-9./128.
     #    *x12*x2zs+39./128.*x12-9./64.*x2z*x12s+19./128.*x2z-1.
     #    /4.*x12s+3./128.*x12c+15./128.*x2zs)
      zz21c= zz21c+rs1wz(7)*vvc*gtm2*csti*vdt*ys*(
     #    75./128.*o*x12*x2z+9./128.*o*x12*x2zs+3./64.*o*x12-3./
     #    32.*o*x2z*x12s-3./16.*o*x2z+3./32.*o*x12s-7./128.*o*
     #    x12c+1./64.*o*x2zc+1./128.*o*x2zs-5./64.*os*x12*x2z-9.
     #    /128.*os*x12+3./64.*os*x2z+1./128.*os*x12s+1./64.*os*
     #    x2zs+3./128.*oc*x12-51./64.*x12*x2z-5./128.*x12*x12c+
     #    1./16.*x12*x2zc-9./128.*x12*x2zs+59./128.*x2z*x12s-1./
     #    64.*x2z*x12c+9./64.*x2z+11./128.*x12s*x2zs-9./64.*x12s
     #    +21./128.*x12c-11./128.*x2zc-29./128.*x2zs)
      zz21c= zz21c+rs1wz(10)*xx*vvc*gtm2*csti*vdt*ys
     # *(3./64.*o*x12*x2zs-3./64.*o*x2zc-3./64.*os*x12*x2zs+3./
     #    64.*x12*x2zq-3./16.*x12*x2zc+3./32.*x12s*x2zc-9./64.*
     #    x12s*x2zs+3./64.*x12c*x2zs-3./64.*x2zq+3./64.*x2zc)
      zz21c= zz21c+rs1wz(10)*bxpi*vvc*gtm2*csti*vdt*ys
     # *(3./32.*o*x12*x2z-3./128.*o*x12*x2zc+15./64.*o*x12*x2zs
     #    +3./32.*o*x2z*x12s-3./128.*o*x2z*x12c-3./64.*o*x12s*
     #    x2zs+3./64.*o*x2zc-21./128.*o*x2zs-15./128.*os*x12*x2z
     #    +3./128.*os*x12*x2zs+3./128.*os*x2z*x12s+3./128.*os*
     #    x2zs+3./128.*oc*x12*x2z-3./128.*x12*x2z*x12c-3./128.*
     #    x12*x2zq+33./128.*x12*x2zc-87./128.*x12*x2zs-9./32.*x2z
     #    *x12s+27./128.*x2z*x12c-9./128.*x12s*x2zc+57./128.*x12s
     #    *x2zs-9./128.*x12c*x2zs+3./128.*x2zq-27./128.*x2zc+9./
     #    64.*x2zs)
      zz21c= zz21c+rs1wz(10)*vvc*gtm2*csti*vdt*bxps*ys
     #  *bxp*(-1./64.+1./64.*o+1./64.*x12)
      zz21c= zz21c+rs1wz(10)*vvc*gtm2*csti*vdt*bxps*ys
     # *(5./128.-5./64.*o*x12-3./64.*o*x2z-1./128.*o-1./64.*
     #    os-3./64.*x12*x2z+5./128.*x12+9./128.*x2z-1./16.*x12s
     #    )
      zz21c= zz21c+rs1wz(10)*vvc*gtm2*csti*vdt*ys*bxp
     # *(3./64.+11./64.*o*x12*x2z+39./128.*o*x12+1./64.*o*x2z
     #    -5./64.*o*x12s+3./64.*o*x2zs-9./128.*o-7./128.*os*x12
     #    +1./32.*os*x2z+3./128.*os-17./128.*x12*x2z+9./128.*
     #    x12*x2zs-39./128.*x12+9./64.*x2z*x12s-19./128.*x2z+1./
     #    4.*x12s-3./128.*x12c-15./128.*x2zs)
      zz21c= zz21c+rs1wz(10)*vvc*gtm2*csti*vdt*ys
     # *(-75./128.*o*x12*x2z-9./128.*o*x12*x2zs-3./64.*o*x12
     #    +3./32.*o*x2z*x12s+3./16.*o*x2z-3./32.*o*x12s+7./128.
     #    *o*x12c-1./64.*o*x2zc-1./128.*o*x2zs+5./64.*os*x12*x2z
     #    +9./128.*os*x12-3./64.*os*x2z-1./128.*os*x12s-1./64.*
     #    os*x2zs-3./128.*oc*x12+51./64.*x12*x2z+5./128.*x12*x12c
     #    -1./16.*x12*x2zc+9./128.*x12*x2zs-59./128.*x2z*x12s+1.
     #    /64.*x2z*x12c-9./64.*x2z-11./128.*x12s*x2zs+9./64.*x12s
     #    -21./128.*x12c+11./128.*x2zc+29./128.*x2zs)
      zz21c= zz21c+rs1wz(11)*bxpi*vvc*gtm2*csti*vdt*ys
     # *(3./16.*o*x12*x2z+3./16.*o*x2z*x12s+3./16.*o*x12c+3./
     #    32.*os*x12s+3./32.*x12*x12c+3./16.*x2z*x12c+3./32.*x12s
     #    *x2zs+3./32.*x2zs)
      zz21c= zz21c+rs1wz(11)*vvc*gtm2*csti*vdt*bxps*ys
     #  *bxp*(1./16.)
      zz21c= zz21c+rs1wz(11)*vvc*gtm2*csti*vdt*bxps*ys
     # *(-1./8.-1./8.*x12-1./8.*x2z)
      zz21c= zz21c+rs1wz(11)*vvc*gtm2*csti*vdt*ys*bxp
     # *(3./32.+5./16.*o*x12+1./4.*x12*x2z-1./16.*x12+1./4.*
     #    x2z+3./8.*x12s+1./16.*x2zs)
      zz21c= zz21c+rs1wz(11)*vvc*gtm2*csti*vdt*ys
     # *(-5./16.*o*x12*x2z-3./16.*o*x12-5./16.*o*x12s+1./16.
     #    *x12*x2z-1./8.*x12*x2zs-7./16.*x2z*x12s-3./16.*x2z-5./
     #    16.*x12c-1./8.*x2zs)
      zz21c= zz21c+rs1wz(12)*xx*vvc*gtm2*csti*vdt*ys
     # *(3./16.*o*x2z*x12s+3./16.*o*x12c+3./16.*x12*x12c+3./16.
     #    *x12*x2zs+3./16.*x2z*x12s+3./8.*x2z*x12c+3./16.*x12s*
     #    x2zs)
      zz21c= zz21c+rs1wz(12)*bxpi*vvc*gtm2*csti*vdt*ys
     # *(-3./16.*o*x2z*x12s+3./8.*o*x12s-3./16.*o*x12c-3./32.
     #    *os*x12s+9./16.*x12*x2z-3./32.*x12*x12c+3./16.*x12*x2zs
     #    +9./16.*x2z*x12s-3./16.*x2z*x12c-3./32.*x12s*x2zs+3./
     #    16.*x12s+3./8.*x12c+3./32.*x2zs)
      zz21c= zz21c+rs1wz(12)*vvc*gtm2*csti*vdt*bxps*ys
     # *(-5./32.+1./16.*o+1./16.*x12)
      zz21c= zz21c+rs1wz(12)*vvc*gtm2*csti*vdt*ys*bxp
     # *(1./8.-5./32.*o*x12-1./16.*o*x2z-1./32.*o+1./32.*x12
     #    *x2z+1./2.*x12+9./32.*x2z-5./32.*x12s)
      zz21c= zz21c+rs1wz(12)*vvc*gtm2*csti*vdt*ys
     # *(5./32.*o*x12*x2z-1./32.*o*x12+1./32.*o*x2z-1./32.*o*
     #    x12s+1./32.*os*x12-29./32.*x12*x2z-1./16.*x12*x2zs-3./
     #    8.*x12-1./8.*x2z*x12s-7./32.*x2z-13./32.*x12s-1./16.*
     #    x12c-1./8.*x2zs)
      zz21c= zz21c+rs1wz(13)*xx*vvc*gtm2*csti*vdt*ys
     # *(3./32.*o*x12*x2zs+3./16.*o*x2z*x12s+3./32.*o*x12c+3./
     #    32.*x12*x12c-3./32.*x12*x2zc+3./16.*x12*x2zs+3./32.*x2z
     #    *x12s+3./32.*x2z*x12c-3./32.*x12s*x2zs+3./32.*x2zc)
      zz21c= zz21c+rs1wz(13)*bxpi*vvc*gtm2*csti*vdt*ys
     # *(15./64.*o*x12*x2z+3./16.*o*x12s-3./64.*o*x2zs-3./64.*
     #    os*x12*x2z+3./8.*x12*x2z+3./64.*x12*x2zc-3./8.*x12*x2zs
     #    -9./64.*x2z*x12s+3./64.*x2z*x12c+3./32.*x12s*x2zs+3./
     #    32.*x12s+3./16.*x12c-3./64.*x2zc+21./64.*x2zs)
      zz21c= zz21c+rs1wz(13)*vvc*gtm2*csti*vdt*bxps*ys
     # *(-1./16.)
      zz21c= zz21c+rs1wz(13)*vvc*gtm2*csti*vdt*ys*bxp
     # *(1./8.+3./16.*o*x12-1./32.*o*x2z-1./32.*o-3./32.*x12
     #    *x2z+3./16.*x2z+3./16.*x12s)
      zz21c= zz21c+rs1wz(13)*vvc*gtm2*csti*vdt*ys
     # *(-9./32.*o*x12*x2z-1./8.*o*x12+5./64.*o*x2z-7./32.*o
     #    *x12s+1./32.*o*x2zs+1./32.*os*x12+7./64.*x12*x2z+1./8.
     #    *x12*x2zs-3./16.*x12-1./8.*x2z*x12s-23./64.*x2z-3./32.
     #    *x12s-1./4.*x12c-11./64.*x2zs)
      zz21c= zz21c+rs1wz(14)*xx*vvc*gtm2*csti*vdt*ys
     # *(-3./32.*o*x12*x2zs-3./32.*o*x2z*x12s+3./32.*x12*x2zc
     #    -3./32.*x12*x2zs+3./32.*x2z*x12c+3./16.*x12s*x2zs-3./
     #    32.*x2zc)
      zz21c= zz21c+rs1wz(14)*bxpi*vvc*gtm2*csti*vdt*ys
     # *(-15./64.*o*x12*x2z-3./32.*o*x12s+3./64.*o*x2zs+3./
     #    64.*os*x12*x2z-3./16.*x12*x2z-3./64.*x12*x2zc+9./16.*
     #    x12*x2zs+39./64.*x2z*x12s-3./64.*x2z*x12c-3./32.*x12s*
     #    x2zs+3./32.*x12c+3./64.*x2zc-21./64.*x2zs)
      zz21c= zz21c+rs1wz(14)*vvc*gtm2*csti*vdt*bxps*ys
     #  *bxp*(1./32.)
      zz21c= zz21c+rs1wz(14)*vvc*gtm2*csti*vdt*bxps*ys
     # *(3./64.-1./32.*o-9./32.*x12-1./16.*x2z)
      zz21c= zz21c+rs1wz(14)*vvc*gtm2*csti*vdt*ys*bxp
     # *(-9./64.-11./64.*o*x12+1./16.*o*x2z+3./64.*o+35./
     #    64.*x12*x2z+3./8.*x12-9./64.*x2z+15./64.*x12s+1./32.*
     #    x2zs)
      zz21c= zz21c+rs1wz(14)*vvc*gtm2*csti*vdt*ys
     # *(17./64.*o*x12*x2z+9./64.*o*x12-3./32.*o*x2z+7./64.*o*
     #    x12s-1./32.*o*x2zs-3./64.*os*x12-3./4.*x12*x2z-5./16.
     #    *x12*x2zs+3./32.*x12-11./32.*x2z*x12s+3./8.*x2z-27./
     #    64.*x12s-1./32.*x12c+9./64.*x2zs)
*
      zz31c= rs1wz(1)*bxpi*vvc*gtm2*csti*vdt*ys*(1./4.*o*
     #    x12*x2z+3./16.*o*x12s-1./32.*o*x2zs+1./16.*x12*x2z+5./
     #    32.*x12*x2zs+11./32.*x2z*x12s+3./16.*x12c+3./32.*x2zs)
      zz31c= zz31c+rs1wz(1)*vvc*gtm2*csti*vdt*bxps*ys*
     #  bxp*(1./8.)
      zz31c= zz31c+rs1wz(1)*vvc*gtm2*csti*vdt*bxps*ys
     # *(-7./32.-1./8.*o-5./16.*x12-1./4.*x2z)
      zz31c= zz31c+rs1wz(1)*vvc*gtm2*csti*vdt*ys*bxp
     # *(1./8.+7./16.*o*x12+3./32.*o*x2z+1./16.*os+19./32.*
     #    x12*x2z+21./64.*x12+3./8.*x2z+3./8.*x12s+1./8.*x2zs)
      zz31c= zz31c+rs1wz(1)*vvc*gtm2*csti*vdt*ys*(
     #    -11./32.*o*x12*x2z-11./32.*o*x12+1./32.*o*x2z-11./64.
     #    *o*x12s-1./32.*os*x2z-33./64.*x12*x2z-7./32.*x12*x2zs
     #    -1./16.*x12-25./64.*x2z*x12s-7./32.*x2z-3./8.*x12s-
     #    11./64.*x12c-5./32.*x2zs)
      zz31c= zz31c+rs1wz(4)*bxpi*vvc*gtm2*csti*vdt*ys
     # *(1./64.*o*x12*x2z-1./32.*o*x12*x2zs-1./32.*o*x2z*x12s-
     #    1./64.*os*x12*x2z-1./64.*x12*x2zc-1./64.*x12*x2zs-1./64.
     #    *x2z*x12c-1./32.*x12s*x2zs-1./64.*x2zc)
      zz31c= zz31c+rs1wz(4)*vvc*gtm2*csti*vdt*bxps*ys*
     #  bxp*(-1./64.)
      zz31c= zz31c+rs1wz(4)*vvc*gtm2*csti*vdt*bxps*ys
     # *(1./128.-1./64.*o*x12-1./64.*o*x2z+1./128.*o+3./64.*
     #    x12+7./128.*x2z-1./64.*x12s)
      zz31c= zz31c+rs1wz(4)*vvc*gtm2*csti*vdt*ys*bxp
     # *(1./64.*o*x12*x2z-3./128.*o*x12-1./128.*o*x2z+3./128.*
     #    o*x12s+1./64.*o*x2zs+1./128.*o+1./128.*os*x12-1./128.
     #    *os-13./128.*x12*x2z-1./128.*x12*x2zs-1./64.*x12+1./
     #    128.*x2z*x12s-1./32.*x2z-1./32.*x12s+1./64.*x12c-1./
     #    16.*x2zs)
      zz31c= zz31c+rs1wz(4)*vvc*gtm2*csti*vdt*ys*(
     #    3./64.*o*x12*x2z+1./128.*o*x12*x2zs-1./64.*o*x12-1./64.
     #    *o*x2z*x12s-1./128.*o*x2z+5./128.*o*x12s-3./128.*o*x12c
     #    -1./128.*os*x12*x2z+3./128.*os*x12+1./128.*os*x2z-3./
     #    128.*os*x12s-1./128.*oc*x12+1./32.*x12*x2z-1./128.*x12*
     #    x12c+1./128.*x12*x2zc+9./128.*x12*x2zs+1./16.*x2z*x12s
     #    -1./128.*x2z*x12c+1./128.*x12s*x2zs+1./64.*x12c+3./
     #    128.*x2zc+5./128.*x2zs)
      zz31c= zz31c+rs1wz(7)*bxpi*vvc*gtm2*csti*vdt*ys
     # *(1./128.*o*x12*x2zs+1./128.*o*x2z*x12s+1./128.*x12*x2zc
     #    +1./128.*x12*x2zs+1./128.*x2z*x12c+1./64.*x12s*x2zs+1.
     #    /128.*x2zc)
      zz31c= zz31c+rs1wz(7)*vvc*gtm2*csti*vdt*bxps*ys*
     #  bxp*(1./128.)
      zz31c= zz31c+rs1wz(7)*vvc*gtm2*csti*vdt*bxps*ys
     # *(-1./256.+1./128.*o*x12-1./128.*x12*x2z-3./128.*x12
     #    -3./128.*x2z+1./128.*x12s)
      zz31c= zz31c+rs1wz(7)*vvc*gtm2*csti*vdt*ys*bxp
     # *(-1./128.*o*x12s+3./64.*x12*x2z+1./64.*x12*x2zs+1./
     #    128.*x12+1./128.*x2z*x12s+1./64.*x2z+1./64.*x12s-1./
     #    128.*x12c+3./128.*x2zs)
      zz31c= zz31c+rs1wz(7)*vvc*gtm2*csti*vdt*ys*(
     #    -1./128.*o*x12*x2z-1./128.*o*x12*x2zs-1./128.*o*x12s+
     #    1./128.*o*x12c+1./256.*os*x12s-1./64.*x12*x2z+1./256.*
     #    x12*x12c-1./128.*x12*x2zc-1./32.*x12*x2zs-1./32.*x2z*
     #    x12s-3./256.*x12s*x2zs-1./128.*x12c-1./128.*x2zc-5./
     #    256.*x2zs)
      zz31c= zz31c+rs1wz(10)*bxpi*vvc*gtm2*csti*vdt*ys
     # *(-1./128.*o*x12*x2zs-1./128.*o*x2z*x12s-1./128.*x12*
     #    x2zc-1./128.*x12*x2zs-1./128.*x2z*x12c-1./64.*x12s*x2zs
     #    -1./128.*x2zc)
      zz31c= zz31c+rs1wz(10)*vvc*gtm2*csti*vdt*bxps*ys
     #  *bxp*(-1./128.)
      zz31c= zz31c+rs1wz(10)*vvc*gtm2*csti*vdt*bxps*ys
     # *(1./256.-1./128.*o*x12+1./128.*x12*x2z+3./128.*x12+3.
     #    /128.*x2z-1./128.*x12s)
      zz31c= zz31c+rs1wz(10)*vvc*gtm2*csti*vdt*ys*bxp
     # *(1./128.*o*x12s-3./64.*x12*x2z-1./64.*x12*x2zs-1./128.
     #    *x12-1./128.*x2z*x12s-1./64.*x2z-1./64.*x12s+1./128.*
     #    x12c-3./128.*x2zs)
      zz31c= zz31c+rs1wz(10)*vvc*gtm2*csti*vdt*ys
     # *(1./128.*o*x12*x2z+1./128.*o*x12*x2zs+1./128.*o*x12s-1.
     #    /128.*o*x12c-1./256.*os*x12s+1./64.*x12*x2z-1./256.*x12
     #    *x12c+1./128.*x12*x2zc+1./32.*x12*x2zs+1./32.*x2z*x12s
     #    +3./256.*x12s*x2zs+1./128.*x12c+1./128.*x2zc+5./256.*
     #    x2zs)
      zz31c= zz31c+rs1wz(11)*bxpi*vvc*gtm2*csti*vdt*ys
     # *(1./16.*o*x12*x2z+1./32.*x12*x2zs+1./32.*x2z*x12s+1./
     #    32.*x2zs)
      zz31c= zz31c+rs1wz(11)*vvc*gtm2*csti*vdt*bxps*ys
     #  *bxp*(1./16.)
      zz31c= zz31c+rs1wz(11)*vvc*gtm2*csti*vdt*bxps*ys
     # *(-5./64.-1./32.*o-3./32.*x12-1./8.*x2z)
      zz31c= zz31c+rs1wz(11)*vvc*gtm2*csti*vdt*ys*bxp
     # *(1./32.+3./32.*o*x12+1./64.*o*x2z+1./64.*os+9./64.*
     #    x12*x2z+1./16.*x12+5./32.*x2z+3./64.*x12s+1./16.*x2zs
     #    )
      zz31c= zz31c+rs1wz(11)*vvc*gtm2*csti*vdt*ys
     # *(-5./64.*o*x12*x2z-1./16.*o*x12-3./32.*x12*x2z-3./64.
     #    *x12*x2zs-3./64.*x2z*x12s-1./16.*x2z-1./32.*x12s-5./
     #    64.*x2zs)
      zz31c= zz31c+rs1wz(12)*bxpi*vvc*gtm2*csti*vdt*ys
     # *(3./32.*o*x12*x2z+3./32.*o*x12s+1./32.*x12*x2z+1./16.*
     #    x12*x2zs+5./32.*x2z*x12s+3./32.*x12c)
      zz31c= zz31c+rs1wz(12)*vvc*gtm2*csti*vdt*bxps*ys
     # *(-1./32.-1./32.*o-1./16.*x12)
      zz31c= zz31c+rs1wz(12)*vvc*gtm2*csti*vdt*ys*bxp
     # *(1./64.+3./32.*o*x12+1./32.*o*x2z+3./64.*o+5./32.*
     #    x12*x2z+9./64.*x12+1./32.*x2z+1./8.*x12s)
      zz31c= zz31c+rs1wz(12)*vvc*gtm2*csti*vdt*ys
     # *(-5./64.*o*x12*x2z-9./64.*o*x12-3./64.*o*x2z-1./16.*
     #    o*x12s+1./64.*os*x12-7./32.*x12*x2z-1./16.*x12*x2zs-1.
     #    /32.*x12-9./64.*x2z*x12s-1./64.*x2z-11./64.*x12s-5./
     #    64.*x12c)
      zz31c= zz31c+rs1wz(13)*bxpi*vvc*gtm2*csti*vdt*ys
     # *(1./64.*o*x12s-1./16.*o*x2zs+1./64.*x12*x2z-1./32.*x12
     #    *x2zs+1./64.*x2z*x12s+3./64.*x12c+1./16.*x2zs)
      zz31c= zz31c+rs1wz(13)*vvc*gtm2*csti*vdt*bxps*ys
     # *(-3./128.+1./64.*o-1./64.*x12)
      zz31c= zz31c+rs1wz(13)*vvc*gtm2*csti*vdt*ys*bxp
     # *(5./128.+11./128.*o*x12-3./64.*o*x2z-1./16.*o+1./32.
     #    *os-1./128.*x12*x2z-3./128.*x12+1./16.*x2z+15./128.*
     #    x12s)
      zz31c= zz31c+rs1wz(13)*vvc*gtm2*csti*vdt*ys
     # *(-11./128.*o*x12*x2z+3./128.*o*x12+1./8.*o*x2z-9./
     #    128.*o*x12s+1./32.*o*x2zs-1./32.*os*x12-1./32.*os*x2z
     #    +5./64.*x12*x2z+1./128.*x12*x2zs-1./64.*x12-1./16.*
     #    x2z*x12s-13./128.*x2z-7./128.*x12s-9./128.*x12c-5./
     #    128.*x2zs)
      zz31c= zz31c+rs1wz(14)*bxpi*vvc*gtm2*csti*vdt*ys
     # *(1./64.*o*x12*x2z+1./16.*o*x2zs+5./64.*x12*x2zs+5./64.
     #    *x2z*x12s-3./64.*x2zs)
      zz31c= zz31c+rs1wz(14)*vvc*gtm2*csti*vdt*bxps*ys
     #  *bxp*(1./32.)
      zz31c= zz31c+rs1wz(14)*vvc*gtm2*csti*vdt*bxps*ys
     # *(1./128.-1./16.*o-9./64.*x12-1./16.*x2z)
      zz31c= zz31c+rs1wz(14)*vvc*gtm2*csti*vdt*ys*bxp
     # *(-3./64.-5./128.*o*x12+3./32.*o*x2z+11./128.*o-1./
     #    32.*os+25./128.*x12*x2z+11./64.*x12-1./128.*x2z+5./
     #    128.*x12s+1./32.*x2zs)
      zz31c= zz31c+rs1wz(14)*vvc*gtm2*csti*vdt*ys
     # *(5./128.*o*x12*x2z-1./64.*o*x12-19./128.*o*x2z+3./128.
     #    *o*x12s-1./32.*o*x2zs+1./128.*os*x12+1./32.*os*x2z-1./
     #    4.*x12*x2z-1./16.*x12*x2zs-3./64.*x2z*x12s+3./32.*x2z
     #    -5./64.*x12s+1./64.*x12c)
*
      zz41c= rs1wz(1)*xx*vvc*gtm2*csti*vdt*ys*(-1./8.*
     #    o*x12*x2z-1./8.*o*x2zs-1./8.*os*x12*x2z-1./8.*os*x12s
     #    +1./8.*x12*x12c+1./8.*x12*x2zc-1./4.*x12*x2zs-1./8.*
     #    x2z*x12s+3./8.*x2z*x12c+3./8.*x12s*x2zs-1./8.*x2zc)
      zz41c= zz41c+rs1wz(1)*bxpi*vvc*gtm2*csti*vdt*ys
     # *(-1./8.*o*x12-1./4.*o*x2z-1./8.*os*x12-5./8.*x12*x2z
     #    +5./8.*x12*x2zs+5./4.*x2z*x12s-1./8.*x12s+5./8.*x12c
     #    -1./2.*x2zs)
      zz41c= zz41c+rs1wz(1)*vvc*gtm2*csti*vdt*bxps*ys
     # *(1./4.-1./2.*x12)
      zz41c= zz41c+rs1wz(1)*vvc*gtm2*csti*vdt*ys*bxp
     # *(-1./4.-1./8.*o+x12*x2z+1./8.*x12-5./8.*x2z+x12s
     #    )
      zz41c= zz41c+rs1wz(1)*vvc*gtm2*csti*vdt*ys*(
     #    1./8.*o*x12+1./4.*o*x2z+1./8.*o+1./8.*os*x12-3./8.*
     #    x12*x2z-5./8.*x12*x2zs+3./8.*x12-5./4.*x2z*x12s+5./8.
     #    *x2z-7./8.*x12s-5./8.*x12c+1./2.*x2zs)
      zz41c= zz41c+rs1wz(4)*xx*vvc*gtm2*csti*vdt*ys
     # *(3./32.*o*x12*x12c+1./16.*o*x12*x2zs+1./16.*o*x2z*x12s
     #    +3./16.*o*x2z*x12c+3./32.*o*x12s*x2zs+1./32.*o*x2zs+1.
     #    /16.*os*x12*x2z+3./32.*os*x2z*x12s+3./32.*os*x12c+1./32.
     #    *oc*x12s+3./32.*x12*x2z*x12c+1./32.*x12*x2zs+1./32.*
     #    x12s*x12c+1./32.*x12s*x2zc+3./32.*x12c*x2zs+1./32.*x2zc
     #    )
      zz41c= zz41c+rs1wz(4)*bxpi*vvc*gtm2*csti*vdt*ys
     # *(5./32.*o*x12*x2z+1./8.*o*x12*x2zs+7./16.*o*x2z*x12s+1.
     #    /16.*o*x2z+1./16.*o*x12s+5./16.*o*x12c+1./32.*o*x2zs+
     #    3./32.*os*x12*x2z+1./16.*os*x12+5./32.*os*x12s+1./16.*
     #    x12*x2z+5./32.*x12*x12c+1./32.*x12*x2zc-1./32.*x2z*x12s
     #    +11./32.*x2z*x12c+7./32.*x12s*x2zs+1./32.*x2zc+1./8.*
     #    x2zs)
      zz41c= zz41c+rs1wz(4)*vvc*gtm2*csti*vdt*bxps*ys*
     #  bxp*(1./16.)
      zz41c= zz41c+rs1wz(4)*vvc*gtm2*csti*vdt*bxps*ys
     # *(-1./8.-3./16.*o*x12-1./32.*o-1./16.*x12*x2z+1./32.
     #    *x12-5./32.*x2z-3./16.*x12s)
      zz41c= zz41c+rs1wz(4)*vvc*gtm2*csti*vdt*ys*bxp
     # *(1./16.+5./16.*o*x12*x2z+9./32.*o*x12+1./16.*o*x2z+3.
     #    /8.*o*x12s+1./16.*o+3./32.*os*x12+1./32.*x12*x2z+3./
     #    32.*x12*x2zs+3./8.*x2z*x12s+5./16.*x2z+5./32.*x12s+9./
     #    32.*x12c+1./8.*x2zs)
      zz41c= zz41c+rs1wz(4)*vvc*gtm2*csti*vdt*ys*(
     #    -15./32.*o*x12*x2z-1./8.*o*x12*x2zs-3./32.*o*x12-7./
     #    16.*o*x2z*x12s-1./8.*o*x2z-7./16.*o*x12s-5./16.*o*x12c
     #    -1./32.*o*x2zs-1./32.*o-3./32.*os*x12*x2z-5./32.*os*
     #    x12-5./32.*os*x12s-1./32.*x12*x2z-5./32.*x12*x12c-1./
     #    32.*x12*x2zc-3./32.*x12*x2zs-1./32.*x12-11./32.*x2z*
     #    x12s-11./32.*x2z*x12c-5./32.*x2z-7./32.*x12s*x2zs+1./
     #    32.*x12s-9./32.*x12c-1./32.*x2zc-1./4.*x2zs)
      zz41c= zz41c+rs1wz(7)*xx*vvc*gtm2*csti*vdt*ys
     # *(-1./32.*o*x12*x2z+1./64.*o*x12*x2zc-1./16.*o*x12*x2zs
     #    -1./32.*o*x2z*x12s+1./64.*o*x2z*x12c+1./32.*o*x12s*x2zs
     #    -1./32.*o*x2zc+3./64.*o*x2zs+3./64.*os*x12*x2z-1./64.
     #    *os*x12*x2zs-1./64.*os*x2z*x12s-1./64.*os*x2zs-1./64.*
     #    oc*x12*x2z+1./64.*x12*x2z*x12c+1./64.*x12*x2zq-7./64.*
     #    x12*x2zc+9./64.*x12*x2zs+3./32.*x2z*x12s-5./64.*x2z*
     #    x12c+3./64.*x12s*x2zc-11./64.*x12s*x2zs+3./64.*x12c*
     #    x2zs-1./64.*x2zq+3./64.*x2zc-1./32.*x2zs)
      zz41c= zz41c+rs1wz(7)*bxpi*vvc*gtm2*csti*vdt*ys
     # *(-17./64.*o*x12*x2z+5./64.*o*x12*x2zs-1./32.*o*x12+1.
     #    /8.*o*x2z*x12s+3./32.*o*x2z-1./16.*o*x12s+3./64.*o*x12c
     #    -5./64.*o*x2zs+1./32.*os*x12*x2z+3./64.*os*x12-1./32.
     #    *os*x2z-1./64.*oc*x12+11./32.*x12*x2z+1./32.*x12*x12c
     #    +1./32.*x12*x2zc-17./64.*x12*x2zs-21./64.*x2z*x12s+3./
     #    32.*x2z*x12c-1./16.*x2z+3./32.*x12s*x2zs+3./32.*x12s-
     #    7./64.*x12c-3./64.*x2zc+1./8.*x2zs)
      zz41c= zz41c+rs1wz(7)*vvc*gtm2*csti*vdt*bxps*ys
     # *(-1./32.+1./64.*o+1./64.*x12+1./64.*x2z)
      zz41c= zz41c+rs1wz(7)*vvc*gtm2*csti*vdt*ys*bxp
     # *(1./16.*o*x12*x2z-13./64.*o*x12-1./16.*o*x2z+3./32.*o*
     #    x12s+1./32.*o+3./64.*os*x12-1./64.*os-11./64.*x12*x2z
     #    +1./64.*x12*x2zs+3./16.*x12+1./16.*x2z*x12s+3./32.*
     #    x2z-3./16.*x12s+3./64.*x12c-3./64.*x2zs)
      zz41c= zz41c+rs1wz(7)*vvc*gtm2*csti*vdt*ys*(
     #    1./32.+13./64.*o*x12*x2z-5./64.*o*x12*x2zs+15./64.*o*
     #    x12-1./8.*o*x2z*x12s-1./32.*o*x2z-1./32.*o*x12s-3./64.
     #    *o*x12c+5./64.*o*x2zs-3./64.*o-1./32.*os*x12*x2z-3./
     #    32.*os*x12+1./32.*os*x2z+1./64.*os+1./64.*oc*x12-11./
     #    64.*x12*x2z-1./32.*x12*x12c-1./32.*x12*x2zc+1./4.*x12*
     #    x2zs-13./64.*x12+17./64.*x2z*x12s-3./32.*x2z*x12c-3./
     #    64.*x2z-3./32.*x12s*x2zs+3./32.*x12s+1./16.*x12c+3./
     #    64.*x2zc-5./64.*x2zs)
      zz41c= zz41c+rs1wz(8)*xx*vvc*gtm2*csti*vdt*ys
     # *(-1./8.*o*x12*x2z-1./8.*o*x2z*x12s-1./8.*o*x12c-1./
     #    16.*os*x12s-1./16.*x12*x12c-1./8.*x2z*x12c-1./16.*x12s*
     #    x2zs-1./16.*x2zs)
      zz41c= zz41c+rs1wz(8)*bxpi*vvc*gtm2*csti*vdt*ys
     # *(-5./16.*o*x12*x2z-1./8.*o*x12-1./8.*o*x2z*x12s-3./
     #    16.*o*x12s-1./8.*o*x12c-1./16.*os*x12s+1./16.*x12*x2z
     #    -1./16.*x12*x12c-1./16.*x12*x2zs-1./4.*x2z*x12s-1./8.
     #    *x2z*x12c-1./8.*x2z-1./16.*x12s*x2zs-3./16.*x12c-1./8.
     #    *x2zs)
      zz41c= zz41c+rs1wz(8)*vvc*gtm2*csti*vdt*bxps*ys*
     #  bxp*(-1./16.)
      zz41c= zz41c+rs1wz(8)*vvc*gtm2*csti*vdt*bxps*ys
     # *(3./16.+3./16.*o*x12+1./16.*x12*x2z-1./16.*x12+1./8.
     #    *x2z+3./16.*x12s)
      zz41c= zz41c+rs1wz(8)*vvc*gtm2*csti*vdt*ys*bxp
     # *(-3./16.-3./16.*o*x12*x2z-1./2.*o*x12-3./16.*o*x12s
     #    -1./16.*x12*x2z-1./16.*x12*x2zs+1./8.*x12-1./4.*x2z*
     #    x12s-3./8.*x2z-3./8.*x12s-3./16.*x12c-1./16.*x2zs)
      zz41c= zz41c+rs1wz(8)*vvc*gtm2*csti*vdt*ys*(
     #    1./16.+1./2.*o*x12*x2z+7./16.*o*x12+1./8.*o*x2z*x12s+
     #    3./8.*o*x12s+1./8.*o*x12c+1./16.*os*x12s-1./16.*x12*x2z
     #    +1./16.*x12*x12c+1./8.*x12*x2zs-1./16.*x12+1./2.*x2z*
     #    x12s+1./8.*x2z*x12c+3./8.*x2z+1./16.*x12s*x2zs+3./16.
     #    *x12s+3./8.*x12c+3./16.*x2zs)
      zz41c= zz41c+rs1wz(9)*xx*vvc*gtm2*csti*vdt*ys
     # *(1./8.*o*x12*x2z+1./8.*o*x12s+1./8.*x12*x2z-1./8.*x12*
     #    x2zs-1./4.*x2z*x12s-1./8.*x12c+1./8.*x2zs)
      zz41c= zz41c+rs1wz(9)*bxpi*vvc*gtm2*csti*vdt*ys
     # *(1./8.*o*x12*x2z+1./8.*o*x12+1./8.*o*x12s-1./4.*x12*
     #    x2z-1./8.*x12*x2zs+1./8.*x12-1./4.*x2z*x12s+1./4.*x2z
     #    -3./8.*x12s-1./8.*x12c+1./8.*x2zs)
      zz41c= zz41c+rs1wz(9)*vvc*gtm2*csti*vdt*bxps*ys
     # *(-1./8.+1./4.*x12)
      zz41c= zz41c+rs1wz(9)*vvc*gtm2*csti*vdt*ys*bxp
     # *(1./4.+1./8.*o*x12-3./8.*x12*x2z-3./8.*x12+1./4.*x2z
     #    -3./8.*x12s)
      zz41c= zz41c+rs1wz(9)*vvc*gtm2*csti*vdt*ys*(
     #    -1./8.-1./8.*o*x12*x2z-1./4.*o*x12-1./8.*o*x12s+5./
     #    8.*x12*x2z+1./8.*x12*x2zs+1./4.*x2z*x12s-1./2.*x2z+3./
     #    4.*x12s+1./8.*x12c-1./8.*x2zs)
      zz41c= zz41c+rs1wz(10)*xx*vvc*gtm2*csti*vdt*ys
     # *(-1./64.*o*x12*x2zc+1./16.*o*x12*x2zs+1./32.*o*x2z*
     #    x12s-1./64.*o*x2z*x12c-1./32.*o*x12s*x2zs+1./32.*o*x2zc
     #    -1./64.*o*x2zs-1./64.*os*x12*x2z+1./64.*os*x12*x2zs+1.
     #    /64.*os*x2z*x12s+1./64.*os*x2zs+1./64.*oc*x12*x2z-1./64.
     #    *x12*x2z*x12c-1./64.*x12*x2zq+5./64.*x12*x2zc-1./64.*
     #    x12*x2zs+3./64.*x2z*x12c-3./64.*x12s*x2zc+7./64.*x12s*
     #    x2zs-3./64.*x12c*x2zs+1./64.*x2zq-1./64.*x2zc)
      zz41c= zz41c+rs1wz(10)*bxpi*vvc*gtm2*csti*vdt*ys
     # *(9./64.*o*x12*x2z-5./64.*o*x12*x2zs-1./8.*o*x2z*x12s-1.
     #    /32.*o*x2z+1./32.*o*x12s-3./64.*o*x12c+7./64.*o*x2zs-
     #    1./64.*os*x12+1./32.*os*x2z+1./64.*oc*x12-1./32.*x12*
     #    x2z-1./32.*x12*x12c-1./16.*x12*x2zc+21./64.*x12*x2zs+
     #    19./64.*x2z*x12s-1./8.*x2z*x12c-5./32.*x12s*x2zs+3./64.
     #    *x12c+5./64.*x2zc-1./16.*x2zs)
      zz41c= zz41c+rs1wz(10)*vvc*gtm2*csti*vdt*bxps*ys
     #  *bxp*(1./32.)
      zz41c= zz41c+rs1wz(10)*vvc*gtm2*csti*vdt*bxps*ys
     # *(3./32.*o*x12-3./64.*o+1./32.*x12*x2z-13./64.*x12-7./
     #    64.*x2z+3./32.*x12s)
      zz41c= zz41c+rs1wz(10)*vvc*gtm2*csti*vdt*ys*bxp
     # *(-1./32.-5./32.*o*x12*x2z-1./64.*o*x12+1./8.*o*x2z
     #    -1./8.*o*x12s+1./32.*o-1./64.*os*x12+1./64.*os+27./
     #    64.*x12*x2z-5./64.*x12*x2zs+3./16.*x12-3./16.*x2z*x12s
     #    +1./32.*x2z+3./32.*x12s-7./64.*x12c+9./64.*x2zs)
      zz41c= zz41c+rs1wz(10)*vvc*gtm2*csti*vdt*ys
     # *(1./64.*o*x12*x2z+5./64.*o*x12*x2zs-5./64.*o*x12+1./8.
     #    *o*x2z*x12s-3./32.*o*x2z+3./32.*o*x12s+3./64.*o*x12c-
     #    7./64.*o*x2zs+1./64.*o+1./32.*os*x12-1./32.*os*x2z-1./
     #    64.*os-1./64.*oc*x12-27./64.*x12*x2z+1./32.*x12*x12c+
     #    1./16.*x12*x2zc-1./4.*x12*x2zs+1./64.*x12-7./64.*x2z*
     #    x12s+1./8.*x2z*x12c+5./64.*x2z+5./32.*x12s*x2zs-3./16.
     #    *x12s+1./16.*x12c-5./64.*x2zc-5./64.*x2zs)
      zz41c= zz41c+rs1wz(11)*xx*vvc*gtm2*csti*vdt*ys
     # *(1./8.*o*x12*x2z+1./8.*o*x2z*x12s+1./8.*o*x12c+1./16.*
     #    os*x12s+1./16.*x12*x12c+1./8.*x2z*x12c+1./16.*x12s*x2zs
     #    +1./16.*x2zs)
      zz41c= zz41c+rs1wz(11)*bxpi*vvc*gtm2*csti*vdt*ys
     # *(3./16.*o*x12*x2z+1./8.*o*x12+3./16.*o*x12s-1./16.*x12
     #    *x2z+1./16.*x12*x2zs+1./4.*x2z*x12s+1./8.*x2z+3./16.*
     #    x12c+1./16.*x2zs)
      zz41c= zz41c+rs1wz(11)*vvc*gtm2*csti*vdt*bxps*ys
     # *(-1./16.)
      zz41c= zz41c+rs1wz(11)*vvc*gtm2*csti*vdt*ys*bxp
     # *(1./8.+3./16.*o*x12+1./16.*x12*x2z-1./16.*x12+1./8.*
     #    x2z+3./16.*x12s)
      zz41c= zz41c+rs1wz(11)*vvc*gtm2*csti*vdt*ys
     # *(-1./16.-3./16.*o*x12*x2z-5./16.*o*x12-3./16.*o*x12s
     #    -1./16.*x12*x2zs+1./16.*x12-1./4.*x2z*x12s-1./4.*x2z
     #    -3./16.*x12s-3./16.*x12c-1./16.*x2zs)
      zz41c= zz41c+rs1wz(12)*xx*vvc*gtm2*csti*vdt*ys
     # *(-1./8.*o*x12*x2z-1./8.*o*x2z*x12s-1./8.*o*x12c-1./
     #    16.*os*x12s-1./16.*x12*x12c-1./8.*x2z*x12c-1./16.*x12s*
     #    x2zs-1./16.*x2zs)
      zz41c= zz41c+rs1wz(12)*bxpi*vvc*gtm2*csti*vdt*ys
     # *(-3./16.*o*x12*x2z-1./8.*o*x12-3./16.*o*x12s+1./16.*
     #    x12*x2z-1./16.*x12*x2zs-1./4.*x2z*x12s-1./8.*x2z-3./
     #    16.*x12c-1./16.*x2zs)
      zz41c= zz41c+rs1wz(12)*vvc*gtm2*csti*vdt*bxps*ys
     # *(1./16.)
      zz41c= zz41c+rs1wz(12)*vvc*gtm2*csti*vdt*ys*bxp
     # *(-1./8.-3./16.*o*x12-1./16.*x12*x2z+1./16.*x12-1./
     #    8.*x2z-3./16.*x12s)
      zz41c= zz41c+rs1wz(12)*vvc*gtm2*csti*vdt*ys
     # *(1./16.+3./16.*o*x12*x2z+5./16.*o*x12+3./16.*o*x12s+
     #    1./16.*x12*x2zs-1./16.*x12+1./4.*x2z*x12s+1./4.*x2z+3.
     #    /16.*x12s+3./16.*x12c+1./16.*x2zs)
      zz41c= zz41c+rs1wz(13)*xx*vvc*gtm2*csti*vdt*ys
     # *(1./32.*o*x12*x2z-1./32.*o*x2zs-1./32.*os*x12*x2z+1./
     #    32.*x12*x2zc-1./8.*x12*x2zs-3./32.*x2z*x12s+1./32.*x2z*
     #    x12c+1./16.*x12s*x2zs-1./32.*x2zc+1./32.*x2zs)
      zz41c= zz41c+rs1wz(13)*bxpi*vvc*gtm2*csti*vdt*ys
     # *(3./32.*o*x12*x2z+1./32.*o*x12-1./16.*o*x2z+1./32.*o*
     #    x12s-1./32.*os*x12-5./16.*x12*x2z+1./16.*x12*x2zs+1./
     #    8.*x2z*x12s+1./16.*x2z-3./32.*x12s+1./16.*x12c-3./32.
     #    *x2zs)
      zz41c= zz41c+rs1wz(13)*vvc*gtm2*csti*vdt*bxps*ys
     # *(1./32.)
      zz41c= zz41c+rs1wz(13)*vvc*gtm2*csti*vdt*ys*bxp
     # *(3./32.*o*x12-1./32.*o+1./32.*x12*x2z-3./16.*x12-3./
     #    32.*x2z+3./32.*x12s)
      zz41c= zz41c+rs1wz(13)*vvc*gtm2*csti*vdt*ys
     # *(-1./32.-3./32.*o*x12*x2z-1./8.*o*x12+1./16.*o*x2z
     #    -1./32.*o*x12s+1./32.*o+1./32.*os*x12+9./32.*x12*x2z
     #    -1./16.*x12*x2zs+3./16.*x12-1./8.*x2z*x12s+1./32.*x2z
     #    -1./16.*x12c+3./32.*x2zs)
      zz41c= zz41c+rs1wz(14)*xx*vvc*gtm2*csti*vdt*ys
     # *(-1./32.*o*x12*x2z+1./32.*o*x2zs+1./32.*os*x12*x2z-1.
     #    /32.*x12*x2zc+1./8.*x12*x2zs+3./32.*x2z*x12s-1./32.*x2z
     #    *x12c-1./16.*x12s*x2zs+1./32.*x2zc-1./32.*x2zs)
      zz41c= zz41c+rs1wz(14)*bxpi*vvc*gtm2*csti*vdt*ys
     # *(-3./32.*o*x12*x2z-1./32.*o*x12+1./16.*o*x2z-1./32.*
     #    o*x12s+1./32.*os*x12+5./16.*x12*x2z-1./16.*x12*x2zs-1.
     #    /8.*x2z*x12s-1./16.*x2z+3./32.*x12s-1./16.*x12c+3./32.
     #    *x2zs)
      zz41c= zz41c+rs1wz(14)*vvc*gtm2*csti*vdt*bxps*ys
     # *(-1./32.)
      zz41c= zz41c+rs1wz(14)*vvc*gtm2*csti*vdt*ys*bxp
     # *(-3./32.*o*x12+1./32.*o-1./32.*x12*x2z+3./16.*x12+
     #    3./32.*x2z-3./32.*x12s)
      zz41c= zz41c+rs1wz(14)*vvc*gtm2*csti*vdt*ys
     # *(1./32.+3./32.*o*x12*x2z+1./8.*o*x12-1./16.*o*x2z+1./
     #    32.*o*x12s-1./32.*o-1./32.*os*x12-9./32.*x12*x2z+1./
     #    16.*x12*x2zs-3./16.*x12+1./8.*x2z*x12s-1./32.*x2z+1./
     #    16.*x12c-3./32.*x2zs)
*
      zz11q= 0.d0
      zz21q= 0.d0
      zz31q= 0.d0
      zz41q= 0.d0
*
*------------------------------------------------------------------------
*
       else if(jj.eq.6) then
*
*------------------------------------------------------------------------
*
      zz12s= xx*vvs*dms*gtm2*pwsm2*cqti*vdts*(
     #    -1./32.*x12*x2zs-1./8.*x2z*x12s-3./32.*x12c)
      zz12s= zz12s+xx*vvs*dms*gtm2*pwsm2*cqti
     #  *adts*(-1./32.*x12*x2zs-1./32.*x2z*x12s)
      zz12s= zz12s+xx*vvs*gtm2*pwsm2*cqti*vdts*y*(
     #    1./32.*x12*x12c+1./16.*x2z*x12c+1./32.*x12s*x2zs)
      zz12s= zz12s+bxpi*vvs*dms*gtm2*pwsm2*
     #  cqti*vdts*(-1./64.*o*x12*x2z-1./64.*o*x12s-9./64.*
     #    x12*x2z-1./64.*x12*x2zs-1./32.*x2z*x12s-3./16.*x12s-1.
     #    /64.*x12c-1./64.*x2zs)
      zz12s= zz12s+bxpi*vvs*dms*gtm2*pwsm2*
     #  cqti*adts*(1./64.*o*x12*x2z+1./64.*o*x12s-5./64.*x12
     #    *x2z+1./64.*x12*x2zs+1./32.*x2z*x12s-1./32.*x12s+1./
     #    64.*x12c-1./64.*x2zs)
      zz12s= zz12s+bxpi*vvs*gtm2*pwsm2*cqti*vdts*y
     # *(1./32.*x12*x2zs+1./8.*x2z*x12s+3./32.*x12c)
      zz12s= zz12s+vvs*dms*gtm2*pwsm2*cqti*
     #  vdt*adt*bxps*(-1./32.)
      zz12s= zz12s+vvs*dms*gtm2*pwsm2*cqti*
     #  vdt*adt*bxp*(1./16.*x12+1./16.*x2z)
      zz12s= zz12s+vvs*dms*gtm2*pwsm2*cqti*
     #  vdt*adt*(-1./16.*x12*x2z-1./32.*x12s-1./32.*x2zs)
      zz12s= zz12s+vvs*dms*gtm2*pwsm2*cqti*
     #  vdts*bxps*(3./64.)
      zz12s= zz12s+vvs*dms*gtm2*pwsm2*cqti*
     #  vdts*bxp*(-1./32.-1./64.*o-11./64.*x12-5./64.*x2z)
      zz12s= zz12s+vvs*dms*gtm2*pwsm2*cqti*
     #  vdts*(1./32.*o*x12+1./64.*o*x2z+13./64.*x12*x2z+1./8.*
     #    x12+3./64.*x2z+15./64.*x12s+1./32.*x2zs)
      zz12s= zz12s+vvs*dms*gtm2*pwsm2*cqti*
     #  adts*bxp*(-1./64.+1./64.*o)
      zz12s= zz12s+vvs*dms*gtm2*pwsm2*cqti*
     #  adts*(-1./32.*o*x12-1./64.*o*x2z+1./64.*x12*x2z+3./64.
     #    *x12+1./32.*x2z-1./64.*x12s)
      zz12s= zz12s+vvs*gtm2*pwsm2*cqti*vdts*bxps*y*bxp
     # *(1./64.)
      zz12s= zz12s+vvs*gtm2*pwsm2*cqti*vdts*bxps*y
     # *(-1./64.-1./16.*x12-1./32.*x2z)
      zz12s= zz12s+vvs*gtm2*pwsm2*cqti*vdts*y*bxp*(
     #    3./32.*x12*x2z+1./16.*x12+1./32.*x2z+7./64.*x12s+1./
     #    64.*x2zs)
      zz12s= zz12s+vvs*gtm2*pwsm2*cqti*vdts*y*(-
     #    3./32.*x12*x2z-1./32.*x12*x2zs-1./8.*x2z*x12s-7./64.*
     #    x12s-3./32.*x12c-1./64.*x2zs)
*
      zz22s= xx*vvs*dms*gtm2*pwsm2*cqti*vdts*(
     #    -3./32.*x12*x2zs-3./8.*x2z*x12s-9./32.*x12c)
      zz22s= zz22s+xx*vvs*dms*gtm2*pwsm2*cqti
     #  *adts*(-3./32.*x12*x2zs-3./32.*x2z*x12s)
      zz22s= zz22s+xx*vvs*gtm2*pwsm2*cqti*vdts*y*(
     #    3./32.*x12*x12c+3./16.*x2z*x12c+3./32.*x12s*x2zs)
      zz22s= zz22s+bxpi*vvs*dms*gtm2*pwsm2*
     #  cqti*vdt*adt*(1./16.*x12*x2z+1./32.*x12s+1./32.*x2zs
     #    )
      zz22s= zz22s+bxpi*vvs*dms*gtm2*pwsm2*
     #  cqti*vdts*(-3./64.*o*x12*x2z-3./64.*o*x12s-29./64.
     #    *x12*x2z-3./64.*x12*x2zs-3./32.*x2z*x12s-37./64.*x12s
     #    -3./64.*x12c-1./16.*x2zs)
      zz22s= zz22s+bxpi*vvs*dms*gtm2*pwsm2*
     #  cqti*adts*(3./64.*o*x12*x2z+3./64.*o*x12s-17./64.*
     #    x12*x2z+3./64.*x12*x2zs+3./32.*x2z*x12s-7./64.*x12s+3.
     #    /64.*x12c-1./16.*x2zs)
      zz22s= zz22s+bxpi*vvs*gtm2*pwsm2*cqti*vdts*y
     # *(3./32.*x12*x2zs+3./8.*x2z*x12s+9./32.*x12c)
      zz22s= zz22s+vvs*dms*gtm2*pwsm2*cqti*
     #  vdt*adt*bxp*(1./32.)
      zz22s= zz22s+vvs*dms*gtm2*pwsm2*cqti*
     #  vdt*adt*(-1./16.*x12-1./16.*x2z)
      zz22s= zz22s+vvs*dms*gtm2*pwsm2*cqti*
     #  vdts*bxps*(1./16.)
      zz22s= zz22s+vvs*dms*gtm2*pwsm2*cqti*
     #  vdts*bxp*(-5./64.-1./64.*o-25./64.*x12-7./64.*x2z)
      zz22s= zz22s+vvs*dms*gtm2*pwsm2*cqti*
     #  vdts*(1./16.*o*x12+1./64.*o*x2z+33./64.*x12*x2z+3./8.*
     #    x12+9./64.*x2z+21./32.*x12s+3./64.*x2zs)
      zz22s= zz22s+vvs*dms*gtm2*pwsm2*cqti*
     #  adts*bxps*(1./64.)
      zz22s= zz22s+vvs*dms*gtm2*pwsm2*cqti*
     #  adts*bxp*(-1./16.+1./64.*o-1./32.*x12-1./32.*x2z)
      zz22s= zz22s+vvs*dms*gtm2*pwsm2*cqti*
     #  adts*(-1./16.*o*x12-1./64.*o*x2z+5./64.*x12*x2z+11./
     #    64.*x12+1./8.*x2z-1./32.*x12s+1./64.*x2zs)
      zz22s= zz22s+vvs*gtm2*pwsm2*cqti*vdts*bxps*y*bxp
     # *(1./64.)
      zz22s= zz22s+vvs*gtm2*pwsm2*cqti*vdts*bxps*y
     # *(-1./64.-1./8.*x12-1./32.*x2z)
      zz22s= zz22s+vvs*gtm2*pwsm2*cqti*vdts*y*bxp*(
     #    7./32.*x12*x2z+1./8.*x12+1./32.*x2z+19./64.*x12s+1./
     #    64.*x2zs)
      zz22s= zz22s+vvs*gtm2*pwsm2*cqti*vdts*y*(-
     #    7./32.*x12*x2z-3./32.*x12*x2zs-3./8.*x2z*x12s-19./64.*
     #    x12s-9./32.*x12c-1./64.*x2zs)
*
      zz32s= bxpi*vvs*dms*gtm2*pwsm2*cqti*vdt*adt
     # *(1./16.*x12*x2z+1./16.*x2zs)
      zz32s= zz32s+bxpi*vvs*dms*gtm2*pwsm2*
     #  cqti*vdts*(-1./16.*o*x12-1./32.*o*x2z-5./32.*x12*
     #    x2z-1./16.*x12s-3./32.*x2zs)
      zz32s= zz32s+bxpi*vvs*gtm2*pwsm2*cqti*vdts*y
     # *(1./32.*o*x12*x2z+1./32.*o*x12s+1./32.*x12*x2zs+1./16.
     #    *x2z*x12s+1./32.*x12c)
      zz32s= zz32s+vvs*dms*gtm2*pwsm2*cqti*
     #  vdt*adt*bxps*(-1./32.)
      zz32s= zz32s+vvs*dms*gtm2*pwsm2*cqti*
     #  vdt*adt*bxp*(1./16.-1./32.*o+1./16.*x2z)
      zz32s= zz32s+vvs*dms*gtm2*pwsm2*cqti*
     #  vdt*adt*(1./32.*o*x12+1./32.*o*x2z-1./16.*x12-1./8.*x2z
     #    +1./32.*x12s-1./32.*x2zs)
      zz32s= zz32s+vvs*dms*gtm2*pwsm2*cqti*
     #  vdts*bxps*(5./64.)
      zz32s= zz32s+vvs*dms*gtm2*pwsm2*cqti*
     #  vdts*bxp*(-7./64.-1./64.*o-7./64.*x12-9./64.*x2z)
      zz32s= zz32s+vvs*dms*gtm2*pwsm2*cqti*
     #  vdts*(1./32.*o*x12+3./64.*o+3./32.*x12*x2z+11./64.*x12
     #    +13./64.*x2z+1./32.*x12s+1./16.*x2zs)
      zz32s= zz32s+vvs*gtm2*pwsm2*cqti*vdts*bxps*y*bxp
     # *(1./64.)
      zz32s= zz32s+vvs*gtm2*pwsm2*cqti*vdts*bxps*y
     # *(-1./64.-1./64.*o-1./16.*x12-1./32.*x2z)
      zz32s= zz32s+vvs*gtm2*pwsm2*cqti*vdts*y*bxp*(
     #    3./64.*o*x12+1./64.*o*x2z+1./64.*o+3./32.*x12*x2z+1./
     #    16.*x12+1./32.*x2z+5./64.*x12s+1./64.*x2zs)
      zz32s= zz32s+vvs*gtm2*pwsm2*cqti*vdts*y*(-
     #    1./32.*o*x12*x2z-3./64.*o*x12-1./64.*o*x2z-1./32.*o*
     #    x12s-3./32.*x12*x2z-1./32.*x12*x2zs-1./16.*x2z*x12s-5.
     #    /64.*x12s-1./32.*x12c-1./64.*x2zs)
*
      zz42s= bxpi*vvs*dms*gtm2*pwsm2*cqti*vdt*adt
     # *(1./16.*x12*x2z+1./16.*x2zs)
      zz42s= zz42s+bxpi*vvs*dms*gtm2*pwsm2*
     #  cqti*vdts*(-1./16.*o*x12-1./32.*o*x2z-5./32.*x12*
     #    x2z-1./16.*x12s-3./32.*x2zs)
      zz42s= zz42s+bxpi*vvs*gtm2*pwsm2*cqti*vdts*y
     # *(1./32.*o*x12*x2z+1./32.*o*x12s+1./32.*x12*x2zs+1./16.
     #    *x2z*x12s+1./32.*x12c)
      zz42s= zz42s+vvs*dms*gtm2*pwsm2*cqti*
     #  vdt*adt*bxps*(-1./32.)
      zz42s= zz42s+vvs*dms*gtm2*pwsm2*cqti*
     #  vdt*adt*bxp*(1./16.-1./32.*o+1./16.*x2z)
      zz42s= zz42s+vvs*dms*gtm2*pwsm2*cqti*
     #  vdt*adt*(1./32.*o*x12+1./32.*o*x2z-1./16.*x12-1./8.*x2z
     #    +1./32.*x12s-1./32.*x2zs)
      zz42s= zz42s+vvs*dms*gtm2*pwsm2*cqti*
     #  vdts*bxps*(5./64.)
      zz42s= zz42s+vvs*dms*gtm2*pwsm2*cqti*
     #  vdts*bxp*(-7./64.-1./64.*o-7./64.*x12-9./64.*x2z)
      zz42s= zz42s+vvs*dms*gtm2*pwsm2*cqti*
     #  vdts*(1./32.*o*x12+3./64.*o+3./32.*x12*x2z+11./64.*x12
     #    +13./64.*x2z+1./32.*x12s+1./16.*x2zs)
      zz42s= zz42s+vvs*gtm2*pwsm2*cqti*vdts*bxps*y*bxp
     # *(1./64.)
      zz42s= zz42s+vvs*gtm2*pwsm2*cqti*vdts*bxps*y
     # *(-1./64.-1./64.*o-1./16.*x12-1./32.*x2z)
      zz42s= zz42s+vvs*gtm2*pwsm2*cqti*vdts*y*bxp*(
     #    3./64.*o*x12+1./64.*o*x2z+1./64.*o+3./32.*x12*x2z+1./
     #    16.*x12+1./32.*x2z+5./64.*x12s+1./64.*x2zs)
      zz42s= zz42s+vvs*gtm2*pwsm2*cqti*vdts*y*(-
     #    1./32.*o*x12*x2z-3./64.*o*x12-1./64.*o*x2z-1./32.*o*
     #    x12s-3./32.*x12*x2z-1./32.*x12*x2zs-1./16.*x2z*x12s-5.
     #    /64.*x12s-1./32.*x12c-1./64.*x2zs)
*
      zz12c= 0.d0
      zz22c= 0.d0
      zz32c= 0.d0
      zz42c= 0.d0
      zz12q= 0.d0
      zz22q= 0.d0
      zz32q= 0.d0
      zz42q= 0.d0
*
*---------------------------------------------------------------------      
*
       endif
*
*---------------------------------------------------------------------      
*
*-----Now GZ interference      
*
*----------------------------------------------------------------------
*
       if(jj.eq.1) then
*
*----------------------------------------------------------------------
*
      gz10s= xx*rl1*vvs*y*csti*(4./3.*zi*o*x12*tx+2./3.
     #    *zi*o*x12-4./3.*zi*o*tx-2./3.*zi*o*txs-2./3.*zi*o-4./
     #    3.*zi*os*x12+4./3.*zi*os*tx+4./3.*zi*os-4./3.*zi*oc-2.
     #    /3.*zi*x12*tx-2./3.*zi*x12*txs+2./3.*zi*tx+2./3.*o*tx
     #    +2./3.*o-2./3.*os-2./3.*tx)
      gz10s= gz10s+xx*rl2*vvc*ys*csti*(4*zi*o*x12*
     #    txs-4*zi*o*txs+2*zi*os*txs-4*zi*x12*txs+2*zi*x12s*txs
     #    +2*zi*txs+2*o*txs+2*x12*txs-2*txs)
      gz10s= gz10s+xx*rl3*vvc*gtm2*ys*csti*(1./24.*
     #    o*x12*tx-1./24.*o*x2z*tx-1./24.*o*x2z-1./24.*o*txs-1./
     #    24.*os*x12+1./24.*os*x2z+1./24.*os*tx-1./24.*oc-1./24.
     #    *x12*txs+1./24.*x2z*tx)
      gz10s= gz10s+xx*rl3*vvc*gtm2*ys*(1./6.*o*x12*tx-
     #    1./6.*o*x2z*tx-1./6.*o*x2z-1./6.*o*txs-1./6.*os*x12+1.
     #    /6.*os*x2z+1./6.*os*tx-1./6.*oc-1./6.*x12*txs+1./6.*
     #    x2z*tx)
      gz10s= gz10s+xx*vvs*gtm2*pwsm2*y*zxi*csti*(
     #    -1./12.*o*x12*tx-1./24.*o*x12+1./24.*o*tx-1./24.*o*
     #    txs+1./12.*os*x12-1./24.*os+1./24.*x12*tx+1./24.*x12*
     #    txs)
      gz10s= gz10s+xx*vvs*gtm2*pwsm2*y*csti*(-7./
     #    72.*o*tx-1./24.*o+11./72.*os+1./24.*tx)
      gz10s= gz10s+xx*vvs*gtm2*pwsm2*y*(2./9.*o*tx-4./
     #    9.*os)
      gz10s= gz10s+xx*vvq*gtm2*yc*(-o*x2z*txs-x12*
     #    x2z*txs+x2z*txs)
      gz10s= gz10s+bxpi*rl1*vvs*y*csti*(-2./3.*zi*
     #    o*tx-2./3.*zi*o-2./3.*zi*x12*tx+2./3.*zi*tx)
      gz10s= gz10s+bxpi*rl2*vvc*ys*csti*(1./2.*zi*o*
     #    x12*tx-zi*o*tx-5./2.*zi*o*txs+1./2.*zi*os*tx-1./2.*zi
     #    *x12*tx-5./2.*zi*x12*txs+1./2.*zi*tx+2*zi*txs+1./2.*o
     #    *tx-1./2.*tx)
      gz10s= gz10s+bxpi*rl3*vvc*gtm2*ys*csti*(-1./
     #    12.*o*tx-1./24.*o+1./24.*os-1./24.*x12*tx+1./24.*tx)
      gz10s= gz10s+bxpi*rl3*vvc*gtm2*ys*(-1./3.*o*tx-
     #    1./6.*o+1./6.*os-1./6.*x12*tx+1./6.*tx)
      gz10s= gz10s+bxpi*vvs*gtm2*pwsm2*y*zxi*csti*(
     #    -1./24.*o*tx-1./24.*o+1./24.*x12*tx+1./24.*tx)
      gz10s= gz10s+bxpi*vvq*gtm2*yc*(-1./2.*o*x2z*tx-
     #    3./2.*o*txs-3./2.*x12*txs+1./2.*x2z*tx+txs)
      gz10s= gz10s+rl1*vvs*y*bxp*csti*(-1./3.*zi*o
     #    -1./3.*zi*x12+1./3.*zi)
      gz10s= gz10s+rl1*vvs*y*csti*(1./3.-1./3.*zi
     #    *o*x12+1./3.*zi*o*tx+zi*o+1./3.*zi*os+zi*x12*tx+2./
     #    3.*zi*x12-2./3.*zi*tx-1./3.*zi-3./8.*o+1./24.*os)
      gz10s= gz10s+rl2*vvc*bxps*ys*csti*(1./16.+1./
     #    2.*zi*o+1./2.*zi*x12-1./2.*zi-1./16.*o-1./16.*x12)
      gz10s= gz10s+rl2*vvc*bxps*ys*(-3./8.+3./8.*o+
     #    3./8.*x12)
      gz10s= gz10s+rl2*vvc*ys*bxp*csti*(-9./16.+
     #    zi*o*x12-1./2.*zi*o*tx-2*zi*o+zi*os-3./2.*zi*x12*tx
     #    -zi*x12+zi*tx+zi*txs+zi-1./16.*o*x12+1./16.*o*x2z
     #    +3./4.*o-3./16.*os+1./8.*x12*tx+1./16.*x12-1./16.*
     #    x2z+15./16.*tx)
      gz10s= gz10s+rl2*vvc*ys*bxp*(3./8.+3./8.*o*x12-
     #    3./8.*o*x2z-3./2.*o+9./8.*os-3./4.*x12*tx-3./8.*x12
     #    +3./8.*x2z+3./8.*tx)
      gz10s= gz10s+rl2*vvc*ys*csti*(1./2.-1./2.*
     #    zi*o*x12*tx-zi*o*x12+2*zi*o*tx+3*zi*o*txs+3./2.*zi*o
     #    +1./2.*zi*os*x12-1./2.*zi*os*tx-3./2.*zi*os+1./2.*zi*
     #    oc+2*zi*x12*tx+3*zi*x12*txs+1./2.*zi*x12-3./2.*zi*tx
     #    -3*zi*txs-1./2.*zi+1./16.*o*x12*tx+1./16.*o*x2z*tx-
     #    1./8.*o*x2z-5./8.*o*tx-1./16.*o*txs-o+1./16.*os*x2z
     #    +1./16.*os*tx+1./2.*os-17./16.*x12*tx-1./16.*x12*txs
     #    -15./16.*x2z*tx+1./16.*x2z+tx+txs)
      gz10s= gz10s+rl2*vvc*ys*(-3./8.*o*x12*tx-3./8.
     #    *o*x2z*tx+3./4.*o*x2z+3./4.*o*tx+3./8.*o*txs-3./8.*os
     #    *x2z-3./8.*os*tx+3./8.*x12*tx+3./8.*x12*txs-3./8.*x2z
     #    *tx-3./8.*x2z)
      gz10s= gz10s+rl3*vvc*gtm2*ys*bxp*csti*(1./48.
     #    -1./48.*o-1./48.*x12)
      gz10s= gz10s+rl3*vvc*gtm2*ys*bxp*(1./12.-1./12.*o
     #    -1./12.*x12)
      gz10s= gz10s+rl3*vvc*gtm2*ys*csti*(1./48.*o*
     #    x2z+1./12.*o*tx+1./16.*o-1./24.*os+1./16.*x12*tx+1./
     #    48.*x12-1./48.*x2z-1./24.*tx)
      gz10s= gz10s+rl3*vvc*gtm2*ys*(1./12.*o*x2z+1./3.
     #    *o*tx+1./4.*o-1./6.*os+1./4.*x12*tx+1./12.*x12-1./
     #    12.*x2z-1./6.*tx)
      gz10s= gz10s+vvs*gsm2*pwtm2*bxps*y*csti*(1./2.
     #    *zi*o+1./2.*zi*x12-1./2.*zi)
      gz10s= gz10s+vvs*gsm2*pwtm2*y*bxp*csti*(-1./
     #    2.+zi*o*x12-2*zi*o+zi*os-zi*x12*tx-zi*x12+1./2.*
     #    zi*tx+zi+5./8.*o-1./8.*os)
      gz10s= gz10s+vvs*gsm2*pwtm2*y*bxp*(-1./4.*o+1./
     #    4.*os)
      gz10s= gz10s+vvs*gsm2*pwtm2*y*csti*(1./2.-
     #    zi*o*x12+1./2.*zi*o*tx+1./2.*zi*o*txs+3./2.*zi*o+1./2.
     #    *zi*os*x12-3./2.*zi*os+1./2.*zi*oc+zi*x12*tx+1./2.*zi
     #    *x12*txs+1./2.*zi*x12-1./2.*zi*tx-1./2.*zi+3./8.*o*tx
     #    -o+1./2.*os+1./2.*tx)
      gz10s= gz10s+vvs*gsm2*pwtm2*y*(1./4.*o*tx)
      gz10s= gz10s+vvs*gtm2*pwsm2*y*bxp*zxi*csti*(1./
     #    48.-1./48.*o+1./48.*x12)
      gz10s= gz10s+vvs*gtm2*pwsm2*y*zxi*csti*(1./48.
     #    *o*x12+1./48.*o*tx+1./24.*o+1./48.*os-1./16.*x12*tx
     #    -1./24.*x12-1./24.*tx)
      gz10s= gz10s+vvs*gtm2*pwsm2*y*csti*(-1./48.
     #    +1./48.*o)
      gz10s= gz10s+vvq*gtm2*bxps*yc*(-1./2.+1./2.*o
     #    +1./2.*x12)
      gz10s= gz10s+vvq*gtm2*yc*bxp*(1./2.+1./2.*o*x12
     #    -1./2.*o*x2z-3./2.*o*tx-3./2.*o+os-2*x12*tx-1./2.
     #    *x12-1./2.*x2z*tx+1./2.*x2z+3./2.*tx+1./2.*txs)
      gz10s= gz10s+vvq*gtm2*yc*(1./2.*o*x12*tx+o*x2z*
     #    tx+o*x2z+o*tx+3./2.*o*txs-1./2.*os*x2z+x12*x2z*tx
     #    +1./2.*x12*tx+3./2.*x12*txs-3./2.*x2z*tx-1./2.*x2z*
     #    txs-1./2.*x2z+1./2.*tx*x12s+1./2.*tx*x2zs-1./2.*tx-
     #    txs)
*
      gz20s= xx*rl1*vvs*y*csti*(4*zi*o*x12*tx+2*zi*o*
     #    x12-4*zi*o*tx-2*zi*o*txs-2*zi*o-4*zi*os*x12+4*zi*os
     #    *tx+4*zi*os-4*zi*oc-2*zi*x12*tx-2*zi*x12*txs+2*zi*
     #    tx+2*o*tx+2*o-2*os-2*tx)
      gz20s= gz20s+xx*rl2*vvc*ys*csti*(12*zi*o*x12*
     #    txs-12*zi*o*txs+6*zi*os*txs-12*zi*x12*txs+6*zi*x12s*
     #    txs+6*zi*txs+6*o*txs+6*x12*txs-6*txs)
      gz20s= gz20s+xx*rl3*vvc*gtm2*ys*csti*(1./8.*o
     #    *x12*tx-1./8.*o*x2z*tx-1./8.*o*x2z-1./8.*o*txs-1./8.*
     #    os*x12+1./8.*os*x2z+1./8.*os*tx-1./8.*oc-1./8.*x12*
     #    txs+1./8.*x2z*tx)
      gz20s= gz20s+xx*rl3*vvc*gtm2*ys*(1./2.*o*x12*tx-
     #    1./2.*o*x2z*tx-1./2.*o*x2z-1./2.*o*txs-1./2.*os*x12+1.
     #    /2.*os*x2z+1./2.*os*tx-1./2.*oc-1./2.*x12*txs+1./2.*
     #    x2z*tx)
      gz20s= gz20s+xx*vvs*gtm2*pwsm2*y*zxi*csti*(
     #    -1./4.*o*x12*tx-1./8.*o*x12+1./8.*o*tx-1./8.*o*txs+
     #    1./4.*os*x12-1./8.*os+1./8.*x12*tx+1./8.*x12*txs)
      gz20s= gz20s+xx*vvs*gtm2*pwsm2*y*csti*(-7./
     #    24.*o*tx-1./8.*o+11./24.*os+1./8.*tx)
      gz20s= gz20s+xx*vvs*gtm2*pwsm2*y*(2./3.*o*tx-4./
     #    3.*os)
      gz20s= gz20s+xx*vvq*gtm2*yc*(-3*o*x2z*txs-3*
     #    x12*x2z*txs+3*x2z*txs)
      gz20s= gz20s+bxpi*rl1*vvs*y*csti*(-2*zi*o*tx
     #    -2*zi*o-2*zi*x12*tx+2*zi*tx)
      gz20s= gz20s+bxpi*rl2*vvc*ys*csti*(3./2.*zi*o*
     #    x12*tx-3*zi*o*tx-15./2.*zi*o*txs+3./2.*zi*os*tx-3./2.
     #    *zi*x12*tx-15./2.*zi*x12*txs+3./2.*zi*tx+6*zi*txs+3./
     #    2.*o*tx-3./2.*tx)
      gz20s= gz20s+bxpi*rl3*vvc*gtm2*ys*csti*(-1./
     #    4.*o*tx-1./8.*o+1./8.*os-1./8.*x12*tx+1./8.*tx)
      gz20s= gz20s+bxpi*rl3*vvc*gtm2*ys*(-o*tx-1./2.*
     #    o+1./2.*os-1./2.*x12*tx+1./2.*tx)
      gz20s= gz20s+bxpi*vvs*gtm2*pwsm2*y*zxi*csti*(
     #    -1./8.*o*tx-1./8.*o+1./8.*x12*tx+1./8.*tx)
      gz20s= gz20s+bxpi*vvq*gtm2*yc*(-3./2.*o*x2z*tx-
     #    9./2.*o*txs-9./2.*x12*txs+3./2.*x2z*tx+3*txs)
      gz20s= gz20s+rl1*vvs*y*bxp*csti*(-1./3.*zi*o
     #    -1./3.*zi*x12+1./3.*zi)
      gz20s= gz20s+rl1*vvs*y*csti*(1./3.-1./3.*zi
     #    *o*x12+5./3.*zi*o*tx+7./3.*zi*o+1./3.*zi*os+7./3.*zi*
     #    x12*tx+2./3.*zi*x12-2*zi*tx-1./3.*zi-3./8.*o+1./24.
     #    *os)
      gz20s= gz20s+rl2*vvc*bxps*ys*csti*(1./16.+1./
     #    2.*zi*o+1./2.*zi*x12-1./2.*zi-1./16.*o-1./16.*x12)
      gz20s= gz20s+rl2*vvc*bxps*ys*(-3./8.+3./8.*o+
     #    3./8.*x12)
      gz20s= gz20s+rl2*vvc*ys*bxp*csti*(-9./16.+
     #    zi*o*x12-3./2.*zi*o*tx-2*zi*o+zi*os-5./2.*zi*x12*tx
     #    -zi*x12+2*zi*tx+zi*txs+zi-1./16.*o*x12+1./16.*o*
     #    x2z+3./4.*o-3./16.*os+1./8.*x12*tx+1./16.*x12-1./16.
     #    *x2z+15./16.*tx)
      gz20s= gz20s+rl2*vvc*ys*bxp*(3./8.+3./8.*o*x12-
     #    3./8.*o*x2z-3./2.*o+9./8.*os-3./4.*x12*tx-3./8.*x12
     #    +3./8.*x2z+3./8.*tx)
      gz20s= gz20s+rl2*vvc*ys*csti*(1./2.-3./2.*
     #    zi*o*x12*tx-zi*o*x12+5*zi*o*tx+8*zi*o*txs+3./2.*zi*o
     #    +1./2.*zi*os*x12-3./2.*zi*os*tx-3./2.*zi*os+1./2.*zi*
     #    oc+4*zi*x12*tx+8*zi*x12*txs+1./2.*zi*x12-7./2.*zi*tx
     #    -7*zi*txs-1./2.*zi+1./16.*o*x12*tx+1./16.*o*x2z*tx-
     #    1./8.*o*x2z-13./8.*o*tx-1./16.*o*txs-o+1./16.*os*x2z
     #    +1./16.*os*tx+1./2.*os-17./16.*x12*tx-1./16.*x12*txs
     #    -15./16.*x2z*tx+1./16.*x2z+2*tx+txs)
      gz20s= gz20s+rl2*vvc*ys*(-3./8.*o*x12*tx-3./8.
     #    *o*x2z*tx+3./4.*o*x2z+3./4.*o*tx+3./8.*o*txs-3./8.*os
     #    *x2z-3./8.*os*tx+3./8.*x12*tx+3./8.*x12*txs-3./8.*x2z
     #    *tx-3./8.*x2z)
      gz20s= gz20s+rl3*vvc*gtm2*ys*bxp*csti*(1./48.
     #    -1./48.*o-1./48.*x12)
      gz20s= gz20s+rl3*vvc*gtm2*ys*bxp*(1./12.-1./12.*o
     #    -1./12.*x12)
      gz20s= gz20s+rl3*vvc*gtm2*ys*csti*(1./48.*o*
     #    x2z+1./4.*o*tx+7./48.*o-1./8.*os+7./48.*x12*tx+1./
     #    48.*x12-1./48.*x2z-1./8.*tx)
      gz20s= gz20s+rl3*vvc*gtm2*ys*(1./12.*o*x2z+o*tx
     #    +7./12.*o-1./2.*os+7./12.*x12*tx+1./12.*x12-1./12.*
     #    x2z-1./2.*tx)
      gz20s= gz20s+vvs*gsm2*pwtm2*bxps*y*csti*(1./2.
     #    *zi*o+1./2.*zi*x12-1./2.*zi)
      gz20s= gz20s+vvs*gsm2*pwtm2*y*bxp*csti*(-1./
     #    2.+zi*o*x12-2*zi*o+zi*os-zi*x12*tx-zi*x12+1./2.*
     #    zi*tx+zi+5./8.*o-1./8.*os)
      gz20s= gz20s+vvs*gsm2*pwtm2*y*bxp*(-1./4.*o+1./
     #    4.*os)
      gz20s= gz20s+vvs*gsm2*pwtm2*y*csti*(1./2.-
     #    zi*o*x12+1./2.*zi*o*tx+1./2.*zi*o*txs+3./2.*zi*o+1./2.
     #    *zi*os*x12-3./2.*zi*os+1./2.*zi*oc+zi*x12*tx+1./2.*zi
     #    *x12*txs+1./2.*zi*x12-1./2.*zi*tx-1./2.*zi+3./8.*o*tx
     #    -o+1./2.*os+1./2.*tx)
      gz20s= gz20s+vvs*gsm2*pwtm2*y*(1./4.*o*tx)
      gz20s= gz20s+vvs*gtm2*pwsm2*y*bxp*zxi*csti*(1./
     #    48.-1./48.*o+1./48.*x12)
      gz20s= gz20s+vvs*gtm2*pwsm2*y*zxi*csti*(1./48.
     #    *o*x12+5./48.*o*tx+1./8.*o+1./48.*os-7./48.*x12*tx-
     #    1./24.*x12-1./8.*tx)
      gz20s= gz20s+vvs*gtm2*pwsm2*y*csti*(-1./48.
     #    +1./48.*o)
      gz20s= gz20s+vvq*gtm2*bxps*yc*(-1./2.+1./2.*o
     #    +1./2.*x12)
      gz20s= gz20s+vvq*gtm2*yc*bxp*(1./2.+1./2.*o*x12
     #    -1./2.*o*x2z-3*o*tx-3./2.*o+os-3*x12*tx-1./2.*x12
     #    -1./2.*x2z*tx+1./2.*x2z+5./2.*tx+1./2.*txs)
      gz20s= gz20s+vvq*gtm2*yc*(1./2.*o*x12*tx+2*o*x2z
     #    *tx+o*x2z+5./2.*o*tx+9./2.*o*txs-1./2.*os*x2z+x12*
     #    x2z*tx+3./2.*x12*tx+9./2.*x12*txs-5./2.*x2z*tx-1./2.*
     #    x2z*txs-1./2.*x2z+1./2.*tx*x12s+1./2.*tx*x2zs-3./2.*
     #    tx-3*txs)
*
      gz30s= bxpi*rl1*vvs*y*csti*(-4./3.+5./6.*zi*o*
     #    x12-10./3.*zi*o+4./3.*zi*os-5./6.*zi*x12+2./3.*zi*tx
     #    -1./2.*zi*x12s+4./3.*zi+1./24.*o*tx+2*o-1./24.*os
     #    -1./2.*x12-2./3.*tx)
      gz30s= gz30s+bxpi*rl2*vvs*pwsc*y*csti*(1./3.
     #    +5./6.*zi*o*x12-1./3.*zi*o*tx+2./3.*zi*o-1./3.*zi*x12
     #    *tx-1./2.*zi*x12+5./6.*zi*x12s-1./3.*zi-1./3.*o+5./
     #    6.*x12)
      gz30s= gz30s+bxpi*rl2*vvc*ys*csti*(2*zi*o*x12*
     #    tx-2*zi*o*tx-2*zi*o*txs+zi*os*tx-2*zi*x12*tx-2*zi*
     #    x12*txs+zi*tx*x12s+zi*tx+2*zi*txs+1./16.*o*x2z*tx+o
     #    *tx+1./16.*o*txs+x12*tx+1./16.*x12*txs-1./16.*x2z*tx
     #    -tx-2*txs)
      gz30s= gz30s+bxpi*rl2*vvc*ys*(-3./8.*o*x2z*tx-3.
     #    /8.*o*txs-3./8.*x12*txs+3./8.*x2z*tx)
      gz30s= gz30s+bxpi*rl3*vvc*gtm2*ys*csti*(1./96.
     #    *o*x12-1./12.*o*x2z-1./24.*o*tx+1./24.*os-1./96.*x12*
     #    x2z-1./96.*x12*tx+1./24.*x2z*tx+1./24.*x2z)
      gz30s= gz30s+bxpi*rl3*vvc*gtm2*ys*(1./24.*o*x12-1.
     #    /3.*o*x2z-1./6.*o*tx+1./6.*os-1./24.*x12*x2z-1./24.*
     #    x12*tx+1./6.*x2z*tx+1./6.*x2z)
      gz30s= gz30s+bxpi*vvs*gs*gtc*pws*pwt*y*csti*(1.
     #    /6.+5./12.*zi*o*x12-1./6.*zi*o*tx+1./3.*zi*o-1./6.*zi
     #    *x12*tx-1./4.*zi*x12+5./12.*zi*x12s-1./6.*zi-1./6.*o
     #    +5./12.*x12)
      gz30s= gz30s+bxpi*vvs*gsm2*pwtm2*y*csti*(-1./
     #    4.+7./8.*zi*o*x12*tx+zi*o*x12-3./4.*zi*o*tx-1./4.*zi*
     #    o*x12s-1./2.*zi*o*txs-3./4.*zi*o-1./2.*zi*os*x12+1./4.
     #    *zi*os*tx+3./4.*zi*os-1./4.*zi*oc-9./8.*zi*x12*tx-1./
     #    2.*zi*x12*txs-1./2.*zi*x12+5./8.*zi*tx*x12s+1./2.*zi*tx
     #    +1./4.*zi*x12s+1./4.*zi-1./4.*o*x12+1./4.*o*x2z+1./
     #    4.*o*tx+1./2.*o-1./4.*os+5./8.*x12*tx+1./4.*x12-1./
     #    4.*x2z-1./2.*tx)
      gz30s= gz30s+bxpi*vvs*gtm2*pwsm2*y*zxi*csti*(
     #    -1./48.*o*x12+1./24.*o-1./48.*os+1./32.*x12*tx+1./
     #    24.*x12+1./32.*x12s)
      gz30s= gz30s+bxpi*vvs*gtm2*pwsm2*y*csti*(1./24.
     #    -17./144.*o+1./32.*x12+1./24.*tx)
      gz30s= gz30s+bxpi*vvs*gtm2*pwsm2*y*(2./9.*o)
      gz30s= gz30s+bxpi*vvq*gtm2*yc*(-o*x2zs-x12*x2z*
     #    tx-x12*x2zs+x2z*tx+x2z*txs+x2zs)
      gz30s= gz30s+rl1*vvs*y*bxp*csti*(-13./6.*zi*
     #    o-2./3.*zi*x12+17./12.*zi)
      gz30s= gz30s+rl1*vvs*y*csti*(17./12.-7./12.
     #    *zi*o*x12-3./4.*zi*o*tx+11./2.*zi*o-zi*os-3./4.*zi*
     #    x12*tx+17./12.*zi*x12-2./3.*zi*tx+5./12.*zi*x12s-11./
     #    4.*zi-35./24.*o+1./24.*os+1./6.*x12)
      gz30s= gz30s+rl2*vvs*pwsc*y*bxp*csti*(7./6.*zi
     #    *o+1./3.*zi*x12-3./4.*zi)
      gz30s= gz30s+rl2*vvs*pwsc*y*csti*(-3./4.-
     #    5./12.*zi*o*x12+3./4.*zi*o*tx-5./3.*zi*o+1./6.*zi*os+
     #    3./4.*zi*x12*tx+5./12.*zi*x12-7./12.*zi*x12s+13./12.*zi
     #    +3./4.*o-1./6.*x12)
      gz30s= gz30s+rl2*vvc*bxps*ys*csti*(7./64.+zi
     #    *o+zi*x12-zi-7./64.*o-7./64.*x12)
      gz30s= gz30s+rl2*vvc*bxps*ys*(-21./32.+21./32.*
     #    o+21./32.*x12)
      gz30s= gz30s+rl2*vvc*ys*bxp*csti*(-9./8.+3.
     #    /2.*zi*o*x12+3./8.*zi*o*tx-11./4.*zi*o+11./8.*zi*os-9.
     #    /8.*zi*x12*tx-3./2.*zi*x12+5./8.*zi*tx+1./8.*zi*x12s+
     #    zi*txs+11./8.*zi-1./16.*o*x12+9./64.*o*x2z-1./64.*o*
     #    tx+41./32.*o-5./32.*os+3./64.*x12*x2z+1./16.*x12*tx
     #    +13./64.*x12-9./64.*x2z+29./32.*tx-1./64.*x12s)
      gz30s= gz30s+rl2*vvc*ys*bxp*(3./8.*o*x12-27./32.*
     #    o*x2z+3./32.*o*tx-15./16.*o+15./16.*os-9./32.*x12*x2z
     #    -3./8.*x12*tx-15./32.*x12+27./32.*x2z+9./16.*tx+3./
     #    32.*x12s)
      gz30s= gz30s+rl2*vvc*ys*csti*(3./8.-5./4.*
     #    zi*o*x12*tx+15./8.*zi*o*tx-5./8.*zi*o*x12s+19./8.*zi*o*
     #    txs+9./8.*zi*o-1./4.*zi*os*tx-9./8.*zi*os+3./8.*zi*oc
     #    +23./8.*zi*x12*tx+19./8.*zi*x12*txs-zi*tx*x12s-13./8.
     #    *zi*tx+5./8.*zi*x12s-1./4.*zi*x12c-3*zi*txs-3./8.*zi
     #    +3./32.*o*x12*tx-3./8.*o*x12+1./16.*o*x2z*tx-5./32.*o
     #    *x2z+3./16.*o*tx-1./32.*o*x2zs-1./32.*o*txs-3./4.*o
     #    +1./32.*os*x2z+3./32.*os*tx+3./8.*os+1./32.*x12*x2z*
     #    tx+11./32.*x12*x2z-5./32.*x12*tx-1./32.*x12*txs+3./8.
     #    *x12-29./32.*x2z*tx+1./8.*x2z+11./16.*tx-1./4.*x12s
     #    +1./32.*x2zs+txs)
      gz30s= gz30s+rl2*vvc*ys*(-9./16.*o*x12*tx-3./8.
     #    *o*x2z*tx+3./16.*o*x2z+15./8.*o*tx+3./16.*o*x2zs+3./
     #    16.*o*txs-3./16.*os*x2z-9./16.*os*tx-3./16.*x12*x2z*tx
     #    +3./16.*x12*x2z+15./16.*x12*tx+3./16.*x12*txs-9./16.*
     #    x2z*tx-3./8.*tx-3./16.*x2zs)
      gz30s= gz30s+rl3*vvc*gtm2*ys*bxp*csti*(7./192.
     #    -11./192.*o-1./32.*x12)
      gz30s= gz30s+rl3*vvc*gtm2*ys*bxp*(7./48.-11./48.*
     #    o-1./8.*x12)
      gz30s= gz30s+rl3*vvc*gtm2*ys*csti*(-1./24.
     #    -1./24.*o*x12+5./192.*o*x2z+1./192.*o*tx+5./32.*o-
     #    13./192.*os-1./96.*x12*x2z+1./192.*x12*tx+5./96.*x12-
     #    7./192.*x2z-1./24.*tx-1./192.*x12s)
      gz30s= gz30s+rl3*vvc*gtm2*ys*(-1./6.-1./6.*o*
     #    x12+5./48.*o*x2z+1./48.*o*tx+5./8.*o-13./48.*os-1./
     #    24.*x12*x2z+1./48.*x12*tx+5./24.*x12-7./48.*x2z-1./6.
     #    *tx-1./48.*x12s)
      gz30s= gz30s+vvs*gs*gtc*pws*pwt*y*bxp*csti*(7./
     #    12.*zi*o+1./6.*zi*x12-3./8.*zi)
      gz30s= gz30s+vvs*gs*gtc*pws*pwt*y*csti*(-3./
     #    8.-5./24.*zi*o*x12+3./8.*zi*o*tx-5./6.*zi*o+1./12.*zi
     #    *os+3./8.*zi*x12*tx+5./24.*zi*x12-7./24.*zi*x12s+13./
     #    24.*zi+3./8.*o-1./12.*x12)
      gz30s= gz30s+vvs*gsm2*pwtm2*bxps*y*csti*(7./8.
     #    *zi*o+3./4.*zi*x12-7./8.*zi)
      gz30s= gz30s+vvs*gsm2*pwtm2*y*bxp*csti*(-1
     #    +25./16.*zi*o*x12+3./8.*zi*o*tx-3*zi*o+3./2.*zi*os-
     #    3./8.*zi*x12*tx-27./16.*zi*x12+1./2.*zi*tx+1./16.*zi*
     #    x12s+3./2.*zi+9./8.*o-1./8.*os+1./4.*x12)
      gz30s= gz30s+vvs*gsm2*pwtm2*y*bxp*(-1./4.*o+1./
     #    4.*os)
      gz30s= gz30s+vvs*gsm2*pwtm2*y*csti*(7./8.-7.
     #    /16.*zi*o*x12*tx-15./8.*zi*o*x12+7./8.*zi*o*tx+5./16.*
     #    zi*o*x12s+1./2.*zi*o*txs+19./8.*zi*o+15./16.*zi*os*x12
     #    +1./8.*zi*os*tx-17./8.*zi*os+5./8.*zi*oc+17./8.*zi*
     #    x12*tx+1./2.*zi*x12*txs+15./16.*zi*x12-9./16.*zi*tx*
     #    x12s-zi*tx-1./16.*zi*x12s-7./8.*zi+5./16.*o*x12-1./
     #    8.*o*x2z+1./2.*o*tx-3./2.*o+5./8.*os-1./4.*x12*tx-1.
     #    /16.*x12+1./8.*x2z+1./2.*tx)
      gz30s= gz30s+vvs*gsm2*pwtm2*y*(1./4.*o*tx)
      gz30s= gz30s+vvs*gtm2*pwsm2*y*bxp*zxi*csti*(5./
     #    192.+5./96.*x12)
      gz30s= gz30s+vvs*gtm2*pwsm2*y*zxi*csti*(-1./
     #    24.+5./192.*o*x12-1./64.*o*tx+1./192.*o+1./96.*os-1.
     #    /64.*x12*tx-19./192.*x12-1./24.*tx-1./64.*x12s)
      gz30s= gz30s+vvs*gtm2*pwsm2*y*csti*(-5./192.
     #    +1./64.*o-1./96.*x12)
      gz30s= gz30s+vvq*gtm2*bxps*yc*(-1+o+x12)
      gz30s= gz30s+vvq*gtm2*yc*bxp*(3./2.+5./2.*o*x12
     #    -3./2.*o*x2z-1./2.*o*tx-3*o+3./2.*os-1./2.*x12*x2z
     #    -3./2.*x12*tx-3*x12-1./2.*x2z*tx+3./2.*x2z+3./2.*tx
     #    +3./2.*x12s+1./2.*txs)
      gz30s= gz30s+vvq*gtm2*yc*(-2*o*x12*x2z-1./2.*o
     #    *x12*tx+7./2.*o*x2z+o*tx+1./2.*o*x2zs+1./2.*o*txs-
     #    os*x2z+1./2.*x12*x2z*tx+7./2.*x12*x2z+2*x12*tx+1./2.*
     #    x12*txs-3./2.*x2z*tx-x2z*x12s-1./2.*x2z*txs-5./2.*x2z
     #    -1./2.*tx*x12s+1./2.*tx*x2zs-tx-1./2.*x2zs-txs)
      gz30s= gz30s+re(gs*gtc*pws*pwt)*bxpi*vvs*y*csti
     # *(-1./3.-5./6.*zi*o*x12+1./3.*zi*o*tx-2./3.*zi*o+1./
     #    3.*zi*x12*tx+1./2.*zi*x12-5./6.*zi*x12s+1./3.*zi+1./3.
     #    *o-5./6.*x12)
      gz30s= gz30s+re(gs*gtc*pws*pwt)*vvs*y*bxp*csti
     # *(-7./6.*zi*o-1./3.*zi*x12+3./4.*zi)
      gz30s= gz30s+re(gs*gtc*pws*pwt)*vvs*y*csti*(3.
     #    /4.+5./12.*zi*o*x12-3./4.*zi*o*tx+5./3.*zi*o-1./6.*zi
     #    *os-3./4.*zi*x12*tx-5./12.*zi*x12+7./12.*zi*x12s-13./
     #    12.*zi-3./4.*o+1./6.*x12)
*
      gz10c= rs1wg(1)*xx*vvc*gtm2*ys*csti*(1./12.*o*x12*
     #    tx-1./12.*o*x2z*tx-1./12.*o*x2z-1./12.*o*txs-1./12.*
     #    os*x12+1./12.*os*x2z+1./12.*os*tx-1./12.*oc-1./12.*
     #    x12*txs+1./12.*x2z*tx)
      gz10c= gz10c+rs1wg(1)*xx*vvc*gtm2*ys*(-1./3.*o*
     #    x12*tx+1./3.*o*x2z*tx+1./3.*o*x2z+1./3.*o*txs+1./3.*
     #    os*x12-1./3.*os*x2z-1./3.*os*tx+1./3.*oc+1./3.*x12*
     #    txs-1./3.*x2z*tx)
      gz10c= gz10c+rs1wg(1)*bxpi*vvc*gtm2*ys*csti*(
     #    -1./4.*o*tx-1./12.*o+1./6.*os-1./12.*x12*tx+1./12.*
     #    tx)
      gz10c= gz10c+rs1wg(1)*bxpi*vvc*gtm2*ys*(o*tx+1./3.
     #    *o-2./3.*os+1./3.*x12*tx-1./3.*tx)
      gz10c= gz10c+rs1wg(1)*vvc*gtm2*ys*bxp*csti*(1./
     #    24.-1./24.*o-1./24.*x12)
      gz10c= gz10c+rs1wg(1)*vvc*gtm2*ys*bxp*(-1./6.+1.
     #    /6.*o+1./6.*x12)
      gz10c= gz10c+rs1wg(1)*vvc*gtm2*ys*csti*(1./24.
     #    *o*x2z+7./24.*o*tx+1./8.*o-1./6.*os+1./8.*x12*tx+1./
     #    24.*x12-1./24.*x2z-1./12.*tx)
      gz10c= gz10c+rs1wg(1)*vvc*gtm2*ys*(-1./6.*o*x2z
     #    -7./6.*o*tx-1./2.*o+2./3.*os-1./2.*x12*tx-1./6.*x12
     #    +1./6.*x2z+1./3.*tx)
      gz10c= gz10c+rs1wg(4)*xx*vvc*gtm2*ys*csti*(1./
     #    48.*o*x2z*txs-1./48.*o*tx*x2zs+1./24.*o*x2zs+1./48.*x12
     #    *x2z*txs-1./48.*tx*x2zs)
      gz10c= gz10c+rs1wg(4)*xx*vvc*gtm2*ys*(-1./12.*o*
     #    x2z*txs+1./12.*o*tx*x2zs-1./6.*o*x2zs-1./12.*x12*x2z*
     #    txs+1./12.*tx*x2zs)
      gz10c= gz10c+rs1wg(4)*bxpi*vvc*gtm2*ys*csti*(
     #    -1./48.*o*x12*x2z+1./12.*o*x2z+1./48.*o*txs-1./48.*os
     #    *x2z+1./48.*x12*x2z*tx+1./48.*x12*txs-1./24.*x2z*tx)
      gz10c= gz10c+rs1wg(4)*bxpi*vvc*gtm2*ys*(1./12.*o*
     #    x12*x2z-1./3.*o*x2z-1./12.*o*txs+1./12.*os*x2z-1./12.
     #    *x12*x2z*tx-1./12.*x12*txs+1./6.*x2z*tx)
      gz10c= gz10c+rs1wg(4)*vvc*gtm2*ys*bxp*csti*(
     #    -1./32.*o*x12+1./32.*o*tx+5./96.*o-1./48.*os+1./32.
     #    *x12*tx+1./48.*x12-1./32.*tx-1./96.*x12s)
      gz10c= gz10c+rs1wg(4)*vvc*gtm2*ys*bxp*(1./8.*o*x12
     #    -1./8.*o*tx-5./24.*o+1./12.*os-1./8.*x12*tx-1./12.*
     #    x12+1./8.*tx+1./24.*x12s)
      gz10c= gz10c+rs1wg(4)*vvc*gtm2*ys*csti*(1./96.
     #    *o*x12*x2z+1./96.*o*x12*tx+1./48.*o*x12+1./96.*o*x2z*tx
     #    -3./32.*o*x2z-1./48.*o*tx-1./32.*o*txs-1./24.*o+1./
     #    48.*os*x2z+1./48.*os-1./48.*x12*x2z*tx-1./48.*x12*x2z
     #    -1./48.*x12*tx-1./32.*x12*txs+5./96.*x2z*tx+1./96.*tx
     #    *x12s+1./48.*tx)
      gz10c= gz10c+rs1wg(4)*vvc*gtm2*ys*(-1./24.*o*x12
     #    *x2z-1./24.*o*x12*tx-1./12.*o*x12-1./24.*o*x2z*tx+3./
     #    8.*o*x2z+1./12.*o*tx+1./8.*o*txs+1./6.*o-1./12.*os*
     #    x2z-1./12.*os+1./12.*x12*x2z*tx+1./12.*x12*x2z+1./12.
     #    *x12*tx+1./8.*x12*txs-5./24.*x2z*tx-1./24.*tx*x12s-1./
     #    12.*tx)
      gz10c= gz10c+rs1wg(7)*xx*vvc*gtm2*ys*csti*(
     #    -1./96.*o*x2z*txs-1./96.*o*tx*x2zs-1./96.*x12*x2z*txs
     #    +1./96.*tx*x2zs)
      gz10c= gz10c+rs1wg(7)*xx*vvc*gtm2*ys*(1./24.*o*x2z
     #    *txs+1./24.*o*tx*x2zs+1./24.*x12*x2z*txs-1./24.*tx*x2zs
     #    )
      gz10c= gz10c+rs1wg(7)*bxpi*vvc*gtm2*ys*csti*(
     #    -1./96.*o*x12*x2z-1./96.*o*x2z*tx-1./96.*os*x2z-1./96.
     #    *x12*x2z*tx+1./96.*x2z*tx)
      gz10c= gz10c+rs1wg(7)*bxpi*vvc*gtm2*ys*(1./24.*o*
     #    x12*x2z+1./24.*o*x2z*tx+1./24.*os*x2z+1./24.*x12*x2z*tx
     #    -1./24.*x2z*tx)
      gz10c= gz10c+rs1wg(7)*vvc*gtm2*ys*bxp*csti*(
     #    -1./192.*os-1./96.*x12+1./192.*x12s)
      gz10c= gz10c+rs1wg(7)*vvc*gtm2*ys*bxp*(1./48.*os+
     #    1./24.*x12-1./48.*x12s)
      gz10c= gz10c+rs1wg(7)*vvc*gtm2*ys*csti*(1./96.
     #    *o*x12*x2z-1./96.*o*x12*tx+1./96.*o*x2z*tx+1./192.*o*
     #    x12s+1./96.*os*x12+1./96.*os*x2z-1./192.*os*tx+1./192.
     #    *oc+1./96.*x12*x2z*tx+1./96.*x12*x2z-1./96.*x2z*tx-1./
     #    192.*tx*x12s)
      gz10c= gz10c+rs1wg(7)*vvc*gtm2*ys*(-1./24.*o*x12
     #    *x2z+1./24.*o*x12*tx-1./24.*o*x2z*tx-1./48.*o*x12s-1./
     #    24.*os*x12-1./24.*os*x2z+1./48.*os*tx-1./48.*oc-1./24.
     #    *x12*x2z*tx-1./24.*x12*x2z+1./24.*x2z*tx+1./48.*tx*x12s
     #    )
      gz10c= gz10c+rs1wg(8)*bxpi*vvc*gtm2*ys*csti*(1.
     #    /48.*o*x2z*tx-1./24.*o*x2z-1./48.*o*txs-1./48.*x12*txs
     #    +1./48.*x2z*tx)
      gz10c= gz10c+rs1wg(8)*bxpi*vvc*gtm2*ys*(-1./12.*o
     #    *x2z*tx+1./6.*o*x2z+1./12.*o*txs+1./12.*x12*txs-1./12.
     #    *x2z*tx)
      gz10c= gz10c+rs1wg(8)*vvc*gtm2*ys*bxp*csti*(1./
     #    32.*o*x12-1./32.*o*tx-5./96.*o+1./32.*os-1./32.*x12*
     #    tx+1./32.*tx)
      gz10c= gz10c+rs1wg(8)*vvc*gtm2*ys*bxp*(-1./8.*o*
     #    x12+1./8.*o*tx+5./24.*o-1./8.*os+1./8.*x12*tx-1./8.
     #    *tx)
      gz10c= gz10c+rs1wg(8)*vvc*gtm2*ys*csti*(1./96.
     #    *o*x12*tx-1./48.*o*x12-1./32.*o*x2z*tx+5./96.*o*x2z+1.
     #    /48.*o*tx+1./32.*o*txs+1./24.*o-1./96.*os*x2z+1./96.*
     #    os*tx-1./48.*os+1./48.*x12*tx+1./32.*x12*txs-1./32.*
     #    x2z*tx-1./48.*tx)
      gz10c= gz10c+rs1wg(8)*vvc*gtm2*ys*(-1./24.*o*x12
     #    *tx+1./12.*o*x12+1./8.*o*x2z*tx-5./24.*o*x2z-1./12.*o
     #    *tx-1./8.*o*txs-1./6.*o+1./24.*os*x2z-1./24.*os*tx+
     #    1./12.*os-1./12.*x12*tx-1./8.*x12*txs+1./8.*x2z*tx+1./
     #    12.*tx)
      gz10c= gz10c+rs1wg(9)*bxpi*vvc*gtm2*ys*csti*(1.
     #    /12.*o*tx-1./12.*os)
      gz10c= gz10c+rs1wg(9)*bxpi*vvc*gtm2*ys*(-1./3.*o*
     #    tx+1./3.*os)
      gz10c= gz10c+rs1wg(9)*vvc*gtm2*ys*csti*(-1./
     #    8.*o*tx+1./12.*os)
      gz10c= gz10c+rs1wg(9)*vvc*gtm2*ys*(1./2.*o*tx-1./
     #    3.*os)
      gz10c= gz10c+rs1wg(10)*xx*vvc*gtm2*ys*csti*(1.
     #    /96.*o*x2z*txs+1./96.*o*tx*x2zs+1./96.*x12*x2z*txs-1./
     #    96.*tx*x2zs)
      gz10c= gz10c+rs1wg(10)*xx*vvc*gtm2*ys*(-1./24.*o
     #    *x2z*txs-1./24.*o*tx*x2zs-1./24.*x12*x2z*txs+1./24.*tx*
     #    x2zs)
      gz10c= gz10c+rs1wg(10)*bxpi*vvc*gtm2*ys*csti*(
     #    1./96.*o*x12*x2z+1./48.*o*x2z*tx+1./96.*o*txs+1./96.*os
     #    *x2z+1./96.*x12*x2z*tx+1./96.*x12*txs-1./48.*x2z*tx)
      gz10c= gz10c+rs1wg(10)*bxpi*vvc*gtm2*ys*(-1./24.*
     #    o*x12*x2z-1./12.*o*x2z*tx-1./24.*o*txs-1./24.*os*x2z-
     #    1./24.*x12*x2z*tx-1./24.*x12*txs+1./12.*x2z*tx)
      gz10c= gz10c+rs1wg(10)*vvc*gtm2*ys*bxp*csti*(1.
     #    /64.*o*x12+1./64.*o*tx-1./192.*o+1./48.*os+1./64.*x12
     #    *tx+1./96.*x12-1./64.*tx-1./192.*x12s)
      gz10c= gz10c+rs1wg(10)*vvc*gtm2*ys*bxp*(-1./16.*o
     #    *x12-1./16.*o*tx+1./48.*o-1./12.*os-1./16.*x12*tx-1.
     #    /24.*x12+1./16.*tx+1./48.*x12s)
      gz10c= gz10c+rs1wg(10)*vvc*gtm2*ys*csti*(-1.
     #    /96.*o*x12*x2z+1./192.*o*x12*tx-1./96.*o*x12-5./192.*o*
     #    x2z*tx+1./192.*o*x2z-1./96.*o*tx-1./192.*o*x12s-1./64.
     #    *o*txs-1./96.*os*x12-1./64.*os*x2z-1./96.*os-1./192.*
     #    oc-1./96.*x12*x2z*tx-1./96.*x12*x2z-1./96.*x12*tx-1./
     #    64.*x12*txs+5./192.*x2z*tx+1./192.*tx*x12s+1./96.*tx)
      gz10c= gz10c+rs1wg(10)*vvc*gtm2*ys*(1./24.*o*x12*
     #    x2z-1./48.*o*x12*tx+1./24.*o*x12+5./48.*o*x2z*tx-1./
     #    48.*o*x2z+1./24.*o*tx+1./48.*o*x12s+1./16.*o*txs+1./
     #    24.*os*x12+1./16.*os*x2z+1./24.*os+1./48.*oc+1./24.*
     #    x12*x2z*tx+1./24.*x12*x2z+1./24.*x12*tx+1./16.*x12*txs
     #    -5./48.*x2z*tx-1./48.*tx*x12s-1./24.*tx)
      gz10c= gz10c+rs1wg(11)*vvc*gtm2*ys*bxp*csti*(1.
     #    /48.-1./48.*o-1./48.*x12)
      gz10c= gz10c+rs1wg(11)*vvc*gtm2*ys*bxp*(-1./12.
     #    +1./12.*o+1./12.*x12)
      gz10c= gz10c+rs1wg(11)*vvc*gtm2*ys*csti*(1./
     #    48.*o*x12+1./48.*o*x2z-1./48.*o*tx+1./48.*os+1./48.*
     #    x12*tx-1./48.*x2z)
      gz10c= gz10c+rs1wg(11)*vvc*gtm2*ys*(-1./12.*o*
     #    x12-1./12.*o*x2z+1./12.*o*tx-1./12.*os-1./12.*x12*tx
     #    +1./12.*x2z)
      gz10c= gz10c+rs1wg(12)*xx*vvc*gtm2*ys*csti*(1.
     #    /24.*o*x12*tx+1./24.*o*x2z*tx-1./24.*o*x2z-1./24.*o*txs
     #    -1./24.*os*x12-1./24.*os*x2z+1./24.*os*tx-1./24.*oc
     #    -1./24.*x12*txs+1./24.*x2z*tx)
      gz10c= gz10c+rs1wg(12)*xx*vvc*gtm2*ys*(-1./6.*o*
     #    x12*tx-1./6.*o*x2z*tx+1./6.*o*x2z+1./6.*o*txs+1./6.*
     #    os*x12+1./6.*os*x2z-1./6.*os*tx+1./6.*oc+1./6.*x12*
     #    txs-1./6.*x2z*tx)
      gz10c= gz10c+rs1wg(12)*bxpi*vvc*gtm2*ys*csti*(
     #    -1./24.*o*tx-1./24.*o-1./24.*x12*tx+1./24.*tx)
      gz10c= gz10c+rs1wg(12)*bxpi*vvc*gtm2*ys*(1./6.*o*tx
     #    +1./6.*o+1./6.*x12*tx-1./6.*tx)
      gz10c= gz10c+rs1wg(12)*vvc*gtm2*ys*csti*(1./
     #    24.*o*tx+1./16.*o+1./24.*x12*tx+1./48.*x12-1./24.*tx
     #    )
      gz10c= gz10c+rs1wg(12)*vvc*gtm2*ys*(-1./6.*o*tx
     #    -1./4.*o-1./6.*x12*tx-1./12.*x12+1./6.*tx)
      gz10c= gz10c+rs1wg(13)*xx*vvc*gtm2*ys*csti*(1.
     #    /48.*o*x12*tx-1./48.*o*x2z*tx-1./48.*o*x2z-1./48.*o*txs
     #    -1./48.*os*x12+1./48.*os*x2z+1./48.*os*tx-1./48.*oc
     #    -1./48.*x12*txs+1./48.*x2z*tx)
      gz10c= gz10c+rs1wg(13)*xx*vvc*gtm2*ys*(-1./12.*o
     #    *x12*tx+1./12.*o*x2z*tx+1./12.*o*x2z+1./12.*o*txs+1./
     #    12.*os*x12-1./12.*os*x2z-1./12.*os*tx+1./12.*oc+1./12.
     #    *x12*txs-1./12.*x2z*tx)
      gz10c= gz10c+rs1wg(13)*bxpi*vvc*gtm2*ys*csti*(
     #    -1./48.*o*tx-1./48.*o-1./48.*x12*tx+1./48.*tx)
      gz10c= gz10c+rs1wg(13)*bxpi*vvc*gtm2*ys*(1./12.*o*
     #    tx+1./12.*o+1./12.*x12*tx-1./12.*tx)
      gz10c= gz10c+rs1wg(13)*vvc*gtm2*ys*csti*(1./
     #    32.*o*x12+1./48.*o*tx-1./96.*o+1./32.*os+1./48.*x12*
     #    tx+1./96.*x12-1./48.*tx)
      gz10c= gz10c+rs1wg(13)*vvc*gtm2*ys*(-1./8.*o*x12
     #    -1./12.*o*tx+1./24.*o-1./8.*os-1./12.*x12*tx-1./24.
     #    *x12+1./12.*tx)
      gz10c= gz10c+rs1wg(14)*xx*vvc*gtm2*ys*csti*(1.
     #    /24.*o*x2z*tx-1./24.*os*x2z)
      gz10c= gz10c+rs1wg(14)*xx*vvc*gtm2*ys*(-1./6.*o*
     #    x2z*tx+1./6.*os*x2z)
      gz10c= gz10c+rs1wg(14)*bxpi*vvc*gtm2*ys*csti*(
     #    1./24.*o*tx-1./24.*os)
      gz10c= gz10c+rs1wg(14)*bxpi*vvc*gtm2*ys*(-1./6.*o
     #    *tx+1./6.*os)
      gz10c= gz10c+rs1wg(14)*vvc*gtm2*ys*bxp*csti*(1.
     #    /96.-1./96.*o-1./96.*x12)
      gz10c= gz10c+rs1wg(14)*vvc*gtm2*ys*bxp*(-1./24.
     #    +1./24.*o+1./24.*x12)
      gz10c= gz10c+rs1wg(14)*vvc*gtm2*ys*csti*(-1.
     #    /48.*o*x12+1./96.*o*x2z-1./32.*o*tx+1./48.*os+1./96.*
     #    x12*tx-1./96.*x2z)
      gz10c= gz10c+rs1wg(14)*vvc*gtm2*ys*(1./12.*o*x12
     #    -1./24.*o*x2z+1./8.*o*tx-1./12.*os-1./24.*x12*tx+1./
     #    24.*x2z)
      gz10c= gz10c+rs2wg(1)*xx*vvq*gtm2*yc*(-2*o*x2z*
     #    txs-2*x12*x2z*txs+2*x2z*txs)
      gz10c= gz10c+rs2wg(1)*bxpi*vvq*gtm2*yc*(-3./2.*o*
     #    x2z*tx-7./2.*o*txs-7./2.*x12*txs+3./2.*x2z*tx+2*txs)
      gz10c= gz10c+rs2wg(1)*vvq*gtm2*bxps*yc*(-1+o+
     #    x12)
      gz10c= gz10c+rs2wg(1)*vvq*gtm2*yc*bxp*(1+o*x12-
     #    o*x2z-9./2.*o*tx-3*o+2*os-9./2.*x12*tx-x12-x2z*tx
     #    +x2z+7./2.*tx+txs)
      gz10c= gz10c+rs2wg(1)*vvq*gtm2*yc*(3./2.*o*x12*tx
     #    +3*o*x2z*tx+2*o*x2z+5./2.*o*tx+7./2.*o*txs-os*x2z
     #    +1./2.*os*tx+2*x12*x2z*tx+3./2.*x12*tx+7./2.*x12*txs
     #    -7./2.*x2z*tx-x2z*txs-x2z+tx*x12s+tx*x2zs-3./2.*
     #    tx-2*txs)
      gz10c= gz10c+rs2wg(4)*xx*vvq*gtm2*yc*(1./4.*o*x12*
     #    tx*x2zs-1./4.*o*tx*x2zc-1./4.*o*tx*x2zs+1./2.*o*x2zc+
     #    1./4.*o*x2zs*txs+1./4.*os*tx*x2zs-1./4.*os*x2zc+1./4.*
     #    x12*tx*x2zs+1./4.*x12*x2zs*txs+1./4.*tx*x2zc-1./4.*x2zc
     #    -1./2.*x2zs*txs)
      gz10c= gz10c+rs2wg(4)*bxpi*vvq*gtm2*yc*(3./8.*o*x12
     #    *x2z*tx-1./2.*o*x12*x2zs-1./2.*o*x2z*tx+7./8.*o*x2z*txs
     #    -5./8.*o*tx*x2zs+13./8.*o*x2zs+5./8.*os*x2z*tx-7./8.*
     #    os*x2zs+1./2.*x12*x2z*tx+7./8.*x12*x2z*txs-1./4.*x12*tx
     #    *x2zs+1./2.*x12*x2zs-1./4.*x2z*tx*x12s-x2z*txs+3./8.*
     #    tx*x2zs-3./4.*x2zs)
      gz10c= gz10c+rs2wg(4)*vvq*gtm2*bxps*yc*(1./2.+5./
     #    4.*o*x12-1./4.*o*tx-5./4.*o+3./4.*os-1./4.*x12*tx-
     #    x12+1./4.*tx+1./2.*x12s)
      gz10c= gz10c+rs2wg(4)*vvq*gtm2*yc*bxp*(-1./4.-
     #    25./16.*o*x12*x2z+1./8.*o*x12*tx-7./16.*o*x12-7./16.*o*
     #    x2z*tx+45./16.*o*x2z-5./16.*o*tx-3./16.*o*x12s+o*txs
     #    +5./8.*o-1./8.*os*x12-25./16.*os*x2z+11./16.*os*tx-
     #    7./16.*os+1./16.*oc-3./16.*x12*x2z*tx+3./2.*x12*x2z+
     #    11./16.*x12*tx+x12*txs+1./2.*x12-1./16.*x2z*tx-1./4.*
     #    x2z*x12s-5./4.*x2z-9./16.*tx*x12s-1./8.*tx-1./4.*x12s
     #    -3./4.*txs)
      gz10c= gz10c+rs2wg(4)*vvq*gtm2*yc*(-5./8.*o*x12*
     #    x2z*tx+15./16.*o*x12*x2z-1./8.*o*x12*tx+1./2.*o*x12*
     #    x2zs+1./8.*o*x12*txs+15./16.*o*x2z*tx-17./16.*o*x2z*txs
     #    -7./4.*o*x2z+1./16.*o*tx*x12s+13./16.*o*tx*x2zs+1./4.
     #    *o*tx-33./16.*o*x2zs-5./8.*o*txs-1./16.*os*x12*x2z+1./
     #    8.*os*x12*tx-7./8.*os*x2z*tx+17./16.*os*x2z-3./8.*os*tx
     #    +17./16.*os*x2zs+1./16.*os*txs-1./16.*oc*x2z+1./16.*
     #    oc*tx-11./16.*x12*x2z*tx-17./16.*x12*x2z*txs-x12*x2z+
     #    1./4.*x12*tx*x2zs-1./4.*x12*tx-1./2.*x12*x2zs-5./8.*x12
     #    *txs+1./4.*x2z*tx*x12s+1./4.*x2z*x12s+5./4.*x2z*txs+3.
     #    /4.*x2z+1./4.*tx*x12s-7./16.*tx*x2zs+1./16.*x12s*txs+
     #    x2zs+1./2.*txs)
      gz10c= gz10c+rs2wg(7)*xx*vvq*gtm2*yc*(-1./4.*o*
     #    x12*x2z*txs+1./4.*o*x2zc-1./4.*o*x2zs*txs-1./8.*os*x2z*
     #    txs-1./8.*os*x2zc+1./4.*x12*tx*x2zs-1./4.*x12*x2zs*txs
     #    -1./8.*x2z*x12s*txs-1./8.*x2zc+1./4.*x2zs*txs)
      gz10c= gz10c+rs2wg(7)*bxpi*vvq*gtm2*yc*(-5./16.*o
     #    *x12*x2z*tx-1./4.*o*x12*x2zs-5./16.*o*x2z*txs-1./16.*o*
     #    tx*x2zs+9./16.*o*x2zs-1./16.*os*x2z*tx-5./16.*os*x2zs
     #    +1./4.*x12*x2z*tx-5./16.*x12*x2z*txs+1./4.*x12*x2zs-1.
     #    /4.*x2z*tx*x12s+1./4.*x2z*txs+1./16.*tx*x2zs-1./4.*x2zs
     #    )
      gz10c= gz10c+rs2wg(7)*vvq*gtm2*yc*bxp*(-9./32.*o*
     #    x12*x2z+1./16.*o*x12*tx-3./32.*o*x12-1./32.*o*x2z*tx+
     #    9./32.*o*x2z-3./32.*o*tx+1./32.*o*x12s-1./8.*o*txs+1./
     #    16.*o+3./16.*os*x12-5./32.*os*x2z+1./32.*os*tx-7./32.
     #    *os+5./32.*oc-1./32.*x12*x2z*tx+1./4.*x12*x2z-3./32.*
     #    x12*tx-1./8.*x12*txs+1./32.*x2z*tx-1./8.*x2z*x12s-1./
     #    8.*x2z+1./32.*tx*x12s+1./16.*tx+1./8.*txs)
      gz10c= gz10c+rs2wg(7)*vvq*gtm2*yc*(1./4.*o*x12*x2z
     #    *tx+11./32.*o*x12*x2z+1./16.*o*x12*tx+1./4.*o*x12*x2zs
     #    -1./16.*o*x12*txs+5./32.*o*x2z*tx+13./32.*o*x2z*txs-3.
     #    /8.*o*x2z-1./32.*o*tx*x12s+1./32.*o*tx*x2zs-17./32.*o*
     #    x2zs+1./16.*o*txs-5./32.*os*x12*x2z-1./16.*os*x12*tx+
     #    13./32.*os*x2z+1./16.*os*tx+9./32.*os*x2zs-1./32.*os*
     #    txs-5./32.*oc*x2z-1./32.*oc*tx-5./32.*x12*x2z*tx+13./
     #    32.*x12*x2z*txs-1./4.*x12*x2z-1./4.*x12*x2zs+1./16.*x12
     #    *txs+1./4.*x2z*tx*x12s-1./8.*x2z*tx+1./8.*x2z*x12s-3./
     #    8.*x2z*txs+1./8.*x2z-1./32.*tx*x2zs-1./32.*x12s*txs+1.
     #    /4.*x2zs)
      gz10c= gz10c+rs2wg(8)*bxpi*vvq*gtm2*yc*(-1./4.*o*
     #    x12*x2z*tx+1./4.*o*x2z*tx-1./4.*o*x2z*txs+1./4.*o*tx*
     #    x2zs-1./2.*o*x2zs-1./4.*os*x2z*tx+1./4.*os*x2zs-1./4.
     #    *x12*x2z*tx-1./4.*x12*x2z*txs+1./2.*x2z*txs-1./4.*tx*
     #    x2zs+1./4.*x2zs)
      gz10c= gz10c+rs2wg(8)*vvq*gtm2*bxps*yc*(-1./4.-
     #    3./4.*o*x12+1./4.*o*tx+3./4.*o-1./2.*os+1./4.*x12*tx
     #    +1./2.*x12-1./4.*tx-1./4.*x12s)
      gz10c= gz10c+rs2wg(8)*vvq*gtm2*yc*bxp*(1./4.+5./8.
     #    *o*x12*x2z-1./2.*o*x12*tx+3./8.*o*x12+3./8.*o*x2z*tx-
     #    11./8.*o*x2z+3./8.*o*tx+1./8.*o*x12s-3./4.*o*txs-1./2.
     #    *o+1./4.*os*x12+7./8.*os*x2z-5./8.*os*tx+1./8.*os+1.
     #    /8.*oc+1./8.*x12*x2z*tx-1./2.*x12*x2z-1./8.*x12*tx-3./
     #    4.*x12*txs-1./2.*x12+1./8.*x2z*tx+1./2.*x2z+1./8.*tx*
     #    x12s+1./4.*x12s+1./2.*txs)
      gz10c= gz10c+rs2wg(8)*vvq*gtm2*yc*(1./4.*o*x12*x2z
     #    *tx-3./8.*o*x12*x2z+1./4.*o*x12*txs-5./8.*o*x2z*tx+3./
     #    8.*o*x2z*txs+o*x2z+1./8.*o*tx*x12s-3./8.*o*tx*x2zs-1./
     #    4.*o*tx+5./8.*o*x2zs+1./2.*o*txs-1./8.*os*x12*x2z+1./
     #    4.*os*x12*tx+1./4.*os*x2z*tx-3./8.*os*x2z+1./4.*os*tx
     #    -3./8.*os*x2zs+1./8.*os*txs-1./8.*oc*x2z+1./8.*oc*tx
     #    -1./8.*x12*x2z*tx+3./8.*x12*x2z*txs+1./2.*x12*x2z+1./
     #    4.*x12*tx+1./2.*x12*txs+1./4.*x2z*tx-1./2.*x2z*txs-1./
     #    2.*x2z-1./4.*tx*x12s+1./8.*tx*x2zs+1./8.*x12s*txs-1./
     #    4.*x2zs-1./2.*txs)
      gz10c= gz10c+rs2wg(9)*bxpi*vvq*gtm2*yc*(1./2.*o*x2z
     #    *tx+1./2.*o*txs+1./2.*x12*txs-1./2.*x2z*tx)
      gz10c= gz10c+rs2wg(9)*vvq*gtm2*yc*bxp*(3./2.*o*tx
     #    +1./2.*x12*tx-1./2.*tx)
      gz10c= gz10c+rs2wg(9)*vvq*gtm2*yc*(-1./2.*o*x12*
     #    tx-o*x2z*tx-1./2.*o*tx-1./2.*o*txs-1./2.*os*tx-1./2.
     #    *x12*tx-1./2.*x12*txs+1./2.*x2z*tx+1./2.*tx)
      gz10c= gz10c+rs2wg(10)*xx*vvq*gtm2*yc*(1./4.*o*x12
     #    *x2z*txs-1./4.*o*x2zc+1./4.*o*x2zs*txs+1./8.*os*x2z*txs
     #    +1./8.*os*x2zc-1./4.*x12*tx*x2zs+1./4.*x12*x2zs*txs+1.
     #    /8.*x2z*x12s*txs+1./8.*x2zc-1./4.*x2zs*txs)
      gz10c= gz10c+rs2wg(10)*bxpi*vvq*gtm2*yc*(5./16.*o*
     #    x12*x2z*tx+1./4.*o*x12*x2zs+1./4.*o*x12*txs+9./16.*o*
     #    x2z*txs+1./16.*o*tx*x2zs-13./16.*o*x2zs+1./16.*os*x2z*
     #    tx+7./16.*os*x2zs+1./8.*os*txs-1./2.*x12*x2z*tx+9./16.
     #    *x12*x2z*txs-1./4.*x12*x2zs+1./4.*x2z*tx*x12s-1./2.*x2z
     #    *txs-1./16.*tx*x2zs+1./8.*x12s*txs+3./8.*x2zs)
      gz10c= gz10c+rs2wg(10)*vvq*gtm2*bxps*yc*(-1./8.
     #    -3./8.*o*x12-1./8.*o*tx+3./8.*o-1./4.*os-1./8.*x12*
     #    tx+1./4.*x12+1./8.*tx-1./8.*x12s)
      gz10c= gz10c+rs2wg(10)*vvq*gtm2*yc*bxp*(1./8.+19./
     #    32.*o*x12*x2z+7./16.*o*x12*tx+9./32.*o*x12+7./32.*o*x2z
     #    *tx-31./32.*o*x2z+1./32.*o*tx+1./32.*o*x12s+1./2.*o*
     #    txs-5./16.*o-1./16.*os*x12+19./32.*os*x2z+5./32.*os*
     #    tx+9./32.*os-3./32.*oc+3./32.*x12*x2z*tx-1./2.*x12*
     #    x2z-7./32.*x12*tx+1./2.*x12*txs-1./4.*x12-7./32.*x2z*
     #    tx+1./8.*x2z*x12s+3./8.*x2z+9./32.*tx*x12s-1./16.*tx
     #    +1./8.*x12s-3./8.*txs)
      gz10c= gz10c+rs2wg(10)*vvq*gtm2*yc*(-3./8.*o*x12
     #    *x2z*tx-17./32.*o*x12*x2z-5./16.*o*x12*tx-1./4.*o*x12*
     #    x2zs-5./16.*o*x12*txs-3./32.*o*x2z*tx-23./32.*o*x2z*txs
     #    +7./8.*o*x2z-1./32.*o*tx*x12s-3./32.*o*tx*x2zs+27./32.
     #    *o*x2zs-5./16.*o*txs+3./32.*os*x12*x2z-1./16.*os*x12*tx
     #    -1./8.*os*x2z*tx-19./32.*os*x2z-1./16.*os*tx-15./32.*
     #    os*x2zs-5./32.*os*txs+3./32.*oc*x2z-1./32.*oc*tx+15./
     #    32.*x12*x2z*tx-23./32.*x12*x2z*txs+1./2.*x12*x2z+1./4.*
     #    x12*tx+1./4.*x12*x2zs-5./16.*x12*txs-1./4.*x2z*tx*x12s
     #    +1./8.*x2z*tx-1./8.*x2z*x12s+5./8.*x2z*txs-3./8.*x2z
     #    -1./4.*tx*x12s+3./32.*tx*x2zs-5./32.*x12s*txs-3./8.*
     #    x2zs+1./4.*txs)
      gz10c= gz10c+rs2wg(11)*vvq*gtm2*bxps*yc*(-1./2.
     #    +1./2.*o+1./2.*x12)
      gz10c= gz10c+rs2wg(11)*vvq*gtm2*yc*bxp*(-5./8.*o*
     #    x12-3./4.*o*x2z+1./8.*o*tx-1./8.*o+1./8.*os-1./4.*
     #    x12*x2z-7./8.*x12*tx+1./4.*x12-1./2.*x2z*tx+3./4.*x2z
     #    +3./8.*tx-1./4.*x12s+1./2.*txs)
      gz10c= gz10c+rs2wg(11)*vvq*gtm2*yc*(1./4.*o*x12*
     #    x2z+3./8.*o*x12*tx-1./8.*o*x2z*tx+1./8.*o*x2z+1./4.*o
     #    *x2zs-1./8.*o*txs-1./8.*os*x2z+1./8.*os*tx+3./4.*x12*
     #    x2z*tx-1./4.*x12*x2z-1./8.*x12*txs-3./8.*x2z*tx-1./2.
     #    *x2z*txs+1./4.*tx*x12s+1./2.*tx*x2zs-1./4.*x2zs)
      gz10c= gz10c+rs2wg(12)*xx*vvq*gtm2*yc*(-1./2.*o*
     #    x2z*txs+1./2.*o*tx*x2zs-1./2.*x12*x2z*txs+x2z*txs-1./
     #    2.*tx*x2zs)
      gz10c= gz10c+rs2wg(12)*bxpi*vvq*gtm2*yc*(3./4.*o*
     #    x2z*tx-5./4.*o*txs+1./2.*x12*x2z*tx-5./4.*x12*txs-1./
     #    4.*x2z*tx+txs)
      gz10c= gz10c+rs2wg(12)*vvq*gtm2*yc*bxp*(1./2.+7./
     #    8.*o*x12+1./4.*o*x2z-5./8.*o*tx-9./8.*o+5./8.*os+1./
     #    4.*x12*x2z-5./8.*x12*tx-3./4.*x12-1./4.*x2z+5./8.*tx
     #    +1./4.*x12s)
      gz10c= gz10c+rs2wg(12)*vvq*gtm2*yc*(-1./4.*o*x12
     #    *x2z+3./8.*o*x12*tx-3./8.*o*x2z*tx+5./8.*o*x2z+1./4.*
     #    o*tx-1./4.*o*x2zs+9./8.*o*txs-1./8.*os*x2z+1./8.*os*
     #    tx-1./4.*x12*x2z*tx+1./4.*x12*x2z+1./4.*x12*tx+9./8.*
     #    x12*txs-1./8.*x2z*tx-1./2.*x2z+1./4.*tx*x12s-1./4.*tx
     #    +1./4.*x2zs-txs)
      gz10c= gz10c+rs2wg(13)*xx*vvq*gtm2*yc*(-1./2.*o*
     #    x2z*txs-1./2.*x12*x2z*txs+1./2.*x2z*txs)
      gz10c= gz10c+rs2wg(13)*bxpi*vvq*gtm2*yc*(-1./8.*o
     #    *x2z*tx-5./8.*o*txs-5./8.*x12*txs+1./8.*x2z*tx+1./2.*
     #    txs)
      gz10c= gz10c+rs2wg(13)*vvq*gtm2*yc*bxp*(-5./16.*o
     #    *x12-1./8.*o*x2z-3./16.*o*tx+3./16.*o-3./16.*os-1./
     #    8.*x12*x2z-3./16.*x12*tx+1./8.*x12+1./8.*x2z+3./16.*
     #    tx-1./8.*x12s)
      gz10c= gz10c+rs2wg(13)*vvq*gtm2*yc*(1./8.*o*x12*
     #    x2z+9./16.*o*x12*tx+5./16.*o*x2z*tx+1./16.*o*x2z-1./8.
     #    *o*tx+1./8.*o*x2zs+7./16.*o*txs-1./16.*os*x2z+3./16.*
     #    os*tx+3./8.*x12*x2z*tx-1./8.*x12*x2z-1./8.*x12*tx+7./
     #    16.*x12*txs-3./16.*x2z*tx+3./8.*tx*x12s-1./8.*tx-1./8.
     #    *x2zs-1./2.*txs)
      gz10c= gz10c+rs2wg(14)*xx*vvq*gtm2*yc*(1./4.*o*x2z
     #    *txs+1./4.*o*tx*x2zs+1./4.*x12*x2z*txs-1./4.*tx*x2zs)
      gz10c= gz10c+rs2wg(14)*bxpi*vvq*gtm2*yc*(3./4.*o*
     #    x2z*tx+1./4.*o*txs+1./4.*x12*x2z*tx+1./4.*x12*txs-1./
     #    2.*x2z*tx)
      gz10c= gz10c+rs2wg(14)*vvq*gtm2*yc*bxp*(3./16.*o*
     #    x12+1./8.*o*x2z+3./16.*o*tx+3./16.*o-3./16.*os+1./8.
     #    *x12*x2z-1./16.*x12*tx-1./8.*x12-1./4.*x2z*tx-1./8.*
     #    x2z+1./16.*tx+1./8.*x12s+1./4.*txs)
      gz10c= gz10c+rs2wg(14)*vvq*gtm2*yc*(-1./8.*o*x12
     #    *x2z-3./16.*o*x12*tx-9./16.*o*x2z*tx-3./16.*o*x2z-1./
     #    2.*o*tx-1./8.*o*x2zs-3./16.*o*txs+3./16.*os*x2z-1./16.
     #    *os*tx-1./8.*x12*x2z*tx+1./8.*x12*x2z-1./4.*x12*tx-3./
     #    16.*x12*txs+3./16.*x2z*tx-1./4.*x2z*txs-1./8.*tx*x12s
     #    +1./4.*tx*x2zs+1./4.*tx+1./8.*x2zs)
      gz10c= gz10c+rt1wg(1)*xx*vvc*gsm2*ys*csti*(8*
     #    zi*o*x12*txs-8*zi*o*txs+4*zi*os*txs-8*zi*x12*txs+4*zi
     #    *x12s*txs+4*zi*txs+4*o*txs+4*x12*txs-4*txs)
      gz10c= gz10c+rt1wg(1)*bxpi*vvc*gsm2*ys*csti*(2
     #    *zi*o*x12*tx-4*zi*o*tx-6*zi*o*txs+2*zi*os*tx-2*zi*x12
     #    *tx-6*zi*x12*txs+2*zi*tx+4*zi*txs+2*o*tx-2*tx)
      gz10c= gz10c+rt1wg(1)*vvc*gsm2*bxps*ys*csti*(1.
     #    /8.+zi*o+zi*x12-zi-1./8.*o-1./8.*x12)
      gz10c= gz10c+rt1wg(1)*vvc*gsm2*bxps*ys*(-1./4.+
     #    1./4.*o+1./4.*x12)
      gz10c= gz10c+rt1wg(1)*vvc*gsm2*ys*bxp*csti*(
     #    -9./8.+2*zi*o*x12-2*zi*o*tx-4*zi*o+2*zi*os-4*zi*
     #    x12*tx-2*zi*x12+3*zi*tx+2*zi*txs+2*zi-1./8.*o*x12
     #    +1./8.*o*x2z+3./2.*o-3./8.*os+1./4.*x12*tx+1./8.*
     #    x12-1./8.*x2z+15./8.*tx)
      gz10c= gz10c+rt1wg(1)*vvc*gsm2*ys*bxp*(1./4.+1./4.
     #    *o*x12-1./4.*o*x2z-o+3./4.*os-1./2.*x12*tx-1./4.*
     #    x12+1./4.*x2z+1./4.*tx)
      gz10c= gz10c+rt1wg(1)*vvc*gsm2*ys*csti*(1-2
     #    *zi*o*x12*tx-2*zi*o*x12+7*zi*o*tx+7*zi*o*txs+3*zi*o
     #    +zi*os*x12-2*zi*os*tx-3*zi*os+zi*oc+6*zi*x12*tx+7
     #    *zi*x12*txs+zi*x12-5*zi*tx-6*zi*txs-zi+1./8.*o*x12*
     #    tx+1./8.*o*x2z*tx-1./4.*o*x2z-25./8.*o*tx-1./8.*o*txs
     #    -2*o+1./8.*os*x2z+1./8.*os*tx+os-17./8.*x12*tx-1./
     #    8.*x12*txs-15./8.*x2z*tx+1./8.*x2z+3*tx+2*txs)
      gz10c= gz10c+rt1wg(1)*vvc*gsm2*ys*(-1./4.*o*x12*
     #    tx-1./4.*o*x2z*tx+1./2.*o*x2z+1./4.*o*tx+1./4.*o*txs
     #    -1./4.*os*x2z-1./4.*os*tx+1./4.*x12*tx+1./4.*x12*txs
     #    -1./4.*x2z*tx-1./4.*x2z)
      gz10c= gz10c+rt1wg(4)*xx*vvc*gsm2*ys*csti*(1./
     #    2.+1./2.*zi*o*oq+5*zi*o*x12*tx-4*zi*o*x12*txs-6*zi*o*
     #    x12-7./2.*zi*o*tx*x12s+zi*o*tx*x12c-5./2.*zi*o*tx+3./
     #    2.*zi*o*x12s*txs+9./2.*zi*o*x12s-zi*o*x12c+5./2.*zi*o*
     #    txs+5./2.*zi*o-7*zi*os*x12*tx+3./2.*zi*os*x12*txs+9*
     #    zi*os*x12+3*zi*os*tx*x12s+9./2.*zi*os*tx-9./2.*zi*os*
     #    x12s+1./2.*zi*os*x12c-2*zi*os*txs-5*zi*os+3*zi*oc*x12
     #    *tx-6*zi*oc*x12-7./2.*zi*oc*tx+3./2.*zi*oc*x12s+1./2.
     #    *zi*oc*txs+5*zi*oc+3./2.*zi*oq*x12+zi*oq*tx-5./2.*zi*
     #    oq-zi*x12*tx+5./2.*zi*x12*txs+3./2.*zi*x12+1./2.*zi*
     #    tx*x12s+1./2.*zi*tx-2*zi*x12s*txs-3./2.*zi*x12s+1./2.
     #    *zi*x12c*txs+1./2.*zi*x12c-zi*txs-1./2.*zi-o*x12*x2z*
     #    tx+o*x12*x2z-5./2.*o*x12*tx+o*x12*txs+3*o*x12+3./2.
     #    *o*x2z*tx-1./2.*o*x2z*txs-3./2.*o*x2z+o*tx*x12s+1./2.
     #    *o*tx*x2zs+2*o*tx-o*x12s-o*x2zs-3./2.*o*txs-2*o-1.
     #    /2.*os*x12*x2z)
      gz10c= gz10c+rt1wg(4)*xx*vvc*gsm2*ys*csti*(2*
     #    os*x12*tx-3*os*x12-os*x2z*tx+3./2.*os*x2z-5./2.*os*tx
     #    +1./2.*os*x12s+1./2.*os*x2zs+1./2.*os*txs+3*os+oc*
     #    x12-1./2.*oc*x2z+oc*tx-2*oc+1./2.*oq-1./2.*x12*x2z*
     #    txs-1./2.*x12*x2z+1./2.*x12*tx-3./2.*x12*txs-x12-1./
     #    2.*x2z*tx+x2z*txs+1./2.*x2z-1./2.*tx*x2zs-1./2.*tx+
     #    1./2.*x12s*txs+1./2.*x12s+1./2.*x2zs+txs)
      gz10c= gz10c+rt1wg(4)*bxpi*vvc*gsm2*ys*csti*(3.
     #    /2.+11./2.*zi*o*x12*tx-3*zi*o*x12*txs-12*zi*o*x12-2*
     #    zi*o*tx*x12s-4*zi*o*tx+7*zi*o*x12s-zi*o*x12c+7./2.*zi
     #    *o*txs+6*zi*o-4*zi*os*x12*tx+12*zi*os*x12+5*zi*os*tx
     #    -7./2.*zi*os*x12s-3./2.*zi*os*txs-9*zi*os-4*zi*oc*x12
     #    -2*zi*oc*tx+6*zi*oc-3./2.*zi*oq-3./2.*zi*x12*tx+7./
     #    2.*zi*x12*txs+4*zi*x12+1./2.*zi*tx*x12s+zi*tx-3./2.*
     #    zi*x12s*txs-7./2.*zi*x12s+zi*x12c-2*zi*txs-3./2.*zi
     #    +o*x12*x2z-2*o*x12*tx+5*o*x12+o*x2z*tx-3*o*x2z+3*
     #    o*tx-o*x12s-3./2.*o*txs-9./2.*o-5./2.*os*x12+3./2.*
     #    os*x2z-2*os*tx+9./2.*os-3./2.*oc+1./2.*x12*x2z*tx-
     #    x12*x2z+1./2.*x12*tx-3./2.*x12*txs-5./2.*x12-x2z*tx
     #    +3./2.*x2z-tx+x12s+2*txs)
      gz10c= gz10c+rt1wg(4)*vvc*gsm2*bxps*ys*csti*(
     #    -1./32.+3./2.*zi*o*x12-3./2.*zi*o+3./4.*zi*os-3./2.
     #    *zi*x12+3./4.*zi*x12s+3./4.*zi-1./16.*o*x12+1./16.*o
     #    -1./32.*os+1./16.*x12-1./32.*x12s)
      gz10c= gz10c+rt1wg(4)*vvc*gsm2*bxps*ys*(1./16.+1./
     #    8.*o*x12-1./8.*o+1./16.*os-1./8.*x12+1./16.*x12s)
      gz10c= gz10c+rt1wg(4)*vvc*gsm2*ys*bxp*csti*(2
     #    +3./2.*zi*o*x12*tx-10*zi*o*x12-9./4.*zi*o*tx+3*zi*o*
     #    x12s+3./2.*zi*o*txs+7*zi*o+9./2.*zi*os*x12+3./2.*zi*
     #    os*tx-13./2.*zi*os+2*zi*oc-3./4.*zi*x12*tx+3./2.*zi*
     #    x12*txs+11./2.*zi*x12+3./4.*zi*tx-7./2.*zi*x12s+1./2.
     #    *zi*x12c-3./2.*zi*txs-5./2.*zi+1./32.*o*x12*x2z+1./16.
     #    *o*x12*tx+79./32.*o*x12-3./32.*o*x2z+3./4.*o*tx+1./32.
     #    *o*x12s-4*o+1./32.*os*x2z+65./32.*os-1./32.*oc-1./
     #    16.*x12*x2z+11./16.*x12*tx-5./2.*x12+1./16.*x2z+1./16.
     #    *tx*x12s-3./4.*tx+1./2.*x12s)
      gz10c= gz10c+rt1wg(4)*vvc*gsm2*ys*bxp*(-1./16.*o*
     #    x12*x2z-1./8.*o*x12*tx+1./16.*o*x12+3./16.*o*x2z-1./
     #    16.*o*x12s-1./16.*os*x2z-1./16.*os+1./16.*oc+1./8.*
     #    x12*x2z+1./8.*x12*tx-1./8.*x2z-1./8.*tx*x12s)
      gz10c= gz10c+rt1wg(4)*vvc*gsm2*ys*csti*(-13.
     #    /4.-31./4.*zi*o*x12*tx+7./2.*zi*o*x12*txs+41./2.*zi*o*
     #    x12+5./2.*zi*o*tx*x12s+13./2.*zi*o*tx-10*zi*o*x12s+zi
     #    *o*x12c-21./4.*zi*o*txs-23./2.*zi*o+5*zi*os*x12*tx-17
     #    *zi*os*x12-29./4.*zi*os*tx+15./4.*zi*os*x12s+7./4.*zi*
     #    os*txs+15*zi*os+9./2.*zi*oc*x12+5./2.*zi*oc*tx-17./2.
     #    *zi*oc+7./4.*zi*oq+9./4.*zi*x12*tx-21./4.*zi*x12*txs-
     #    8*zi*x12-1./2.*zi*tx*x12s-7./4.*zi*tx+7./4.*zi*x12s*txs
     #    +25./4.*zi*x12s-3./2.*zi*x12c+7./2.*zi*txs+13./4.*zi
     #    +1./32.*o*x12*x2z*tx-31./32.*o*x12*x2z+5./2.*o*x12*tx
     #    -1./16.*o*x12*txs-15./2.*o*x12-5./4.*o*x2z*tx+7./2.*o
     #    *x2z-1./32.*o*tx*x12s-17./4.*o*tx+o*x12s+1./32.*o*
     #    x2zs+7./4.*o*txs+33./4.*o+1./32.*os*x12*x2z-1./16.*os
     #    *x12*tx+11./4.*os*x12+1./32.*os*x2z*tx-57./32.*os*x2z
     #    +5./2.*os*tx-1./32.*os*txs-27./4.*os+1./32.*oc*x2z-
     #    1./32.*oc*tx)
      gz10c= gz10c+rt1wg(4)*vvc*gsm2*ys*csti*(7./4.
     #    *oc-7./16.*x12*x2z*tx+x12*x2z-x12*tx+7./4.*x12*txs+
     #    19./4.*x12+5./4.*x2z*tx-7./4.*x2z+7./4.*tx-1./32.*
     #    x12s*txs-3./2.*x12s-1./32.*x2zs-5./2.*txs)
      gz10c= gz10c+rt1wg(4)*vvc*gsm2*ys*(-1./16.*o*x12
     #    *x2z*tx-1./16.*o*x12*x2z+1./8.*o*x12*txs+1./16.*o*tx*
     #    x12s-1./16.*o*x2zs-1./16.*os*x12*x2z+1./8.*os*x12*tx-
     #    1./16.*os*x2z*tx+1./16.*os*x2z+1./16.*os*txs-1./16.*oc*
     #    x2z+1./16.*oc*tx-1./8.*x12*x2z*tx+1./16.*x12s*txs+1./
     #    16.*x2zs)
      gz10c= gz10c+rt1wg(7)*xx*vvc*gsm2*ys*csti*(1./
     #    4.+1./4.*zi*o*oq-zi*o*x12*tx+5./2.*zi*o*x12*txs-3*zi*
     #    o*x12+zi*o*tx*x12s-3./4.*zi*o*x12s*txs+9./4.*zi*o*x12s
     #    -1./2.*zi*o*x12c-3./2.*zi*o*txs+5./4.*zi*o+1./2.*zi*
     #    os*x12*tx-3./4.*zi*os*x12*txs+9./2.*zi*os*x12-9./4.*zi*
     #    os*x12s+1./4.*zi*os*x12c+5./4.*zi*os*txs-5./2.*zi*os-
     #    3*zi*oc*x12+3./4.*zi*oc*x12s-1./4.*zi*oc*txs+5./2.*zi*
     #    oc+3./4.*zi*oq*x12-5./4.*zi*oq+1./2.*zi*x12*tx-3./2.*
     #    zi*x12*txs+3./4.*zi*x12-zi*tx*x12s+1./2.*zi*tx*x12c+5.
     #    /4.*zi*x12s*txs-3./4.*zi*x12s-1./4.*zi*x12c*txs+1./4.*
     #    zi*x12c+1./2.*zi*txs-1./4.*zi+1./2.*o*x12*x2z+1./2.*o
     #    *x12*tx-1./2.*o*x12*txs+3./2.*o*x12+1./2.*o*x2z*txs-3.
     #    /4.*o*x2z-1./2.*o*x12s-1./2.*o*x2zs+o*txs-o-1./4.*
     #    os*x12*x2z-3./2.*os*x12+3./4.*os*x2z+1./4.*os*x12s+1./
     #    4.*os*x2zs-1./4.*os*txs+3./2.*os+1./2.*oc*x12-1./4.*
     #    oc*x2z)
      gz10c= gz10c+rt1wg(7)*xx*vvc*gsm2*ys*csti*(
     #    -oc+1./4.*oq-1./2.*x12*x2z*tx+1./2.*x12*x2z*txs-1./
     #    4.*x12*x2z-1./2.*x12*tx+x12*txs-1./2.*x12-1./2.*x2z*
     #    txs+1./4.*x2z+1./2.*tx*x12s-1./4.*x12s*txs+1./4.*x12s
     #    +1./4.*x2zs-1./2.*txs)
      gz10c= gz10c+rt1wg(7)*bxpi*vvc*gsm2*ys*csti*(1.
     #    /2.-zi*o*x12*tx+zi*o*x12*txs-9./2.*zi*o*x12+zi*o*tx*
     #    x12s+3*zi*o*x12s-1./2.*zi*o*x12c-zi*o*txs+2*zi*o+1./
     #    2.*zi*os*x12*tx+9./2.*zi*os*x12-3./2.*zi*os*x12s+1./2.*
     #    zi*os*txs-3*zi*os-3./2.*zi*oc*x12+2*zi*oc-1./2.*zi*oq
     #    +1./2.*zi*x12*tx-zi*x12*txs+3./2.*zi*x12-zi*tx*x12s
     #    +1./2.*zi*tx*x12c+1./2.*zi*x12s*txs-3./2.*zi*x12s+1./
     #    2.*zi*x12c+1./2.*zi*txs-1./2.*zi+1./2.*o*x12*x2z+1./2.
     #    *o*x12*tx+2*o*x12-o*x2z-1./2.*o*x12s+1./2.*o*txs-3./
     #    2.*o-os*x12+1./2.*os*x2z+3./2.*os-1./2.*oc-1./2.*
     #    x12*x2z-1./2.*x12*tx+1./2.*x12*txs-x12+1./2.*x2z+1./
     #    2.*tx*x12s+1./2.*x12s-1./2.*txs)
      gz10c= gz10c+rt1wg(7)*vvc*gsm2*bxps*ys*csti*(1.
     #    /64.+1./4.*zi*o*x12-1./4.*zi*o+1./8.*zi*os-1./4.*zi*
     #    x12+1./8.*zi*x12s+1./8.*zi+1./32.*o*x12-1./32.*o+1./
     #    64.*os-1./32.*x12+1./64.*x12s)
      gz10c= gz10c+rt1wg(7)*vvc*gsm2*bxps*ys*(-1./32.
     #    -1./16.*o*x12+1./16.*o-1./32.*os+1./16.*x12-1./32.*
     #    x12s)
      gz10c= gz10c+rt1wg(7)*vvc*gsm2*ys*bxp*csti*(1./
     #    2.-1./4.*zi*o*x12*tx-5./2.*zi*o*x12+zi*o*x12s-1./4.*
     #    zi*o*txs+3./2.*zi*o+5./4.*zi*os*x12-3./2.*zi*os+1./2.
     #    *zi*oc+1./4.*zi*x12*tx-1./4.*zi*x12*txs+5./4.*zi*x12-
     #    1./4.*zi*tx*x12s-zi*x12s+1./4.*zi*x12c+1./4.*zi*txs-1.
     #    /2.*zi-1./32.*o*x12*x2z-1./32.*o*x12*tx+41./64.*o*x12
     #    +1./16.*o*x2z-7./64.*o*tx-57./64.*o-1./32.*os*x12-1.
     #    /32.*os*x2z+27./64.*os-1./32.*oc+1./32.*x12*x2z-5./64.
     #    *x12*tx-3./4.*x12-1./32.*x2z-1./32.*tx*x12s+7./64.*tx
     #    +1./4.*x12s)
      gz10c= gz10c+rt1wg(7)*vvc*gsm2*ys*bxp*(1./16.*o*x12
     #    *x2z+1./16.*o*x12*tx-1./32.*o*x12-1./8.*o*x2z-1./32.*
     #    o*tx+1./32.*o+1./16.*os*x12+1./16.*os*x2z-3./32.*os
     #    +1./16.*oc-1./16.*x12*x2z-3./32.*x12*tx+1./16.*x2z+
     #    1./16.*tx*x12s+1./32.*tx)
      gz10c= gz10c+rt1wg(7)*vvc*gsm2*ys*csti*(-7./
     #    8.+5./4.*zi*o*x12*tx-5./4.*zi*o*x12*txs+27./4.*zi*o*x12
     #    -zi*o*tx*x12s-4*zi*o*x12s+1./2.*zi*o*x12c+3./2.*zi*o*
     #    txs-13./4.*zi*o-1./2.*zi*os*x12*tx-6*zi*os*x12+13./8.
     #    *zi*os*x12s-5./8.*zi*os*txs+9./2.*zi*os+7./4.*zi*oc*x12
     #    -11./4.*zi*oc+5./8.*zi*oq-3./4.*zi*x12*tx+3./2.*zi*
     #    x12*txs-5./2.*zi*x12+5./4.*zi*tx*x12s-1./2.*zi*tx*x12c
     #    -5./8.*zi*x12s*txs+19./8.*zi*x12s-3./4.*zi*x12c-3./4.
     #    *zi*txs+7./8.*zi-1./2.*o*x12*x2z-25./64.*o*x12*tx+1./
     #    32.*o*x12*txs-11./4.*o*x12+7./64.*o*x2z*tx+73./64.*o*
     #    x2z+1./2.*o*x12s-1./32.*o*x2zs-41./64.*o*txs+19./8.*o
     #    +1./32.*os*x12*x2z+9./8.*os*x12-35./64.*os*x2z+7./64.
     #    *os*tx+1./64.*os*x2zs+1./64.*os*txs-17./8.*os+1./32.*
     #    oc*x2z+5./8.*oc-1./32.*x12*x2z*tx+1./2.*x12*x2z+3./4.
     #    *x12*tx-41./64.*x12*txs+13./8.*x12-7./64.*x2z*tx-5./8.
     #    *x2z)
      gz10c= gz10c+rt1wg(7)*vvc*gsm2*ys*csti*(-1./
     #    2.*tx*x12s+1./64.*x12s*txs-3./4.*x12s+1./64.*x2zs+3./
     #    4.*txs)
      gz10c= gz10c+rt1wg(7)*vvc*gsm2*ys*(1./32.*o*x12*tx
     #    -1./16.*o*x12*txs+1./32.*o*x2z*tx-1./32.*o*x2z+1./16.
     #    *o*x2zs+1./32.*o*txs-1./16.*os*x12*x2z+3./32.*os*x2z+
     #    1./32.*os*tx-1./32.*os*x2zs-1./32.*os*txs-1./16.*oc*x2z
     #    +1./16.*x12*x2z*tx+1./32.*x12*txs-1./32.*x2z*tx-1./32.
     #    *x12s*txs-1./32.*x2zs)
      gz10c= gz10c+rt1wg(8)*bxpi*vvc*gsm2*ys*csti*(
     #    -1./2.-5./2.*zi*o*x12*tx+zi*o*x12*txs+3*zi*o*x12+zi
     #    *o*tx*x12s+2*zi*o*tx-zi*o*x12s-3./2.*zi*o*txs-2*zi*o
     #    +2*zi*os*x12*tx-3*zi*os*x12-5./2.*zi*os*tx+1./2.*zi*
     #    os*x12s+1./2.*zi*os*txs+3*zi*os+zi*oc*x12+zi*oc*tx-
     #    2*zi*oc+1./2.*zi*oq+1./2.*zi*x12*tx-3./2.*zi*x12*txs-
     #    zi*x12-1./2.*zi*tx+1./2.*zi*x12s*txs+1./2.*zi*x12s+zi
     #    *txs+1./2.*zi+o*x12*tx-o*x12-1./2.*o*x2z*tx+o*x2z
     #    -3./2.*o*tx+1./2.*o*txs+3./2.*o+1./2.*os*x12-1./2.*
     #    os*x2z+os*tx-3./2.*os+1./2.*oc+1./2.*x12*txs+1./2.*
     #    x12+1./2.*x2z*tx-1./2.*x2z+1./2.*tx-txs)
      gz10c= gz10c+rt1wg(8)*vvc*gsm2*bxps*ys*csti*(
     #    -zi*o*x12+zi*o-1./2.*zi*os+zi*x12-1./2.*zi*x12s-1.
     #    /2.*zi)
      gz10c= gz10c+rt1wg(8)*vvc*gsm2*ys*bxp*csti*(
     #    -1-zi*o*x12*tx+5*zi*o*x12+3./2.*zi*o*tx-zi*o*x12s
     #    -zi*o*txs-4*zi*o-2*zi*os*x12-zi*os*tx+7./2.*zi*os
     #    -zi*oc+1./2.*zi*x12*tx-zi*x12*txs-3*zi*x12-1./2.*zi
     #    *tx+3./2.*zi*x12s+zi*txs+3./2.*zi-39./32.*o*x12-9./
     #    32.*o*tx+71./32.*o-39./32.*os-9./32.*x12*tx+x12+9./
     #    32.*tx)
      gz10c= gz10c+rt1wg(8)*vvc*gsm2*ys*bxp*(-1./16.*o*
     #    x12+1./16.*o*tx+1./16.*o-1./16.*os+1./16.*x12*tx-1./
     #    16.*tx)
      gz10c= gz10c+rt1wg(8)*vvc*gsm2*ys*csti*(3./2.
     #    +7./2.*zi*o*x12*tx-zi*o*x12*txs-7*zi*o*x12-zi*o*tx*
     #    x12s-7./2.*zi*o*tx+2*zi*o*x12s+5./2.*zi*o*txs+5*zi*o
     #    -2*zi*os*x12*tx+5*zi*os*x12+7./2.*zi*os*tx-1./2.*zi*
     #    os*x12s-1./2.*zi*os*txs-6*zi*os-zi*oc*x12-zi*oc*tx+
     #    3*zi*oc-1./2.*zi*oq-zi*x12*tx+5./2.*zi*x12*txs+3*zi*
     #    x12+zi*tx-1./2.*zi*x12s*txs-3./2.*zi*x12s-2*zi*txs-
     #    3./2.*zi-39./32.*o*x12*tx+2*o*x12+23./32.*o*x2z*tx-39.
     #    /32.*o*x2z+2*o*tx-23./32.*o*txs-7./2.*o-1./2.*os*x12
     #    +23./32.*os*x2z-39./32.*os*tx+5./2.*os-1./2.*oc+1./
     #    2.*x12*tx-23./32.*x12*txs-3./2.*x12-9./32.*x2z*tx+1./
     #    2.*x2z-tx+txs)
      gz10c= gz10c+rt1wg(8)*vvc*gsm2*ys*(-1./16.*o*x12
     #    *tx+1./16.*o*x2z*tx-1./16.*o*x2z-1./16.*o*txs+1./16.*
     #    os*x2z-1./16.*os*tx-1./16.*x12*txs+1./16.*x2z*tx)
      gz10c= gz10c+rt1wg(9)*bxpi*vvc*gsm2*ys*csti*(
     #    -zi*o*x12*tx+2*zi*o*tx+zi*o*txs-zi*os*tx+zi*x12*tx
     #    +zi*x12*txs-zi*tx-o*tx+tx)
      gz10c= gz10c+rt1wg(9)*vvc*gsm2*ys*bxp*csti*(zi
     #    *o*tx+zi*x12*tx-zi*tx)
      gz10c= gz10c+rt1wg(9)*vvc*gsm2*ys*csti*(zi*o*
     #    x12*tx-3*zi*o*tx-zi*o*txs+zi*os*tx-2*zi*x12*tx-zi*
     #    x12*txs+2*zi*tx+15./8.*o*tx-tx)
      gz10c= gz10c+rt1wg(9)*vvc*gsm2*ys*(1./4.*o*tx)
      gz10c= gz10c+rt1wg(10)*xx*vvc*gsm2*ys*csti*(
     #    -1./4.-1./4.*zi*o*oq+zi*o*x12*tx-5./2.*zi*o*x12*txs
     #    +3*zi*o*x12-zi*o*tx*x12s+3./4.*zi*o*x12s*txs-9./4.*zi
     #    *o*x12s+1./2.*zi*o*x12c+3./2.*zi*o*txs-5./4.*zi*o-1./
     #    2.*zi*os*x12*tx+3./4.*zi*os*x12*txs-9./2.*zi*os*x12+9./
     #    4.*zi*os*x12s-1./4.*zi*os*x12c-5./4.*zi*os*txs+5./2.*zi
     #    *os+3*zi*oc*x12-3./4.*zi*oc*x12s+1./4.*zi*oc*txs-5./2.
     #    *zi*oc-3./4.*zi*oq*x12+5./4.*zi*oq-1./2.*zi*x12*tx+3./
     #    2.*zi*x12*txs-3./4.*zi*x12+zi*tx*x12s-1./2.*zi*tx*x12c
     #    -5./4.*zi*x12s*txs+3./4.*zi*x12s+1./4.*zi*x12c*txs-1./
     #    4.*zi*x12c-1./2.*zi*txs+1./4.*zi-1./2.*o*x12*x2z-1./2.
     #    *o*x12*tx+1./2.*o*x12*txs-3./2.*o*x12-1./2.*o*x2z*txs
     #    +3./4.*o*x2z+1./2.*o*x12s+1./2.*o*x2zs-o*txs+o+1./
     #    4.*os*x12*x2z+3./2.*os*x12-3./4.*os*x2z-1./4.*os*x12s
     #    -1./4.*os*x2zs+1./4.*os*txs-3./2.*os-1./2.*oc*x12+1.
     #    /4.*oc*x2z)
      gz10c= gz10c+rt1wg(10)*xx*vvc*gsm2*ys*csti*(
     #    oc-1./4.*oq+1./2.*x12*x2z*tx-1./2.*x12*x2z*txs+1./4.*
     #    x12*x2z+1./2.*x12*tx-x12*txs+1./2.*x12+1./2.*x2z*txs
     #    -1./4.*x2z-1./2.*tx*x12s+1./4.*x12s*txs-1./4.*x12s-
     #    1./4.*x2zs+1./2.*txs)
      gz10c= gz10c+rt1wg(10)*bxpi*vvc*gsm2*ys*csti*(
     #    -3./4.+3./2.*zi*o*x12*tx-3./2.*zi*o*x12*txs+6*zi*o*
     #    x12-zi*o*tx*x12s-7./2.*zi*o*x12s+1./2.*zi*o*x12c+2*zi
     #    *o*txs-3*zi*o-1./2.*zi*os*x12*tx-6*zi*os*x12+7./4.*zi
     #    *os*x12s-3./4.*zi*os*txs+9./2.*zi*os+2*zi*oc*x12-3*zi
     #    *oc+3./4.*zi*oq-zi*x12*tx+2*zi*x12*txs-2*zi*x12+3./
     #    2.*zi*tx*x12s-1./2.*zi*tx*x12c-3./4.*zi*x12s*txs+7./4.*
     #    zi*x12s-1./2.*zi*x12c-zi*txs+3./4.*zi-1./2.*o*x12*x2z
     #    -1./2.*o*x12*tx-5./2.*o*x12+3./2.*o*x2z+1./2.*o*x12s
     #    -o*txs+9./4.*o+5./4.*os*x12-3./4.*os*x2z-9./4.*os
     #    +3./4.*oc+1./2.*x12*x2z+x12*tx-x12*txs+5./4.*x12-
     #    3./4.*x2z-1./2.*tx*x12s-1./2.*x12s+txs)
      gz10c= gz10c+rt1wg(10)*vvc*gsm2*bxps*ys*csti*(
     #    -1./64.-3./4.*zi*o*x12+3./4.*zi*o-3./8.*zi*os+3./4.
     #    *zi*x12-3./8.*zi*x12s-3./8.*zi-1./32.*o*x12+1./32.*o
     #    -1./64.*os+1./32.*x12-1./64.*x12s)
      gz10c= gz10c+rt1wg(10)*vvc*gsm2*bxps*ys*(1./32.+1.
     #    /16.*o*x12-1./16.*o+1./32.*os-1./16.*x12+1./32.*x12s
     #    )
      gz10c= gz10c+rt1wg(10)*vvc*gsm2*ys*bxp*csti*(
     #    -1+3./4.*zi*o*x12*tx+5*zi*o*x12-3./2.*zi*o*x12s+3./
     #    4.*zi*o*txs-7./2.*zi*o-9./4.*zi*os*x12+13./4.*zi*os-
     #    zi*oc-3./4.*zi*x12*tx+3./4.*zi*x12*txs-11./4.*zi*x12+
     #    3./4.*zi*tx*x12s+7./4.*zi*x12s-1./4.*zi*x12c-3./4.*zi*
     #    txs+5./4.*zi+1./32.*o*x12*x2z+1./32.*o*x12*tx-5./4.*o
     #    *x12-1./16.*o*x2z+2*o+1./32.*os*x12+1./32.*os*x2z-
     #    33./32.*os+1./32.*oc-1./32.*x12*x2z-1./32.*x12*tx+5./
     #    4.*x12+1./32.*x2z+1./32.*tx*x12s-1./4.*x12s)
      gz10c= gz10c+rt1wg(10)*vvc*gsm2*ys*bxp*(-1./16.*o
     #    *x12*x2z-1./16.*o*x12*tx+1./8.*o*x2z-1./16.*os*x12-1./
     #    16.*os*x2z+1./16.*os-1./16.*oc+1./16.*x12*x2z+1./16.*
     #    x12*tx-1./16.*x2z-1./16.*tx*x12s)
      gz10c= gz10c+rt1wg(10)*vvc*gsm2*ys*csti*(13./
     #    8.-9./4.*zi*o*x12*tx+7./4.*zi*o*x12*txs-41./4.*zi*o*x12
     #    +zi*o*tx*x12s+5*zi*o*x12s-1./2.*zi*o*x12c-3*zi*o*txs
     #    +23./4.*zi*o+1./2.*zi*os*x12*tx+17./2.*zi*os*x12-15./
     #    8.*zi*os*x12s+7./8.*zi*os*txs-15./2.*zi*os-9./4.*zi*oc*
     #    x12+17./4.*zi*oc-7./8.*zi*oq+7./4.*zi*x12*tx-3*zi*x12
     #    *txs+4*zi*x12-9./4.*zi*tx*x12s+1./2.*zi*tx*x12c+7./8.
     #    *zi*x12s*txs-25./8.*zi*x12s+3./4.*zi*x12c+7./4.*zi*txs
     #    -13./8.*zi+1./2.*o*x12*x2z+1./2.*o*x12*tx-1./32.*o*
     #    x12*txs+15./4.*o*x12-7./4.*o*x2z-1./2.*o*x12s+1./32.*
     #    o*x2zs+5./4.*o*txs-33./8.*o-1./32.*os*x12*x2z-11./8.*
     #    os*x12+29./32.*os*x2z-1./64.*os*x2zs-1./64.*os*txs+27.
     #    /8.*os-1./32.*oc*x2z-7./8.*oc+1./32.*x12*x2z*tx-1./2.
     #    *x12*x2z-5./4.*x12*tx+5./4.*x12*txs-19./8.*x12+7./8.*
     #    x2z+1./2.*tx*x12s-1./64.*x12s*txs+3./4.*x12s-1./64.*
     #    x2zs)
      gz10c= gz10c+rt1wg(10)*vvc*gsm2*ys*csti*(-5.
     #    /4.*txs)
      gz10c= gz10c+rt1wg(10)*vvc*gsm2*ys*(1./16.*o*x12*
     #    txs-1./16.*o*x2zs+1./16.*os*x12*x2z-1./16.*os*x2z+1./
     #    32.*os*x2zs+1./32.*os*txs+1./16.*oc*x2z-1./16.*x12*x2z*
     #    tx+1./32.*x12s*txs+1./32.*x2zs)
      gz10c= gz10c+rt1wg(11)*vvc*gsm2*bxps*ys*csti*(
     #    1./16.+1./2.*zi*o+1./2.*zi*x12-1./2.*zi-1./16.*o-1./
     #    16.*x12)
      gz10c= gz10c+rt1wg(11)*vvc*gsm2*bxps*ys*(-1./8.
     #    +1./8.*o+1./8.*x12)
      gz10c= gz10c+rt1wg(11)*vvc*gsm2*ys*bxp*csti*(
     #    -1+zi*o*x12+zi*o*tx-2*zi*o+zi*os-zi*x12-1./2.*
     #    zi*tx+zi*txs+zi+1./16.*o*x12+1./16.*o*x2z+17./16.*o
     #    -1./16.*os+1./8.*x12*tx+1./2.*x12-1./16.*x2z+15./16.
     #    *tx)
      gz10c= gz10c+rt1wg(11)*vvc*gsm2*ys*bxp*(-1./8.*o*
     #    x12-1./8.*o*x2z-1./8.*o+1./8.*os-1./4.*x12*tx+1./8.
     #    *x2z+1./8.*tx)
      gz10c= gz10c+rt1wg(11)*vvc*gsm2*ys*csti*(1./2.
     #    +zi*o*x12*tx-zi*o*x12-3./2.*zi*o*tx+1./2.*zi*o*txs+
     #    3./2.*zi*o+1./2.*zi*os*x12+zi*os*tx-3./2.*zi*os+1./2.
     #    *zi*oc+1./2.*zi*x12*txs+1./2.*zi*x12+1./2.*zi*tx-zi*
     #    txs-1./2.*zi-1./16.*o*x12*tx+1./16.*o*x2z*tx-9./16.*o
     #    *x2z+o*tx-1./16.*o*txs-o+1./16.*os*x2z-1./16.*os*tx
     #    +1./2.*os-1./2.*x12*tx-1./16.*x12*txs-15./16.*x2z*tx
     #    +1./2.*x2z-1./2.*tx+txs)
      gz10c= gz10c+rt1wg(11)*vvc*gsm2*ys*(1./8.*o*x12*tx
     #    -1./8.*o*x2z*tx+1./8.*o*x2z+1./8.*o*txs-1./8.*os*x2z
     #    +1./8.*os*tx+1./8.*x12*txs-1./8.*x2z*tx)
      gz10c= gz10c+rt1wg(12)*xx*vvc*gsm2*ys*csti*(
     #    -4*zi*o*x12*tx+2*zi*o*x12*txs+zi*o*tx*x12s+3*zi*o*tx
     #    -3*zi*o*txs+2*zi*os*x12*tx-3*zi*os*tx+zi*os*txs+zi*
     #    oc*tx+2*zi*x12*tx-3*zi*x12*txs-zi*tx*x12s-zi*tx+zi*
     #    x12s*txs+2*zi*txs+o*x12*tx-o*x2z*tx-2*o*tx+o*txs+
     #    os*tx-x12*tx+x12*txs+x2z*tx+tx-2*txs)
      gz10c= gz10c+rt1wg(12)*bxpi*vvc*gsm2*ys*csti*(
     #    -2*zi*o*x12*tx+2*zi*o*tx-2*zi*o*txs-zi*os*tx+2*zi*
     #    x12*tx-2*zi*x12*txs-zi*tx*x12s-zi*tx+2*zi*txs-o*tx
     #    -x12*tx+tx)
      gz10c= gz10c+rt1wg(12)*vvc*gsm2*ys*bxp*csti*(7.
     #    /16.-1./2.*zi*o*tx-1./2.*zi*x12*tx+1./2.*zi*tx-1./16.
     #    *o*x12-3./8.*o-1./16.*os-7./16.*x12)
      gz10c= gz10c+rt1wg(12)*vvc*gsm2*ys*bxp*(1./8.+1./
     #    8.*o*x12-1./4.*o+1./8.*os-1./8.*x12)
      gz10c= gz10c+rt1wg(12)*vvc*gsm2*ys*csti*(3./2.
     #    *zi*o*x12*tx-zi*o*tx+3./2.*zi*o*txs+1./2.*zi*os*tx-3./
     #    2.*zi*x12*tx+3./2.*zi*x12*txs+zi*tx*x12s+1./2.*zi*tx-
     #    2*zi*txs+1./16.*o*x12*tx+1./2.*o*x2z-1./16.*o*tx-1./
     #    16.*os*x2z+1./16.*os*tx+7./16.*x12*tx-7./16.*x2z-1./2.
     #    *tx)
      gz10c= gz10c+rt1wg(12)*vvc*gsm2*ys*(-1./8.*o*x12
     #    *tx+1./8.*o*tx+1./8.*os*x2z-1./8.*os*tx+1./8.*x12*tx
     #    -1./8.*x2z)
      gz10c= gz10c+rt1wg(13)*xx*vvc*gsm2*ys*csti*(2
     #    *zi*o*x12*txs-2*zi*o*txs+zi*os*txs-2*zi*x12*txs+zi*
     #    x12s*txs+zi*txs+o*txs+x12*txs-txs)
      gz10c= gz10c+rt1wg(13)*bxpi*vvc*gsm2*ys*csti*(
     #    -zi*o*txs-zi*x12*txs+zi*txs)
      gz10c= gz10c+rt1wg(13)*vvc*gsm2*ys*bxp*csti*(
     #    -9./32.+9./32.*o+9./32.*x12)
      gz10c= gz10c+rt1wg(13)*vvc*gsm2*ys*bxp*(1./16.-1./
     #    16.*o-1./16.*x12)
      gz10c= gz10c+rt1wg(13)*vvc*gsm2*ys*csti*(1./2.
     #    *zi*o*txs+1./2.*zi*x12*txs-zi*txs-11./32.*o*x2z-7./32.
     #    *o*tx+1./16.*os*x2z-25./32.*x12*tx+9./32.*x2z)
      gz10c= gz10c+rt1wg(13)*vvc*gsm2*ys*(3./16.*o*x2z
     #    -1./16.*o*tx-1./8.*os*x2z+1./16.*x12*tx-1./16.*x2z)
      gz10c= gz10c+rt1wg(14)*xx*vvc*gsm2*ys*csti*(
     #    -2*zi*o*x12*tx-zi*o*x12*txs+1./2.*zi*o*tx*x12s+3./2.*
     #    zi*o*tx+1./2.*zi*o*txs+zi*os*x12*tx-3./2.*zi*os*tx-1./
     #    2.*zi*os*txs+1./2.*zi*oc*tx+zi*x12*tx+1./2.*zi*x12*txs
     #    -1./2.*zi*tx*x12s-1./2.*zi*tx-1./2.*zi*x12s*txs+1./2.
     #    *o*x12*tx-1./2.*o*x2z*tx-o*tx-1./2.*o*txs+1./2.*os*tx
     #    -1./2.*x12*tx-1./2.*x12*txs+1./2.*x2z*tx+1./2.*tx)
      gz10c= gz10c+rt1wg(14)*bxpi*vvc*gsm2*ys*csti*(
     #    -3./2.*zi*o*x12*tx+2*zi*o*tx+1./2.*zi*o*txs-zi*os*tx
     #    +3./2.*zi*x12*tx+1./2.*zi*x12*txs-1./2.*zi*tx*x12s-zi
     #    *tx-o*tx-1./2.*x12*tx+tx)
      gz10c= gz10c+rt1wg(14)*vvc*gsm2*bxps*ys*csti*(
     #    1./32.-1./4.*zi*o-1./4.*zi*x12+1./4.*zi-1./32.*o-1./
     #    32.*x12)
      gz10c= gz10c+rt1wg(14)*vvc*gsm2*bxps*ys*(-1./16.
     #    +1./16.*o+1./16.*x12)
      gz10c= gz10c+rt1wg(14)*vvc*gsm2*ys*bxp*csti*(1.
     #    /2.-1./2.*zi*o*x12+1./4.*zi*o*tx+zi*o-1./2.*zi*os+3.
     #    /4.*zi*x12*tx+1./2.*zi*x12-1./2.*zi*tx+1./2.*zi*txs-1.
     #    /2.*zi+1./32.*o*x2z-9./16.*o+1./16.*os+1./16.*x12*tx
     #    -1./4.*x12-1./32.*x2z+15./32.*tx)
      gz10c= gz10c+rt1wg(14)*vvc*gsm2*ys*bxp*(-1./16.*o
     #    *x2z+1./8.*o-1./8.*os-1./8.*x12*tx+1./16.*x2z+1./16.
     #    *tx)
      gz10c= gz10c+rt1wg(14)*vvc*gsm2*ys*csti*(-1.
     #    /4.+5./4.*zi*o*x12*tx+1./2.*zi*o*x12-9./4.*zi*o*tx-3./
     #    4.*zi*o-1./4.*zi*os*x12+3./4.*zi*os*tx+3./4.*zi*os-1./
     #    4.*zi*oc-9./4.*zi*x12*tx-1./4.*zi*x12+1./2.*zi*tx*x12s
     #    +3./2.*zi*tx-1./2.*zi*txs+1./4.*zi+1./32.*o*x2z*tx+
     #    5./16.*o*x2z+3./4.*o*tx-1./32.*o*txs+1./2.*o-1./16.*
     #    os*x2z-1./4.*os+3./4.*x12*tx-1./32.*x12*txs-15./32.*
     #    x2z*tx-1./4.*x2z-tx+1./2.*txs)
      gz10c= gz10c+rt1wg(14)*vvc*gsm2*ys*(-1./16.*o*
     #    x2z*tx-1./8.*o*x2z+1./16.*o*txs+1./8.*os*x2z+1./16.*
     #    x12*txs-1./16.*x2z*tx)
      gz10c= gz10c+rs1wz(1)*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)
      gz10c= gz10c+rs1wz(1)*bxpi*vvc*gtm2*ys*(-2*o*tx
     #    -2./3.*o+4./3.*os-2./3.*x12*tx+2./3.*tx)
      gz10c= gz10c+rs1wz(1)*vvc*gtm2*ys*bxp*(1./3.-1./3.
     #    *o-1./3.*x12)
      gz10c= gz10c+rs1wz(1)*vvc*gtm2*ys*(1./3.*o*x2z+7.
     #    /3.*o*tx+o-4./3.*os+x12*tx+1./3.*x12-1./3.*x2z-2./
     #    3.*tx)
      gz10c= gz10c+rs1wz(4)*xx*vvc*gtm2*ys*(1./6.*o*x2z*
     #    txs-1./6.*o*tx*x2zs+1./3.*o*x2zs+1./6.*x12*x2z*txs-1./
     #    6.*tx*x2zs)
      gz10c= gz10c+rs1wz(4)*bxpi*vvc*gtm2*ys*(-1./6.*o*
     #    x12*x2z+2./3.*o*x2z+1./6.*o*txs-1./6.*os*x2z+1./6.*
     #    x12*x2z*tx+1./6.*x12*txs-1./3.*x2z*tx)
      gz10c= gz10c+rs1wz(4)*vvc*gtm2*ys*bxp*(-1./4.*o*
     #    x12+1./4.*o*tx+5./12.*o-1./6.*os+1./4.*x12*tx+1./6.
     #    *x12-1./4.*tx-1./12.*x12s)
      gz10c= gz10c+rs1wz(4)*vvc*gtm2*ys*(1./12.*o*x12*
     #    x2z+1./12.*o*x12*tx+1./6.*o*x12+1./12.*o*x2z*tx-3./4.
     #    *o*x2z-1./6.*o*tx-1./4.*o*txs-1./3.*o+1./6.*os*x2z+
     #    1./6.*os-1./6.*x12*x2z*tx-1./6.*x12*x2z-1./6.*x12*tx-
     #    1./4.*x12*txs+5./12.*x2z*tx+1./12.*tx*x12s+1./6.*tx)
      gz10c= gz10c+rs1wz(7)*xx*vvc*gtm2*ys*(-1./12.*o*
     #    x2z*txs-1./12.*o*tx*x2zs-1./12.*x12*x2z*txs+1./12.*tx*
     #    x2zs)
      gz10c= gz10c+rs1wz(7)*bxpi*vvc*gtm2*ys*(-1./12.*o
     #    *x12*x2z-1./12.*o*x2z*tx-1./12.*os*x2z-1./12.*x12*x2z*
     #    tx+1./12.*x2z*tx)
      gz10c= gz10c+rs1wz(7)*vvc*gtm2*ys*bxp*(-1./24.*os
     #    -1./12.*x12+1./24.*x12s)
      gz10c= gz10c+rs1wz(7)*vvc*gtm2*ys*(1./12.*o*x12*
     #    x2z-1./12.*o*x12*tx+1./12.*o*x2z*tx+1./24.*o*x12s+1./
     #    12.*os*x12+1./12.*os*x2z-1./24.*os*tx+1./24.*oc+1./12.
     #    *x12*x2z*tx+1./12.*x12*x2z-1./12.*x2z*tx-1./24.*tx*x12s
     #    )
      gz10c= gz10c+rs1wz(8)*bxpi*vvc*gtm2*ys*(1./6.*o*x2z
     #    *tx-1./3.*o*x2z-1./6.*o*txs-1./6.*x12*txs+1./6.*x2z*
     #    tx)
      gz10c= gz10c+rs1wz(8)*vvc*gtm2*ys*bxp*(1./4.*o*x12
     #    -1./4.*o*tx-5./12.*o+1./4.*os-1./4.*x12*tx+1./4.*tx
     #    )
      gz10c= gz10c+rs1wz(8)*vvc*gtm2*ys*(1./12.*o*x12*tx
     #    -1./6.*o*x12-1./4.*o*x2z*tx+5./12.*o*x2z+1./6.*o*tx
     #    +1./4.*o*txs+1./3.*o-1./12.*os*x2z+1./12.*os*tx-1./
     #    6.*os+1./6.*x12*tx+1./4.*x12*txs-1./4.*x2z*tx-1./6.*
     #    tx)
      gz10c= gz10c+rs1wz(9)*bxpi*vvc*gtm2*ys*(2./3.*o*tx
     #    -2./3.*os)
      gz10c= gz10c+rs1wz(9)*vvc*gtm2*ys*(-o*tx+2./3.
     #    *os)
      gz10c= gz10c+rs1wz(10)*xx*vvc*gtm2*ys*(1./12.*o*
     #    x2z*txs+1./12.*o*tx*x2zs+1./12.*x12*x2z*txs-1./12.*tx*
     #    x2zs)
      gz10c= gz10c+rs1wz(10)*bxpi*vvc*gtm2*ys*(1./12.*o*
     #    x12*x2z+1./6.*o*x2z*tx+1./12.*o*txs+1./12.*os*x2z+1./
     #    12.*x12*x2z*tx+1./12.*x12*txs-1./6.*x2z*tx)
      gz10c= gz10c+rs1wz(10)*vvc*gtm2*ys*bxp*(1./8.*o*x12
     #    +1./8.*o*tx-1./24.*o+1./6.*os+1./8.*x12*tx+1./12.*
     #    x12-1./8.*tx-1./24.*x12s)
      gz10c= gz10c+rs1wz(10)*vvc*gtm2*ys*(-1./12.*o*
     #    x12*x2z+1./24.*o*x12*tx-1./12.*o*x12-5./24.*o*x2z*tx+
     #    1./24.*o*x2z-1./12.*o*tx-1./24.*o*x12s-1./8.*o*txs-1./
     #    12.*os*x12-1./8.*os*x2z-1./12.*os-1./24.*oc-1./12.*
     #    x12*x2z*tx-1./12.*x12*x2z-1./12.*x12*tx-1./8.*x12*txs
     #    +5./24.*x2z*tx+1./24.*tx*x12s+1./12.*tx)
      gz10c= gz10c+rs1wz(11)*vvc*gtm2*ys*bxp*(1./6.-1./
     #    6.*o-1./6.*x12)
      gz10c= gz10c+rs1wz(11)*vvc*gtm2*ys*(1./6.*o*x12+
     #    1./6.*o*x2z-1./6.*o*tx+1./6.*os+1./6.*x12*tx-1./6.*
     #    x2z)
      gz10c= gz10c+rs1wz(12)*xx*vvc*gtm2*ys*(1./3.*o*x12
     #    *tx+1./3.*o*x2z*tx-1./3.*o*x2z-1./3.*o*txs-1./3.*os*
     #    x12-1./3.*os*x2z+1./3.*os*tx-1./3.*oc-1./3.*x12*txs
     #    +1./3.*x2z*tx)
      gz10c= gz10c+rs1wz(12)*bxpi*vvc*gtm2*ys*(-1./3.*o
     #    *tx-1./3.*o-1./3.*x12*tx+1./3.*tx)
      gz10c= gz10c+rs1wz(12)*vvc*gtm2*ys*(1./3.*o*tx+1.
     #    /2.*o+1./3.*x12*tx+1./6.*x12-1./3.*tx)
      gz10c= gz10c+rs1wz(13)*xx*vvc*gtm2*ys*(1./6.*o*x12
     #    *tx-1./6.*o*x2z*tx-1./6.*o*x2z-1./6.*o*txs-1./6.*os*
     #    x12+1./6.*os*x2z+1./6.*os*tx-1./6.*oc-1./6.*x12*txs
     #    +1./6.*x2z*tx)
      gz10c= gz10c+rs1wz(13)*bxpi*vvc*gtm2*ys*(-1./6.*o
     #    *tx-1./6.*o-1./6.*x12*tx+1./6.*tx)
      gz10c= gz10c+rs1wz(13)*vvc*gtm2*ys*(1./4.*o*x12+
     #    1./6.*o*tx-1./12.*o+1./4.*os+1./6.*x12*tx+1./12.*x12
     #    -1./6.*tx)
      gz10c= gz10c+rs1wz(14)*xx*vvc*gtm2*ys*(1./3.*o*x2z
     #    *tx-1./3.*os*x2z)
      gz10c= gz10c+rs1wz(14)*bxpi*vvc*gtm2*ys*(1./3.*o*tx
     #    -1./3.*os)
      gz10c= gz10c+rs1wz(14)*vvc*gtm2*ys*bxp*(1./12.-1./
     #    12.*o-1./12.*x12)
      gz10c= gz10c+rs1wz(14)*vvc*gtm2*ys*(-1./6.*o*x12
     #    +1./12.*o*x2z-1./4.*o*tx+1./6.*os+1./12.*x12*tx-1./
     #    12.*x2z)
      gz10c= gz10c+rs2wz(1)*xx*vvq*gtm2*yc*(-2*o*x2z*
     #    txs-2*x12*x2z*txs+2*x2z*txs)
      gz10c= gz10c+rs2wz(1)*bxpi*vvq*gtm2*yc*(-3./2.*o*
     #    x2z*tx-7./2.*o*txs-7./2.*x12*txs+3./2.*x2z*tx+2*txs)
      gz10c= gz10c+rs2wz(1)*vvq*gtm2*bxps*yc*(-1+o+
     #    x12)
      gz10c= gz10c+rs2wz(1)*vvq*gtm2*yc*bxp*(1+o*x12-
     #    o*x2z-9./2.*o*tx-3*o+2*os-9./2.*x12*tx-x12-x2z*tx
     #    +x2z+7./2.*tx+txs)
      gz10c= gz10c+rs2wz(1)*vvq*gtm2*yc*(3./2.*o*x12*tx
     #    +3*o*x2z*tx+2*o*x2z+5./2.*o*tx+7./2.*o*txs-os*x2z
     #    +1./2.*os*tx+2*x12*x2z*tx+3./2.*x12*tx+7./2.*x12*txs
     #    -7./2.*x2z*tx-x2z*txs-x2z+tx*x12s+tx*x2zs-3./2.*
     #    tx-2*txs)
      gz10c= gz10c+rs2wz(4)*xx*vvq*gtm2*yc*(1./4.*o*x12*
     #    tx*x2zs-1./4.*o*tx*x2zc-1./4.*o*tx*x2zs+1./2.*o*x2zc+
     #    1./4.*o*x2zs*txs+1./4.*os*tx*x2zs-1./4.*os*x2zc+1./4.*
     #    x12*tx*x2zs+1./4.*x12*x2zs*txs+1./4.*tx*x2zc-1./4.*x2zc
     #    -1./2.*x2zs*txs)
      gz10c= gz10c+rs2wz(4)*bxpi*vvq*gtm2*yc*(3./8.*o*x12
     #    *x2z*tx-1./2.*o*x12*x2zs-1./2.*o*x2z*tx+7./8.*o*x2z*txs
     #    -5./8.*o*tx*x2zs+13./8.*o*x2zs+5./8.*os*x2z*tx-7./8.*
     #    os*x2zs+1./2.*x12*x2z*tx+7./8.*x12*x2z*txs-1./4.*x12*tx
     #    *x2zs+1./2.*x12*x2zs-1./4.*x2z*tx*x12s-x2z*txs+3./8.*
     #    tx*x2zs-3./4.*x2zs)
      gz10c= gz10c+rs2wz(4)*vvq*gtm2*bxps*yc*(1./2.+5./
     #    4.*o*x12-1./4.*o*tx-5./4.*o+3./4.*os-1./4.*x12*tx-
     #    x12+1./4.*tx+1./2.*x12s)
      gz10c= gz10c+rs2wz(4)*vvq*gtm2*yc*bxp*(-1./4.-
     #    25./16.*o*x12*x2z+1./8.*o*x12*tx-7./16.*o*x12-7./16.*o*
     #    x2z*tx+45./16.*o*x2z-5./16.*o*tx-3./16.*o*x12s+o*txs
     #    +5./8.*o-1./8.*os*x12-25./16.*os*x2z+11./16.*os*tx-
     #    7./16.*os+1./16.*oc-3./16.*x12*x2z*tx+3./2.*x12*x2z+
     #    11./16.*x12*tx+x12*txs+1./2.*x12-1./16.*x2z*tx-1./4.*
     #    x2z*x12s-5./4.*x2z-9./16.*tx*x12s-1./8.*tx-1./4.*x12s
     #    -3./4.*txs)
      gz10c= gz10c+rs2wz(4)*vvq*gtm2*yc*(-5./8.*o*x12*
     #    x2z*tx+15./16.*o*x12*x2z-1./8.*o*x12*tx+1./2.*o*x12*
     #    x2zs+1./8.*o*x12*txs+15./16.*o*x2z*tx-17./16.*o*x2z*txs
     #    -7./4.*o*x2z+1./16.*o*tx*x12s+13./16.*o*tx*x2zs+1./4.
     #    *o*tx-33./16.*o*x2zs-5./8.*o*txs-1./16.*os*x12*x2z+1./
     #    8.*os*x12*tx-7./8.*os*x2z*tx+17./16.*os*x2z-3./8.*os*tx
     #    +17./16.*os*x2zs+1./16.*os*txs-1./16.*oc*x2z+1./16.*
     #    oc*tx-11./16.*x12*x2z*tx-17./16.*x12*x2z*txs-x12*x2z+
     #    1./4.*x12*tx*x2zs-1./4.*x12*tx-1./2.*x12*x2zs-5./8.*x12
     #    *txs+1./4.*x2z*tx*x12s+1./4.*x2z*x12s+5./4.*x2z*txs+3.
     #    /4.*x2z+1./4.*tx*x12s-7./16.*tx*x2zs+1./16.*x12s*txs+
     #    x2zs+1./2.*txs)
      gz10c= gz10c+rs2wz(7)*xx*vvq*gtm2*yc*(-1./4.*o*
     #    x12*x2z*txs+1./4.*o*x2zc-1./4.*o*x2zs*txs-1./8.*os*x2z*
     #    txs-1./8.*os*x2zc+1./4.*x12*tx*x2zs-1./4.*x12*x2zs*txs
     #    -1./8.*x2z*x12s*txs-1./8.*x2zc+1./4.*x2zs*txs)
      gz10c= gz10c+rs2wz(7)*bxpi*vvq*gtm2*yc*(-5./16.*o
     #    *x12*x2z*tx-1./4.*o*x12*x2zs-5./16.*o*x2z*txs-1./16.*o*
     #    tx*x2zs+9./16.*o*x2zs-1./16.*os*x2z*tx-5./16.*os*x2zs
     #    +1./4.*x12*x2z*tx-5./16.*x12*x2z*txs+1./4.*x12*x2zs-1.
     #    /4.*x2z*tx*x12s+1./4.*x2z*txs+1./16.*tx*x2zs-1./4.*x2zs
     #    )
      gz10c= gz10c+rs2wz(7)*vvq*gtm2*yc*bxp*(-9./32.*o*
     #    x12*x2z+1./16.*o*x12*tx-3./32.*o*x12-1./32.*o*x2z*tx+
     #    9./32.*o*x2z-3./32.*o*tx+1./32.*o*x12s-1./8.*o*txs+1./
     #    16.*o+3./16.*os*x12-5./32.*os*x2z+1./32.*os*tx-7./32.
     #    *os+5./32.*oc-1./32.*x12*x2z*tx+1./4.*x12*x2z-3./32.*
     #    x12*tx-1./8.*x12*txs+1./32.*x2z*tx-1./8.*x2z*x12s-1./
     #    8.*x2z+1./32.*tx*x12s+1./16.*tx+1./8.*txs)
      gz10c= gz10c+rs2wz(7)*vvq*gtm2*yc*(1./4.*o*x12*x2z
     #    *tx+11./32.*o*x12*x2z+1./16.*o*x12*tx+1./4.*o*x12*x2zs
     #    -1./16.*o*x12*txs+5./32.*o*x2z*tx+13./32.*o*x2z*txs-3.
     #    /8.*o*x2z-1./32.*o*tx*x12s+1./32.*o*tx*x2zs-17./32.*o*
     #    x2zs+1./16.*o*txs-5./32.*os*x12*x2z-1./16.*os*x12*tx+
     #    13./32.*os*x2z+1./16.*os*tx+9./32.*os*x2zs-1./32.*os*
     #    txs-5./32.*oc*x2z-1./32.*oc*tx-5./32.*x12*x2z*tx+13./
     #    32.*x12*x2z*txs-1./4.*x12*x2z-1./4.*x12*x2zs+1./16.*x12
     #    *txs+1./4.*x2z*tx*x12s-1./8.*x2z*tx+1./8.*x2z*x12s-3./
     #    8.*x2z*txs+1./8.*x2z-1./32.*tx*x2zs-1./32.*x12s*txs+1.
     #    /4.*x2zs)
      gz10c= gz10c+rs2wz(8)*bxpi*vvq*gtm2*yc*(-1./4.*o*
     #    x12*x2z*tx+1./4.*o*x2z*tx-1./4.*o*x2z*txs+1./4.*o*tx*
     #    x2zs-1./2.*o*x2zs-1./4.*os*x2z*tx+1./4.*os*x2zs-1./4.
     #    *x12*x2z*tx-1./4.*x12*x2z*txs+1./2.*x2z*txs-1./4.*tx*
     #    x2zs+1./4.*x2zs)
      gz10c= gz10c+rs2wz(8)*vvq*gtm2*bxps*yc*(-1./4.-
     #    3./4.*o*x12+1./4.*o*tx+3./4.*o-1./2.*os+1./4.*x12*tx
     #    +1./2.*x12-1./4.*tx-1./4.*x12s)
      gz10c= gz10c+rs2wz(8)*vvq*gtm2*yc*bxp*(1./4.+5./8.
     #    *o*x12*x2z-1./2.*o*x12*tx+3./8.*o*x12+3./8.*o*x2z*tx-
     #    11./8.*o*x2z+3./8.*o*tx+1./8.*o*x12s-3./4.*o*txs-1./2.
     #    *o+1./4.*os*x12+7./8.*os*x2z-5./8.*os*tx+1./8.*os+1.
     #    /8.*oc+1./8.*x12*x2z*tx-1./2.*x12*x2z-1./8.*x12*tx-3./
     #    4.*x12*txs-1./2.*x12+1./8.*x2z*tx+1./2.*x2z+1./8.*tx*
     #    x12s+1./4.*x12s+1./2.*txs)
      gz10c= gz10c+rs2wz(8)*vvq*gtm2*yc*(1./4.*o*x12*x2z
     #    *tx-3./8.*o*x12*x2z+1./4.*o*x12*txs-5./8.*o*x2z*tx+3./
     #    8.*o*x2z*txs+o*x2z+1./8.*o*tx*x12s-3./8.*o*tx*x2zs-1./
     #    4.*o*tx+5./8.*o*x2zs+1./2.*o*txs-1./8.*os*x12*x2z+1./
     #    4.*os*x12*tx+1./4.*os*x2z*tx-3./8.*os*x2z+1./4.*os*tx
     #    -3./8.*os*x2zs+1./8.*os*txs-1./8.*oc*x2z+1./8.*oc*tx
     #    -1./8.*x12*x2z*tx+3./8.*x12*x2z*txs+1./2.*x12*x2z+1./
     #    4.*x12*tx+1./2.*x12*txs+1./4.*x2z*tx-1./2.*x2z*txs-1./
     #    2.*x2z-1./4.*tx*x12s+1./8.*tx*x2zs+1./8.*x12s*txs-1./
     #    4.*x2zs-1./2.*txs)
      gz10c= gz10c+rs2wz(9)*bxpi*vvq*gtm2*yc*(1./2.*o*x2z
     #    *tx+1./2.*o*txs+1./2.*x12*txs-1./2.*x2z*tx)
      gz10c= gz10c+rs2wz(9)*vvq*gtm2*yc*bxp*(3./2.*o*tx
     #    +1./2.*x12*tx-1./2.*tx)
      gz10c= gz10c+rs2wz(9)*vvq*gtm2*yc*(-1./2.*o*x12*
     #    tx-o*x2z*tx-1./2.*o*tx-1./2.*o*txs-1./2.*os*tx-1./2.
     #    *x12*tx-1./2.*x12*txs+1./2.*x2z*tx+1./2.*tx)
      gz10c= gz10c+rs2wz(10)*xx*vvq*gtm2*yc*(1./4.*o*x12
     #    *x2z*txs-1./4.*o*x2zc+1./4.*o*x2zs*txs+1./8.*os*x2z*txs
     #    +1./8.*os*x2zc-1./4.*x12*tx*x2zs+1./4.*x12*x2zs*txs+1.
     #    /8.*x2z*x12s*txs+1./8.*x2zc-1./4.*x2zs*txs)
      gz10c= gz10c+rs2wz(10)*bxpi*vvq*gtm2*yc*(5./16.*o*
     #    x12*x2z*tx+1./4.*o*x12*x2zs+1./4.*o*x12*txs+9./16.*o*
     #    x2z*txs+1./16.*o*tx*x2zs-13./16.*o*x2zs+1./16.*os*x2z*
     #    tx+7./16.*os*x2zs+1./8.*os*txs-1./2.*x12*x2z*tx+9./16.
     #    *x12*x2z*txs-1./4.*x12*x2zs+1./4.*x2z*tx*x12s-1./2.*x2z
     #    *txs-1./16.*tx*x2zs+1./8.*x12s*txs+3./8.*x2zs)
      gz10c= gz10c+rs2wz(10)*vvq*gtm2*bxps*yc*(-1./8.
     #    -3./8.*o*x12-1./8.*o*tx+3./8.*o-1./4.*os-1./8.*x12*
     #    tx+1./4.*x12+1./8.*tx-1./8.*x12s)
      gz10c= gz10c+rs2wz(10)*vvq*gtm2*yc*bxp*(1./8.+19./
     #    32.*o*x12*x2z+7./16.*o*x12*tx+9./32.*o*x12+7./32.*o*x2z
     #    *tx-31./32.*o*x2z+1./32.*o*tx+1./32.*o*x12s+1./2.*o*
     #    txs-5./16.*o-1./16.*os*x12+19./32.*os*x2z+5./32.*os*
     #    tx+9./32.*os-3./32.*oc+3./32.*x12*x2z*tx-1./2.*x12*
     #    x2z-7./32.*x12*tx+1./2.*x12*txs-1./4.*x12-7./32.*x2z*
     #    tx+1./8.*x2z*x12s+3./8.*x2z+9./32.*tx*x12s-1./16.*tx
     #    +1./8.*x12s-3./8.*txs)
      gz10c= gz10c+rs2wz(10)*vvq*gtm2*yc*(-3./8.*o*x12
     #    *x2z*tx-17./32.*o*x12*x2z-5./16.*o*x12*tx-1./4.*o*x12*
     #    x2zs-5./16.*o*x12*txs-3./32.*o*x2z*tx-23./32.*o*x2z*txs
     #    +7./8.*o*x2z-1./32.*o*tx*x12s-3./32.*o*tx*x2zs+27./32.
     #    *o*x2zs-5./16.*o*txs+3./32.*os*x12*x2z-1./16.*os*x12*tx
     #    -1./8.*os*x2z*tx-19./32.*os*x2z-1./16.*os*tx-15./32.*
     #    os*x2zs-5./32.*os*txs+3./32.*oc*x2z-1./32.*oc*tx+15./
     #    32.*x12*x2z*tx-23./32.*x12*x2z*txs+1./2.*x12*x2z+1./4.*
     #    x12*tx+1./4.*x12*x2zs-5./16.*x12*txs-1./4.*x2z*tx*x12s
     #    +1./8.*x2z*tx-1./8.*x2z*x12s+5./8.*x2z*txs-3./8.*x2z
     #    -1./4.*tx*x12s+3./32.*tx*x2zs-5./32.*x12s*txs-3./8.*
     #    x2zs+1./4.*txs)
      gz10c= gz10c+rs2wz(11)*vvq*gtm2*bxps*yc*(-1./2.
     #    +1./2.*o+1./2.*x12)
      gz10c= gz10c+rs2wz(11)*vvq*gtm2*yc*bxp*(-5./8.*o*
     #    x12-3./4.*o*x2z+1./8.*o*tx-1./8.*o+1./8.*os-1./4.*
     #    x12*x2z-7./8.*x12*tx+1./4.*x12-1./2.*x2z*tx+3./4.*x2z
     #    +3./8.*tx-1./4.*x12s+1./2.*txs)
      gz10c= gz10c+rs2wz(11)*vvq*gtm2*yc*(1./4.*o*x12*
     #    x2z+3./8.*o*x12*tx-1./8.*o*x2z*tx+1./8.*o*x2z+1./4.*o
     #    *x2zs-1./8.*o*txs-1./8.*os*x2z+1./8.*os*tx+3./4.*x12*
     #    x2z*tx-1./4.*x12*x2z-1./8.*x12*txs-3./8.*x2z*tx-1./2.
     #    *x2z*txs+1./4.*tx*x12s+1./2.*tx*x2zs-1./4.*x2zs)
      gz10c= gz10c+rs2wz(12)*xx*vvq*gtm2*yc*(-1./2.*o*
     #    x2z*txs+1./2.*o*tx*x2zs-1./2.*x12*x2z*txs+x2z*txs-1./
     #    2.*tx*x2zs)
      gz10c= gz10c+rs2wz(12)*bxpi*vvq*gtm2*yc*(3./4.*o*
     #    x2z*tx-5./4.*o*txs+1./2.*x12*x2z*tx-5./4.*x12*txs-1./
     #    4.*x2z*tx+txs)
      gz10c= gz10c+rs2wz(12)*vvq*gtm2*yc*bxp*(1./2.+7./
     #    8.*o*x12+1./4.*o*x2z-5./8.*o*tx-9./8.*o+5./8.*os+1./
     #    4.*x12*x2z-5./8.*x12*tx-3./4.*x12-1./4.*x2z+5./8.*tx
     #    +1./4.*x12s)
      gz10c= gz10c+rs2wz(12)*vvq*gtm2*yc*(-1./4.*o*x12
     #    *x2z+3./8.*o*x12*tx-3./8.*o*x2z*tx+5./8.*o*x2z+1./4.*
     #    o*tx-1./4.*o*x2zs+9./8.*o*txs-1./8.*os*x2z+1./8.*os*
     #    tx-1./4.*x12*x2z*tx+1./4.*x12*x2z+1./4.*x12*tx+9./8.*
     #    x12*txs-1./8.*x2z*tx-1./2.*x2z+1./4.*tx*x12s-1./4.*tx
     #    +1./4.*x2zs-txs)
      gz10c= gz10c+rs2wz(13)*xx*vvq*gtm2*yc*(-1./2.*o*
     #    x2z*txs-1./2.*x12*x2z*txs+1./2.*x2z*txs)
      gz10c= gz10c+rs2wz(13)*bxpi*vvq*gtm2*yc*(-1./8.*o
     #    *x2z*tx-5./8.*o*txs-5./8.*x12*txs+1./8.*x2z*tx+1./2.*
     #    txs)
      gz10c= gz10c+rs2wz(13)*vvq*gtm2*yc*bxp*(-5./16.*o
     #    *x12-1./8.*o*x2z-3./16.*o*tx+3./16.*o-3./16.*os-1./
     #    8.*x12*x2z-3./16.*x12*tx+1./8.*x12+1./8.*x2z+3./16.*
     #    tx-1./8.*x12s)
      gz10c= gz10c+rs2wz(13)*vvq*gtm2*yc*(1./8.*o*x12*
     #    x2z+9./16.*o*x12*tx+5./16.*o*x2z*tx+1./16.*o*x2z-1./8.
     #    *o*tx+1./8.*o*x2zs+7./16.*o*txs-1./16.*os*x2z+3./16.*
     #    os*tx+3./8.*x12*x2z*tx-1./8.*x12*x2z-1./8.*x12*tx+7./
     #    16.*x12*txs-3./16.*x2z*tx+3./8.*tx*x12s-1./8.*tx-1./8.
     #    *x2zs-1./2.*txs)
      gz10c= gz10c+rs2wz(14)*xx*vvq*gtm2*yc*(1./4.*o*x2z
     #    *txs+1./4.*o*tx*x2zs+1./4.*x12*x2z*txs-1./4.*tx*x2zs)
      gz10c= gz10c+rs2wz(14)*bxpi*vvq*gtm2*yc*(3./4.*o*
     #    x2z*tx+1./4.*o*txs+1./4.*x12*x2z*tx+1./4.*x12*txs-1./
     #    2.*x2z*tx)
      gz10c= gz10c+rs2wz(14)*vvq*gtm2*yc*bxp*(3./16.*o*
     #    x12+1./8.*o*x2z+3./16.*o*tx+3./16.*o-3./16.*os+1./8.
     #    *x12*x2z-1./16.*x12*tx-1./8.*x12-1./4.*x2z*tx-1./8.*
     #    x2z+1./16.*tx+1./8.*x12s+1./4.*txs)
      gz10c= gz10c+rs2wz(14)*vvq*gtm2*yc*(-1./8.*o*x12
     #    *x2z-3./16.*o*x12*tx-9./16.*o*x2z*tx-3./16.*o*x2z-1./
     #    2.*o*tx-1./8.*o*x2zs-3./16.*o*txs+3./16.*os*x2z-1./16.
     #    *os*tx-1./8.*x12*x2z*tx+1./8.*x12*x2z-1./4.*x12*tx-3./
     #    16.*x12*txs+3./16.*x2z*tx-1./4.*x2z*txs-1./8.*tx*x12s
     #    +1./4.*tx*x2zs+1./4.*tx+1./8.*x2zs)
      gz10c= gz10c+rt1wz(1)*vvc*gsm2*bxps*ys*(-1./2.+
     #    1./2.*o+1./2.*x12)
      gz10c= gz10c+rt1wz(1)*vvc*gsm2*ys*bxp*(1./2.+1./2.
     #    *o*x12-1./2.*o*x2z-2*o+3./2.*os-x12*tx-1./2.*x12+
     #    1./2.*x2z+1./2.*tx)
      gz10c= gz10c+rt1wz(1)*vvc*gsm2*ys*(-1./2.*o*x12*
     #    tx-1./2.*o*x2z*tx+o*x2z+1./2.*o*tx+1./2.*o*txs-1./2.
     #    *os*x2z-1./2.*os*tx+1./2.*x12*tx+1./2.*x12*txs-1./2.*
     #    x2z*tx-1./2.*x2z)
      gz10c= gz10c+rt1wz(4)*vvc*gsm2*bxps*ys*(1./8.+1./
     #    4.*o*x12-1./4.*o+1./8.*os-1./4.*x12+1./8.*x12s)
      gz10c= gz10c+rt1wz(4)*vvc*gsm2*ys*bxp*(-1./8.*o*
     #    x12*x2z-1./4.*o*x12*tx+1./8.*o*x12+3./8.*o*x2z-1./8.*
     #    o*x12s-1./8.*os*x2z-1./8.*os+1./8.*oc+1./4.*x12*x2z
     #    +1./4.*x12*tx-1./4.*x2z-1./4.*tx*x12s)
      gz10c= gz10c+rt1wz(4)*vvc*gsm2*ys*(-1./8.*o*x12*
     #    x2z*tx-1./8.*o*x12*x2z+1./4.*o*x12*txs+1./8.*o*tx*x12s
     #    -1./8.*o*x2zs-1./8.*os*x12*x2z+1./4.*os*x12*tx-1./8.*
     #    os*x2z*tx+1./8.*os*x2z+1./8.*os*txs-1./8.*oc*x2z+1./8.
     #    *oc*tx-1./4.*x12*x2z*tx+1./8.*x12s*txs+1./8.*x2zs)
      gz10c= gz10c+rt1wz(7)*vvc*gsm2*bxps*ys*(-1./16.
     #    -1./8.*o*x12+1./8.*o-1./16.*os+1./8.*x12-1./16.*
     #    x12s)
      gz10c= gz10c+rt1wz(7)*vvc*gsm2*ys*bxp*(1./8.*o*x12*
     #    x2z+1./8.*o*x12*tx-1./16.*o*x12-1./4.*o*x2z-1./16.*o*
     #    tx+1./16.*o+1./8.*os*x12+1./8.*os*x2z-3./16.*os+1./
     #    8.*oc-1./8.*x12*x2z-3./16.*x12*tx+1./8.*x2z+1./8.*tx*
     #    x12s+1./16.*tx)
      gz10c= gz10c+rt1wz(7)*vvc*gsm2*ys*(1./16.*o*x12*tx
     #    -1./8.*o*x12*txs+1./16.*o*x2z*tx-1./16.*o*x2z+1./8.*o
     #    *x2zs+1./16.*o*txs-1./8.*os*x12*x2z+3./16.*os*x2z+1./
     #    16.*os*tx-1./16.*os*x2zs-1./16.*os*txs-1./8.*oc*x2z+1.
     #    /8.*x12*x2z*tx+1./16.*x12*txs-1./16.*x2z*tx-1./16.*x12s
     #    *txs-1./16.*x2zs)
      gz10c= gz10c+rt1wz(8)*vvc*gsm2*ys*bxp*(-1./8.*o*
     #    x12+1./8.*o*tx+1./8.*o-1./8.*os+1./8.*x12*tx-1./8.*
     #    tx)
      gz10c= gz10c+rt1wz(8)*vvc*gsm2*ys*(-1./8.*o*x12*
     #    tx+1./8.*o*x2z*tx-1./8.*o*x2z-1./8.*o*txs+1./8.*os*
     #    x2z-1./8.*os*tx-1./8.*x12*txs+1./8.*x2z*tx)
      gz10c= gz10c+rt1wz(9)*vvc*gsm2*ys*(1./2.*o*tx)
      gz10c= gz10c+rt1wz(10)*vvc*gsm2*bxps*ys*(1./16.+1.
     #    /8.*o*x12-1./8.*o+1./16.*os-1./8.*x12+1./16.*x12s)
      gz10c= gz10c+rt1wz(10)*vvc*gsm2*ys*bxp*(-1./8.*o*
     #    x12*x2z-1./8.*o*x12*tx+1./4.*o*x2z-1./8.*os*x12-1./8.
     #    *os*x2z+1./8.*os-1./8.*oc+1./8.*x12*x2z+1./8.*x12*tx
     #    -1./8.*x2z-1./8.*tx*x12s)
      gz10c= gz10c+rt1wz(10)*vvc*gsm2*ys*(1./8.*o*x12*
     #    txs-1./8.*o*x2zs+1./8.*os*x12*x2z-1./8.*os*x2z+1./16.
     #    *os*x2zs+1./16.*os*txs+1./8.*oc*x2z-1./8.*x12*x2z*tx+
     #    1./16.*x12s*txs+1./16.*x2zs)
      gz10c= gz10c+rt1wz(11)*vvc*gsm2*bxps*ys*(-1./4.
     #    +1./4.*o+1./4.*x12)
      gz10c= gz10c+rt1wz(11)*vvc*gsm2*ys*bxp*(-1./4.*o*
     #    x12-1./4.*o*x2z-1./4.*o+1./4.*os-1./2.*x12*tx+1./4.
     #    *x2z+1./4.*tx)
      gz10c= gz10c+rt1wz(11)*vvc*gsm2*ys*(1./4.*o*x12*tx
     #    -1./4.*o*x2z*tx+1./4.*o*x2z+1./4.*o*txs-1./4.*os*x2z
     #    +1./4.*os*tx+1./4.*x12*txs-1./4.*x2z*tx)
      gz10c= gz10c+rt1wz(12)*vvc*gsm2*ys*bxp*(1./4.+1./
     #    4.*o*x12-1./2.*o+1./4.*os-1./4.*x12)
      gz10c= gz10c+rt1wz(12)*vvc*gsm2*ys*(-1./4.*o*x12
     #    *tx+1./4.*o*tx+1./4.*os*x2z-1./4.*os*tx+1./4.*x12*tx
     #    -1./4.*x2z)
      gz10c= gz10c+rt1wz(13)*vvc*gsm2*ys*bxp*(1./8.-1./
     #    8.*o-1./8.*x12)
      gz10c= gz10c+rt1wz(13)*vvc*gsm2*ys*(3./8.*o*x2z-
     #    1./8.*o*tx-1./4.*os*x2z+1./8.*x12*tx-1./8.*x2z)
      gz10c= gz10c+rt1wz(14)*vvc*gsm2*bxps*ys*(-1./8.
     #    +1./8.*o+1./8.*x12)
      gz10c= gz10c+rt1wz(14)*vvc*gsm2*ys*bxp*(-1./8.*o*
     #    x2z+1./4.*o-1./4.*os-1./4.*x12*tx+1./8.*x2z+1./8.*
     #    tx)
      gz10c= gz10c+rt1wz(14)*vvc*gsm2*ys*(-1./8.*o*x2z
     #    *tx-1./4.*o*x2z+1./8.*o*txs+1./4.*os*x2z+1./8.*x12*
     #    txs-1./8.*x2z*tx)
*
      gz20c= rs1wg(1)*xx*vvc*gtm2*ys*csti*(1./4.*o*x12*tx
     #    -1./4.*o*x2z*tx-1./4.*o*x2z-1./4.*o*txs-1./4.*os*x12
     #    +1./4.*os*x2z+1./4.*os*tx-1./4.*oc-1./4.*x12*txs+1./
     #    4.*x2z*tx)
      gz20c= gz20c+rs1wg(1)*xx*vvc*gtm2*ys*(-o*x12*tx
     #    +o*x2z*tx+o*x2z+o*txs+os*x12-os*x2z-os*tx+oc+
     #    x12*txs-x2z*tx)
      gz20c= gz20c+rs1wg(1)*bxpi*vvc*gtm2*ys*csti*(
     #    -3./4.*o*tx-1./4.*o+1./2.*os-1./4.*x12*tx+1./4.*tx
     #    )
      gz20c= gz20c+rs1wg(1)*bxpi*vvc*gtm2*ys*(3*o*tx+o
     #    -2*os+x12*tx-tx)
      gz20c= gz20c+rs1wg(1)*vvc*gtm2*ys*bxp*csti*(1./
     #    24.-1./24.*o-1./24.*x12)
      gz20c= gz20c+rs1wg(1)*vvc*gtm2*ys*bxp*(-1./6.+1.
     #    /6.*o+1./6.*x12)
      gz20c= gz20c+rs1wg(1)*vvc*gtm2*ys*csti*(1./24.
     #    *o*x2z+19./24.*o*tx+7./24.*o-1./2.*os+7./24.*x12*tx
     #    +1./24.*x12-1./24.*x2z-1./4.*tx)
      gz20c= gz20c+rs1wg(1)*vvc*gtm2*ys*(-1./6.*o*x2z
     #    -19./6.*o*tx-7./6.*o+2*os-7./6.*x12*tx-1./6.*x12+
     #    1./6.*x2z+tx)
      gz20c= gz20c+rs1wg(4)*xx*vvc*gtm2*ys*csti*(1./
     #    16.*o*x2z*txs-1./16.*o*tx*x2zs+1./8.*o*x2zs+1./16.*x12*
     #    x2z*txs-1./16.*tx*x2zs)
      gz20c= gz20c+rs1wg(4)*xx*vvc*gtm2*ys*(-1./4.*o*
     #    x2z*txs+1./4.*o*tx*x2zs-1./2.*o*x2zs-1./4.*x12*x2z*txs
     #    +1./4.*tx*x2zs)
      gz20c= gz20c+rs1wg(4)*bxpi*vvc*gtm2*ys*csti*(
     #    -1./16.*o*x12*x2z+1./4.*o*x2z+1./16.*o*txs-1./16.*os*
     #    x2z+1./16.*x12*x2z*tx+1./16.*x12*txs-1./8.*x2z*tx)
      gz20c= gz20c+rs1wg(4)*bxpi*vvc*gtm2*ys*(1./4.*o*x12
     #    *x2z-o*x2z-1./4.*o*txs+1./4.*os*x2z-1./4.*x12*x2z*tx
     #    -1./4.*x12*txs+1./2.*x2z*tx)
      gz20c= gz20c+rs1wg(4)*vvc*gtm2*ys*bxp*csti*(
     #    -7./96.*o*x12+7./96.*o*tx+13./96.*o-1./16.*os+7./96.
     #    *x12*tx+1./48.*x12-7./96.*tx-1./96.*x12s)
      gz20c= gz20c+rs1wg(4)*vvc*gtm2*ys*bxp*(7./24.*o*x12
     #    -7./24.*o*tx-13./24.*o+1./4.*os-7./24.*x12*tx-1./12.
     #    *x12+7./24.*tx+1./24.*x12s)
      gz20c= gz20c+rs1wg(4)*vvc*gtm2*ys*csti*(5./96.
     #    *o*x12*x2z+1./96.*o*x12*tx+1./16.*o*x12+1./96.*o*x2z*tx
     #    -25./96.*o*x2z-1./16.*o*tx-7./96.*o*txs-1./8.*o+1./
     #    16.*os*x2z+1./16.*os-1./16.*x12*x2z*tx-1./48.*x12*x2z
     #    -1./16.*x12*tx-7./96.*x12*txs+13./96.*x2z*tx+1./96.*
     #    tx*x12s+1./16.*tx)
      gz20c= gz20c+rs1wg(4)*vvc*gtm2*ys*(-5./24.*o*x12
     #    *x2z-1./24.*o*x12*tx-1./4.*o*x12-1./24.*o*x2z*tx+25./
     #    24.*o*x2z+1./4.*o*tx+7./24.*o*txs+1./2.*o-1./4.*os*
     #    x2z-1./4.*os+1./4.*x12*x2z*tx+1./12.*x12*x2z+1./4.*
     #    x12*tx+7./24.*x12*txs-13./24.*x2z*tx-1./24.*tx*x12s-1.
     #    /4.*tx)
      gz20c= gz20c+rs1wg(7)*xx*vvc*gtm2*ys*csti*(
     #    -1./32.*o*x2z*txs-1./32.*o*tx*x2zs-1./32.*x12*x2z*txs
     #    +1./32.*tx*x2zs)
      gz20c= gz20c+rs1wg(7)*xx*vvc*gtm2*ys*(1./8.*o*x2z*
     #    txs+1./8.*o*tx*x2zs+1./8.*x12*x2z*txs-1./8.*tx*x2zs)
      gz20c= gz20c+rs1wg(7)*bxpi*vvc*gtm2*ys*csti*(
     #    -1./32.*o*x12*x2z-1./32.*o*x2z*tx-1./32.*os*x2z-1./32.
     #    *x12*x2z*tx+1./32.*x2z*tx)
      gz20c= gz20c+rs1wg(7)*bxpi*vvc*gtm2*ys*(1./8.*o*x12
     #    *x2z+1./8.*o*x2z*tx+1./8.*os*x2z+1./8.*x12*x2z*tx-1./
     #    8.*x2z*tx)
      gz20c= gz20c+rs1wg(7)*vvc*gtm2*ys*bxp*csti*(
     #    -1./192.*os-1./96.*x12+1./192.*x12s)
      gz20c= gz20c+rs1wg(7)*vvc*gtm2*ys*bxp*(1./48.*os+
     #    1./24.*x12-1./48.*x12s)
      gz20c= gz20c+rs1wg(7)*vvc*gtm2*ys*csti*(1./32.
     #    *o*x12*x2z-1./96.*o*x12*tx+1./32.*o*x2z*tx+1./192.*o*
     #    x12s+1./96.*os*x12+1./32.*os*x2z-1./192.*os*tx+1./192.
     #    *oc+1./32.*x12*x2z*tx+1./96.*x12*x2z-1./32.*x2z*tx-1./
     #    192.*tx*x12s)
      gz20c= gz20c+rs1wg(7)*vvc*gtm2*ys*(-1./8.*o*x12*
     #    x2z+1./24.*o*x12*tx-1./8.*o*x2z*tx-1./48.*o*x12s-1./
     #    24.*os*x12-1./8.*os*x2z+1./48.*os*tx-1./48.*oc-1./8.*
     #    x12*x2z*tx-1./24.*x12*x2z+1./8.*x2z*tx+1./48.*tx*x12s)
      gz20c= gz20c+rs1wg(8)*bxpi*vvc*gtm2*ys*csti*(1.
     #    /16.*o*x2z*tx-1./8.*o*x2z-1./16.*o*txs-1./16.*x12*txs
     #    +1./16.*x2z*tx)
      gz20c= gz20c+rs1wg(8)*bxpi*vvc*gtm2*ys*(-1./4.*o*
     #    x2z*tx+1./2.*o*x2z+1./4.*o*txs+1./4.*x12*txs-1./4.*
     #    x2z*tx)
      gz20c= gz20c+rs1wg(8)*vvc*gtm2*ys*bxp*csti*(7./
     #    96.*o*x12-7./96.*o*tx-13./96.*o+7./96.*os-7./96.*x12*
     #    tx+7./96.*tx)
      gz20c= gz20c+rs1wg(8)*vvc*gtm2*ys*bxp*(-7./24.*o*
     #    x12+7./24.*o*tx+13./24.*o-7./24.*os+7./24.*x12*tx-7.
     #    /24.*tx)
      gz20c= gz20c+rs1wg(8)*vvc*gtm2*ys*csti*(1./96.
     #    *o*x12*tx-1./16.*o*x12-7./96.*o*x2z*tx+13./96.*o*x2z+
     #    1./16.*o*tx+7./96.*o*txs+1./8.*o-1./96.*os*x2z+1./96.
     #    *os*tx-1./16.*os+1./16.*x12*tx+7./96.*x12*txs-7./96.*
     #    x2z*tx-1./16.*tx)
      gz20c= gz20c+rs1wg(8)*vvc*gtm2*ys*(-1./24.*o*x12
     #    *tx+1./4.*o*x12+7./24.*o*x2z*tx-13./24.*o*x2z-1./4.*o
     #    *tx-7./24.*o*txs-1./2.*o+1./24.*os*x2z-1./24.*os*tx
     #    +1./4.*os-1./4.*x12*tx-7./24.*x12*txs+7./24.*x2z*tx
     #    +1./4.*tx)
      gz20c= gz20c+rs1wg(9)*bxpi*vvc*gtm2*ys*csti*(1.
     #    /4.*o*tx-1./4.*os)
      gz20c= gz20c+rs1wg(9)*bxpi*vvc*gtm2*ys*(-o*tx+
     #    os)
      gz20c= gz20c+rs1wg(9)*vvc*gtm2*ys*csti*(-7./
     #    24.*o*tx+1./4.*os)
      gz20c= gz20c+rs1wg(9)*vvc*gtm2*ys*(7./6.*o*tx-os
     #    )
      gz20c= gz20c+rs1wg(10)*xx*vvc*gtm2*ys*csti*(1.
     #    /32.*o*x2z*txs+1./32.*o*tx*x2zs+1./32.*x12*x2z*txs-1./
     #    32.*tx*x2zs)
      gz20c= gz20c+rs1wg(10)*xx*vvc*gtm2*ys*(-1./8.*o*
     #    x2z*txs-1./8.*o*tx*x2zs-1./8.*x12*x2z*txs+1./8.*tx*x2zs
     #    )
      gz20c= gz20c+rs1wg(10)*bxpi*vvc*gtm2*ys*csti*(
     #    1./32.*o*x12*x2z+1./16.*o*x2z*tx+1./32.*o*txs+1./32.*os
     #    *x2z+1./32.*x12*x2z*tx+1./32.*x12*txs-1./16.*x2z*tx)
      gz20c= gz20c+rs1wg(10)*bxpi*vvc*gtm2*ys*(-1./8.*o
     #    *x12*x2z-1./4.*o*x2z*tx-1./8.*o*txs-1./8.*os*x2z-1./8.
     #    *x12*x2z*tx-1./8.*x12*txs+1./4.*x2z*tx)
      gz20c= gz20c+rs1wg(10)*vvc*gtm2*ys*bxp*csti*(7.
     #    /192.*o*x12+7./192.*o*tx-1./192.*o+1./24.*os+7./192.*
     #    x12*tx+1./96.*x12-7./192.*tx-1./192.*x12s)
      gz20c= gz20c+rs1wg(10)*vvc*gtm2*ys*bxp*(-7./48.*o
     #    *x12-7./48.*o*tx+1./48.*o-1./6.*os-7./48.*x12*tx-1./
     #    24.*x12+7./48.*tx+1./48.*x12s)
      gz20c= gz20c+rs1wg(10)*vvc*gtm2*ys*csti*(-1.
     #    /32.*o*x12*x2z+1./192.*o*x12*tx-1./32.*o*x12-13./192.*o
     #    *x2z*tx+1./192.*o*x2z-1./32.*o*tx-1./192.*o*x12s-7./
     #    192.*o*txs-1./96.*os*x12-7./192.*os*x2z-1./32.*os-1./
     #    192.*oc-1./32.*x12*x2z*tx-1./96.*x12*x2z-1./32.*x12*tx
     #    -7./192.*x12*txs+13./192.*x2z*tx+1./192.*tx*x12s+1./
     #    32.*tx)
      gz20c= gz20c+rs1wg(10)*vvc*gtm2*ys*(1./8.*o*x12*
     #    x2z-1./48.*o*x12*tx+1./8.*o*x12+13./48.*o*x2z*tx-1./
     #    48.*o*x2z+1./8.*o*tx+1./48.*o*x12s+7./48.*o*txs+1./24.
     #    *os*x12+7./48.*os*x2z+1./8.*os+1./48.*oc+1./8.*x12*
     #    x2z*tx+1./24.*x12*x2z+1./8.*x12*tx+7./48.*x12*txs-13./
     #    48.*x2z*tx-1./48.*tx*x12s-1./8.*tx)
      gz20c= gz20c+rs1wg(11)*vvc*gtm2*ys*bxp*csti*(1.
     #    /48.-1./48.*o-1./48.*x12)
      gz20c= gz20c+rs1wg(11)*vvc*gtm2*ys*bxp*(-1./12.
     #    +1./12.*o+1./12.*x12)
      gz20c= gz20c+rs1wg(11)*vvc*gtm2*ys*csti*(1./
     #    48.*o*x12+1./48.*o*x2z-1./48.*o*tx+1./48.*os+1./48.*
     #    x12*tx-1./48.*x2z)
      gz20c= gz20c+rs1wg(11)*vvc*gtm2*ys*(-1./12.*o*
     #    x12-1./12.*o*x2z+1./12.*o*tx-1./12.*os-1./12.*x12*tx
     #    +1./12.*x2z)
      gz20c= gz20c+rs1wg(12)*xx*vvc*gtm2*ys*csti*(1.
     #    /8.*o*x12*tx+1./8.*o*x2z*tx-1./8.*o*x2z-1./8.*o*txs-1.
     #    /8.*os*x12-1./8.*os*x2z+1./8.*os*tx-1./8.*oc-1./8.*
     #    x12*txs+1./8.*x2z*tx)
      gz20c= gz20c+rs1wg(12)*xx*vvc*gtm2*ys*(-1./2.*o*
     #    x12*tx-1./2.*o*x2z*tx+1./2.*o*x2z+1./2.*o*txs+1./2.*
     #    os*x12+1./2.*os*x2z-1./2.*os*tx+1./2.*oc+1./2.*x12*
     #    txs-1./2.*x2z*tx)
      gz20c= gz20c+rs1wg(12)*bxpi*vvc*gtm2*ys*csti*(
     #    -1./8.*o*tx-1./8.*o-1./8.*x12*tx+1./8.*tx)
      gz20c= gz20c+rs1wg(12)*bxpi*vvc*gtm2*ys*(1./2.*o*tx
     #    +1./2.*o+1./2.*x12*tx-1./2.*tx)
      gz20c= gz20c+rs1wg(12)*vvc*gtm2*ys*csti*(1./8.
     #    *o*tx+7./48.*o+1./8.*x12*tx+1./48.*x12-1./8.*tx)
      gz20c= gz20c+rs1wg(12)*vvc*gtm2*ys*(-1./2.*o*tx
     #    -7./12.*o-1./2.*x12*tx-1./12.*x12+1./2.*tx)
      gz20c= gz20c+rs1wg(13)*xx*vvc*gtm2*ys*csti*(1.
     #    /16.*o*x12*tx-1./16.*o*x2z*tx-1./16.*o*x2z-1./16.*o*txs
     #    -1./16.*os*x12+1./16.*os*x2z+1./16.*os*tx-1./16.*oc
     #    -1./16.*x12*txs+1./16.*x2z*tx)
      gz20c= gz20c+rs1wg(13)*xx*vvc*gtm2*ys*(-1./4.*o*
     #    x12*tx+1./4.*o*x2z*tx+1./4.*o*x2z+1./4.*o*txs+1./4.*
     #    os*x12-1./4.*os*x2z-1./4.*os*tx+1./4.*oc+1./4.*x12*
     #    txs-1./4.*x2z*tx)
      gz20c= gz20c+rs1wg(13)*bxpi*vvc*gtm2*ys*csti*(
     #    -1./16.*o*tx-1./16.*o-1./16.*x12*tx+1./16.*tx)
      gz20c= gz20c+rs1wg(13)*bxpi*vvc*gtm2*ys*(1./4.*o*tx
     #    +1./4.*o+1./4.*x12*tx-1./4.*tx)
      gz20c= gz20c+rs1wg(13)*vvc*gtm2*ys*csti*(1./
     #    32.*o*x12+1./16.*o*tx+1./32.*o+1./32.*os+1./16.*x12*
     #    tx+1./96.*x12-1./16.*tx)
      gz20c= gz20c+rs1wg(13)*vvc*gtm2*ys*(-1./8.*o*x12
     #    -1./4.*o*tx-1./8.*o-1./8.*os-1./4.*x12*tx-1./24.*
     #    x12+1./4.*tx)
      gz20c= gz20c+rs1wg(14)*xx*vvc*gtm2*ys*csti*(1.
     #    /8.*o*x2z*tx-1./8.*os*x2z)
      gz20c= gz20c+rs1wg(14)*xx*vvc*gtm2*ys*(-1./2.*o*
     #    x2z*tx+1./2.*os*x2z)
      gz20c= gz20c+rs1wg(14)*bxpi*vvc*gtm2*ys*csti*(
     #    1./8.*o*tx-1./8.*os)
      gz20c= gz20c+rs1wg(14)*bxpi*vvc*gtm2*ys*(-1./2.*o
     #    *tx+1./2.*os)
      gz20c= gz20c+rs1wg(14)*vvc*gtm2*ys*bxp*csti*(1.
     #    /96.-1./96.*o-1./96.*x12)
      gz20c= gz20c+rs1wg(14)*vvc*gtm2*ys*bxp*(-1./24.
     #    +1./24.*o+1./24.*x12)
      gz20c= gz20c+rs1wg(14)*vvc*gtm2*ys*csti*(-1.
     #    /48.*o*x12+1./96.*o*x2z-11./96.*o*tx+5./48.*os+1./96.
     #    *x12*tx-1./96.*x2z)
      gz20c= gz20c+rs1wg(14)*vvc*gtm2*ys*(1./12.*o*x12
     #    -1./24.*o*x2z+11./24.*o*tx-5./12.*os-1./24.*x12*tx+
     #    1./24.*x2z)
      gz20c= gz20c+rs2wg(1)*xx*vvq*gtm2*yc*(-6*o*x2z*
     #    txs-6*x12*x2z*txs+6*x2z*txs)
      gz20c= gz20c+rs2wg(1)*bxpi*vvq*gtm2*yc*(-9./2.*o*
     #    x2z*tx-21./2.*o*txs-21./2.*x12*txs+9./2.*x2z*tx+6*txs
     #    )
      gz20c= gz20c+rs2wg(1)*vvq*gtm2*bxps*yc*(-1+o+
     #    x12)
      gz20c= gz20c+rs2wg(1)*vvq*gtm2*yc*bxp*(1+o*x12-
     #    o*x2z-19./2.*o*tx-3*o+2*os-15./2.*x12*tx-x12-x2z*
     #    tx+x2z+13./2.*tx+txs)
      gz20c= gz20c+rs2wg(1)*vvq*gtm2*yc*(3./2.*o*x12*tx
     #    +6*o*x2z*tx+2*o*x2z+15./2.*o*tx+21./2.*o*txs-os*x2z
     #    +1./2.*os*tx+2*x12*x2z*tx+9./2.*x12*tx+21./2.*x12*txs
     #    -13./2.*x2z*tx-x2z*txs-x2z+tx*x12s+tx*x2zs-9./2.*
     #    tx-6*txs)
      gz20c= gz20c+rs2wg(4)*xx*vvq*gtm2*yc*(3./4.*o*x12*
     #    tx*x2zs-3./4.*o*tx*x2zc-3./4.*o*tx*x2zs+3./2.*o*x2zc+
     #    3./4.*o*x2zs*txs+3./4.*os*tx*x2zs-3./4.*os*x2zc+3./4.*
     #    x12*tx*x2zs+3./4.*x12*x2zs*txs+3./4.*tx*x2zc-3./4.*x2zc
     #    -3./2.*x2zs*txs)
      gz20c= gz20c+rs2wg(4)*bxpi*vvq*gtm2*yc*(9./8.*o*x12
     #    *x2z*tx-3./2.*o*x12*x2zs-3./2.*o*x2z*tx+21./8.*o*x2z*
     #    txs-15./8.*o*tx*x2zs+39./8.*o*x2zs+15./8.*os*x2z*tx-
     #    21./8.*os*x2zs+3./2.*x12*x2z*tx+21./8.*x12*x2z*txs-3./4.
     #    *x12*tx*x2zs+3./2.*x12*x2zs-3./4.*x2z*tx*x12s-3*x2z*txs
     #    +9./8.*tx*x2zs-9./4.*x2zs)
      gz20c= gz20c+rs2wg(4)*vvq*gtm2*bxps*yc*(1+5./2.*o
     #    *x12-1./2.*o*tx-5./2.*o+3./2.*os-1./2.*x12*tx-2*x12
     #    +1./2.*tx+x12s)
      gz20c= gz20c+rs2wg(4)*vvq*gtm2*yc*bxp*(-3./4.-
     #    61./16.*o*x12*x2z+3./8.*o*x12*tx-27./16.*o*x12-15./16.*
     #    o*x2z*tx+101./16.*o*x2z-9./16.*o*tx-3./16.*o*x12s+9./
     #    4.*o*txs+15./8.*o-1./8.*os*x12-57./16.*os*x2z+23./16.
     #    *os*tx-19./16.*os+1./16.*oc-7./16.*x12*x2z*tx+7./2.*
     #    x12*x2z+23./16.*x12*tx+9./4.*x12*txs+3./2.*x12-1./16.
     #    *x2z*tx-3./4.*x2z*x12s-11./4.*x2z-17./16.*tx*x12s-3./
     #    8.*tx-3./4.*x12s-7./4.*txs)
      gz20c= gz20c+rs2wg(4)*vvq*gtm2*yc*(-11./8.*o*x12
     #    *x2z*tx+51./16.*o*x12*x2z-3./8.*o*x12*tx+3./2.*o*x12*
     #    x2zs+1./8.*o*x12*txs+39./16.*o*x2z*tx-45./16.*o*x2z*txs
     #    -21./4.*o*x2z+1./16.*o*tx*x12s+33./16.*o*tx*x2zs+3./4.
     #    *o*tx-85./16.*o*x2zs-15./8.*o*txs-1./16.*os*x12*x2z+1.
     #    /8.*os*x12*tx-17./8.*os*x2z*tx+49./16.*os*x2z-9./8.*os*
     #    tx+45./16.*os*x2zs+1./16.*os*txs-1./16.*oc*x2z+1./16.
     #    *oc*tx-23./16.*x12*x2z*tx-45./16.*x12*x2z*txs-3*x12*x2z
     #    +3./4.*x12*tx*x2zs-3./4.*x12*tx-3./2.*x12*x2zs-15./8.
     #    *x12*txs+3./4.*x2z*tx*x12s+3./4.*x2z*x12s+13./4.*x2z*
     #    txs+9./4.*x2z+3./4.*tx*x12s-19./16.*tx*x2zs+1./16.*
     #    x12s*txs+5./2.*x2zs+3./2.*txs)
      gz20c= gz20c+rs2wg(7)*xx*vvq*gtm2*yc*(-3./4.*o*
     #    x12*x2z*txs+3./4.*o*x2zc-3./4.*o*x2zs*txs-3./8.*os*x2z*
     #    txs-3./8.*os*x2zc+3./4.*x12*tx*x2zs-3./4.*x12*x2zs*txs
     #    -3./8.*x2z*x12s*txs-3./8.*x2zc+3./4.*x2zs*txs)
      gz20c= gz20c+rs2wg(7)*bxpi*vvq*gtm2*yc*(-15./16.*
     #    o*x12*x2z*tx-3./4.*o*x12*x2zs-15./16.*o*x2z*txs-3./16.*
     #    o*tx*x2zs+27./16.*o*x2zs-3./16.*os*x2z*tx-15./16.*os*
     #    x2zs+3./4.*x12*x2z*tx-15./16.*x12*x2z*txs+3./4.*x12*
     #    x2zs-3./4.*x2z*tx*x12s+3./4.*x2z*txs+3./16.*tx*x2zs-3.
     #    /4.*x2zs)
      gz20c= gz20c+rs2wg(7)*vvq*gtm2*yc*bxp*(-29./32.*o
     #    *x12*x2z+1./16.*o*x12*tx-3./32.*o*x12-5./32.*o*x2z*tx
     #    +29./32.*o*x2z-3./32.*o*tx+1./32.*o*x12s-1./8.*o*txs
     #    +1./16.*o+3./16.*os*x12-17./32.*os*x2z+1./32.*os*tx
     #    -7./32.*os+5./32.*oc-5./32.*x12*x2z*tx+3./4.*x12*x2z
     #    -3./32.*x12*tx-1./8.*x12*txs+5./32.*x2z*tx-3./8.*x2z*
     #    x12s-3./8.*x2z+1./32.*tx*x12s+1./16.*tx+1./8.*txs)
      gz20c= gz20c+rs2wg(7)*vvq*gtm2*yc*(7./8.*o*x12*x2z
     #    *tx+31./32.*o*x12*x2z+1./16.*o*x12*tx+3./4.*o*x12*x2zs
     #    -1./16.*o*x12*txs+9./32.*o*x2z*tx+33./32.*o*x2z*txs-o
     #    *x2z-1./32.*o*tx*x12s+5./32.*o*tx*x2zs-53./32.*o*x2zs
     #    +1./16.*o*txs-5./32.*os*x12*x2z-1./16.*os*x12*tx+1./8.
     #    *os*x2z*tx+25./32.*os*x2z+1./16.*os*tx+29./32.*os*x2zs
     #    -1./32.*os*txs-5./32.*oc*x2z-1./32.*oc*tx-17./32.*x12
     #    *x2z*tx+33./32.*x12*x2z*txs-3./4.*x12*x2z-3./4.*x12*
     #    x2zs+1./16.*x12*txs+3./4.*x2z*tx*x12s-1./4.*x2z*tx+3./
     #    8.*x2z*x12s-7./8.*x2z*txs+3./8.*x2z-5./32.*tx*x2zs-1./
     #    32.*x12s*txs+3./4.*x2zs)
      gz20c= gz20c+rs2wg(8)*bxpi*vvq*gtm2*yc*(-3./4.*o*
     #    x12*x2z*tx+3./4.*o*x2z*tx-3./4.*o*x2z*txs+3./4.*o*tx*
     #    x2zs-3./2.*o*x2zs-3./4.*os*x2z*tx+3./4.*os*x2zs-3./4.
     #    *x12*x2z*tx-3./4.*x12*x2z*txs+3./2.*x2z*txs-3./4.*tx*
     #    x2zs+3./4.*x2zs)
      gz20c= gz20c+rs2wg(8)*vvq*gtm2*bxps*yc*(-3./4.-
     #    2*o*x12+1./2.*o*tx+2*o-5./4.*os+1./2.*x12*tx+3./2.*
     #    x12-1./2.*tx-3./4.*x12s)
      gz20c= gz20c+rs2wg(8)*vvq*gtm2*yc*bxp*(3./4.+13./
     #    8.*o*x12*x2z-3./4.*o*x12*tx+13./8.*o*x12+9./8.*o*x2z*tx
     #    -29./8.*o*x2z+5./8.*o*tx+1./8.*o*x12s-2*o*txs-7./4.
     #    *o+1./4.*os*x12+17./8.*os*x2z-11./8.*os*tx+7./8.*os
     #    +1./8.*oc+5./8.*x12*x2z*tx-3./2.*x12*x2z-7./8.*x12*tx
     #    -2*x12*txs-3./2.*x12-1./8.*x2z*tx+3./2.*x2z+5./8.*
     #    tx*x12s+1./4.*tx+3./4.*x12s+3./2.*txs)
      gz20c= gz20c+rs2wg(8)*vvq*gtm2*yc*(3./4.*o*x12*x2z
     #    *tx-11./8.*o*x12*x2z+1./4.*o*x12*tx+1./4.*o*x12*txs-
     #    15./8.*o*x2z*tx+7./8.*o*x2z*txs+13./4.*o*x2z+1./8.*o*tx
     #    *x12s-7./8.*o*tx*x2zs-3./4.*o*tx+13./8.*o*x2zs+7./4.*
     #    o*txs-1./8.*os*x12*x2z+1./4.*os*x12*tx+3./4.*os*x2z*tx
     #    -13./8.*os*x2z+os*tx-7./8.*os*x2zs+1./8.*os*txs-1./
     #    8.*oc*x2z+1./8.*oc*tx-1./8.*x12*x2z*tx+7./8.*x12*x2z*
     #    txs+3./2.*x12*x2z+3./4.*x12*tx+7./4.*x12*txs+1./2.*
     #    x2z*tx-3./2.*x2z*txs-3./2.*x2z-3./4.*tx*x12s+5./8.*tx
     #    *x2zs+1./8.*x12s*txs-3./4.*x2zs-3./2.*txs)
      gz20c= gz20c+rs2wg(9)*bxpi*vvq*gtm2*yc*(3./2.*o*x2z
     #    *tx+3./2.*o*txs+3./2.*x12*txs-3./2.*x2z*tx)
      gz20c= gz20c+rs2wg(9)*vvq*gtm2*yc*bxp*(7./2.*o*tx
     #    +3./2.*x12*tx-3./2.*tx)
      gz20c= gz20c+rs2wg(9)*vvq*gtm2*yc*(-1./2.*o*x12*
     #    tx-2*o*x2z*tx-5./2.*o*tx-3./2.*o*txs-1./2.*os*tx-3./
     #    2.*x12*tx-3./2.*x12*txs+3./2.*x2z*tx+3./2.*tx)
      gz20c= gz20c+rs2wg(10)*xx*vvq*gtm2*yc*(3./4.*o*x12
     #    *x2z*txs-3./4.*o*x2zc+3./4.*o*x2zs*txs+3./8.*os*x2z*txs
     #    +3./8.*os*x2zc-3./4.*x12*tx*x2zs+3./4.*x12*x2zs*txs+3.
     #    /8.*x2z*x12s*txs+3./8.*x2zc-3./4.*x2zs*txs)
      gz20c= gz20c+rs2wg(10)*bxpi*vvq*gtm2*yc*(15./16.*o*
     #    x12*x2z*tx+3./4.*o*x12*x2zs+3./4.*o*x12*txs+27./16.*o*
     #    x2z*txs+3./16.*o*tx*x2zs-39./16.*o*x2zs+3./16.*os*x2z*
     #    tx+21./16.*os*x2zs+3./8.*os*txs-3./2.*x12*x2z*tx+27./
     #    16.*x12*x2z*txs-3./4.*x12*x2zs+3./4.*x2z*tx*x12s-3./2.*
     #    x2z*txs-3./16.*tx*x2zs+3./8.*x12s*txs+9./8.*x2zs)
      gz20c= gz20c+rs2wg(10)*vvq*gtm2*bxps*yc*(-3./8.
     #    -o*x12-1./4.*o*tx+o-5./8.*os-1./4.*x12*tx+3./4.*
     #    x12+1./4.*tx-3./8.*x12s)
      gz20c= gz20c+rs2wg(10)*vvq*gtm2*yc*bxp*(3./8.+55./
     #    32.*o*x12*x2z+17./16.*o*x12*tx+29./32.*o*x12+15./32.*o*
     #    x2z*tx-87./32.*o*x2z+5./32.*o*tx+1./32.*o*x12s+9./8.*
     #    o*txs-15./16.*o-1./16.*os*x12+51./32.*os*x2z+9./32.*
     #    os*tx+21./32.*os-3./32.*oc+7./32.*x12*x2z*tx-3./2.*
     #    x12*x2z-19./32.*x12*tx+9./8.*x12*txs-3./4.*x12-15./32.
     #    *x2z*tx+3./8.*x2z*x12s+9./8.*x2z+25./32.*tx*x12s-3./
     #    16.*tx+3./8.*x12s-7./8.*txs)
      gz20c= gz20c+rs2wg(10)*vvq*gtm2*yc*(-o*x12*x2z*
     #    tx-53./32.*o*x12*x2z-15./16.*o*x12*tx-3./4.*o*x12*x2zs
     #    -13./16.*o*x12*txs-11./32.*o*x2z*tx-59./32.*o*x2z*txs
     #    +21./8.*o*x2z-1./32.*o*tx*x12s-7./32.*o*tx*x2zs+79./
     #    32.*o*x2zs-15./16.*o*txs+3./32.*os*x12*x2z-1./16.*os*
     #    x12*tx-1./4.*os*x2z*tx-51./32.*os*x2z-3./16.*os*tx-43.
     #    /32.*os*x2zs-13./32.*os*txs+3./32.*oc*x2z-1./32.*oc*tx
     #    +43./32.*x12*x2z*tx-59./32.*x12*x2z*txs+3./2.*x12*x2z
     #    +3./4.*x12*tx+3./4.*x12*x2zs-15./16.*x12*txs-3./4.*
     #    x2z*tx*x12s+3./8.*x2z*tx-3./8.*x2z*x12s+13./8.*x2z*txs
     #    -9./8.*x2z-3./4.*tx*x12s+7./32.*tx*x2zs-13./32.*x12s*
     #    txs-9./8.*x2zs+3./4.*txs)
      gz20c= gz20c+rs2wg(11)*vvq*gtm2*bxps*yc*(-1./2.
     #    +1./2.*o+1./2.*x12)
      gz20c= gz20c+rs2wg(11)*vvq*gtm2*yc*bxp*(-5./8.*o*
     #    x12-3./4.*o*x2z+1./8.*o*tx-1./8.*o+1./8.*os-1./4.*
     #    x12*x2z-7./8.*x12*tx+1./4.*x12-1./2.*x2z*tx+3./4.*x2z
     #    +3./8.*tx-1./4.*x12s+1./2.*txs)
      gz20c= gz20c+rs2wg(11)*vvq*gtm2*yc*(1./4.*o*x12*
     #    x2z+3./8.*o*x12*tx-1./8.*o*x2z*tx+1./8.*o*x2z+1./4.*o
     #    *x2zs-1./8.*o*txs-1./8.*os*x2z+1./8.*os*tx+3./4.*x12*
     #    x2z*tx-1./4.*x12*x2z-1./8.*x12*txs-3./8.*x2z*tx-1./2.
     #    *x2z*txs+1./4.*tx*x12s+1./2.*tx*x2zs-1./4.*x2zs)
      gz20c= gz20c+rs2wg(12)*xx*vvq*gtm2*yc*(-3./2.*o*
     #    x2z*txs+3./2.*o*tx*x2zs-3./2.*x12*x2z*txs+3*x2z*txs-3.
     #    /2.*tx*x2zs)
      gz20c= gz20c+rs2wg(12)*bxpi*vvq*gtm2*yc*(9./4.*o*
     #    x2z*tx-15./4.*o*txs+3./2.*x12*x2z*tx-15./4.*x12*txs-3.
     #    /4.*x2z*tx+3*txs)
      gz20c= gz20c+rs2wg(12)*vvq*gtm2*yc*bxp*(1./2.+7./
     #    8.*o*x12+1./4.*o*x2z-9./8.*o*tx-9./8.*o+5./8.*os+1./
     #    4.*x12*x2z-9./8.*x12*tx-3./4.*x12-1./4.*x2z+9./8.*tx
     #    +1./4.*x12s)
      gz20c= gz20c+rs2wg(12)*vvq*gtm2*yc*(-1./4.*o*x12
     #    *x2z+3./8.*o*x12*tx-15./8.*o*x2z*tx+5./8.*o*x2z+3./4.
     #    *o*tx-1./4.*o*x2zs+29./8.*o*txs-1./8.*os*x2z+1./8.*os
     #    *tx-5./4.*x12*x2z*tx+1./4.*x12*x2z+3./4.*x12*tx+29./8.
     #    *x12*txs+3./8.*x2z*tx-1./2.*x2z+1./4.*tx*x12s-3./4.*
     #    tx+1./4.*x2zs-3*txs)
      gz20c= gz20c+rs2wg(13)*xx*vvq*gtm2*yc*(-3./2.*o*
     #    x2z*txs-3./2.*x12*x2z*txs+3./2.*x2z*txs)
      gz20c= gz20c+rs2wg(13)*bxpi*vvq*gtm2*yc*(-3./8.*o
     #    *x2z*tx-15./8.*o*txs-15./8.*x12*txs+3./8.*x2z*tx+3./2.
     #    *txs)
      gz20c= gz20c+rs2wg(13)*vvq*gtm2*yc*bxp*(-5./16.*o
     #    *x12-1./8.*o*x2z-7./16.*o*tx+3./16.*o-3./16.*os-1./
     #    8.*x12*x2z-7./16.*x12*tx+1./8.*x12+1./8.*x2z+7./16.*
     #    tx-1./8.*x12s)
      gz20c= gz20c+rs2wg(13)*vvq*gtm2*yc*(1./8.*o*x12*
     #    x2z+9./16.*o*x12*tx+9./16.*o*x2z*tx+1./16.*o*x2z+1./8.
     #    *o*tx+1./8.*o*x2zs+27./16.*o*txs-1./16.*os*x2z+3./16.
     #    *os*tx+3./8.*x12*x2z*tx-1./8.*x12*x2z+1./8.*x12*tx+27.
     #    /16.*x12*txs-7./16.*x2z*tx+3./8.*tx*x12s-3./8.*tx-1./
     #    8.*x2zs-3./2.*txs)
      gz20c= gz20c+rs2wg(14)*xx*vvq*gtm2*yc*(3./4.*o*x2z
     #    *txs+3./4.*o*tx*x2zs+3./4.*x12*x2z*txs-3./4.*tx*x2zs)
      gz20c= gz20c+rs2wg(14)*bxpi*vvq*gtm2*yc*(9./4.*o*
     #    x2z*tx+3./4.*o*txs+3./4.*x12*x2z*tx+3./4.*x12*txs-3./
     #    2.*x2z*tx)
      gz20c= gz20c+rs2wg(14)*vvq*gtm2*yc*bxp*(3./16.*o*
     #    x12+1./8.*o*x2z+19./16.*o*tx+3./16.*o-3./16.*os+1./
     #    8.*x12*x2z+7./16.*x12*tx-1./8.*x12-1./4.*x2z*tx-1./8.
     #    *x2z-7./16.*tx+1./8.*x12s+1./4.*txs)
      gz20c= gz20c+rs2wg(14)*vvq*gtm2*yc*(-1./8.*o*x12
     #    *x2z-3./16.*o*x12*tx-33./16.*o*x2z*tx-3./16.*o*x2z-3./
     #    2.*o*tx-1./8.*o*x2zs-11./16.*o*txs+3./16.*os*x2z-1./
     #    16.*os*tx-5./8.*x12*x2z*tx+1./8.*x12*x2z-3./4.*x12*tx
     #    -11./16.*x12*txs+19./16.*x2z*tx-1./4.*x2z*txs-1./8.*
     #    tx*x12s+1./4.*tx*x2zs+3./4.*tx+1./8.*x2zs)
      gz20c= gz20c+rt1wg(1)*xx*vvc*gsm2*ys*csti*(24
     #    *zi*o*x12*txs-24*zi*o*txs+12*zi*os*txs-24*zi*x12*txs+
     #    12*zi*x12s*txs+12*zi*txs+12*o*txs+12*x12*txs-12*txs)
      gz20c= gz20c+rt1wg(1)*bxpi*vvc*gsm2*ys*csti*(6
     #    *zi*o*x12*tx-12*zi*o*tx-18*zi*o*txs+6*zi*os*tx-6*zi*
     #    x12*tx-18*zi*x12*txs+6*zi*tx+12*zi*txs+6*o*tx-6*tx
     #    )
      gz20c= gz20c+rt1wg(1)*vvc*gsm2*bxps*ys*csti*(1.
     #    /8.+zi*o+zi*x12-zi-1./8.*o-1./8.*x12)
      gz20c= gz20c+rt1wg(1)*vvc*gsm2*bxps*ys*(-1./4.+
     #    1./4.*o+1./4.*x12)
      gz20c= gz20c+rt1wg(1)*vvc*gsm2*ys*bxp*csti*(
     #    -9./8.+2*zi*o*x12-6*zi*o*tx-4*zi*o+2*zi*os-8*zi*
     #    x12*tx-2*zi*x12+7*zi*tx+2*zi*txs+2*zi-1./8.*o*x12
     #    +1./8.*o*x2z+3./2.*o-3./8.*os+1./4.*x12*tx+1./8.*
     #    x12-1./8.*x2z+15./8.*tx)
      gz20c= gz20c+rt1wg(1)*vvc*gsm2*ys*bxp*(1./4.+1./4.
     #    *o*x12-1./4.*o*x2z-o+3./4.*os-1./2.*x12*tx-1./4.*
     #    x12+1./4.*x2z+1./4.*tx)
      gz20c= gz20c+rt1wg(1)*vvc*gsm2*ys*csti*(1-6
     #    *zi*o*x12*tx-2*zi*o*x12+19*zi*o*tx+19*zi*o*txs+3*zi*o
     #    +zi*os*x12-6*zi*os*tx-3*zi*os+zi*oc+14*zi*x12*tx+
     #    19*zi*x12*txs+zi*x12-13*zi*tx-14*zi*txs-zi+1./8.*o*
     #    x12*tx+1./8.*o*x2z*tx-1./4.*o*x2z-57./8.*o*tx-1./8.*o
     #    *txs-2*o+1./8.*os*x2z+1./8.*os*tx+os-17./8.*x12*tx
     #    -1./8.*x12*txs-15./8.*x2z*tx+1./8.*x2z+7*tx+2*txs)
      gz20c= gz20c+rt1wg(1)*vvc*gsm2*ys*(-1./4.*o*x12*
     #    tx-1./4.*o*x2z*tx+1./2.*o*x2z+1./4.*o*tx+1./4.*o*txs
     #    -1./4.*os*x2z-1./4.*os*tx+1./4.*x12*tx+1./4.*x12*txs
     #    -1./4.*x2z*tx-1./4.*x2z)
      gz20c= gz20c+rt1wg(4)*xx*vvc*gsm2*ys*csti*(3./
     #    2.+3./2.*zi*o*oq+15*zi*o*x12*tx-12*zi*o*x12*txs-18*zi
     #    *o*x12-21./2.*zi*o*tx*x12s+3*zi*o*tx*x12c-15./2.*zi*o*
     #    tx+9./2.*zi*o*x12s*txs+27./2.*zi*o*x12s-3*zi*o*x12c+
     #    15./2.*zi*o*txs+15./2.*zi*o-21*zi*os*x12*tx+9./2.*zi*os
     #    *x12*txs+27*zi*os*x12+9*zi*os*tx*x12s+27./2.*zi*os*tx
     #    -27./2.*zi*os*x12s+3./2.*zi*os*x12c-6*zi*os*txs-15*zi
     #    *os+9*zi*oc*x12*tx-18*zi*oc*x12-21./2.*zi*oc*tx+9./2.
     #    *zi*oc*x12s+3./2.*zi*oc*txs+15*zi*oc+9./2.*zi*oq*x12+
     #    3*zi*oq*tx-15./2.*zi*oq-3*zi*x12*tx+15./2.*zi*x12*txs
     #    +9./2.*zi*x12+3./2.*zi*tx*x12s+3./2.*zi*tx-6*zi*x12s*
     #    txs-9./2.*zi*x12s+3./2.*zi*x12c*txs+3./2.*zi*x12c-3*
     #    zi*txs-3./2.*zi-3*o*x12*x2z*tx+3*o*x12*x2z-15./2.*o*
     #    x12*tx+3*o*x12*txs+9*o*x12+9./2.*o*x2z*tx-3./2.*o*x2z
     #    *txs-9./2.*o*x2z+3*o*tx*x12s+3./2.*o*tx*x2zs+6*o*tx
     #    -3*o*x12s)
      gz20c= gz20c+rt1wg(4)*xx*vvc*gsm2*ys*csti*(
     #    -3*o*x2zs-9./2.*o*txs-6*o-3./2.*os*x12*x2z+6*os*x12
     #    *tx-9*os*x12-3*os*x2z*tx+9./2.*os*x2z-15./2.*os*tx+
     #    3./2.*os*x12s+3./2.*os*x2zs+3./2.*os*txs+9*os+3*oc*
     #    x12-3./2.*oc*x2z+3*oc*tx-6*oc+3./2.*oq-3./2.*x12*
     #    x2z*txs-3./2.*x12*x2z+3./2.*x12*tx-9./2.*x12*txs-3*
     #    x12-3./2.*x2z*tx+3*x2z*txs+3./2.*x2z-3./2.*tx*x2zs-
     #    3./2.*tx+3./2.*x12s*txs+3./2.*x12s+3./2.*x2zs+3*txs)
      gz20c= gz20c+rt1wg(4)*bxpi*vvc*gsm2*ys*csti*(9.
     #    /2.+33./2.*zi*o*x12*tx-9*zi*o*x12*txs-36*zi*o*x12-6*
     #    zi*o*tx*x12s-12*zi*o*tx+21*zi*o*x12s-3*zi*o*x12c+21./
     #    2.*zi*o*txs+18*zi*o-12*zi*os*x12*tx+36*zi*os*x12+15*
     #    zi*os*tx-21./2.*zi*os*x12s-9./2.*zi*os*txs-27*zi*os-
     #    12*zi*oc*x12-6*zi*oc*tx+18*zi*oc-9./2.*zi*oq-9./2.*zi
     #    *x12*tx+21./2.*zi*x12*txs+12*zi*x12+3./2.*zi*tx*x12s+
     #    3*zi*tx-9./2.*zi*x12s*txs-21./2.*zi*x12s+3*zi*x12c-6*
     #    zi*txs-9./2.*zi+3*o*x12*x2z-6*o*x12*tx+15*o*x12+3*o
     #    *x2z*tx-9*o*x2z+9*o*tx-3*o*x12s-9./2.*o*txs-27./2.*
     #    o-15./2.*os*x12+9./2.*os*x2z-6*os*tx+27./2.*os-9./2.
     #    *oc+3./2.*x12*x2z*tx-3*x12*x2z+3./2.*x12*tx-9./2.*x12
     #    *txs-15./2.*x12-3*x2z*tx+9./2.*x2z-3*tx+3*x12s+6*
     #    txs)
      gz20c= gz20c+rt1wg(4)*vvc*gsm2*bxps*ys*csti*(
     #    -1./32.+7./2.*zi*o*x12-7./2.*zi*o+7./4.*zi*os-7./2.
     #    *zi*x12+7./4.*zi*x12s+7./4.*zi-1./16.*o*x12+1./16.*o
     #    -1./32.*os+1./16.*x12-1./32.*x12s)
      gz20c= gz20c+rt1wg(4)*vvc*gsm2*bxps*ys*(1./16.+1./
     #    8.*o*x12-1./8.*o+1./16.*os-1./8.*x12+1./16.*x12s)
      gz20c= gz20c+rt1wg(4)*vvc*gsm2*ys*bxp*csti*(5
     #    +7./2.*zi*o*x12*tx-26*zi*o*x12-21./4.*zi*o*tx+8*zi*o*
     #    x12s+7./2.*zi*o*txs+18*zi*o+23./2.*zi*os*x12+7./2.*zi
     #    *os*tx-33./2.*zi*os+5*zi*oc-7./4.*zi*x12*tx+7./2.*zi*
     #    x12*txs+29./2.*zi*x12+7./4.*zi*tx-19./2.*zi*x12s+3./2.
     #    *zi*x12c-7./2.*zi*txs-13./2.*zi+1./32.*o*x12*x2z+1./
     #    16.*o*x12*tx+207./32.*o*x12-3./32.*o*x2z+7./4.*o*tx+1.
     #    /32.*o*x12s-10*o+1./32.*os*x2z+161./32.*os-1./32.*oc
     #    -1./16.*x12*x2z+27./16.*x12*tx-13./2.*x12+1./16.*x2z
     #    +1./16.*tx*x12s-7./4.*tx+3./2.*x12s)
      gz20c= gz20c+rt1wg(4)*vvc*gsm2*ys*bxp*(-1./16.*o*
     #    x12*x2z-1./8.*o*x12*tx+1./16.*o*x12+3./16.*o*x2z-1./
     #    16.*o*x12s-1./16.*os*x2z-1./16.*os+1./16.*oc+1./8.*
     #    x12*x2z+1./8.*x12*tx-1./8.*x2z-1./8.*tx*x12s)
      gz20c= gz20c+rt1wg(4)*vvc*gsm2*ys*csti*(-37.
     #    /4.-83./4.*zi*o*x12*tx+19./2.*zi*o*x12*txs+117./2.*zi*o
     #    *x12+13./2.*zi*o*tx*x12s+35./2.*zi*o*tx-29*zi*o*x12s+
     #    3*zi*o*x12c-57./4.*zi*o*txs-65./2.*zi*o+13*zi*os*x12*tx
     #    -48*zi*os*x12-77./4.*zi*os*tx+43./4.*zi*os*x12s+19./4.
     #    *zi*os*txs+42*zi*os+25./2.*zi*oc*x12+13./2.*zi*oc*tx-
     #    47./2.*zi*oc+19./4.*zi*oq+25./4.*zi*x12*tx-57./4.*zi*
     #    x12*txs-23*zi*x12-3./2.*zi*tx*x12s-19./4.*zi*tx+19./4.
     #    *zi*x12s*txs+73./4.*zi*x12s-9./2.*zi*x12c+19./2.*zi*txs
     #    +37./4.*zi+1./32.*o*x12*x2z*tx-95./32.*o*x12*x2z+13./
     #    2.*o*x12*tx-1./16.*o*x12*txs-43./2.*o*x12-13./4.*o*x2z*
     #    tx+19./2.*o*x2z-1./32.*o*tx*x12s-45./4.*o*tx+3*o*x12s
     #    +1./32.*o*x2zs+19./4.*o*txs+93./4.*o+1./32.*os*x12*
     #    x2z-1./16.*os*x12*tx+31./4.*os*x12+1./32.*os*x2z*tx-
     #    153./32.*os*x2z+13./2.*os*tx-1./32.*os*txs-75./4.*os+
     #    1./32.*oc*x2z)
      gz20c= gz20c+rt1wg(4)*vvc*gsm2*ys*csti*(-1./
     #    32.*oc*tx+19./4.*oc-23./16.*x12*x2z*tx+3*x12*x2z-3*
     #    x12*tx+19./4.*x12*txs+55./4.*x12+13./4.*x2z*tx-19./4.
     #    *x2z+19./4.*tx-1./32.*x12s*txs-9./2.*x12s-1./32.*x2zs
     #    -13./2.*txs)
      gz20c= gz20c+rt1wg(4)*vvc*gsm2*ys*(-1./16.*o*x12
     #    *x2z*tx-1./16.*o*x12*x2z+1./8.*o*x12*txs+1./16.*o*tx*
     #    x12s-1./16.*o*x2zs-1./16.*os*x12*x2z+1./8.*os*x12*tx-
     #    1./16.*os*x2z*tx+1./16.*os*x2z+1./16.*os*txs-1./16.*oc*
     #    x2z+1./16.*oc*tx-1./8.*x12*x2z*tx+1./16.*x12s*txs+1./
     #    16.*x2zs)
      gz20c= gz20c+rt1wg(7)*xx*vvc*gsm2*ys*csti*(3./
     #    4.+3./4.*zi*o*oq-3*zi*o*x12*tx+15./2.*zi*o*x12*txs-9*
     #    zi*o*x12+3*zi*o*tx*x12s-9./4.*zi*o*x12s*txs+27./4.*zi*o
     #    *x12s-3./2.*zi*o*x12c-9./2.*zi*o*txs+15./4.*zi*o+3./2.
     #    *zi*os*x12*tx-9./4.*zi*os*x12*txs+27./2.*zi*os*x12-27./
     #    4.*zi*os*x12s+3./4.*zi*os*x12c+15./4.*zi*os*txs-15./2.*
     #    zi*os-9*zi*oc*x12+9./4.*zi*oc*x12s-3./4.*zi*oc*txs+15.
     #    /2.*zi*oc+9./4.*zi*oq*x12-15./4.*zi*oq+3./2.*zi*x12*tx
     #    -9./2.*zi*x12*txs+9./4.*zi*x12-3*zi*tx*x12s+3./2.*zi*
     #    tx*x12c+15./4.*zi*x12s*txs-9./4.*zi*x12s-3./4.*zi*x12c*
     #    txs+3./4.*zi*x12c+3./2.*zi*txs-3./4.*zi+3./2.*o*x12*
     #    x2z+3./2.*o*x12*tx-3./2.*o*x12*txs+9./2.*o*x12+3./2.*
     #    o*x2z*txs-9./4.*o*x2z-3./2.*o*x12s-3./2.*o*x2zs+3*o*
     #    txs-3*o-3./4.*os*x12*x2z-9./2.*os*x12+9./4.*os*x2z+
     #    3./4.*os*x12s+3./4.*os*x2zs-3./4.*os*txs+9./2.*os+3./
     #    2.*oc*x12)
      gz20c= gz20c+rt1wg(7)*xx*vvc*gsm2*ys*csti*(
     #    -3./4.*oc*x2z-3*oc+3./4.*oq-3./2.*x12*x2z*tx+3./2.*
     #    x12*x2z*txs-3./4.*x12*x2z-3./2.*x12*tx+3*x12*txs-3./2.
     #    *x12-3./2.*x2z*txs+3./4.*x2z+3./2.*tx*x12s-3./4.*x12s
     #    *txs+3./4.*x12s+3./4.*x2zs-3./2.*txs)
      gz20c= gz20c+rt1wg(7)*bxpi*vvc*gsm2*ys*csti*(3.
     #    /2.-3*zi*o*x12*tx+3*zi*o*x12*txs-27./2.*zi*o*x12+3*zi
     #    *o*tx*x12s+9*zi*o*x12s-3./2.*zi*o*x12c-3*zi*o*txs+6*
     #    zi*o+3./2.*zi*os*x12*tx+27./2.*zi*os*x12-9./2.*zi*os*
     #    x12s+3./2.*zi*os*txs-9*zi*os-9./2.*zi*oc*x12+6*zi*oc
     #    -3./2.*zi*oq+3./2.*zi*x12*tx-3*zi*x12*txs+9./2.*zi*
     #    x12-3*zi*tx*x12s+3./2.*zi*tx*x12c+3./2.*zi*x12s*txs-9.
     #    /2.*zi*x12s+3./2.*zi*x12c+3./2.*zi*txs-3./2.*zi+3./2.
     #    *o*x12*x2z+3./2.*o*x12*tx+6*o*x12-3*o*x2z-3./2.*o*
     #    x12s+3./2.*o*txs-9./2.*o-3*os*x12+3./2.*os*x2z+9./2.
     #    *os-3./2.*oc-3./2.*x12*x2z-3./2.*x12*tx+3./2.*x12*txs
     #    -3*x12+3./2.*x2z+3./2.*tx*x12s+3./2.*x12s-3./2.*txs
     #    )
      gz20c= gz20c+rt1wg(7)*vvc*gsm2*bxps*ys*csti*(1.
     #    /64.+1./4.*zi*o*x12-1./4.*zi*o+1./8.*zi*os-1./4.*zi*
     #    x12+1./8.*zi*x12s+1./8.*zi+1./32.*o*x12-1./32.*o+1./
     #    64.*os-1./32.*x12+1./64.*x12s)
      gz20c= gz20c+rt1wg(7)*vvc*gsm2*bxps*ys*(-1./32.
     #    -1./16.*o*x12+1./16.*o-1./32.*os+1./16.*x12-1./32.*
     #    x12s)
      gz20c= gz20c+rt1wg(7)*vvc*gsm2*ys*bxp*csti*(1
     #    -1./4.*zi*o*x12*tx-11./2.*zi*o*x12+5./2.*zi*o*x12s-1./
     #    4.*zi*o*txs+3*zi*o+11./4.*zi*os*x12-3*zi*os+zi*oc+1.
     #    /4.*zi*x12*tx-1./4.*zi*x12*txs+11./4.*zi*x12-1./4.*zi*
     #    tx*x12s-5./2.*zi*x12s+3./4.*zi*x12c+1./4.*zi*txs-zi
     #    -1./32.*o*x12*x2z-1./32.*o*x12*tx+105./64.*o*x12+1./
     #    16.*o*x2z-7./64.*o*tx-121./64.*o-1./32.*os*x12-1./32.
     #    *os*x2z+59./64.*os-1./32.*oc+1./32.*x12*x2z-5./64.*
     #    x12*tx-7./4.*x12-1./32.*x2z-1./32.*tx*x12s+7./64.*tx
     #    +3./4.*x12s)
      gz20c= gz20c+rt1wg(7)*vvc*gsm2*ys*bxp*(1./16.*o*x12
     #    *x2z+1./16.*o*x12*tx-1./32.*o*x12-1./8.*o*x2z-1./32.*
     #    o*tx+1./32.*o+1./16.*os*x12+1./16.*os*x2z-3./32.*os
     #    +1./16.*oc-1./16.*x12*x2z-3./32.*x12*tx+1./16.*x2z+
     #    1./16.*tx*x12s+1./32.*tx)
      gz20c= gz20c+rt1wg(7)*vvc*gsm2*ys*csti*(-19.
     #    /8.+13./4.*zi*o*x12*tx-13./4.*zi*o*x12*txs+75./4.*zi*o*
     #    x12-3*zi*o*tx*x12s-23./2.*zi*o*x12s+3./2.*zi*o*x12c+7.
     #    /2.*zi*o*txs-35./4.*zi*o-3./2.*zi*os*x12*tx-33./2.*zi*
     #    os*x12+37./8.*zi*os*x12s-13./8.*zi*os*txs+12*zi*os+19.
     #    /4.*zi*oc*x12-29./4.*zi*oc+13./8.*zi*oq-7./4.*zi*x12*tx
     #    +7./2.*zi*x12*txs-7*zi*x12+13./4.*zi*tx*x12s-3./2.*zi
     #    *tx*x12c-13./8.*zi*x12s*txs+55./8.*zi*x12s-9./4.*zi*
     #    x12c-7./4.*zi*txs+19./8.*zi-3./2.*o*x12*x2z-89./64.*o
     #    *x12*tx+1./32.*o*x12*txs-31./4.*o*x12+7./64.*o*x2z*tx
     #    +201./64.*o*x2z+3./2.*o*x12s-1./32.*o*x2zs-105./64.*o
     #    *txs+51./8.*o+1./32.*os*x12*x2z+25./8.*os*x12-99./64.
     #    *os*x2z+7./64.*os*tx+1./64.*os*x2zs+1./64.*os*txs-45./
     #    8.*os+1./32.*oc*x2z+13./8.*oc-1./32.*x12*x2z*tx+3./2.
     #    *x12*x2z+7./4.*x12*tx-105./64.*x12*txs+37./8.*x12-7./
     #    64.*x2z*tx)
      gz20c= gz20c+rt1wg(7)*vvc*gsm2*ys*csti*(-13.
     #    /8.*x2z-3./2.*tx*x12s+1./64.*x12s*txs-9./4.*x12s+1./
     #    64.*x2zs+7./4.*txs)
      gz20c= gz20c+rt1wg(7)*vvc*gsm2*ys*(1./32.*o*x12*tx
     #    -1./16.*o*x12*txs+1./32.*o*x2z*tx-1./32.*o*x2z+1./16.
     #    *o*x2zs+1./32.*o*txs-1./16.*os*x12*x2z+3./32.*os*x2z+
     #    1./32.*os*tx-1./32.*os*x2zs-1./32.*os*txs-1./16.*oc*x2z
     #    +1./16.*x12*x2z*tx+1./32.*x12*txs-1./32.*x2z*tx-1./32.
     #    *x12s*txs-1./32.*x2zs)
      gz20c= gz20c+rt1wg(8)*bxpi*vvc*gsm2*ys*csti*(
     #    -3./2.-15./2.*zi*o*x12*tx+3*zi*o*x12*txs+9*zi*o*x12
     #    +3*zi*o*tx*x12s+6*zi*o*tx-3*zi*o*x12s-9./2.*zi*o*txs
     #    -6*zi*o+6*zi*os*x12*tx-9*zi*os*x12-15./2.*zi*os*tx+
     #    3./2.*zi*os*x12s+3./2.*zi*os*txs+9*zi*os+3*zi*oc*x12+
     #    3*zi*oc*tx-6*zi*oc+3./2.*zi*oq+3./2.*zi*x12*tx-9./2.*
     #    zi*x12*txs-3*zi*x12-3./2.*zi*tx+3./2.*zi*x12s*txs+3./
     #    2.*zi*x12s+3*zi*txs+3./2.*zi+3*o*x12*tx-3*o*x12-3./
     #    2.*o*x2z*tx+3*o*x2z-9./2.*o*tx+3./2.*o*txs+9./2.*o+
     #    3./2.*os*x12-3./2.*os*x2z+3*os*tx-9./2.*os+3./2.*oc
     #    +3./2.*x12*txs+3./2.*x12+3./2.*x2z*tx-3./2.*x2z+3./
     #    2.*tx-3*txs)
      gz20c= gz20c+rt1wg(8)*vvc*gsm2*bxps*ys*csti*(
     #    -3*zi*o*x12+3*zi*o-3./2.*zi*os+3*zi*x12-3./2.*zi*
     #    x12s-3./2.*zi)
      gz20c= gz20c+rt1wg(8)*vvc*gsm2*ys*bxp*csti*(
     #    -3-3*zi*o*x12*tx+15*zi*o*x12+9./2.*zi*o*tx-3*zi*o*
     #    x12s-3*zi*o*txs-12*zi*o-6*zi*os*x12-3*zi*os*tx+21./
     #    2.*zi*os-3*zi*oc+3./2.*zi*x12*tx-3*zi*x12*txs-9*zi*
     #    x12-3./2.*zi*tx+9./2.*zi*x12s+3*zi*txs+9./2.*zi-103.
     #    /32.*o*x12-41./32.*o*tx+199./32.*o-103./32.*os-41./32.
     #    *x12*tx+3*x12+41./32.*tx)
      gz20c= gz20c+rt1wg(8)*vvc*gsm2*ys*bxp*(-1./16.*o*
     #    x12+1./16.*o*tx+1./16.*o-1./16.*os+1./16.*x12*tx-1./
     #    16.*tx)
      gz20c= gz20c+rt1wg(8)*vvc*gsm2*ys*csti*(9./2.
     #    +21./2.*zi*o*x12*tx-3*zi*o*x12*txs-21*zi*o*x12-3*zi*o
     #    *tx*x12s-21./2.*zi*o*tx+6*zi*o*x12s+15./2.*zi*o*txs+
     #    15*zi*o-6*zi*os*x12*tx+15*zi*os*x12+21./2.*zi*os*tx-3.
     #    /2.*zi*os*x12s-3./2.*zi*os*txs-18*zi*os-3*zi*oc*x12-3
     #    *zi*oc*tx+9*zi*oc-3./2.*zi*oq-3*zi*x12*tx+15./2.*zi*
     #    x12*txs+9*zi*x12+3*zi*tx-3./2.*zi*x12s*txs-9./2.*zi*
     #    x12s-6*zi*txs-9./2.*zi-103./32.*o*x12*tx+6*o*x12+55.
     #    /32.*o*x2z*tx-103./32.*o*x2z+6*o*tx-55./32.*o*txs-21./
     #    2.*o-3./2.*os*x12+55./32.*os*x2z-103./32.*os*tx+15./2.
     #    *os-3./2.*oc+3./2.*x12*tx-55./32.*x12*txs-9./2.*x12
     #    -41./32.*x2z*tx+3./2.*x2z-3*tx+3*txs)
      gz20c= gz20c+rt1wg(8)*vvc*gsm2*ys*(-1./16.*o*x12
     #    *tx+1./16.*o*x2z*tx-1./16.*o*x2z-1./16.*o*txs+1./16.*
     #    os*x2z-1./16.*os*tx-1./16.*x12*txs+1./16.*x2z*tx)
      gz20c= gz20c+rt1wg(9)*bxpi*vvc*gsm2*ys*csti*(
     #    -3*zi*o*x12*tx+6*zi*o*tx+3*zi*o*txs-3*zi*os*tx+3*zi
     #    *x12*tx+3*zi*x12*txs-3*zi*tx-3*o*tx+3*tx)
      gz20c= gz20c+rt1wg(9)*vvc*gsm2*ys*bxp*csti*(3*
     #    zi*o*tx+3*zi*x12*tx-3*zi*tx)
      gz20c= gz20c+rt1wg(9)*vvc*gsm2*ys*csti*(3*zi*
     #    o*x12*tx-9*zi*o*tx-3*zi*o*txs+3*zi*os*tx-6*zi*x12*tx
     #    -3*zi*x12*txs+6*zi*tx+31./8.*o*tx-3*tx)
      gz20c= gz20c+rt1wg(9)*vvc*gsm2*ys*(1./4.*o*tx)
      gz20c= gz20c+rt1wg(10)*xx*vvc*gsm2*ys*csti*(
     #    -3./4.-3./4.*zi*o*oq+3*zi*o*x12*tx-15./2.*zi*o*x12*
     #    txs+9*zi*o*x12-3*zi*o*tx*x12s+9./4.*zi*o*x12s*txs-27./
     #    4.*zi*o*x12s+3./2.*zi*o*x12c+9./2.*zi*o*txs-15./4.*zi*o
     #    -3./2.*zi*os*x12*tx+9./4.*zi*os*x12*txs-27./2.*zi*os*
     #    x12+27./4.*zi*os*x12s-3./4.*zi*os*x12c-15./4.*zi*os*txs
     #    +15./2.*zi*os+9*zi*oc*x12-9./4.*zi*oc*x12s+3./4.*zi*
     #    oc*txs-15./2.*zi*oc-9./4.*zi*oq*x12+15./4.*zi*oq-3./2.
     #    *zi*x12*tx+9./2.*zi*x12*txs-9./4.*zi*x12+3*zi*tx*x12s
     #    -3./2.*zi*tx*x12c-15./4.*zi*x12s*txs+9./4.*zi*x12s+3./
     #    4.*zi*x12c*txs-3./4.*zi*x12c-3./2.*zi*txs+3./4.*zi-3./
     #    2.*o*x12*x2z-3./2.*o*x12*tx+3./2.*o*x12*txs-9./2.*o*x12
     #    -3./2.*o*x2z*txs+9./4.*o*x2z+3./2.*o*x12s+3./2.*o*
     #    x2zs-3*o*txs+3*o+3./4.*os*x12*x2z+9./2.*os*x12-9./4.
     #    *os*x2z-3./4.*os*x12s-3./4.*os*x2zs+3./4.*os*txs-9./2.
     #    *os)
      gz20c= gz20c+rt1wg(10)*xx*vvc*gsm2*ys*csti*(
     #    -3./2.*oc*x12+3./4.*oc*x2z+3*oc-3./4.*oq+3./2.*x12*
     #    x2z*tx-3./2.*x12*x2z*txs+3./4.*x12*x2z+3./2.*x12*tx-3
     #    *x12*txs+3./2.*x12+3./2.*x2z*txs-3./4.*x2z-3./2.*tx*
     #    x12s+3./4.*x12s*txs-3./4.*x12s-3./4.*x2zs+3./2.*txs)
      gz20c= gz20c+rt1wg(10)*bxpi*vvc*gsm2*ys*csti*(
     #    -9./4.+9./2.*zi*o*x12*tx-9./2.*zi*o*x12*txs+18*zi*o*
     #    x12-3*zi*o*tx*x12s-21./2.*zi*o*x12s+3./2.*zi*o*x12c+6
     #    *zi*o*txs-9*zi*o-3./2.*zi*os*x12*tx-18*zi*os*x12+21./
     #    4.*zi*os*x12s-9./4.*zi*os*txs+27./2.*zi*os+6*zi*oc*x12
     #    -9*zi*oc+9./4.*zi*oq-3*zi*x12*tx+6*zi*x12*txs-6*zi*
     #    x12+9./2.*zi*tx*x12s-3./2.*zi*tx*x12c-9./4.*zi*x12s*txs
     #    +21./4.*zi*x12s-3./2.*zi*x12c-3*zi*txs+9./4.*zi-3./
     #    2.*o*x12*x2z-3./2.*o*x12*tx-15./2.*o*x12+9./2.*o*x2z+
     #    3./2.*o*x12s-3*o*txs+27./4.*o+15./4.*os*x12-9./4.*os*
     #    x2z-27./4.*os+9./4.*oc+3./2.*x12*x2z+3*x12*tx-3*x12
     #    *txs+15./4.*x12-9./4.*x2z-3./2.*tx*x12s-3./2.*x12s+
     #    3*txs)
      gz20c= gz20c+rt1wg(10)*vvc*gsm2*bxps*ys*csti*(
     #    -1./64.-7./4.*zi*o*x12+7./4.*zi*o-7./8.*zi*os+7./4.
     #    *zi*x12-7./8.*zi*x12s-7./8.*zi-1./32.*o*x12+1./32.*o
     #    -1./64.*os+1./32.*x12-1./64.*x12s)
      gz20c= gz20c+rt1wg(10)*vvc*gsm2*bxps*ys*(1./32.+1.
     #    /16.*o*x12-1./16.*o+1./32.*os-1./16.*x12+1./32.*x12s
     #    )
      gz20c= gz20c+rt1wg(10)*vvc*gsm2*ys*bxp*csti*(
     #    -5./2.+7./4.*zi*o*x12*tx+13*zi*o*x12-4*zi*o*x12s+7./
     #    4.*zi*o*txs-9*zi*o-23./4.*zi*os*x12+33./4.*zi*os-5./2.
     #    *zi*oc-7./4.*zi*x12*tx+7./4.*zi*x12*txs-29./4.*zi*x12
     #    +7./4.*zi*tx*x12s+19./4.*zi*x12s-3./4.*zi*x12c-7./4.*
     #    zi*txs+13./4.*zi+1./32.*o*x12*x2z+1./32.*o*x12*tx-13./
     #    4.*o*x12-1./16.*o*x2z+5*o+1./32.*os*x12+1./32.*os*x2z
     #    -81./32.*os+1./32.*oc-1./32.*x12*x2z-1./32.*x12*tx+
     #    13./4.*x12+1./32.*x2z+1./32.*tx*x12s-3./4.*x12s)
      gz20c= gz20c+rt1wg(10)*vvc*gsm2*ys*bxp*(-1./16.*o
     #    *x12*x2z-1./16.*o*x12*tx+1./8.*o*x2z-1./16.*os*x12-1./
     #    16.*os*x2z+1./16.*os-1./16.*oc+1./16.*x12*x2z+1./16.*
     #    x12*tx-1./16.*x2z-1./16.*tx*x12s)
      gz20c= gz20c+rt1wg(10)*vvc*gsm2*ys*csti*(37./
     #    8.-25./4.*zi*o*x12*tx+19./4.*zi*o*x12*txs-117./4.*zi*o*
     #    x12+3*zi*o*tx*x12s+29./2.*zi*o*x12s-3./2.*zi*o*x12c-8
     #    *zi*o*txs+65./4.*zi*o+3./2.*zi*os*x12*tx+24*zi*os*x12
     #    -43./8.*zi*os*x12s+19./8.*zi*os*txs-21*zi*os-25./4.*
     #    zi*oc*x12+47./4.*zi*oc-19./8.*zi*oq+19./4.*zi*x12*tx-
     #    8*zi*x12*txs+23./2.*zi*x12-25./4.*zi*tx*x12s+3./2.*zi*
     #    tx*x12c+19./8.*zi*x12s*txs-73./8.*zi*x12s+9./4.*zi*x12c
     #    +19./4.*zi*txs-37./8.*zi+3./2.*o*x12*x2z+3./2.*o*x12*
     #    tx-1./32.*o*x12*txs+43./4.*o*x12-19./4.*o*x2z-3./2.*o
     #    *x12s+1./32.*o*x2zs+13./4.*o*txs-93./8.*o-1./32.*os*
     #    x12*x2z-31./8.*os*x12+77./32.*os*x2z-1./64.*os*x2zs-1.
     #    /64.*os*txs+75./8.*os-1./32.*oc*x2z-19./8.*oc+1./32.*
     #    x12*x2z*tx-3./2.*x12*x2z-13./4.*x12*tx+13./4.*x12*txs
     #    -55./8.*x12+19./8.*x2z+3./2.*tx*x12s-1./64.*x12s*txs
     #    +9./4.*x12s)
      gz20c= gz20c+rt1wg(10)*vvc*gsm2*ys*csti*(-1.
     #    /64.*x2zs-13./4.*txs)
      gz20c= gz20c+rt1wg(10)*vvc*gsm2*ys*(1./16.*o*x12*
     #    txs-1./16.*o*x2zs+1./16.*os*x12*x2z-1./16.*os*x2z+1./
     #    32.*os*x2zs+1./32.*os*txs+1./16.*oc*x2z-1./16.*x12*x2z*
     #    tx+1./32.*x12s*txs+1./32.*x2zs)
      gz20c= gz20c+rt1wg(11)*vvc*gsm2*bxps*ys*csti*(
     #    1./16.+1./2.*zi*o+1./2.*zi*x12-1./2.*zi-1./16.*o-1./
     #    16.*x12)
      gz20c= gz20c+rt1wg(11)*vvc*gsm2*bxps*ys*(-1./8.
     #    +1./8.*o+1./8.*x12)
      gz20c= gz20c+rt1wg(11)*vvc*gsm2*ys*bxp*csti*(
     #    -1+zi*o*x12+zi*o*tx-2*zi*o+zi*os-zi*x12-1./2.*
     #    zi*tx+zi*txs+zi+1./16.*o*x12+1./16.*o*x2z+17./16.*o
     #    -1./16.*os+1./8.*x12*tx+1./2.*x12-1./16.*x2z+15./16.
     #    *tx)
      gz20c= gz20c+rt1wg(11)*vvc*gsm2*ys*bxp*(-1./8.*o*
     #    x12-1./8.*o*x2z-1./8.*o+1./8.*os-1./4.*x12*tx+1./8.
     #    *x2z+1./8.*tx)
      gz20c= gz20c+rt1wg(11)*vvc*gsm2*ys*csti*(1./2.
     #    +zi*o*x12*tx-zi*o*x12-3./2.*zi*o*tx+1./2.*zi*o*txs+
     #    3./2.*zi*o+1./2.*zi*os*x12+zi*os*tx-3./2.*zi*os+1./2.
     #    *zi*oc+1./2.*zi*x12*txs+1./2.*zi*x12+1./2.*zi*tx-zi*
     #    txs-1./2.*zi-1./16.*o*x12*tx+1./16.*o*x2z*tx-9./16.*o
     #    *x2z+o*tx-1./16.*o*txs-o+1./16.*os*x2z-1./16.*os*tx
     #    +1./2.*os-1./2.*x12*tx-1./16.*x12*txs-15./16.*x2z*tx
     #    +1./2.*x2z-1./2.*tx+txs)
      gz20c= gz20c+rt1wg(11)*vvc*gsm2*ys*(1./8.*o*x12*tx
     #    -1./8.*o*x2z*tx+1./8.*o*x2z+1./8.*o*txs-1./8.*os*x2z
     #    +1./8.*os*tx+1./8.*x12*txs-1./8.*x2z*tx)
      gz20c= gz20c+rt1wg(12)*xx*vvc*gsm2*ys*csti*(
     #    -12*zi*o*x12*tx+6*zi*o*x12*txs+3*zi*o*tx*x12s+9*zi*o*
     #    tx-9*zi*o*txs+6*zi*os*x12*tx-9*zi*os*tx+3*zi*os*txs
     #    +3*zi*oc*tx+6*zi*x12*tx-9*zi*x12*txs-3*zi*tx*x12s-3
     #    *zi*tx+3*zi*x12s*txs+6*zi*txs+3*o*x12*tx-3*o*x2z*tx
     #    -6*o*tx+3*o*txs+3*os*tx-3*x12*tx+3*x12*txs+3*x2z*
     #    tx+3*tx-6*txs)
      gz20c= gz20c+rt1wg(12)*bxpi*vvc*gsm2*ys*csti*(
     #    -6*zi*o*x12*tx+6*zi*o*tx-6*zi*o*txs-3*zi*os*tx+6*zi
     #    *x12*tx-6*zi*x12*txs-3*zi*tx*x12s-3*zi*tx+6*zi*txs-
     #    3*o*tx-3*x12*tx+3*tx)
      gz20c= gz20c+rt1wg(12)*vvc*gsm2*ys*bxp*csti*(7.
     #    /16.-1./2.*zi*o*tx-1./2.*zi*x12*tx+1./2.*zi*tx-1./16.
     #    *o*x12-3./8.*o-1./16.*os-7./16.*x12)
      gz20c= gz20c+rt1wg(12)*vvc*gsm2*ys*bxp*(1./8.+1./
     #    8.*o*x12-1./4.*o+1./8.*os-1./8.*x12)
      gz20c= gz20c+rt1wg(12)*vvc*gsm2*ys*csti*(11./
     #    2.*zi*o*x12*tx-5*zi*o*tx+11./2.*zi*o*txs+5./2.*zi*os*tx
     #    -11./2.*zi*x12*tx+11./2.*zi*x12*txs+3*zi*tx*x12s+5./2.
     #    *zi*tx-6*zi*txs+1./16.*o*x12*tx+1./2.*o*x2z+31./16.*o
     #    *tx-1./16.*os*x2z+1./16.*os*tx+39./16.*x12*tx-7./16.*
     #    x2z-5./2.*tx)
      gz20c= gz20c+rt1wg(12)*vvc*gsm2*ys*(-1./8.*o*x12
     #    *tx+1./8.*o*tx+1./8.*os*x2z-1./8.*os*tx+1./8.*x12*tx
     #    -1./8.*x2z)
      gz20c= gz20c+rt1wg(13)*xx*vvc*gsm2*ys*csti*(6
     #    *zi*o*x12*txs-6*zi*o*txs+3*zi*os*txs-6*zi*x12*txs+3*
     #    zi*x12s*txs+3*zi*txs+3*o*txs+3*x12*txs-3*txs)
      gz20c= gz20c+rt1wg(13)*bxpi*vvc*gsm2*ys*csti*(
     #    -3*zi*o*txs-3*zi*x12*txs+3*zi*txs)
      gz20c= gz20c+rt1wg(13)*vvc*gsm2*ys*bxp*csti*(
     #    -9./32.+9./32.*o+9./32.*x12)
      gz20c= gz20c+rt1wg(13)*vvc*gsm2*ys*bxp*(1./16.-1./
     #    16.*o-1./16.*x12)
      gz20c= gz20c+rt1wg(13)*vvc*gsm2*ys*csti*(5./2.
     #    *zi*o*txs+5./2.*zi*x12*txs-3*zi*txs-11./32.*o*x2z-7./
     #    32.*o*tx+1./16.*os*x2z-25./32.*x12*tx+9./32.*x2z)
      gz20c= gz20c+rt1wg(13)*vvc*gsm2*ys*(3./16.*o*x2z
     #    -1./16.*o*tx-1./8.*os*x2z+1./16.*x12*tx-1./16.*x2z)
      gz20c= gz20c+rt1wg(14)*xx*vvc*gsm2*ys*csti*(
     #    -6*zi*o*x12*tx-3*zi*o*x12*txs+3./2.*zi*o*tx*x12s+9./2.
     #    *zi*o*tx+3./2.*zi*o*txs+3*zi*os*x12*tx-9./2.*zi*os*tx
     #    -3./2.*zi*os*txs+3./2.*zi*oc*tx+3*zi*x12*tx+3./2.*zi*
     #    x12*txs-3./2.*zi*tx*x12s-3./2.*zi*tx-3./2.*zi*x12s*txs
     #    +3./2.*o*x12*tx-3./2.*o*x2z*tx-3*o*tx-3./2.*o*txs+3.
     #    /2.*os*tx-3./2.*x12*tx-3./2.*x12*txs+3./2.*x2z*tx+3./
     #    2.*tx)
      gz20c= gz20c+rt1wg(14)*bxpi*vvc*gsm2*ys*csti*(
     #    -9./2.*zi*o*x12*tx+6*zi*o*tx+3./2.*zi*o*txs-3*zi*os*
     #    tx+9./2.*zi*x12*tx+3./2.*zi*x12*txs-3./2.*zi*tx*x12s-
     #    3*zi*tx-3*o*tx-3./2.*x12*tx+3*tx)
      gz20c= gz20c+rt1wg(14)*vvc*gsm2*bxps*ys*csti*(
     #    1./32.-1./4.*zi*o-1./4.*zi*x12+1./4.*zi-1./32.*o-1./
     #    32.*x12)
      gz20c= gz20c+rt1wg(14)*vvc*gsm2*bxps*ys*(-1./16.
     #    +1./16.*o+1./16.*x12)
      gz20c= gz20c+rt1wg(14)*vvc*gsm2*ys*bxp*csti*(1.
     #    /2.-1./2.*zi*o*x12+5./4.*zi*o*tx+zi*o-1./2.*zi*os+7.
     #    /4.*zi*x12*tx+1./2.*zi*x12-3./2.*zi*tx+1./2.*zi*txs-1.
     #    /2.*zi+1./32.*o*x2z-9./16.*o+1./16.*os+1./16.*x12*tx
     #    -1./4.*x12-1./32.*x2z+15./32.*tx)
      gz20c= gz20c+rt1wg(14)*vvc*gsm2*ys*bxp*(-1./16.*o
     #    *x2z+1./8.*o-1./8.*os-1./8.*x12*tx+1./16.*x2z+1./16.
     #    *tx)
      gz20c= gz20c+rt1wg(14)*vvc*gsm2*ys*csti*(-1.
     #    /4.+17./4.*zi*o*x12*tx+1./2.*zi*o*x12-29./4.*zi*o*tx-
     #    zi*o*txs-3./4.*zi*o-1./4.*zi*os*x12+11./4.*zi*os*tx+3.
     #    /4.*zi*os-1./4.*zi*oc-25./4.*zi*x12*tx-zi*x12*txs-1./
     #    4.*zi*x12+3./2.*zi*tx*x12s+9./2.*zi*tx-1./2.*zi*txs+1.
     #    /4.*zi+1./32.*o*x2z*tx+5./16.*o*x2z+11./4.*o*tx-1./32.
     #    *o*txs+1./2.*o-1./16.*os*x2z-1./4.*os+7./4.*x12*tx-
     #    1./32.*x12*txs-15./32.*x2z*tx-1./4.*x2z-3*tx+1./2.*
     #    txs)
      gz20c= gz20c+rt1wg(14)*vvc*gsm2*ys*(-1./16.*o*
     #    x2z*tx-1./8.*o*x2z+1./16.*o*txs+1./8.*os*x2z+1./16.*
     #    x12*txs-1./16.*x2z*tx)
      gz20c= gz20c+rs1wz(1)*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)
      gz20c= gz20c+rs1wz(1)*bxpi*vvc*gtm2*ys*(-6*o*tx
     #    -2*o+4*os-2*x12*tx+2*tx)
      gz20c= gz20c+rs1wz(1)*vvc*gtm2*ys*bxp*(1./3.-1./3.
     #    *o-1./3.*x12)
      gz20c= gz20c+rs1wz(1)*vvc*gtm2*ys*(1./3.*o*x2z+
     #    19./3.*o*tx+7./3.*o-4*os+7./3.*x12*tx+1./3.*x12-1./
     #    3.*x2z-2*tx)
      gz20c= gz20c+rs1wz(4)*xx*vvc*gtm2*ys*(1./2.*o*x2z*
     #    txs-1./2.*o*tx*x2zs+o*x2zs+1./2.*x12*x2z*txs-1./2.*tx
     #    *x2zs)
      gz20c= gz20c+rs1wz(4)*bxpi*vvc*gtm2*ys*(-1./2.*o*
     #    x12*x2z+2*o*x2z+1./2.*o*txs-1./2.*os*x2z+1./2.*x12*
     #    x2z*tx+1./2.*x12*txs-x2z*tx)
      gz20c= gz20c+rs1wz(4)*vvc*gtm2*ys*bxp*(-7./12.*o*
     #    x12+7./12.*o*tx+13./12.*o-1./2.*os+7./12.*x12*tx+1./
     #    6.*x12-7./12.*tx-1./12.*x12s)
      gz20c= gz20c+rs1wz(4)*vvc*gtm2*ys*(5./12.*o*x12*
     #    x2z+1./12.*o*x12*tx+1./2.*o*x12+1./12.*o*x2z*tx-25./
     #    12.*o*x2z-1./2.*o*tx-7./12.*o*txs-o+1./2.*os*x2z+1./
     #    2.*os-1./2.*x12*x2z*tx-1./6.*x12*x2z-1./2.*x12*tx-7./
     #    12.*x12*txs+13./12.*x2z*tx+1./12.*tx*x12s+1./2.*tx)
      gz20c= gz20c+rs1wz(7)*xx*vvc*gtm2*ys*(-1./4.*o*
     #    x2z*txs-1./4.*o*tx*x2zs-1./4.*x12*x2z*txs+1./4.*tx*x2zs
     #    )
      gz20c= gz20c+rs1wz(7)*bxpi*vvc*gtm2*ys*(-1./4.*o*
     #    x12*x2z-1./4.*o*x2z*tx-1./4.*os*x2z-1./4.*x12*x2z*tx+
     #    1./4.*x2z*tx)
      gz20c= gz20c+rs1wz(7)*vvc*gtm2*ys*bxp*(-1./24.*os
     #    -1./12.*x12+1./24.*x12s)
      gz20c= gz20c+rs1wz(7)*vvc*gtm2*ys*(1./4.*o*x12*x2z
     #    -1./12.*o*x12*tx+1./4.*o*x2z*tx+1./24.*o*x12s+1./12.*
     #    os*x12+1./4.*os*x2z-1./24.*os*tx+1./24.*oc+1./4.*x12*
     #    x2z*tx+1./12.*x12*x2z-1./4.*x2z*tx-1./24.*tx*x12s)
      gz20c= gz20c+rs1wz(8)*bxpi*vvc*gtm2*ys*(1./2.*o*x2z
     #    *tx-o*x2z-1./2.*o*txs-1./2.*x12*txs+1./2.*x2z*tx)
      gz20c= gz20c+rs1wz(8)*vvc*gtm2*ys*bxp*(7./12.*o*x12
     #    -7./12.*o*tx-13./12.*o+7./12.*os-7./12.*x12*tx+7./
     #    12.*tx)
      gz20c= gz20c+rs1wz(8)*vvc*gtm2*ys*(1./12.*o*x12*tx
     #    -1./2.*o*x12-7./12.*o*x2z*tx+13./12.*o*x2z+1./2.*o*tx
     #    +7./12.*o*txs+o-1./12.*os*x2z+1./12.*os*tx-1./2.*os
     #    +1./2.*x12*tx+7./12.*x12*txs-7./12.*x2z*tx-1./2.*tx)
      gz20c= gz20c+rs1wz(9)*bxpi*vvc*gtm2*ys*(2*o*tx-2*
     #    os)
      gz20c= gz20c+rs1wz(9)*vvc*gtm2*ys*(-7./3.*o*tx
     #    +2*os)
      gz20c= gz20c+rs1wz(10)*xx*vvc*gtm2*ys*(1./4.*o*x2z
     #    *txs+1./4.*o*tx*x2zs+1./4.*x12*x2z*txs-1./4.*tx*x2zs)
      gz20c= gz20c+rs1wz(10)*bxpi*vvc*gtm2*ys*(1./4.*o*
     #    x12*x2z+1./2.*o*x2z*tx+1./4.*o*txs+1./4.*os*x2z+1./4.
     #    *x12*x2z*tx+1./4.*x12*txs-1./2.*x2z*tx)
      gz20c= gz20c+rs1wz(10)*vvc*gtm2*ys*bxp*(7./24.*o*
     #    x12+7./24.*o*tx-1./24.*o+1./3.*os+7./24.*x12*tx+1./
     #    12.*x12-7./24.*tx-1./24.*x12s)
      gz20c= gz20c+rs1wz(10)*vvc*gtm2*ys*(-1./4.*o*x12
     #    *x2z+1./24.*o*x12*tx-1./4.*o*x12-13./24.*o*x2z*tx+1./
     #    24.*o*x2z-1./4.*o*tx-1./24.*o*x12s-7./24.*o*txs-1./12.
     #    *os*x12-7./24.*os*x2z-1./4.*os-1./24.*oc-1./4.*x12*
     #    x2z*tx-1./12.*x12*x2z-1./4.*x12*tx-7./24.*x12*txs+13./
     #    24.*x2z*tx+1./24.*tx*x12s+1./4.*tx)
      gz20c= gz20c+rs1wz(11)*vvc*gtm2*ys*bxp*(1./6.-1./
     #    6.*o-1./6.*x12)
      gz20c= gz20c+rs1wz(11)*vvc*gtm2*ys*(1./6.*o*x12+
     #    1./6.*o*x2z-1./6.*o*tx+1./6.*os+1./6.*x12*tx-1./6.*
     #    x2z)
      gz20c= gz20c+rs1wz(12)*xx*vvc*gtm2*ys*(o*x12*tx+
     #    o*x2z*tx-o*x2z-o*txs-os*x12-os*x2z+os*tx-oc-x12
     #    *txs+x2z*tx)
      gz20c= gz20c+rs1wz(12)*bxpi*vvc*gtm2*ys*(-o*tx-
     #    o-x12*tx+tx)
      gz20c= gz20c+rs1wz(12)*vvc*gtm2*ys*(o*tx+7./6.*o
     #    +x12*tx+1./6.*x12-tx)
      gz20c= gz20c+rs1wz(13)*xx*vvc*gtm2*ys*(1./2.*o*x12
     #    *tx-1./2.*o*x2z*tx-1./2.*o*x2z-1./2.*o*txs-1./2.*os*
     #    x12+1./2.*os*x2z+1./2.*os*tx-1./2.*oc-1./2.*x12*txs
     #    +1./2.*x2z*tx)
      gz20c= gz20c+rs1wz(13)*bxpi*vvc*gtm2*ys*(-1./2.*o
     #    *tx-1./2.*o-1./2.*x12*tx+1./2.*tx)
      gz20c= gz20c+rs1wz(13)*vvc*gtm2*ys*(1./4.*o*x12+
     #    1./2.*o*tx+1./4.*o+1./4.*os+1./2.*x12*tx+1./12.*x12
     #    -1./2.*tx)
      gz20c= gz20c+rs1wz(14)*xx*vvc*gtm2*ys*(o*x2z*tx-
     #    os*x2z)
      gz20c= gz20c+rs1wz(14)*bxpi*vvc*gtm2*ys*(o*tx-os
     #    )
      gz20c= gz20c+rs1wz(14)*vvc*gtm2*ys*bxp*(1./12.-1./
     #    12.*o-1./12.*x12)
      gz20c= gz20c+rs1wz(14)*vvc*gtm2*ys*(-1./6.*o*x12
     #    +1./12.*o*x2z-11./12.*o*tx+5./6.*os+1./12.*x12*tx-1.
     #    /12.*x2z)
      gz20c= gz20c+rs2wz(1)*xx*vvq*gtm2*yc*(-6*o*x2z*
     #    txs-6*x12*x2z*txs+6*x2z*txs)
      gz20c= gz20c+rs2wz(1)*bxpi*vvq*gtm2*yc*(-9./2.*o*
     #    x2z*tx-21./2.*o*txs-21./2.*x12*txs+9./2.*x2z*tx+6*txs
     #    )
      gz20c= gz20c+rs2wz(1)*vvq*gtm2*bxps*yc*(-1+o+
     #    x12)
      gz20c= gz20c+rs2wz(1)*vvq*gtm2*yc*bxp*(1+o*x12-
     #    o*x2z-19./2.*o*tx-3*o+2*os-15./2.*x12*tx-x12-x2z*
     #    tx+x2z+13./2.*tx+txs)
      gz20c= gz20c+rs2wz(1)*vvq*gtm2*yc*(3./2.*o*x12*tx
     #    +6*o*x2z*tx+2*o*x2z+15./2.*o*tx+21./2.*o*txs-os*x2z
     #    +1./2.*os*tx+2*x12*x2z*tx+9./2.*x12*tx+21./2.*x12*txs
     #    -13./2.*x2z*tx-x2z*txs-x2z+tx*x12s+tx*x2zs-9./2.*
     #    tx-6*txs)
      gz20c= gz20c+rs2wz(4)*xx*vvq*gtm2*yc*(3./4.*o*x12*
     #    tx*x2zs-3./4.*o*tx*x2zc-3./4.*o*tx*x2zs+3./2.*o*x2zc+
     #    3./4.*o*x2zs*txs+3./4.*os*tx*x2zs-3./4.*os*x2zc+3./4.*
     #    x12*tx*x2zs+3./4.*x12*x2zs*txs+3./4.*tx*x2zc-3./4.*x2zc
     #    -3./2.*x2zs*txs)
      gz20c= gz20c+rs2wz(4)*bxpi*vvq*gtm2*yc*(9./8.*o*x12
     #    *x2z*tx-3./2.*o*x12*x2zs-3./2.*o*x2z*tx+21./8.*o*x2z*
     #    txs-15./8.*o*tx*x2zs+39./8.*o*x2zs+15./8.*os*x2z*tx-
     #    21./8.*os*x2zs+3./2.*x12*x2z*tx+21./8.*x12*x2z*txs-3./4.
     #    *x12*tx*x2zs+3./2.*x12*x2zs-3./4.*x2z*tx*x12s-3*x2z*txs
     #    +9./8.*tx*x2zs-9./4.*x2zs)
      gz20c= gz20c+rs2wz(4)*vvq*gtm2*bxps*yc*(1+5./2.*o
     #    *x12-1./2.*o*tx-5./2.*o+3./2.*os-1./2.*x12*tx-2*x12
     #    +1./2.*tx+x12s)
      gz20c= gz20c+rs2wz(4)*vvq*gtm2*yc*bxp*(-3./4.-
     #    61./16.*o*x12*x2z+3./8.*o*x12*tx-27./16.*o*x12-15./16.*
     #    o*x2z*tx+101./16.*o*x2z-9./16.*o*tx-3./16.*o*x12s+9./
     #    4.*o*txs+15./8.*o-1./8.*os*x12-57./16.*os*x2z+23./16.
     #    *os*tx-19./16.*os+1./16.*oc-7./16.*x12*x2z*tx+7./2.*
     #    x12*x2z+23./16.*x12*tx+9./4.*x12*txs+3./2.*x12-1./16.
     #    *x2z*tx-3./4.*x2z*x12s-11./4.*x2z-17./16.*tx*x12s-3./
     #    8.*tx-3./4.*x12s-7./4.*txs)
      gz20c= gz20c+rs2wz(4)*vvq*gtm2*yc*(-11./8.*o*x12
     #    *x2z*tx+51./16.*o*x12*x2z-3./8.*o*x12*tx+3./2.*o*x12*
     #    x2zs+1./8.*o*x12*txs+39./16.*o*x2z*tx-45./16.*o*x2z*txs
     #    -21./4.*o*x2z+1./16.*o*tx*x12s+33./16.*o*tx*x2zs+3./4.
     #    *o*tx-85./16.*o*x2zs-15./8.*o*txs-1./16.*os*x12*x2z+1.
     #    /8.*os*x12*tx-17./8.*os*x2z*tx+49./16.*os*x2z-9./8.*os*
     #    tx+45./16.*os*x2zs+1./16.*os*txs-1./16.*oc*x2z+1./16.
     #    *oc*tx-23./16.*x12*x2z*tx-45./16.*x12*x2z*txs-3*x12*x2z
     #    +3./4.*x12*tx*x2zs-3./4.*x12*tx-3./2.*x12*x2zs-15./8.
     #    *x12*txs+3./4.*x2z*tx*x12s+3./4.*x2z*x12s+13./4.*x2z*
     #    txs+9./4.*x2z+3./4.*tx*x12s-19./16.*tx*x2zs+1./16.*
     #    x12s*txs+5./2.*x2zs+3./2.*txs)
      gz20c= gz20c+rs2wz(7)*xx*vvq*gtm2*yc*(-3./4.*o*
     #    x12*x2z*txs+3./4.*o*x2zc-3./4.*o*x2zs*txs-3./8.*os*x2z*
     #    txs-3./8.*os*x2zc+3./4.*x12*tx*x2zs-3./4.*x12*x2zs*txs
     #    -3./8.*x2z*x12s*txs-3./8.*x2zc+3./4.*x2zs*txs)
      gz20c= gz20c+rs2wz(7)*bxpi*vvq*gtm2*yc*(-15./16.*
     #    o*x12*x2z*tx-3./4.*o*x12*x2zs-15./16.*o*x2z*txs-3./16.*
     #    o*tx*x2zs+27./16.*o*x2zs-3./16.*os*x2z*tx-15./16.*os*
     #    x2zs+3./4.*x12*x2z*tx-15./16.*x12*x2z*txs+3./4.*x12*
     #    x2zs-3./4.*x2z*tx*x12s+3./4.*x2z*txs+3./16.*tx*x2zs-3.
     #    /4.*x2zs)
      gz20c= gz20c+rs2wz(7)*vvq*gtm2*yc*bxp*(-29./32.*o
     #    *x12*x2z+1./16.*o*x12*tx-3./32.*o*x12-5./32.*o*x2z*tx
     #    +29./32.*o*x2z-3./32.*o*tx+1./32.*o*x12s-1./8.*o*txs
     #    +1./16.*o+3./16.*os*x12-17./32.*os*x2z+1./32.*os*tx
     #    -7./32.*os+5./32.*oc-5./32.*x12*x2z*tx+3./4.*x12*x2z
     #    -3./32.*x12*tx-1./8.*x12*txs+5./32.*x2z*tx-3./8.*x2z*
     #    x12s-3./8.*x2z+1./32.*tx*x12s+1./16.*tx+1./8.*txs)
      gz20c= gz20c+rs2wz(7)*vvq*gtm2*yc*(7./8.*o*x12*x2z
     #    *tx+31./32.*o*x12*x2z+1./16.*o*x12*tx+3./4.*o*x12*x2zs
     #    -1./16.*o*x12*txs+9./32.*o*x2z*tx+33./32.*o*x2z*txs-o
     #    *x2z-1./32.*o*tx*x12s+5./32.*o*tx*x2zs-53./32.*o*x2zs
     #    +1./16.*o*txs-5./32.*os*x12*x2z-1./16.*os*x12*tx+1./8.
     #    *os*x2z*tx+25./32.*os*x2z+1./16.*os*tx+29./32.*os*x2zs
     #    -1./32.*os*txs-5./32.*oc*x2z-1./32.*oc*tx-17./32.*x12
     #    *x2z*tx+33./32.*x12*x2z*txs-3./4.*x12*x2z-3./4.*x12*
     #    x2zs+1./16.*x12*txs+3./4.*x2z*tx*x12s-1./4.*x2z*tx+3./
     #    8.*x2z*x12s-7./8.*x2z*txs+3./8.*x2z-5./32.*tx*x2zs-1./
     #    32.*x12s*txs+3./4.*x2zs)
      gz20c= gz20c+rs2wz(8)*bxpi*vvq*gtm2*yc*(-3./4.*o*
     #    x12*x2z*tx+3./4.*o*x2z*tx-3./4.*o*x2z*txs+3./4.*o*tx*
     #    x2zs-3./2.*o*x2zs-3./4.*os*x2z*tx+3./4.*os*x2zs-3./4.
     #    *x12*x2z*tx-3./4.*x12*x2z*txs+3./2.*x2z*txs-3./4.*tx*
     #    x2zs+3./4.*x2zs)
      gz20c= gz20c+rs2wz(8)*vvq*gtm2*bxps*yc*(-3./4.-
     #    2*o*x12+1./2.*o*tx+2*o-5./4.*os+1./2.*x12*tx+3./2.*
     #    x12-1./2.*tx-3./4.*x12s)
      gz20c= gz20c+rs2wz(8)*vvq*gtm2*yc*bxp*(3./4.+13./
     #    8.*o*x12*x2z-3./4.*o*x12*tx+13./8.*o*x12+9./8.*o*x2z*tx
     #    -29./8.*o*x2z+5./8.*o*tx+1./8.*o*x12s-2*o*txs-7./4.
     #    *o+1./4.*os*x12+17./8.*os*x2z-11./8.*os*tx+7./8.*os
     #    +1./8.*oc+5./8.*x12*x2z*tx-3./2.*x12*x2z-7./8.*x12*tx
     #    -2*x12*txs-3./2.*x12-1./8.*x2z*tx+3./2.*x2z+5./8.*
     #    tx*x12s+1./4.*tx+3./4.*x12s+3./2.*txs)
      gz20c= gz20c+rs2wz(8)*vvq*gtm2*yc*(3./4.*o*x12*x2z
     #    *tx-11./8.*o*x12*x2z+1./4.*o*x12*tx+1./4.*o*x12*txs-
     #    15./8.*o*x2z*tx+7./8.*o*x2z*txs+13./4.*o*x2z+1./8.*o*tx
     #    *x12s-7./8.*o*tx*x2zs-3./4.*o*tx+13./8.*o*x2zs+7./4.*
     #    o*txs-1./8.*os*x12*x2z+1./4.*os*x12*tx+3./4.*os*x2z*tx
     #    -13./8.*os*x2z+os*tx-7./8.*os*x2zs+1./8.*os*txs-1./
     #    8.*oc*x2z+1./8.*oc*tx-1./8.*x12*x2z*tx+7./8.*x12*x2z*
     #    txs+3./2.*x12*x2z+3./4.*x12*tx+7./4.*x12*txs+1./2.*
     #    x2z*tx-3./2.*x2z*txs-3./2.*x2z-3./4.*tx*x12s+5./8.*tx
     #    *x2zs+1./8.*x12s*txs-3./4.*x2zs-3./2.*txs)
      gz20c= gz20c+rs2wz(9)*bxpi*vvq*gtm2*yc*(3./2.*o*x2z
     #    *tx+3./2.*o*txs+3./2.*x12*txs-3./2.*x2z*tx)
      gz20c= gz20c+rs2wz(9)*vvq*gtm2*yc*bxp*(7./2.*o*tx
     #    +3./2.*x12*tx-3./2.*tx)
      gz20c= gz20c+rs2wz(9)*vvq*gtm2*yc*(-1./2.*o*x12*
     #    tx-2*o*x2z*tx-5./2.*o*tx-3./2.*o*txs-1./2.*os*tx-3./
     #    2.*x12*tx-3./2.*x12*txs+3./2.*x2z*tx+3./2.*tx)
      gz20c= gz20c+rs2wz(10)*xx*vvq*gtm2*yc*(3./4.*o*x12
     #    *x2z*txs-3./4.*o*x2zc+3./4.*o*x2zs*txs+3./8.*os*x2z*txs
     #    +3./8.*os*x2zc-3./4.*x12*tx*x2zs+3./4.*x12*x2zs*txs+3.
     #    /8.*x2z*x12s*txs+3./8.*x2zc-3./4.*x2zs*txs)
      gz20c= gz20c+rs2wz(10)*bxpi*vvq*gtm2*yc*(15./16.*o*
     #    x12*x2z*tx+3./4.*o*x12*x2zs+3./4.*o*x12*txs+27./16.*o*
     #    x2z*txs+3./16.*o*tx*x2zs-39./16.*o*x2zs+3./16.*os*x2z*
     #    tx+21./16.*os*x2zs+3./8.*os*txs-3./2.*x12*x2z*tx+27./
     #    16.*x12*x2z*txs-3./4.*x12*x2zs+3./4.*x2z*tx*x12s-3./2.*
     #    x2z*txs-3./16.*tx*x2zs+3./8.*x12s*txs+9./8.*x2zs)
      gz20c= gz20c+rs2wz(10)*vvq*gtm2*bxps*yc*(-3./8.
     #    -o*x12-1./4.*o*tx+o-5./8.*os-1./4.*x12*tx+3./4.*
     #    x12+1./4.*tx-3./8.*x12s)
      gz20c= gz20c+rs2wz(10)*vvq*gtm2*yc*bxp*(3./8.+55./
     #    32.*o*x12*x2z+17./16.*o*x12*tx+29./32.*o*x12+15./32.*o*
     #    x2z*tx-87./32.*o*x2z+5./32.*o*tx+1./32.*o*x12s+9./8.*
     #    o*txs-15./16.*o-1./16.*os*x12+51./32.*os*x2z+9./32.*
     #    os*tx+21./32.*os-3./32.*oc+7./32.*x12*x2z*tx-3./2.*
     #    x12*x2z-19./32.*x12*tx+9./8.*x12*txs-3./4.*x12-15./32.
     #    *x2z*tx+3./8.*x2z*x12s+9./8.*x2z+25./32.*tx*x12s-3./
     #    16.*tx+3./8.*x12s-7./8.*txs)
      gz20c= gz20c+rs2wz(10)*vvq*gtm2*yc*(-o*x12*x2z*
     #    tx-53./32.*o*x12*x2z-15./16.*o*x12*tx-3./4.*o*x12*x2zs
     #    -13./16.*o*x12*txs-11./32.*o*x2z*tx-59./32.*o*x2z*txs
     #    +21./8.*o*x2z-1./32.*o*tx*x12s-7./32.*o*tx*x2zs+79./
     #    32.*o*x2zs-15./16.*o*txs+3./32.*os*x12*x2z-1./16.*os*
     #    x12*tx-1./4.*os*x2z*tx-51./32.*os*x2z-3./16.*os*tx-43.
     #    /32.*os*x2zs-13./32.*os*txs+3./32.*oc*x2z-1./32.*oc*tx
     #    +43./32.*x12*x2z*tx-59./32.*x12*x2z*txs+3./2.*x12*x2z
     #    +3./4.*x12*tx+3./4.*x12*x2zs-15./16.*x12*txs-3./4.*
     #    x2z*tx*x12s+3./8.*x2z*tx-3./8.*x2z*x12s+13./8.*x2z*txs
     #    -9./8.*x2z-3./4.*tx*x12s+7./32.*tx*x2zs-13./32.*x12s*
     #    txs-9./8.*x2zs+3./4.*txs)
      gz20c= gz20c+rs2wz(11)*vvq*gtm2*bxps*yc*(-1./2.
     #    +1./2.*o+1./2.*x12)
      gz20c= gz20c+rs2wz(11)*vvq*gtm2*yc*bxp*(-5./8.*o*
     #    x12-3./4.*o*x2z+1./8.*o*tx-1./8.*o+1./8.*os-1./4.*
     #    x12*x2z-7./8.*x12*tx+1./4.*x12-1./2.*x2z*tx+3./4.*x2z
     #    +3./8.*tx-1./4.*x12s+1./2.*txs)
      gz20c= gz20c+rs2wz(11)*vvq*gtm2*yc*(1./4.*o*x12*
     #    x2z+3./8.*o*x12*tx-1./8.*o*x2z*tx+1./8.*o*x2z+1./4.*o
     #    *x2zs-1./8.*o*txs-1./8.*os*x2z+1./8.*os*tx+3./4.*x12*
     #    x2z*tx-1./4.*x12*x2z-1./8.*x12*txs-3./8.*x2z*tx-1./2.
     #    *x2z*txs+1./4.*tx*x12s+1./2.*tx*x2zs-1./4.*x2zs)
      gz20c= gz20c+rs2wz(12)*xx*vvq*gtm2*yc*(-3./2.*o*
     #    x2z*txs+3./2.*o*tx*x2zs-3./2.*x12*x2z*txs+3*x2z*txs-3.
     #    /2.*tx*x2zs)
      gz20c= gz20c+rs2wz(12)*bxpi*vvq*gtm2*yc*(9./4.*o*
     #    x2z*tx-15./4.*o*txs+3./2.*x12*x2z*tx-15./4.*x12*txs-3.
     #    /4.*x2z*tx+3*txs)
      gz20c= gz20c+rs2wz(12)*vvq*gtm2*yc*bxp*(1./2.+7./
     #    8.*o*x12+1./4.*o*x2z-9./8.*o*tx-9./8.*o+5./8.*os+1./
     #    4.*x12*x2z-9./8.*x12*tx-3./4.*x12-1./4.*x2z+9./8.*tx
     #    +1./4.*x12s)
      gz20c= gz20c+rs2wz(12)*vvq*gtm2*yc*(-1./4.*o*x12
     #    *x2z+3./8.*o*x12*tx-15./8.*o*x2z*tx+5./8.*o*x2z+3./4.
     #    *o*tx-1./4.*o*x2zs+29./8.*o*txs-1./8.*os*x2z+1./8.*os
     #    *tx-5./4.*x12*x2z*tx+1./4.*x12*x2z+3./4.*x12*tx+29./8.
     #    *x12*txs+3./8.*x2z*tx-1./2.*x2z+1./4.*tx*x12s-3./4.*
     #    tx+1./4.*x2zs-3*txs)
      gz20c= gz20c+rs2wz(13)*xx*vvq*gtm2*yc*(-3./2.*o*
     #    x2z*txs-3./2.*x12*x2z*txs+3./2.*x2z*txs)
      gz20c= gz20c+rs2wz(13)*bxpi*vvq*gtm2*yc*(-3./8.*o
     #    *x2z*tx-15./8.*o*txs-15./8.*x12*txs+3./8.*x2z*tx+3./2.
     #    *txs)
      gz20c= gz20c+rs2wz(13)*vvq*gtm2*yc*bxp*(-5./16.*o
     #    *x12-1./8.*o*x2z-7./16.*o*tx+3./16.*o-3./16.*os-1./
     #    8.*x12*x2z-7./16.*x12*tx+1./8.*x12+1./8.*x2z+7./16.*
     #    tx-1./8.*x12s)
      gz20c= gz20c+rs2wz(13)*vvq*gtm2*yc*(1./8.*o*x12*
     #    x2z+9./16.*o*x12*tx+9./16.*o*x2z*tx+1./16.*o*x2z+1./8.
     #    *o*tx+1./8.*o*x2zs+27./16.*o*txs-1./16.*os*x2z+3./16.
     #    *os*tx+3./8.*x12*x2z*tx-1./8.*x12*x2z+1./8.*x12*tx+27.
     #    /16.*x12*txs-7./16.*x2z*tx+3./8.*tx*x12s-3./8.*tx-1./
     #    8.*x2zs-3./2.*txs)
      gz20c= gz20c+rs2wz(14)*xx*vvq*gtm2*yc*(3./4.*o*x2z
     #    *txs+3./4.*o*tx*x2zs+3./4.*x12*x2z*txs-3./4.*tx*x2zs)
      gz20c= gz20c+rs2wz(14)*bxpi*vvq*gtm2*yc*(9./4.*o*
     #    x2z*tx+3./4.*o*txs+3./4.*x12*x2z*tx+3./4.*x12*txs-3./
     #    2.*x2z*tx)
      gz20c= gz20c+rs2wz(14)*vvq*gtm2*yc*bxp*(3./16.*o*
     #    x12+1./8.*o*x2z+19./16.*o*tx+3./16.*o-3./16.*os+1./
     #    8.*x12*x2z+7./16.*x12*tx-1./8.*x12-1./4.*x2z*tx-1./8.
     #    *x2z-7./16.*tx+1./8.*x12s+1./4.*txs)
      gz20c= gz20c+rs2wz(14)*vvq*gtm2*yc*(-1./8.*o*x12
     #    *x2z-3./16.*o*x12*tx-33./16.*o*x2z*tx-3./16.*o*x2z-3./
     #    2.*o*tx-1./8.*o*x2zs-11./16.*o*txs+3./16.*os*x2z-1./
     #    16.*os*tx-5./8.*x12*x2z*tx+1./8.*x12*x2z-3./4.*x12*tx
     #    -11./16.*x12*txs+19./16.*x2z*tx-1./4.*x2z*txs-1./8.*
     #    tx*x12s+1./4.*tx*x2zs+3./4.*tx+1./8.*x2zs)
      gz20c= gz20c+rt1wz(1)*vvc*gsm2*bxps*ys*(-1./2.+
     #    1./2.*o+1./2.*x12)
      gz20c= gz20c+rt1wz(1)*vvc*gsm2*ys*bxp*(1./2.+1./2.
     #    *o*x12-1./2.*o*x2z-2*o+3./2.*os-x12*tx-1./2.*x12+
     #    1./2.*x2z+1./2.*tx)
      gz20c= gz20c+rt1wz(1)*vvc*gsm2*ys*(-1./2.*o*x12*
     #    tx-1./2.*o*x2z*tx+o*x2z+1./2.*o*tx+1./2.*o*txs-1./2.
     #    *os*x2z-1./2.*os*tx+1./2.*x12*tx+1./2.*x12*txs-1./2.*
     #    x2z*tx-1./2.*x2z)
      gz20c= gz20c+rt1wz(4)*vvc*gsm2*bxps*ys*(1./8.+1./
     #    4.*o*x12-1./4.*o+1./8.*os-1./4.*x12+1./8.*x12s)
      gz20c= gz20c+rt1wz(4)*vvc*gsm2*ys*bxp*(-1./8.*o*
     #    x12*x2z-1./4.*o*x12*tx+1./8.*o*x12+3./8.*o*x2z-1./8.*
     #    o*x12s-1./8.*os*x2z-1./8.*os+1./8.*oc+1./4.*x12*x2z
     #    +1./4.*x12*tx-1./4.*x2z-1./4.*tx*x12s)
      gz20c= gz20c+rt1wz(4)*vvc*gsm2*ys*(-1./8.*o*x12*
     #    x2z*tx-1./8.*o*x12*x2z+1./4.*o*x12*txs+1./8.*o*tx*x12s
     #    -1./8.*o*x2zs-1./8.*os*x12*x2z+1./4.*os*x12*tx-1./8.*
     #    os*x2z*tx+1./8.*os*x2z+1./8.*os*txs-1./8.*oc*x2z+1./8.
     #    *oc*tx-1./4.*x12*x2z*tx+1./8.*x12s*txs+1./8.*x2zs)
      gz20c= gz20c+rt1wz(7)*vvc*gsm2*bxps*ys*(-1./16.
     #    -1./8.*o*x12+1./8.*o-1./16.*os+1./8.*x12-1./16.*
     #    x12s)
      gz20c= gz20c+rt1wz(7)*vvc*gsm2*ys*bxp*(1./8.*o*x12*
     #    x2z+1./8.*o*x12*tx-1./16.*o*x12-1./4.*o*x2z-1./16.*o*
     #    tx+1./16.*o+1./8.*os*x12+1./8.*os*x2z-3./16.*os+1./
     #    8.*oc-1./8.*x12*x2z-3./16.*x12*tx+1./8.*x2z+1./8.*tx*
     #    x12s+1./16.*tx)
      gz20c= gz20c+rt1wz(7)*vvc*gsm2*ys*(1./16.*o*x12*tx
     #    -1./8.*o*x12*txs+1./16.*o*x2z*tx-1./16.*o*x2z+1./8.*o
     #    *x2zs+1./16.*o*txs-1./8.*os*x12*x2z+3./16.*os*x2z+1./
     #    16.*os*tx-1./16.*os*x2zs-1./16.*os*txs-1./8.*oc*x2z+1.
     #    /8.*x12*x2z*tx+1./16.*x12*txs-1./16.*x2z*tx-1./16.*x12s
     #    *txs-1./16.*x2zs)
      gz20c= gz20c+rt1wz(8)*vvc*gsm2*ys*bxp*(-1./8.*o*
     #    x12+1./8.*o*tx+1./8.*o-1./8.*os+1./8.*x12*tx-1./8.*
     #    tx)
      gz20c= gz20c+rt1wz(8)*vvc*gsm2*ys*(-1./8.*o*x12*
     #    tx+1./8.*o*x2z*tx-1./8.*o*x2z-1./8.*o*txs+1./8.*os*
     #    x2z-1./8.*os*tx-1./8.*x12*txs+1./8.*x2z*tx)
      gz20c= gz20c+rt1wz(9)*vvc*gsm2*ys*(1./2.*o*tx)
      gz20c= gz20c+rt1wz(10)*vvc*gsm2*bxps*ys*(1./16.+1.
     #    /8.*o*x12-1./8.*o+1./16.*os-1./8.*x12+1./16.*x12s)
      gz20c= gz20c+rt1wz(10)*vvc*gsm2*ys*bxp*(-1./8.*o*
     #    x12*x2z-1./8.*o*x12*tx+1./4.*o*x2z-1./8.*os*x12-1./8.
     #    *os*x2z+1./8.*os-1./8.*oc+1./8.*x12*x2z+1./8.*x12*tx
     #    -1./8.*x2z-1./8.*tx*x12s)
      gz20c= gz20c+rt1wz(10)*vvc*gsm2*ys*(1./8.*o*x12*
     #    txs-1./8.*o*x2zs+1./8.*os*x12*x2z-1./8.*os*x2z+1./16.
     #    *os*x2zs+1./16.*os*txs+1./8.*oc*x2z-1./8.*x12*x2z*tx+
     #    1./16.*x12s*txs+1./16.*x2zs)
      gz20c= gz20c+rt1wz(11)*vvc*gsm2*bxps*ys*(-1./4.
     #    +1./4.*o+1./4.*x12)
      gz20c= gz20c+rt1wz(11)*vvc*gsm2*ys*bxp*(-1./4.*o*
     #    x12-1./4.*o*x2z-1./4.*o+1./4.*os-1./2.*x12*tx+1./4.
     #    *x2z+1./4.*tx)
      gz20c= gz20c+rt1wz(11)*vvc*gsm2*ys*(1./4.*o*x12*tx
     #    -1./4.*o*x2z*tx+1./4.*o*x2z+1./4.*o*txs-1./4.*os*x2z
     #    +1./4.*os*tx+1./4.*x12*txs-1./4.*x2z*tx)
      gz20c= gz20c+rt1wz(12)*vvc*gsm2*ys*bxp*(1./4.+1./
     #    4.*o*x12-1./2.*o+1./4.*os-1./4.*x12)
      gz20c= gz20c+rt1wz(12)*vvc*gsm2*ys*(-1./4.*o*x12
     #    *tx+1./4.*o*tx+1./4.*os*x2z-1./4.*os*tx+1./4.*x12*tx
     #    -1./4.*x2z)
      gz20c= gz20c+rt1wz(13)*vvc*gsm2*ys*bxp*(1./8.-1./
     #    8.*o-1./8.*x12)
      gz20c= gz20c+rt1wz(13)*vvc*gsm2*ys*(3./8.*o*x2z-
     #    1./8.*o*tx-1./4.*os*x2z+1./8.*x12*tx-1./8.*x2z)
      gz20c= gz20c+rt1wz(14)*vvc*gsm2*bxps*ys*(-1./8.
     #    +1./8.*o+1./8.*x12)
      gz20c= gz20c+rt1wz(14)*vvc*gsm2*ys*bxp*(-1./8.*o*
     #    x2z+1./4.*o-1./4.*os-1./4.*x12*tx+1./8.*x2z+1./8.*
     #    tx)
      gz20c= gz20c+rt1wz(14)*vvc*gsm2*ys*(-1./8.*o*x2z
     #    *tx-1./4.*o*x2z+1./8.*o*txs+1./4.*os*x2z+1./8.*x12*
     #    txs-1./8.*x2z*tx)
*
      gz30c= rs1wg(1)*bxpi*vvc*gtm2*ys*csti*(-1./6.*o*
     #    x2z-1./12.*o*tx+1./12.*os-1./24.*x12*x2z+1./12.*x2z*
     #    tx+1./12.*x2z)
      gz30c= gz30c+rs1wg(1)*bxpi*vvc*gtm2*ys*(2./3.*o*x2z
     #    +1./3.*o*tx-1./3.*os+1./6.*x12*x2z-1./3.*x2z*tx-1./
     #    3.*x2z)
      gz30c= gz30c+rs1wg(1)*vvc*gtm2*ys*bxp*csti*(1./
     #    16.-1./12.*o-1./24.*x12)
      gz30c= gz30c+rs1wg(1)*vvc*gtm2*ys*bxp*(-1./4.+1.
     #    /3.*o+1./6.*x12)
      gz30c= gz30c+rs1wg(1)*vvc*gtm2*ys*csti*(-1./
     #    12.-1./12.*o*x12+1./48.*o*x2z+1./48.*o*tx+1./3.*o-7.
     #    /48.*os-1./24.*x12*x2z+1./48.*x12*tx+1./8.*x12-1./16.
     #    *x2z-1./12.*tx-1./48.*x12s)
      gz30c= gz30c+rs1wg(1)*vvc*gtm2*ys*(1./3.+1./3.*o
     #    *x12-1./12.*o*x2z-1./12.*o*tx-4./3.*o+7./12.*os+1./
     #    6.*x12*x2z-1./12.*x12*tx-1./2.*x12+1./4.*x2z+1./3.*tx
     #    +1./12.*x12s)
      gz30c= gz30c+rs1wg(4)*bxpi*vvc*gtm2*ys*csti*(1.
     #    /96.*o*x2z*tx-1./96.*o*x2zs+1./96.*x12*x2z*tx-1./96.*
     #    x2zs)
      gz30c= gz30c+rs1wg(4)*bxpi*vvc*gtm2*ys*(-1./24.*o
     #    *x2z*tx+1./24.*o*x2zs-1./24.*x12*x2z*tx+1./24.*x2zs)
      gz30c= gz30c+rs1wg(4)*vvc*gtm2*bxps*ys*csti*(
     #    -1./192.+1./96.*o+1./96.*x12)
      gz30c= gz30c+rs1wg(4)*vvc*gtm2*bxps*ys*(1./48.-1./
     #    24.*o-1./24.*x12)
      gz30c= gz30c+rs1wg(4)*vvc*gtm2*ys*bxp*csti*(
     #    -1./96.-1./96.*o*x12-1./64.*o*x2z+1./192.*o*tx+1./
     #    192.*o-1./96.*x12*x2z+1./192.*x12*tx+1./64.*x12+1./96.
     #    *x2z-1./96.*x12s)
      gz30c= gz30c+rs1wg(4)*vvc*gtm2*ys*bxp*(1./24.+1./
     #    24.*o*x12+1./16.*o*x2z-1./48.*o*tx-1./48.*o+1./24.*
     #    x12*x2z-1./48.*x12*tx-1./16.*x12-1./24.*x2z+1./24.*
     #    x12s)
      gz30c= gz30c+rs1wg(4)*vvc*gtm2*ys*csti*(-1./
     #    192.*o*x12*x2z+1./96.*o*x12*tx-1./192.*o*x2z*tx+1./192.
     #    *o*x2z-1./96.*o*tx+1./192.*o*x2zs-1./192.*os*x2z+1./
     #    192.*os*tx-1./192.*x12*x2z*tx-1./64.*x12*x2z-1./96.*x12
     #    *tx+1./48.*x2z+1./192.*tx*x12s-1./192.*x2zs)
      gz30c= gz30c+rs1wg(4)*vvc*gtm2*ys*(1./48.*o*x12*
     #    x2z-1./24.*o*x12*tx+1./48.*o*x2z*tx-1./48.*o*x2z+1./
     #    24.*o*tx-1./48.*o*x2zs+1./48.*os*x2z-1./48.*os*tx+1./
     #    48.*x12*x2z*tx+1./16.*x12*x2z+1./24.*x12*tx-1./12.*x2z
     #    -1./48.*tx*x12s+1./48.*x2zs)
      gz30c= gz30c+rs1wg(7)*bxpi*vvc*gtm2*ys*csti*(1.
     #    /192.*o*x12*x2z-1./192.*o*x2z*tx+1./192.*os*x2z-1./192.
     #    *x12*x2z*tx-1./192.*x12*x2zs+1./192.*x2zs)
      gz30c= gz30c+rs1wg(7)*bxpi*vvc*gtm2*ys*(-1./48.*o
     #    *x12*x2z+1./48.*o*x2z*tx-1./48.*os*x2z+1./48.*x12*x2z*
     #    tx+1./48.*x12*x2zs-1./48.*x2zs)
      gz30c= gz30c+rs1wg(7)*vvc*gtm2*ys*bxp*csti*(1./
     #    192.+1./96.*o*x12+1./384.*os-1./96.*x12+1./128.*x12s
     #    )
      gz30c= gz30c+rs1wg(7)*vvc*gtm2*ys*bxp*(-1./48.-
     #    1./24.*o*x12-1./96.*os+1./24.*x12-1./32.*x12s)
      gz30c= gz30c+rs1wg(7)*vvc*gtm2*ys*csti*(-1./
     #    96.*o*x12*x2z-1./192.*o*x12*tx-1./192.*o*x12+1./192.*o*
     #    tx+1./384.*o*x12s+1./192.*os*x12-1./192.*os*x2z-1./
     #    384.*os*tx-1./192.*os+1./384.*oc+1./64.*x12*x2z+1./
     #    192.*x12*tx-1./192.*x2z*x12s-1./96.*x2z-1./384.*tx*x12s
     #    )
      gz30c= gz30c+rs1wg(7)*vvc*gtm2*ys*(1./24.*o*x12*
     #    x2z+1./48.*o*x12*tx+1./48.*o*x12-1./48.*o*tx-1./96.*o
     #    *x12s-1./48.*os*x12+1./48.*os*x2z+1./96.*os*tx+1./48.
     #    *os-1./96.*oc-1./16.*x12*x2z-1./48.*x12*tx+1./48.*x2z
     #    *x12s+1./24.*x2z+1./96.*tx*x12s)
      gz30c= gz30c+rs1wg(10)*bxpi*vvc*gtm2*ys*csti*(
     #    -1./192.*o*x12*x2z+1./192.*o*x2z*tx-1./192.*os*x2z+1./
     #    192.*x12*x2z*tx+1./192.*x12*x2zs-1./192.*x2zs)
      gz30c= gz30c+rs1wg(10)*bxpi*vvc*gtm2*ys*(1./48.*o*
     #    x12*x2z-1./48.*o*x2z*tx+1./48.*os*x2z-1./48.*x12*x2z*tx
     #    -1./48.*x12*x2zs+1./48.*x2zs)
      gz30c= gz30c+rs1wg(10)*vvc*gtm2*ys*bxp*csti*(
     #    -1./192.-1./96.*o*x12-1./384.*os+1./96.*x12-1./128.
     #    *x12s)
      gz30c= gz30c+rs1wg(10)*vvc*gtm2*ys*bxp*(1./48.+1./
     #    24.*o*x12+1./96.*os-1./24.*x12+1./32.*x12s)
      gz30c= gz30c+rs1wg(10)*vvc*gtm2*ys*csti*(1./
     #    96.*o*x12*x2z+1./192.*o*x12*tx+1./192.*o*x12-1./192.*o*
     #    tx-1./384.*o*x12s-1./192.*os*x12+1./192.*os*x2z+1./
     #    384.*os*tx+1./192.*os-1./384.*oc-1./64.*x12*x2z-1./
     #    192.*x12*tx+1./192.*x2z*x12s+1./96.*x2z+1./384.*tx*x12s
     #    )
      gz30c= gz30c+rs1wg(10)*vvc*gtm2*ys*(-1./24.*o*
     #    x12*x2z-1./48.*o*x12*tx-1./48.*o*x12+1./48.*o*tx+1./
     #    96.*o*x12s+1./48.*os*x12-1./48.*os*x2z-1./96.*os*tx-1.
     #    /48.*os+1./96.*oc+1./16.*x12*x2z+1./48.*x12*tx-1./48.
     #    *x2z*x12s-1./24.*x2z-1./96.*tx*x12s)
      gz30c= gz30c+rs1wg(11)*bxpi*vvc*gtm2*ys*csti*(
     #    -1./48.*o*x12-1./24.*o*x2z+1./48.*x12*tx+1./24.*x2z*
     #    tx)
      gz30c= gz30c+rs1wg(11)*bxpi*vvc*gtm2*ys*(1./12.*o*
     #    x12+1./6.*o*x2z-1./12.*x12*tx-1./6.*x2z*tx)
      gz30c= gz30c+rs1wg(11)*vvc*gtm2*ys*bxp*csti*(1.
     #    /24.-1./16.*o-1./32.*x12)
      gz30c= gz30c+rs1wg(11)*vvc*gtm2*ys*bxp*(-1./6.+
     #    1./4.*o+1./8.*x12)
      gz30c= gz30c+rs1wg(11)*vvc*gtm2*ys*csti*(1./
     #    48.*o*x12+1./24.*o*x2z+1./16.*o-1./24.*x2z-1./24.*tx
     #    )
      gz30c= gz30c+rs1wg(11)*vvc*gtm2*ys*(-1./12.*o*
     #    x12-1./6.*o*x2z-1./4.*o+1./6.*x2z+1./6.*tx)
      gz30c= gz30c+rs1wg(12)*bxpi*vvc*gtm2*ys*csti*(
     #    1./48.*o*x12-1./24.*o*tx+1./24.*os-1./48.*x12*x2z-1./
     #    48.*x12*tx+1./24.*x2z)
      gz30c= gz30c+rs1wg(12)*bxpi*vvc*gtm2*ys*(-1./12.*
     #    o*x12+1./6.*o*tx-1./6.*os+1./12.*x12*x2z+1./12.*x12*
     #    tx-1./6.*x2z)
      gz30c= gz30c+rs1wg(12)*vvc*gtm2*ys*bxp*csti*(
     #    -1./96.+1./48.*o+1./96.*x12)
      gz30c= gz30c+rs1wg(12)*vvc*gtm2*ys*bxp*(1./24.-1./
     #    12.*o-1./24.*x12)
      gz30c= gz30c+rs1wg(12)*vvc*gtm2*ys*csti*(-1.
     #    /24.-1./24.*o*x12-1./32.*o*x2z+1./96.*o*tx+1./16.*o
     #    -5./96.*os-1./48.*x12*x2z+1./96.*x12*tx+1./16.*x12+
     #    1./96.*x2z-1./96.*x12s)
      gz30c= gz30c+rs1wg(12)*vvc*gtm2*ys*(1./6.+1./6.*
     #    o*x12+1./8.*o*x2z-1./24.*o*tx-1./4.*o+5./24.*os+1./
     #    12.*x12*x2z-1./24.*x12*tx-1./4.*x12-1./24.*x2z+1./24.
     #    *x12s)
      gz30c= gz30c+rs1wg(13)*bxpi*vvc*gtm2*ys*csti*(
     #    1./96.*o*x12+1./96.*o*tx-1./96.*os-1./96.*x12*x2z-1./
     #    96.*x12*tx+1./96.*x2z)
      gz30c= gz30c+rs1wg(13)*bxpi*vvc*gtm2*ys*(-1./24.*
     #    o*x12-1./24.*o*tx+1./24.*os+1./24.*x12*x2z+1./24.*x12
     #    *tx-1./24.*x2z)
      gz30c= gz30c+rs1wg(13)*vvc*gtm2*ys*csti*(-1.
     #    /96.-1./64.*o*x12-1./64.*o+1./96.*os+1./64.*x12-1./
     #    192.*x12s)
      gz30c= gz30c+rs1wg(13)*vvc*gtm2*ys*(1./24.+1./16.
     #    *o*x12+1./16.*o-1./24.*os-1./16.*x12+1./48.*x12s)
      gz30c= gz30c+rs1wg(14)*bxpi*vvc*gtm2*ys*csti*(
     #    -1./96.*o*x2z+1./96.*x12*x2z+1./48.*x2z*tx)
      gz30c= gz30c+rs1wg(14)*bxpi*vvc*gtm2*ys*(1./24.*o*
     #    x2z-1./24.*x12*x2z-1./12.*x2z*tx)
      gz30c= gz30c+rs1wg(14)*vvc*gtm2*ys*bxp*csti*(1.
     #    /192.-1./96.*x12)
      gz30c= gz30c+rs1wg(14)*vvc*gtm2*ys*bxp*(-1./48.
     #    +1./24.*x12)
      gz30c= gz30c+rs1wg(14)*vvc*gtm2*ys*csti*(-1.
     #    /192.*o*x12+1./192.*o*x2z+1./64.*o*tx+1./96.*o-1./96.
     #    *os+1./64.*x12*tx-1./96.*x12-1./192.*x2z-1./48.*tx+
     #    1./192.*x12s)
      gz30c= gz30c+rs1wg(14)*vvc*gtm2*ys*(1./48.*o*x12
     #    -1./48.*o*x2z-1./16.*o*tx-1./24.*o+1./24.*os-1./16.
     #    *x12*tx+1./24.*x12+1./48.*x2z+1./12.*tx-1./48.*x12s)
      gz30c= gz30c+rs2wg(1)*bxpi*vvq*gtm2*yc*(-2*o*x2zs
     #    -2*x12*x2z*tx-2*x12*x2zs+2*x2z*tx+2*x2z*txs+2*x2zs
     #    )
      gz30c= gz30c+rs2wg(1)*vvq*gtm2*bxps*yc*(-2+2*o
     #    +2*x12)
      gz30c= gz30c+rs2wg(1)*vvq*gtm2*yc*bxp*(3+5*o*x12
     #    -3*o*x2z-o*tx-6*o+3*os-x12*x2z-3*x12*tx-6*x12
     #    -x2z*tx+3*x2z+3*tx+3*x12s+txs)
      gz30c= gz30c+rs2wg(1)*vvq*gtm2*yc*(-4*o*x12*x2z
     #    -o*x12*tx+7*o*x2z+2*o*tx+o*x2zs+o*txs-2*os*x2z+
     #    x12*x2z*tx+7*x12*x2z+4*x12*tx+x12*txs-3*x2z*tx-2*
     #    x2z*x12s-x2z*txs-5*x2z-tx*x12s+tx*x2zs-2*tx-x2zs
     #    -2*txs)
      gz30c= gz30c+rs2wg(4)*bxpi*vvq*gtm2*yc*(1./4.*o*x12
     #    *x2zs-1./4.*o*tx*x2zs+1./4.*o*x2zc+1./4.*x12*tx*x2zs+
     #    1./4.*tx*x2zc-1./4.*tx*x2zs-1./4.*x2zc-1./4.*x2zs*txs)
      gz30c= gz30c+rs2wg(4)*vvq*gtm2*bxps*yc*(3./8.+3./
     #    4.*o*x12-3./4.*o+3./8.*os-3./4.*x12+3./8.*x12s)
      gz30c= gz30c+rs2wg(4)*vvq*gtm2*yc*bxp*(-7./8.*o*
     #    x12*x2z-1./4.*o*x12*tx+1./4.*o*x12-1./4.*o*x2z*tx+13./
     #    8.*o*x2z+1./8.*o*tx-1./4.*o*x12s+1./4.*o*txs-1./4.*os
     #    *x12-5./8.*os*x2z+1./8.*os*tx-1./4.*x12*x2z*tx+5./4.*
     #    x12*x2z+5./8.*x12*tx+1./4.*x12*txs+1./4.*x2z*tx-1./4.
     #    *x2z*x12s-x2z-3./8.*tx*x12s-1./4.*tx-1./4.*txs)
      gz30c= gz30c+rs2wg(4)*vvq*gtm2*yc*(-1./2.*o*x12*
     #    x2z+1./4.*o*x12*x2zs+1./8.*o*x2z*tx+1./4.*o*x2z*x12s-
     #    1./4.*o*x2z*txs+1./4.*o*tx*x2zs-9./8.*o*x2zs+1./4.*os*
     #    x12*x2z-1./4.*os*x2z*tx+1./4.*os*x2zs-7./8.*x12*x2z*tx
     #    -1./4.*x12*x2z*txs+1./4.*x12*tx*x2zs-1./2.*x12*x2zs+1.
     #    /4.*x2z*tx*x12s+1./2.*x2z*tx+1./2.*x2z*txs-1./2.*tx*
     #    x2zs+7./8.*x2zs)
      gz30c= gz30c+rs2wg(7)*bxpi*vvq*gtm2*yc*(-1./8.*o*
     #    x12*x2zs+1./8.*o*x2zs-1./8.*os*x2zs-1./8.*x12*tx*x2zs
     #    +1./8.*tx*x2zs+1./8.*x2zs*txs)
      gz30c= gz30c+rs2wg(7)*vvq*gtm2*bxps*yc*(1./16.*o*
     #    x12+1./16.*o*tx-1./16.*o+1./16.*os+1./16.*x12*tx-1./
     #    16.*tx)
      gz30c= gz30c+rs2wg(7)*vvq*gtm2*yc*bxp*(-1./16.*o*
     #    x12*x2z+3./16.*o*x12*tx-1./4.*o*x12-1./8.*o*x2z*tx+1./
     #    8.*o*x2z-1./8.*o*tx+1./8.*o*x12s-1./16.*o*txs+1./8.*o
     #    +1./4.*os*x12-1./8.*os*x2z+1./16.*os*tx-1./4.*os+1./
     #    8.*oc-1./16.*x12*x2z*tx-1./4.*x12*tx-1./16.*x12*txs+1.
     #    /8.*x2z*tx+1./8.*tx*x12s+1./8.*tx+1./8.*txs)
      gz30c= gz30c+rs2wg(7)*vvq*gtm2*yc*(-3./16.*o*x12
     #    *x2z*tx+3./8.*o*x12*x2z+1./8.*o*x2z*tx-1./8.*o*x2z*x12s
     #    +1./16.*o*x2z*txs-1./4.*o*x2z+1./16.*o*tx*x2zs-1./16.
     #    *o*x2zs-1./4.*os*x12*x2z-1./16.*os*x2z*tx+3./8.*os*x2z
     #    +1./16.*os*x2zs-1./8.*oc*x2z+3./8.*x12*x2z*tx+1./16.*
     #    x12*x2z*txs-1./8.*x2z*tx*x12s-1./4.*x2z*tx-1./4.*x2z*
     #    txs-1./16.*tx*x2zs)
      gz30c= gz30c+rs2wg(10)*bxpi*vvq*gtm2*yc*(1./8.*o*
     #    x12*x2zs-1./8.*o*x2zs+1./8.*os*x2zs+1./8.*x12*tx*x2zs
     #    -1./8.*tx*x2zs-1./8.*x2zs*txs)
      gz30c= gz30c+rs2wg(10)*vvq*gtm2*bxps*yc*(-1./16.*
     #    o*x12-1./16.*o*tx+1./16.*o-1./16.*os-1./16.*x12*tx+
     #    1./16.*tx)
      gz30c= gz30c+rs2wg(10)*vvq*gtm2*yc*bxp*(1./16.*o*
     #    x12*x2z-3./16.*o*x12*tx+1./4.*o*x12+1./8.*o*x2z*tx-1./
     #    8.*o*x2z+1./8.*o*tx-1./8.*o*x12s+1./16.*o*txs-1./8.*o
     #    -1./4.*os*x12+1./8.*os*x2z-1./16.*os*tx+1./4.*os-1./
     #    8.*oc+1./16.*x12*x2z*tx+1./4.*x12*tx+1./16.*x12*txs-1.
     #    /8.*x2z*tx-1./8.*tx*x12s-1./8.*tx-1./8.*txs)
      gz30c= gz30c+rs2wg(10)*vvq*gtm2*yc*(3./16.*o*x12*
     #    x2z*tx-3./8.*o*x12*x2z-1./8.*o*x2z*tx+1./8.*o*x2z*x12s
     #    -1./16.*o*x2z*txs+1./4.*o*x2z-1./16.*o*tx*x2zs+1./16.
     #    *o*x2zs+1./4.*os*x12*x2z+1./16.*os*x2z*tx-3./8.*os*x2z
     #    -1./16.*os*x2zs+1./8.*oc*x2z-3./8.*x12*x2z*tx-1./16.*
     #    x12*x2z*txs+1./8.*x2z*tx*x12s+1./4.*x2z*tx+1./4.*x2z*
     #    txs+1./16.*tx*x2zs)
      gz30c= gz30c+rs2wg(11)*bxpi*vvq*gtm2*yc*(1./4.*o*
     #    x2z*tx-1./4.*o*x2zs-1./4.*x12*x2z*tx-1./4.*x12*x2zs+1.
     #    /2.*x2z*txs+1./4.*x2zs)
      gz30c= gz30c+rs2wg(11)*vvq*gtm2*bxps*yc*(-3./4.
     #    +3./4.*o+3./4.*x12)
      gz30c= gz30c+rs2wg(11)*vvq*gtm2*yc*bxp*(1./4.-5./
     #    4.*o*x2z-3./8.*o+1./8.*os-1./2.*x12*x2z-x12*tx-5./8.
     #    *x12-1./2.*x2z*tx+5./4.*x2z+3./4.*tx+3./8.*x12s+1./
     #    2.*txs)
      gz30c= gz30c+rs2wg(11)*vvq*gtm2*yc*(-1./8.*o*x12
     #    *x2z-1./4.*o*x2z*tx+5./8.*o*x2z-1./4.*o*tx+1./2.*o*
     #    x2zs+1./4.*o*txs-1./8.*os*x2z+1./8.*os*tx+1./2.*x12*
     #    x2z*tx+7./8.*x12*x2z+1./4.*x12*tx+1./4.*x12*txs-3./4.
     #    *x2z*tx-1./4.*x2z*x12s-1./2.*x2z*txs-1./2.*x2z-1./8.*
     #    tx*x12s+1./2.*tx*x2zs-1./2.*x2zs-1./2.*txs)
      gz30c= gz30c+rs2wg(12)*bxpi*vvq*gtm2*yc*(-1./2.*o
     #    *x2zs-1./2.*x12*x2z*tx-1./4.*x12*x2zs+x2z*tx+1./2.*
     #    x2z*txs-1./2.*tx*x2zs+1./2.*x2zs)
      gz30c= gz30c+rs2wg(12)*vvq*gtm2*bxps*yc*(-1./8.
     #    +1./8.*o+1./8.*x12)
      gz30c= gz30c+rs2wg(12)*vvq*gtm2*yc*bxp*(1+3./2.*o
     #    *x12-1./8.*o*tx-2*o+os+1./8.*x12*x2z-1./8.*x12*tx
     #    -3./2.*x12+1./4.*tx+1./2.*x12s)
      gz30c= gz30c+rs2wg(12)*vvq*gtm2*yc*(-o*x12*x2z
     #    -1./4.*o*x12*tx-1./8.*o*x2z*tx+2*o*x2z+o*tx-1./8.*o
     #    *x2zs+1./4.*o*txs-1./2.*os*x2z-3./8.*x12*x2z*tx+5./4.
     #    *x12*x2z+3./2.*x12*tx+1./4.*x12*txs+1./4.*x2z*tx-1./4.
     #    *x2z*x12s-3./2.*x2z-1./4.*tx*x12s-tx+1./8.*x2zs-1./
     #    2.*txs)
      gz30c= gz30c+rs2wg(13)*bxpi*vvq*gtm2*yc*(-1./8.*o
     #    *x2z*tx-1./8.*o*x2zs+1./4.*o*txs-5./8.*x12*x2z*tx+1./
     #    4.*x12*txs+1./4.*x2z*tx+1./4.*x2z*txs+1./8.*x2zs)
      gz30c= gz30c+rs2wg(13)*vvq*gtm2*bxps*yc*(1./16.-1.
     #    /16.*o-1./16.*x12)
      gz30c= gz30c+rs2wg(13)*vvq*gtm2*yc*bxp*(-3./16.*o
     #    *tx+5./16.*o-5./16.*os-1./16.*x12*x2z+1./16.*x12*tx
     #    -1./16.*x12+1./8.*tx+1./16.*x12s)
      gz30c= gz30c+rs2wg(13)*vvq*gtm2*yc*(-3./16.*o*
     #    x12*x2z-3./8.*o*x12*tx+5./16.*o*x2z*tx+1./16.*o*x2z+1.
     #    /16.*o*x2zs-1./8.*o*txs+1./16.*os*x2z-1./16.*os*tx+3./
     #    16.*x12*x2z*tx+3./16.*x12*x2z+1./2.*x12*tx-1./8.*x12*
     #    txs-1./8.*x2z*tx-1./8.*x2z-5./16.*tx*x12s-1./4.*tx-
     #    1./16.*x2zs-1./4.*txs)
      gz30c= gz30c+rs2wg(14)*bxpi*vvq*gtm2*yc*(1./8.*o*
     #    x2z*tx+1./8.*o*x2zs+1./8.*x12*x2z*tx+1./4.*x2z*txs-1./
     #    4.*tx*x2zs-1./8.*x2zs)
      gz30c= gz30c+rs2wg(14)*vvq*gtm2*bxps*yc*(-1./16.
     #    +1./16.*o+1./16.*x12)
      gz30c= gz30c+rs2wg(14)*vvq*gtm2*yc*bxp*(-1./8.-
     #    1./4.*o*x12-3./16.*o*tx+5./16.*o-3./16.*os+1./16.*x12
     #    *x2z-3./16.*x12*tx+3./16.*x12-1./4.*x2z*tx+1./4.*tx
     #    -1./16.*x12s+1./4.*txs)
      gz30c= gz30c+rs2wg(14)*vvq*gtm2*yc*(3./16.*o*x12*
     #    x2z+1./8.*o*x12*tx+1./16.*o*x2z*tx-7./16.*o*x2z-1./8.
     #    *o*tx-1./16.*o*x2zs+3./16.*os*x2z+1./16.*os*tx+1./16.
     #    *x12*x2z*tx-3./16.*x12*x2z-1./8.*x12*tx-1./4.*x2z*txs
     #    +1./4.*x2z+1./16.*tx*x12s+1./4.*tx*x2zs+1./16.*x2zs
     #    -1./4.*txs)
      gz30c= gz30c+rt1wg(1)*bxpi*vvc*gsm2*ys*csti*(5.
     #    /2.*zi*o*x12*tx-3*zi*o*tx-9./2.*zi*o*txs+3./2.*zi*os*tx
     #    -5./2.*zi*x12*tx-9./2.*zi*x12*txs+zi*tx*x12s+3./2.*zi
     #    *tx+4*zi*txs+1./8.*o*x2z*tx+3./2.*o*tx+1./8.*o*txs+
     #    x12*tx+1./8.*x12*txs-1./8.*x2z*tx-3./2.*tx-4*txs)
      gz30c= gz30c+rt1wg(1)*bxpi*vvc*gsm2*ys*(-1./4.*o*
     #    x2z*tx-1./4.*o*txs-1./4.*x12*txs+1./4.*x2z*tx)
      gz30c= gz30c+rt1wg(1)*vvc*gsm2*bxps*ys*csti*(3.
     #    /16.+7./4.*zi*o+7./4.*zi*x12-7./4.*zi-3./16.*o-3./
     #    16.*x12)
      gz30c= gz30c+rt1wg(1)*vvc*gsm2*bxps*ys*(-3./8.+
     #    3./8.*o+3./8.*x12)
      gz30c= gz30c+rt1wg(1)*vvc*gsm2*ys*bxp*csti*(
     #    -31./16.+3./2.*zi*o*x12+zi*o*tx-9./2.*zi*o+9./4.*zi
     #    *os-2*zi*x12*tx-3./2.*zi*x12+3./4.*zi*tx-3./4.*zi*
     #    x12s+2*zi*txs+9./4.*zi-1./16.*o*x12+1./4.*o*x2z+9./
     #    4.*o-5./16.*os+1./16.*x12*x2z+1./8.*x12*tx-3./16.*x12
     #    -1./4.*x2z+29./16.*tx)
      gz30c= gz30c+rt1wg(1)*vvc*gsm2*ys*bxp*(-1./8.+1.
     #    /8.*o*x12-1./2.*o*x2z-1./2.*o+5./8.*os-1./8.*x12*x2z
     #    -1./4.*x12*tx-1./8.*x12+1./2.*x2z+3./8.*tx)
      gz30c= gz30c+rt1wg(1)*vvc*gsm2*ys*csti*(1./2.
     #    -zi*o*x12*tx+5./2.*zi*o*x12+5./2.*zi*o*tx-11./4.*zi*o
     #    *x12s+21./4.*zi*o*txs+3./2.*zi*o-5./4.*zi*os*x12-1./4.
     #    *zi*os*tx-3./2.*zi*os+1./2.*zi*oc+15./4.*zi*x12*tx+21.
     #    /4.*zi*x12*txs-5./4.*zi*x12-3./4.*zi*tx*x12s-9./4.*zi*
     #    tx+11./4.*zi*x12s-zi*x12c-6*zi*txs-1./2.*zi+3./16.*
     #    o*x12*tx-7./4.*o*x12+1./8.*o*x2z*tx-1./4.*o*x2z+13./
     #    16.*o*tx-1./16.*o*x2zs-1./16.*o*txs-o+1./16.*os*x2z
     #    +3./16.*os*tx+1./2.*os+1./16.*x12*x2z*tx+x12*x2z+7./
     #    16.*x12*tx-1./16.*x12*txs+7./4.*x12-29./16.*x2z*tx+3./
     #    16.*x2z+7./8.*tx-x12s+1./16.*x2zs+2*txs)
      gz30c= gz30c+rt1wg(1)*vvc*gsm2*ys*(-3./8.*o*x12*
     #    tx-1./4.*o*x2z*tx+11./8.*o*tx+1./8.*o*x2zs+1./8.*o*
     #    txs-1./8.*os*x2z-3./8.*os*tx-1./8.*x12*x2z*tx+5./8.*
     #    x12*tx+1./8.*x12*txs-3./8.*x2z*tx+1./8.*x2z-1./4.*tx
     #    -1./8.*x2zs)
      gz30c= gz30c+rt1wg(4)*bxpi*vvc*gsm2*ys*csti*(3.
     #    /8.+11./8.*zi*o*x12*tx-1./4.*zi*o*x12*txs-33./8.*zi*o*
     #    x12-3./4.*zi*o*tx*x12s-3./4.*zi*o*tx+15./4.*zi*o*x12s
     #    -9./8.*zi*o*x12c+5./8.*zi*o*txs+3./2.*zi*o-9./8.*zi*
     #    os*x12*tx+33./8.*zi*os*x12+9./8.*zi*os*tx-15./8.*zi*os*
     #    x12s-1./8.*zi*os*txs-9./4.*zi*os-11./8.*zi*oc*x12-1./
     #    2.*zi*oc*tx+3./2.*zi*oc-3./8.*zi*oq-1./4.*zi*x12*tx-1.
     #    /4.*zi*x12*x12c+5./8.*zi*x12*txs+11./8.*zi*x12+1./4.*zi
     #    *tx*x12s-1./8.*zi*tx*x12c+1./8.*zi*tx-1./8.*zi*x12s*txs
     #    -15./8.*zi*x12s+9./8.*zi*x12c-1./2.*zi*txs-3./8.*zi
     #    -1./32.*o*x12*x2z*tx+5./8.*o*x12*x2z-5./8.*o*x12*tx+2
     #    *o*x12+5./8.*o*x2z*tx-1./32.*o*x2z*txs-3./4.*o*x2z+1./
     #    32.*o*tx*x2zs+5./8.*o*tx-7./8.*o*x12s-17./32.*o*x2zs-
     #    1./8.*o*txs-9./8.*o-os*x12-1./32.*os*x2z*tx+3./8.*os*
     #    x2z-1./2.*os*tx+1./32.*os*x2zs+9./8.*os-3./8.*oc-1./
     #    8.*x12*x2z*tx)
      gz30c= gz30c+rt1wg(4)*bxpi*vvc*gsm2*ys*csti*(
     #    -1./32.*x12*x2z*txs-5./8.*x12*x2z+1./8.*x12*tx-1./4.*
     #    x12*x2zs-1./8.*x12*txs-x12-1./8.*x2z*tx+1./4.*x2z*
     #    x12s+1./2.*x2z*txs+3./8.*x2z-1./8.*tx*x12s-15./32.*tx
     #    *x2zs-1./8.*tx+7./8.*x12s-1./4.*x12c+1./2.*x2zs+1./
     #    2.*txs)
      gz30c= gz30c+rt1wg(4)*bxpi*vvc*gsm2*ys*(1./16.*o*
     #    x12*x2z*tx+1./16.*o*x2z*txs-1./16.*o*tx*x2zs+1./16.*o*
     #    x2zs+1./16.*os*x2z*tx-1./16.*os*x2zs+1./16.*x12*x2z*txs
     #    -1./16.*tx*x2zs)
      gz30c= gz30c+rt1wg(4)*vvc*gsm2*bxps*ys*csti*(
     #    -1./32.+3./4.*zi*o*x12-1./16.*zi*o*tx-11./16.*zi*o+
     #    3./8.*zi*os-1./16.*zi*x12*tx-11./16.*zi*x12+1./16.*zi*
     #    tx+3./8.*zi*x12s+5./16.*zi-5./64.*o*x12-1./64.*o*tx
     #    +5./64.*o-3./64.*os-1./64.*x12*tx+1./16.*x12+1./64.
     #    *tx-1./32.*x12s)
      gz30c= gz30c+rt1wg(4)*vvc*gsm2*bxps*ys*(1./16.+5./
     #    32.*o*x12+1./32.*o*tx-5./32.*o+3./32.*os+1./32.*x12*
     #    tx-1./8.*x12-1./32.*tx+1./16.*x12s)
      gz30c= gz30c+rt1wg(4)*vvc*gsm2*ys*bxp*csti*(9./
     #    8.+13./16.*zi*o*x12*tx-39./8.*zi*o*x12-1./2.*zi*o*tx+
     #    15./8.*zi*o*x12s+7./16.*zi*o*txs+23./8.*zi*o+9./4.*zi*
     #    os*x12+9./16.*zi*os*tx-11./4.*zi*os+7./8.*zi*oc-3./16.
     #    *zi*x12*tx+7./16.*zi*x12*txs+21./8.*zi*x12+1./4.*zi*tx*
     #    x12s-17./8.*zi*x12s+1./2.*zi*x12c-1./2.*zi*txs-zi+3.
     #    /64.*o*x12*x2z+3./64.*o*x12*tx+101./64.*o*x12+1./32.*o*
     #    x2z*tx-1./8.*o*x2z+21./64.*o*tx+1./64.*o*x12s-1./64.*
     #    o*txs-67./32.*o+1./16.*os*x2z+63./64.*os-1./64.*oc+
     #    1./64.*x12*x2z*tx-1./16.*x12*x2z+23./64.*x12*tx-1./64.*
     #    x12*txs-29./16.*x12-1./32.*x2z*tx+1./16.*x2z+3./64.*
     #    tx*x12s-11./32.*tx+5./8.*x12s)
      gz30c= gz30c+rt1wg(4)*vvc*gsm2*ys*bxp*(-3./32.*o*
     #    x12*x2z-3./32.*o*x12*tx-1./32.*o*x12-1./16.*o*x2z*tx+
     #    1./4.*o*x2z+3./32.*o*tx-1./32.*o*x12s+1./32.*o*txs+1./
     #    16.*o-1./8.*os*x2z-3./32.*os+1./32.*oc-1./32.*x12*x2z
     #    *tx+1./8.*x12*x2z+5./32.*x12*tx+1./32.*x12*txs+1./16.
     #    *x2z*tx-1./8.*x2z-3./32.*tx*x12s-1./16.*tx)
      gz30c= gz30c+rt1wg(4)*vvc*gsm2*ys*csti*(-17.
     #    /16.-5./2.*zi*o*x12*tx+1./2.*zi*o*x12*txs+67./8.*zi*o*
     #    x12+5./4.*zi*o*tx*x12s+21./16.*zi*o*tx-47./8.*zi*o*x12s
     #    +5./4.*zi*o*x12c-17./16.*zi*o*txs-59./16.*zi*o+7./4.*
     #    zi*os*x12*tx-109./16.*zi*os*x12-15./8.*zi*os*tx+9./4.*
     #    zi*os*x12s+1./4.*zi*os*txs+75./16.*zi*os+7./4.*zi*oc*
     #    x12+3./4.*zi*oc*tx-41./16.*zi*oc+1./2.*zi*oq+1./2.*zi
     #    *x12*tx+1./4.*zi*x12*x12c-17./16.*zi*x12*txs-53./16.*zi
     #    *x12-5./8.*zi*tx*x12s+1./4.*zi*tx*x12c-3./16.*zi*tx+1.
     #    /4.*zi*x12s*txs+29./8.*zi*x12s-13./8.*zi*x12c+zi*txs+
     #    17./16.*zi+1./32.*o*x12*x2z*tx-65./64.*o*x12*x2z+31./32.
     #    *o*x12*tx-1./32.*o*x12*txs-7./2.*o*x12-27./64.*o*x2z*tx
     #    +1./64.*o*x2z*txs+31./16.*o*x2z-1./64.*o*tx*x12s-1./
     #    64.*o*tx*x2zs-5./4.*o*tx+o*x12s+3./64.*o*x2zs+15./32.
     #    *o*txs+21./8.*o+1./64.*os*x12*x2z-1./32.*os*x12*tx+5./
     #    4.*os*x12)
      gz30c= gz30c+rt1wg(4)*vvc*gsm2*ys*csti*(1./32.
     #    *os*x2z*tx-41./64.*os*x2z+27./32.*os*tx-1./64.*os*x2zs
     #    -1./64.*os*txs-33./16.*os+1./64.*oc*x2z-1./64.*oc*tx
     #    +1./2.*oc-27./64.*x12*x2z*tx+1./64.*x12*x2z*txs+11./8.
     #    *x12*x2z-3./16.*x12*tx+15./32.*x12*txs+9./4.*x12+7./8.
     #    *x2z*tx-1./4.*x2z*x12s-21./16.*x2z+1./8.*tx*x12s+1./
     #    64.*tx*x2zs+3./16.*tx-1./64.*x12s*txs-11./8.*x12s+1./
     #    4.*x12c-1./32.*x2zs-txs)
      gz30c= gz30c+rt1wg(4)*vvc*gsm2*ys*(-1./16.*o*x12
     #    *x2z*tx+1./32.*o*x12*x2z-1./16.*o*x12*tx+1./16.*o*x12*
     #    txs-1./32.*o*x2z*tx-1./32.*o*x2z*txs-1./8.*o*x2z+1./
     #    32.*o*tx*x12s+1./32.*o*tx*x2zs-3./32.*o*x2zs-1./16.*o*
     #    txs-1./32.*os*x12*x2z+1./16.*os*x12*tx-1./16.*os*x2z*tx
     #    +5./32.*os*x2z-1./16.*os*tx+1./32.*os*x2zs+1./32.*os*
     #    txs-1./32.*oc*x2z+1./32.*oc*tx-5./32.*x12*x2z*tx-1./
     #    32.*x12*x2z*txs-1./16.*x12*txs+1./8.*x2z*tx-1./32.*tx*
     #    x2zs+1./32.*x12s*txs+1./16.*x2zs)
      gz30c= gz30c+rt1wg(7)*bxpi*vvc*gsm2*ys*csti*(1.
     #    /8.+1./2.*zi*o*x12*tx+1./4.*zi*o*x12*txs-9./8.*zi*o*x12
     #    -1./4.*zi*o*tx*x12s-1./4.*zi*o*tx+3./4.*zi*o*x12s-1./
     #    8.*zi*o*x12c-3./8.*zi*o*txs+1./2.*zi*o-1./8.*zi*os*x12*
     #    tx+9./8.*zi*os*x12+1./8.*zi*os*tx-3./8.*zi*os*x12s+1./
     #    8.*zi*os*txs-3./4.*zi*os-3./8.*zi*oc*x12+1./2.*zi*oc-
     #    1./8.*zi*oq-3./8.*zi*x12*tx-3./8.*zi*x12*txs+3./8.*zi*
     #    x12+3./8.*zi*tx*x12s-1./8.*zi*tx*x12c+1./8.*zi*tx+1./
     #    8.*zi*x12s*txs-3./8.*zi*x12s+1./8.*zi*x12c+1./4.*zi*txs
     #    -1./8.*zi+1./8.*o*x12*x2z-1./8.*o*x12*tx+1./32.*o*x12
     #    *x2zs+1./2.*o*x12+1./64.*o*x2z*txs-1./4.*o*x2z+1./8.*
     #    o*tx-1./8.*o*x12s+1./64.*o*x2zc-5./32.*o*x2zs+1./8.*o
     #    *txs-3./8.*o-1./4.*os*x12+1./8.*os*x2z+1./32.*os*x2zs
     #    +3./8.*os-1./8.*oc+1./8.*x12*x2z*tx+1./64.*x12*x2z*
     #    txs-1./8.*x12*x2z+1./64.*x12*tx*x2zs+1./4.*x12*tx+1./
     #    8.*x12*txs)
      gz30c= gz30c+rt1wg(7)*bxpi*vvc*gsm2*ys*csti*(
     #    -1./4.*x12-1./8.*x2z*tx-1./4.*x2z*txs+1./8.*x2z-1./
     #    8.*tx*x12s-1./64.*tx*x2zs-1./8.*tx+1./8.*x12s-1./64.*
     #    x2zc+1./8.*x2zs-1./4.*txs)
      gz30c= gz30c+rt1wg(7)*bxpi*vvc*gsm2*ys*(-1./16.*o
     #    *x12*x2zs-1./32.*o*x2z*txs-1./32.*o*x2zc+1./16.*o*x2zs
     #    -1./16.*os*x2zs-1./32.*x12*x2z*txs-1./32.*x12*tx*x2zs
     #    +1./32.*tx*x2zs+1./32.*x2zc)
      gz30c= gz30c+rt1wg(7)*vvc*gsm2*bxps*ys*csti*(3.
     #    /128.+3./8.*zi*o*x12+1./8.*zi*o*tx-3./8.*zi*o+3./16.*
     #    zi*os+1./8.*zi*x12*tx-3./8.*zi*x12-1./8.*zi*tx+3./16.
     #    *zi*x12s+3./16.*zi+1./32.*o*x12-1./32.*o+1./128.*os
     #    -3./64.*x12+3./128.*x12s)
      gz30c= gz30c+rt1wg(7)*vvc*gsm2*bxps*ys*(-3./64.
     #    -1./16.*o*x12+1./16.*o-1./64.*os+3./32.*x12-3./64.*
     #    x12s)
      gz30c= gz30c+rt1wg(7)*vvc*gsm2*ys*bxp*csti*(1./
     #    2.+3./8.*zi*o*x12*tx-2*zi*o*x12-5./8.*zi*o*tx+5./8.*
     #    zi*o*x12s-1./8.*zi*o*txs+11./8.*zi*o+7./8.*zi*os*x12+
     #    1./4.*zi*os*tx-5./4.*zi*os+3./8.*zi*oc-1./2.*zi*x12*tx
     #    -1./8.*zi*x12*txs+9./8.*zi*x12+1./8.*zi*tx*x12s+3./8.
     #    *zi*tx-3./4.*zi*x12s+1./8.*zi*x12c+1./4.*zi*txs-1./2.
     #    *zi-3./64.*o*x12*x2z-3./64.*o*x12*tx+9./16.*o*x12+5./
     #    64.*o*x2z+17./64.*o*tx-1./32.*o*x12s-29./32.*o-1./16.
     #    *os*x12-1./64.*os*x2z-1./64.*os*tx+7./16.*os-1./32.*
     #    oc+5./64.*x12*x2z+11./64.*x12*tx-5./8.*x12-1./64.*x2z
     #    *x12s-1./16.*x2z-1./32.*tx*x12s-17./64.*tx+1./8.*x12s
     #    )
      gz30c= gz30c+rt1wg(7)*vvc*gsm2*ys*bxp*(3./32.*o*x12
     #    *x2z+3./32.*o*x12*tx-1./8.*o*x12-5./32.*o*x2z-1./32.*
     #    o*tx+1./16.*o*x12s+1./16.*o+1./8.*os*x12+1./32.*os*
     #    x2z+1./32.*os*tx-1./8.*os+1./16.*oc-5./32.*x12*x2z-
     #    3./32.*x12*tx+1./32.*x2z*x12s+1./8.*x2z+1./16.*tx*x12s
     #    +1./32.*tx)
      gz30c= gz30c+rt1wg(7)*vvc*gsm2*ys*csti*(-7./
     #    16.-zi*o*x12*tx-1./8.*zi*o*x12*txs+11./4.*zi*o*x12+3./
     #    8.*zi*o*tx*x12s+3./4.*zi*o*tx-11./8.*zi*o*x12s+1./8.*zi
     #    *o*x12c+1./2.*zi*o*txs-3./2.*zi*o+3./8.*zi*os*x12*tx-
     #    17./8.*zi*os*x12-1./2.*zi*os*tx+7./16.*zi*os*x12s-1./16.
     #    *zi*os*txs+15./8.*zi*os+1./2.*zi*oc*x12+1./8.*zi*oc*tx
     #    -zi*oc+3./16.*zi*oq+3./4.*zi*x12*tx+1./2.*zi*x12*txs
     #    -9./8.*zi*x12-1./2.*zi*tx*x12s+1./8.*zi*tx*x12c-3./8.
     #    *zi*tx-1./16.*zi*x12s*txs+15./16.*zi*x12s-1./4.*zi*x12c
     #    -1./2.*zi*txs+7./16.*zi+1./32.*o*x12*x2z*tx-7./32.*o*
     #    x12*x2z+1./4.*o*x12*tx+1./64.*o*x12*x2zs+1./64.*o*x12*
     #    txs-o*x12-9./64.*o*x2z*tx+1./32.*o*x2z*x12s+11./16.*o
     #    *x2z-3./8.*o*tx+1./8.*o*x12s-1./16.*o*x2zs-9./64.*o*
     #    txs+17./16.*o+1./16.*os*x12*x2z+5./16.*os*x12+1./64.*
     #    os*x2z*tx-9./32.*os*x2z+1./8.*os*tx+1./128.*os*x2zs+1.
     #    /128.*os*txs)
      gz30c= gz30c+rt1wg(7)*vvc*gsm2*ys*csti*(-13.
     #    /16.*os+1./32.*oc*x2z+3./16.*oc-1./16.*x12*x2z*tx+1./
     #    4.*x12*x2z-3./8.*x12*tx-1./32.*x12*x2zs-9./64.*x12*txs
     #    +11./16.*x12+1./64.*x2z*tx*x12s+5./32.*x2z*tx-7./16.*
     #    x2z+1./8.*tx*x12s+3./8.*tx+1./128.*x12s*txs-1./4.*
     #    x12s+7./128.*x2zs+1./2.*txs)
      gz30c= gz30c+rt1wg(7)*vvc*gsm2*ys*(-1./16.*o*x12
     #    *x2z*tx+3./16.*o*x12*x2z-1./32.*o*x12*x2zs-1./32.*o*x12
     #    *txs+1./32.*o*x2z*tx-1./16.*o*x2z*x12s-1./8.*o*x2z+1./
     #    8.*o*x2zs+1./32.*o*txs-1./8.*os*x12*x2z-1./32.*os*x2z*
     #    tx+3./16.*os*x2z-1./64.*os*x2zs-1./64.*os*txs-1./16.*
     #    oc*x2z+1./8.*x12*x2z*tx+1./16.*x12*x2zs+1./32.*x12*txs
     #    -1./32.*x2z*tx*x12s-1./16.*x2z*tx-1./64.*x12s*txs-7./
     #    64.*x2zs)
      gz30c= gz30c+rt1wg(10)*bxpi*vvc*gsm2*ys*csti*(
     #    -1./8.-1./2.*zi*o*x12*tx-1./4.*zi*o*x12*txs+9./8.*zi*
     #    o*x12+1./4.*zi*o*tx*x12s+1./4.*zi*o*tx-3./4.*zi*o*x12s
     #    +1./8.*zi*o*x12c+3./8.*zi*o*txs-1./2.*zi*o+1./8.*zi*
     #    os*x12*tx-9./8.*zi*os*x12-1./8.*zi*os*tx+3./8.*zi*os*
     #    x12s-1./8.*zi*os*txs+3./4.*zi*os+3./8.*zi*oc*x12-1./2.
     #    *zi*oc+1./8.*zi*oq+3./8.*zi*x12*tx+3./8.*zi*x12*txs-3.
     #    /8.*zi*x12-3./8.*zi*tx*x12s+1./8.*zi*tx*x12c-1./8.*zi*
     #    tx-1./8.*zi*x12s*txs+3./8.*zi*x12s-1./8.*zi*x12c-1./4.
     #    *zi*txs+1./8.*zi-1./8.*o*x12*x2z+1./8.*o*x12*tx-1./32.
     #    *o*x12*x2zs-1./2.*o*x12-1./64.*o*x2z*txs+1./4.*o*x2z-
     #    1./8.*o*tx+1./8.*o*x12s-1./64.*o*x2zc+5./32.*o*x2zs-1.
     #    /8.*o*txs+3./8.*o+1./4.*os*x12-1./8.*os*x2z-1./32.*os
     #    *x2zs-3./8.*os+1./8.*oc-1./8.*x12*x2z*tx-1./64.*x12*
     #    x2z*txs+1./8.*x12*x2z-1./64.*x12*tx*x2zs-1./4.*x12*tx
     #    -1./8.*x12*txs)
      gz30c= gz30c+rt1wg(10)*bxpi*vvc*gsm2*ys*csti*(
     #    1./4.*x12+1./8.*x2z*tx+1./4.*x2z*txs-1./8.*x2z+1./8.*
     #    tx*x12s+1./64.*tx*x2zs+1./8.*tx-1./8.*x12s+1./64.*
     #    x2zc-1./8.*x2zs+1./4.*txs)
      gz30c= gz30c+rt1wg(10)*bxpi*vvc*gsm2*ys*(1./16.*o*
     #    x12*x2zs+1./32.*o*x2z*txs+1./32.*o*x2zc-1./16.*o*x2zs
     #    +1./16.*os*x2zs+1./32.*x12*x2z*txs+1./32.*x12*tx*x2zs
     #    -1./32.*tx*x2zs-1./32.*x2zc)
      gz30c= gz30c+rt1wg(10)*vvc*gsm2*bxps*ys*csti*(
     #    -3./128.-3./8.*zi*o*x12-1./8.*zi*o*tx+3./8.*zi*o-3./
     #    16.*zi*os-1./8.*zi*x12*tx+3./8.*zi*x12+1./8.*zi*tx-3./
     #    16.*zi*x12s-3./16.*zi-1./32.*o*x12+1./32.*o-1./128.*
     #    os+3./64.*x12-3./128.*x12s)
      gz30c= gz30c+rt1wg(10)*vvc*gsm2*bxps*ys*(3./64.+1.
     #    /16.*o*x12-1./16.*o+1./64.*os-3./32.*x12+3./64.*x12s
     #    )
      gz30c= gz30c+rt1wg(10)*vvc*gsm2*ys*bxp*csti*(
     #    -1./2.-3./8.*zi*o*x12*tx+2*zi*o*x12+5./8.*zi*o*tx-5.
     #    /8.*zi*o*x12s+1./8.*zi*o*txs-11./8.*zi*o-7./8.*zi*os*
     #    x12-1./4.*zi*os*tx+5./4.*zi*os-3./8.*zi*oc+1./2.*zi*
     #    x12*tx+1./8.*zi*x12*txs-9./8.*zi*x12-1./8.*zi*tx*x12s
     #    -3./8.*zi*tx+3./4.*zi*x12s-1./8.*zi*x12c-1./4.*zi*txs
     #    +1./2.*zi+3./64.*o*x12*x2z+3./64.*o*x12*tx-9./16.*o*
     #    x12-5./64.*o*x2z-17./64.*o*tx+1./32.*o*x12s+29./32.*o
     #    +1./16.*os*x12+1./64.*os*x2z+1./64.*os*tx-7./16.*os
     #    +1./32.*oc-5./64.*x12*x2z-11./64.*x12*tx+5./8.*x12+
     #    1./64.*x2z*x12s+1./16.*x2z+1./32.*tx*x12s+17./64.*tx-
     #    1./8.*x12s)
      gz30c= gz30c+rt1wg(10)*vvc*gsm2*ys*bxp*(-3./32.*o
     #    *x12*x2z-3./32.*o*x12*tx+1./8.*o*x12+5./32.*o*x2z+1./
     #    32.*o*tx-1./16.*o*x12s-1./16.*o-1./8.*os*x12-1./32.*
     #    os*x2z-1./32.*os*tx+1./8.*os-1./16.*oc+5./32.*x12*x2z
     #    +3./32.*x12*tx-1./32.*x2z*x12s-1./8.*x2z-1./16.*tx*
     #    x12s-1./32.*tx)
      gz30c= gz30c+rt1wg(10)*vvc*gsm2*ys*csti*(7./
     #    16.+zi*o*x12*tx+1./8.*zi*o*x12*txs-11./4.*zi*o*x12-3./
     #    8.*zi*o*tx*x12s-3./4.*zi*o*tx+11./8.*zi*o*x12s-1./8.*zi
     #    *o*x12c-1./2.*zi*o*txs+3./2.*zi*o-3./8.*zi*os*x12*tx+
     #    17./8.*zi*os*x12+1./2.*zi*os*tx-7./16.*zi*os*x12s+1./16.
     #    *zi*os*txs-15./8.*zi*os-1./2.*zi*oc*x12-1./8.*zi*oc*tx
     #    +zi*oc-3./16.*zi*oq-3./4.*zi*x12*tx-1./2.*zi*x12*txs
     #    +9./8.*zi*x12+1./2.*zi*tx*x12s-1./8.*zi*tx*x12c+3./8.
     #    *zi*tx+1./16.*zi*x12s*txs-15./16.*zi*x12s+1./4.*zi*x12c
     #    +1./2.*zi*txs-7./16.*zi-1./32.*o*x12*x2z*tx+7./32.*o*
     #    x12*x2z-1./4.*o*x12*tx-1./64.*o*x12*x2zs-1./64.*o*x12*
     #    txs+o*x12+9./64.*o*x2z*tx-1./32.*o*x2z*x12s-11./16.*o
     #    *x2z+3./8.*o*tx-1./8.*o*x12s+1./16.*o*x2zs+9./64.*o*
     #    txs-17./16.*o-1./16.*os*x12*x2z-5./16.*os*x12-1./64.*
     #    os*x2z*tx+9./32.*os*x2z-1./8.*os*tx-1./128.*os*x2zs-1.
     #    /128.*os*txs)
      gz30c= gz30c+rt1wg(10)*vvc*gsm2*ys*csti*(13./
     #    16.*os-1./32.*oc*x2z-3./16.*oc+1./16.*x12*x2z*tx-1./4.
     #    *x12*x2z+3./8.*x12*tx+1./32.*x12*x2zs+9./64.*x12*txs-
     #    11./16.*x12-1./64.*x2z*tx*x12s-5./32.*x2z*tx+7./16.*x2z
     #    -1./8.*tx*x12s-3./8.*tx-1./128.*x12s*txs+1./4.*x12s
     #    -7./128.*x2zs-1./2.*txs)
      gz30c= gz30c+rt1wg(10)*vvc*gsm2*ys*(1./16.*o*x12*
     #    x2z*tx-3./16.*o*x12*x2z+1./32.*o*x12*x2zs+1./32.*o*x12*
     #    txs-1./32.*o*x2z*tx+1./16.*o*x2z*x12s+1./8.*o*x2z-1./
     #    8.*o*x2zs-1./32.*o*txs+1./8.*os*x12*x2z+1./32.*os*x2z*
     #    tx-3./16.*os*x2z+1./64.*os*x2zs+1./64.*os*txs+1./16.*
     #    oc*x2z-1./8.*x12*x2z*tx-1./16.*x12*x2zs-1./32.*x12*txs
     #    +1./32.*x2z*tx*x12s+1./16.*x2z*tx+1./64.*x12s*txs+7./
     #    64.*x2zs)
      gz30c= gz30c+rt1wg(11)*bxpi*vvc*gsm2*ys*csti*(
     #    -1./2.*zi*o*x12*tx+zi*o*tx-3./2.*zi*o*txs-1./2.*zi*os
     #    *tx+1./2.*zi*x12*tx-3./2.*zi*x12*txs-1./2.*zi*tx+zi*
     #    txs-1./2.*o*tx+1./2.*tx-txs)
      gz30c= gz30c+rt1wg(11)*vvc*gsm2*bxps*ys*csti*(
     #    1./16.+1./2.*zi*o+1./2.*zi*x12-1./2.*zi-1./16.*o-1./
     #    16.*x12)
      gz30c= gz30c+rt1wg(11)*vvc*gsm2*bxps*ys*(-1./8.
     #    +1./8.*o+1./8.*x12)
      gz30c= gz30c+rt1wg(11)*vvc*gsm2*ys*bxp*csti*(
     #    -19./16.+5./4.*zi*o*x12+5./4.*zi*o*tx-2*zi*o+zi*os
     #    -5./4.*zi*x12-3./4.*zi*tx+1./4.*zi*x12s+zi*txs+zi
     #    +3./32.*o*x12+1./16.*o*x2z+1./16.*o*tx+19./16.*o+3./
     #    32.*x12*tx+15./32.*x12-1./16.*x2z+7./8.*tx)
      gz30c= gz30c+rt1wg(11)*vvc*gsm2*ys*bxp*(-1./8.-
     #    3./16.*o*x12-1./8.*o*x2z-1./8.*o*tx+1./8.*o-3./16.*
     #    x12*tx+1./16.*x12+1./8.*x2z+1./4.*tx)
      gz30c= gz30c+rt1wg(11)*vvc*gsm2*ys*csti*(1./2.
     #    +3./2.*zi*o*x12*tx-3./2.*zi*o*x12-5./2.*zi*o*tx+1./4.
     #    *zi*o*x12s+7./4.*zi*o*txs+3./2.*zi*o+3./4.*zi*os*x12+
     #    5./4.*zi*os*tx-3./2.*zi*os+1./2.*zi*oc-3./4.*zi*x12*tx
     #    +7./4.*zi*x12*txs+3./4.*zi*x12+1./4.*zi*tx*x12s+5./4.
     #    *zi*tx-1./4.*zi*x12s-2*zi*txs-1./2.*zi+1./4.*o*x12-
     #    11./16.*o*x2z+23./16.*o*tx-o+1./2.*os+1./4.*x12*tx-
     #    1./4.*x12-7./8.*x2z*tx+11./16.*x2z-3./4.*tx+txs)
      gz30c= gz30c+rt1wg(11)*vvc*gsm2*ys*(-1./8.*o*x2z
     #    +1./8.*o*tx-1./4.*x2z*tx+1./8.*x2z)
      gz30c= gz30c+rt1wg(12)*bxpi*vvc*gsm2*ys*csti*(
     #    -1./2.*zi*o*tx-3./4.*zi*o*txs+1./4.*zi*os*tx-3./4.*zi
     #    *x12*txs-1./4.*zi*tx*x12s+1./4.*zi*tx+zi*txs-1./16.*o
     #    *x2z*tx+1./4.*o*tx+1./16.*o*txs-1./4.*x12*tx+1./16.*
     #    x12*txs+15./16.*x2z*tx-1./4.*tx-txs)
      gz30c= gz30c+rt1wg(12)*bxpi*vvc*gsm2*ys*(1./8.*o*
     #    x2z*tx-1./8.*o*txs-1./8.*x12*txs+1./8.*x2z*tx)
      gz30c= gz30c+rt1wg(12)*vvc*gsm2*bxps*ys*csti*(
     #    1./4.*zi*o+1./4.*zi*x12-1./4.*zi)
      gz30c= gz30c+rt1wg(12)*vvc*gsm2*ys*bxp*csti*(
     #    15./32.-3./4.*zi*o*x12+1./8.*zi*o*tx+1./4.*zi*o-1./8.
     #    *zi*os-1./8.*zi*x12*tx+3./4.*zi*x12+1./8.*zi*tx-5./8.
     #    *zi*x12s-1./8.*zi-1./16.*o*x12-1./32.*o*tx-3./8.*o-
     #    3./32.*os-11./16.*x12+1./32.*tx)
      gz30c= gz30c+rt1wg(12)*vvc*gsm2*ys*bxp*(1./16.+1./
     #    8.*o*x12+1./16.*o*tx-1./4.*o+3./16.*os-1./8.*x12-1./
     #    16.*tx)
      gz30c= gz30c+rt1wg(12)*vvc*gsm2*ys*csti*(-3.
     #    /8.-3./8.*zi*o*x12*tx+3*zi*o*x12+7./8.*zi*o*tx-13./8.
     #    *zi*o*x12s+7./8.*zi*o*txs-9./8.*zi*o-3./2.*zi*os*x12-
     #    1./2.*zi*os*tx+9./8.*zi*os-3./8.*zi*oc+7./8.*zi*x12*txs
     #    -3./2.*zi*x12+1./8.*zi*tx*x12s-3./8.*zi*tx+13./8.*zi*
     #    x12s-1./2.*zi*x12c-zi*txs+3./8.*zi+1./32.*o*x12*tx-
     #    9./8.*o*x12+1./32.*o*x2z*tx+3./4.*o*x2z-1./32.*o*tx-1.
     #    /32.*o*txs+3./4.*o-1./32.*os*x2z+1./32.*os*tx-3./8.*
     #    os+1./2.*x12*x2z+27./32.*x12*tx-1./32.*x12*txs+9./8.*
     #    x12-1./32.*x2z*tx-23./32.*x2z-13./16.*tx-1./2.*x12s)
      gz30c= gz30c+rt1wg(12)*vvc*gsm2*ys*(-1./16.*o*
     #    x12*tx-1./16.*o*x2z*tx+5./16.*o*tx+1./16.*o*txs+1./16.
     #    *os*x2z-1./16.*os*tx+5./16.*x12*tx+1./16.*x12*txs+1./
     #    16.*x2z*tx-1./16.*x2z-1./8.*tx)
      gz30c= gz30c+rt1wg(13)*bxpi*vvc*gsm2*ys*csti*(
     #    5./4.*zi*o*x12*tx-1./2.*zi*o*tx+1./4.*zi*o*txs+1./4.*zi
     #    *os*tx-5./4.*zi*x12*tx+1./4.*zi*x12*txs+zi*tx*x12s+1./
     #    4.*zi*tx+1./2.*zi*txs+1./4.*o*tx+1./32.*o*x2zs+1./32.
     #    *o*txs+1./32.*x12*x2z*tx+x12*tx+1./32.*x12*txs-1./32.
     #    *x2z*tx-1./4.*tx-1./32.*x2zs-1./2.*txs)
      gz30c= gz30c+rt1wg(13)*bxpi*vvc*gsm2*ys*(-1./16.*
     #    o*x2zs-1./16.*o*txs-1./16.*x12*x2z*tx-1./16.*x12*txs+
     #    1./16.*x2z*tx+1./16.*x2zs)
      gz30c= gz30c+rt1wg(13)*vvc*gsm2*bxps*ys*csti*(
     #    -1./8.*zi*o-1./8.*zi*x12+1./8.*zi)
      gz30c= gz30c+rt1wg(13)*vvc*gsm2*ys*bxp*csti*(
     #    -3./64.-1./4.*zi*o*x12-3./8.*zi*o*tx+3./4.*zi*o-3./
     #    8.*zi*os+1./8.*zi*x12*tx+1./4.*zi*x12+1./4.*zi*tx+1./
     #    8.*zi*x12s-3./8.*zi-3./64.*o*x12+1./64.*o+1./32.*os
     #    +3./16.*x12-1./64.*x12s)
      gz30c= gz30c+rt1wg(13)*vvc*gsm2*ys*bxp*(3./32.+3./
     #    32.*o*x12-1./32.*o-1./16.*os-1./8.*x12+1./32.*x12s)
      gz30c= gz30c+rt1wg(13)*vvc*gsm2*ys*csti*(-1.
     #    /4.-11./8.*zi*o*x12*tx+1./4.*zi*o*x12+zi*o*tx+1./8.*
     #    zi*o*x12s-1./4.*zi*o*txs-3./4.*zi*o-1./8.*zi*os*x12-1.
     #    /2.*zi*os*tx+3./4.*zi*os-1./4.*zi*oc+zi*x12*tx-1./4.*
     #    zi*x12*txs-1./8.*zi*x12-7./8.*zi*tx*x12s-1./2.*zi*tx-
     #    1./8.*zi*x12s-1./2.*zi*txs+1./4.*zi+3./64.*o*x12*x2z+
     #    3./64.*o*x12*tx+1./8.*o*x12-15./64.*o*x2z-39./64.*o*tx
     #    +1./2.*o+1./32.*os*x2z+1./32.*os*tx-1./4.*os-3./64.
     #    *x12*x2z-29./64.*x12*tx-1./8.*x12+13./64.*x2z+1./64.*
     #    tx*x12s+9./32.*tx)
      gz30c= gz30c+rt1wg(13)*vvc*gsm2*ys*(-3./32.*o*
     #    x12*x2z-3./32.*o*x12*tx+7./32.*o*x2z-1./32.*o*tx-1./
     #    16.*os*x2z-1./16.*os*tx+3./32.*x12*x2z+5./32.*x12*tx-
     #    5./32.*x2z-1./32.*tx*x12s-1./16.*tx)
      gz30c= gz30c+rt1wg(14)*bxpi*vvc*gsm2*ys*csti*(
     #    -zi*o*x12*tx+zi*o*tx-1./2.*zi*o*txs-1./2.*zi*os*tx+
     #    zi*x12*tx-1./2.*zi*x12*txs-1./2.*zi*tx*x12s-1./2.*zi*tx
     #    +1./2.*zi*txs-1./32.*o*x2z*tx-1./2.*o*tx-1./32.*o*
     #    x2zs-1./32.*x12*x2z*tx-1./2.*x12*tx+1./2.*x2z*tx+1./2.
     #    *tx+1./32.*x2zs-1./2.*txs)
      gz30c= gz30c+rt1wg(14)*bxpi*vvc*gsm2*ys*(1./16.*o*
     #    x2z*tx+1./16.*o*x2zs+1./16.*x12*x2z*tx-1./16.*x2zs)
      gz30c= gz30c+rt1wg(14)*vvc*gsm2*bxps*ys*csti*(
     #    1./32.-1./8.*zi*o-1./8.*zi*x12+1./8.*zi-1./32.*o-1./
     #    32.*x12)
      gz30c= gz30c+rt1wg(14)*vvc*gsm2*bxps*ys*(-1./16.
     #    +1./16.*o+1./16.*x12)
      gz30c= gz30c+rt1wg(14)*vvc*gsm2*ys*bxp*csti*(9.
     #    /32.-3./8.*zi*o*x12+1./4.*zi*o*tx+1./2.*zi*o-1./4.*zi
     #    *os+1./2.*zi*x12*tx+3./8.*zi*x12-3./8.*zi*tx-1./8.*zi
     #    *x12s+1./2.*zi*txs-1./4.*zi+1./16.*o*x12+1./32.*o*x2z
     #    +1./64.*o*tx-21./64.*o+3./64.*os+3./64.*x12*tx-11./
     #    64.*x12-1./32.*x2z+29./64.*tx+1./64.*x12s)
      gz30c= gz30c+rt1wg(14)*vvc*gsm2*ys*bxp*(-1./16.
     #    -1./8.*o*x12-1./16.*o*x2z-1./32.*o*tx+5./32.*o-3./
     #    32.*os-3./32.*x12*tx+3./32.*x12+1./16.*x2z+3./32.*tx
     #    -1./32.*x12s)
      gz30c= gz30c+rt1wg(14)*vvc*gsm2*ys*csti*(-1.
     #    /8.+5./8.*zi*o*x12*tx+1./2.*zi*o*x12-9./8.*zi*o*tx-1./
     #    8.*zi*o*x12s+3./8.*zi*o*txs-3./8.*zi*o-1./4.*zi*os*x12
     #    +1./4.*zi*os*tx+3./8.*zi*os-1./8.*zi*oc-5./4.*zi*x12*
     #    tx+3./8.*zi*x12*txs-1./4.*zi*x12+3./8.*zi*tx*x12s+7./
     #    8.*zi*tx+1./8.*zi*x12s-zi*txs+1./8.*zi-3./64.*o*x12*
     #    x2z-1./32.*o*x12*tx-1./8.*o*x12+1./64.*o*x2z*tx+15./
     #    64.*o*x2z+9./32.*o*tx-1./64.*o*txs+1./4.*o-3./64.*os*
     #    x2z-1./64.*os*tx-1./8.*os+3./64.*x12*x2z+13./32.*x12*
     #    tx-1./64.*x12*txs+1./8.*x12-29./64.*x2z*tx-3./16.*x2z
     #    -1./64.*tx*x12s-7./8.*tx+1./2.*txs)
      gz30c= gz30c+rt1wg(14)*vvc*gsm2*ys*(3./32.*o*x12*
     #    x2z+1./16.*o*x12*tx-1./32.*o*x2z*tx-7./32.*o*x2z-1./
     #    16.*o*tx+1./32.*o*txs+3./32.*os*x2z+1./32.*os*tx-3./
     #    32.*x12*x2z-1./16.*x12*tx+1./32.*x12*txs-3./32.*x2z*tx
     #    +1./8.*x2z+1./32.*tx*x12s)
      gz30c= gz30c+rs1wz(1)*bxpi*vvc*gtm2*ys*(-4./3.*o*
     #    x2z-2./3.*o*tx+2./3.*os-1./3.*x12*x2z+2./3.*x2z*tx+
     #    2./3.*x2z)
      gz30c= gz30c+rs1wz(1)*vvc*gtm2*ys*bxp*(1./2.-2./3.
     #    *o-1./3.*x12)
      gz30c= gz30c+rs1wz(1)*vvc*gtm2*ys*(-2./3.-2./3.
     #    *o*x12+1./6.*o*x2z+1./6.*o*tx+8./3.*o-7./6.*os-1./3.
     #    *x12*x2z+1./6.*x12*tx+x12-1./2.*x2z-2./3.*tx-1./6.*
     #    x12s)
      gz30c= gz30c+rs1wz(4)*bxpi*vvc*gtm2*ys*(1./12.*o*
     #    x2z*tx-1./12.*o*x2zs+1./12.*x12*x2z*tx-1./12.*x2zs)
      gz30c= gz30c+rs1wz(4)*vvc*gtm2*bxps*ys*(-1./24.
     #    +1./12.*o+1./12.*x12)
      gz30c= gz30c+rs1wz(4)*vvc*gtm2*ys*bxp*(-1./12.-
     #    1./12.*o*x12-1./8.*o*x2z+1./24.*o*tx+1./24.*o-1./12.*
     #    x12*x2z+1./24.*x12*tx+1./8.*x12+1./12.*x2z-1./12.*
     #    x12s)
      gz30c= gz30c+rs1wz(4)*vvc*gtm2*ys*(-1./24.*o*x12
     #    *x2z+1./12.*o*x12*tx-1./24.*o*x2z*tx+1./24.*o*x2z-1./
     #    12.*o*tx+1./24.*o*x2zs-1./24.*os*x2z+1./24.*os*tx-1./
     #    24.*x12*x2z*tx-1./8.*x12*x2z-1./12.*x12*tx+1./6.*x2z+
     #    1./24.*tx*x12s-1./24.*x2zs)
      gz30c= gz30c+rs1wz(7)*bxpi*vvc*gtm2*ys*(1./24.*o*
     #    x12*x2z-1./24.*o*x2z*tx+1./24.*os*x2z-1./24.*x12*x2z*tx
     #    -1./24.*x12*x2zs+1./24.*x2zs)
      gz30c= gz30c+rs1wz(7)*vvc*gtm2*ys*bxp*(1./24.+1./
     #    12.*o*x12+1./48.*os-1./12.*x12+1./16.*x12s)
      gz30c= gz30c+rs1wz(7)*vvc*gtm2*ys*(-1./12.*o*x12
     #    *x2z-1./24.*o*x12*tx-1./24.*o*x12+1./24.*o*tx+1./48.*
     #    o*x12s+1./24.*os*x12-1./24.*os*x2z-1./48.*os*tx-1./24.
     #    *os+1./48.*oc+1./8.*x12*x2z+1./24.*x12*tx-1./24.*x2z*
     #    x12s-1./12.*x2z-1./48.*tx*x12s)
      gz30c= gz30c+rs1wz(10)*bxpi*vvc*gtm2*ys*(-1./24.*
     #    o*x12*x2z+1./24.*o*x2z*tx-1./24.*os*x2z+1./24.*x12*x2z*
     #    tx+1./24.*x12*x2zs-1./24.*x2zs)
      gz30c= gz30c+rs1wz(10)*vvc*gtm2*ys*bxp*(-1./24.
     #    -1./12.*o*x12-1./48.*os+1./12.*x12-1./16.*x12s)
      gz30c= gz30c+rs1wz(10)*vvc*gtm2*ys*(1./12.*o*x12*
     #    x2z+1./24.*o*x12*tx+1./24.*o*x12-1./24.*o*tx-1./48.*o
     #    *x12s-1./24.*os*x12+1./24.*os*x2z+1./48.*os*tx+1./24.
     #    *os-1./48.*oc-1./8.*x12*x2z-1./24.*x12*tx+1./24.*x2z*
     #    x12s+1./12.*x2z+1./48.*tx*x12s)
      gz30c= gz30c+rs1wz(11)*bxpi*vvc*gtm2*ys*(-1./6.*o
     #    *x12-1./3.*o*x2z+1./6.*x12*tx+1./3.*x2z*tx)
      gz30c= gz30c+rs1wz(11)*vvc*gtm2*ys*bxp*(1./3.-1./
     #    2.*o-1./4.*x12)
      gz30c= gz30c+rs1wz(11)*vvc*gtm2*ys*(1./6.*o*x12+
     #    1./3.*o*x2z+1./2.*o-1./3.*x2z-1./3.*tx)
      gz30c= gz30c+rs1wz(12)*bxpi*vvc*gtm2*ys*(1./6.*o*
     #    x12-1./3.*o*tx+1./3.*os-1./6.*x12*x2z-1./6.*x12*tx+
     #    1./3.*x2z)
      gz30c= gz30c+rs1wz(12)*vvc*gtm2*ys*bxp*(-1./12.
     #    +1./6.*o+1./12.*x12)
      gz30c= gz30c+rs1wz(12)*vvc*gtm2*ys*(-1./3.-1./
     #    3.*o*x12-1./4.*o*x2z+1./12.*o*tx+1./2.*o-5./12.*os-
     #    1./6.*x12*x2z+1./12.*x12*tx+1./2.*x12+1./12.*x2z-1./
     #    12.*x12s)
      gz30c= gz30c+rs1wz(13)*bxpi*vvc*gtm2*ys*(1./12.*o*
     #    x12+1./12.*o*tx-1./12.*os-1./12.*x12*x2z-1./12.*x12*
     #    tx+1./12.*x2z)
      gz30c= gz30c+rs1wz(13)*vvc*gtm2*ys*(-1./12.-1./
     #    8.*o*x12-1./8.*o+1./12.*os+1./8.*x12-1./24.*x12s)
      gz30c= gz30c+rs1wz(14)*bxpi*vvc*gtm2*ys*(-1./12.*
     #    o*x2z+1./12.*x12*x2z+1./6.*x2z*tx)
      gz30c= gz30c+rs1wz(14)*vvc*gtm2*ys*bxp*(1./24.-1./
     #    12.*x12)
      gz30c= gz30c+rs1wz(14)*vvc*gtm2*ys*(-1./24.*o*
     #    x12+1./24.*o*x2z+1./8.*o*tx+1./12.*o-1./12.*os+1./8.
     #    *x12*tx-1./12.*x12-1./24.*x2z-1./6.*tx+1./24.*x12s)
      gz30c= gz30c+rs2wz(1)*bxpi*vvq*gtm2*yc*(-2*o*x2zs
     #    -2*x12*x2z*tx-2*x12*x2zs+2*x2z*tx+2*x2z*txs+2*x2zs
     #    )
      gz30c= gz30c+rs2wz(1)*vvq*gtm2*bxps*yc*(-2+2*o
     #    +2*x12)
      gz30c= gz30c+rs2wz(1)*vvq*gtm2*yc*bxp*(3+5*o*x12
     #    -3*o*x2z-o*tx-6*o+3*os-x12*x2z-3*x12*tx-6*x12
     #    -x2z*tx+3*x2z+3*tx+3*x12s+txs)
      gz30c= gz30c+rs2wz(1)*vvq*gtm2*yc*(-4*o*x12*x2z
     #    -o*x12*tx+7*o*x2z+2*o*tx+o*x2zs+o*txs-2*os*x2z+
     #    x12*x2z*tx+7*x12*x2z+4*x12*tx+x12*txs-3*x2z*tx-2*
     #    x2z*x12s-x2z*txs-5*x2z-tx*x12s+tx*x2zs-2*tx-x2zs
     #    -2*txs)
      gz30c= gz30c+rs2wz(4)*bxpi*vvq*gtm2*yc*(1./4.*o*x12
     #    *x2zs-1./4.*o*tx*x2zs+1./4.*o*x2zc+1./4.*x12*tx*x2zs+
     #    1./4.*tx*x2zc-1./4.*tx*x2zs-1./4.*x2zc-1./4.*x2zs*txs)
      gz30c= gz30c+rs2wz(4)*vvq*gtm2*bxps*yc*(3./8.+3./
     #    4.*o*x12-3./4.*o+3./8.*os-3./4.*x12+3./8.*x12s)
      gz30c= gz30c+rs2wz(4)*vvq*gtm2*yc*bxp*(-7./8.*o*
     #    x12*x2z-1./4.*o*x12*tx+1./4.*o*x12-1./4.*o*x2z*tx+13./
     #    8.*o*x2z+1./8.*o*tx-1./4.*o*x12s+1./4.*o*txs-1./4.*os
     #    *x12-5./8.*os*x2z+1./8.*os*tx-1./4.*x12*x2z*tx+5./4.*
     #    x12*x2z+5./8.*x12*tx+1./4.*x12*txs+1./4.*x2z*tx-1./4.
     #    *x2z*x12s-x2z-3./8.*tx*x12s-1./4.*tx-1./4.*txs)
      gz30c= gz30c+rs2wz(4)*vvq*gtm2*yc*(-1./2.*o*x12*
     #    x2z+1./4.*o*x12*x2zs+1./8.*o*x2z*tx+1./4.*o*x2z*x12s-
     #    1./4.*o*x2z*txs+1./4.*o*tx*x2zs-9./8.*o*x2zs+1./4.*os*
     #    x12*x2z-1./4.*os*x2z*tx+1./4.*os*x2zs-7./8.*x12*x2z*tx
     #    -1./4.*x12*x2z*txs+1./4.*x12*tx*x2zs-1./2.*x12*x2zs+1.
     #    /4.*x2z*tx*x12s+1./2.*x2z*tx+1./2.*x2z*txs-1./2.*tx*
     #    x2zs+7./8.*x2zs)
      gz30c= gz30c+rs2wz(7)*bxpi*vvq*gtm2*yc*(-1./8.*o*
     #    x12*x2zs+1./8.*o*x2zs-1./8.*os*x2zs-1./8.*x12*tx*x2zs
     #    +1./8.*tx*x2zs+1./8.*x2zs*txs)
      gz30c= gz30c+rs2wz(7)*vvq*gtm2*bxps*yc*(1./16.*o*
     #    x12+1./16.*o*tx-1./16.*o+1./16.*os+1./16.*x12*tx-1./
     #    16.*tx)
      gz30c= gz30c+rs2wz(7)*vvq*gtm2*yc*bxp*(-1./16.*o*
     #    x12*x2z+3./16.*o*x12*tx-1./4.*o*x12-1./8.*o*x2z*tx+1./
     #    8.*o*x2z-1./8.*o*tx+1./8.*o*x12s-1./16.*o*txs+1./8.*o
     #    +1./4.*os*x12-1./8.*os*x2z+1./16.*os*tx-1./4.*os+1./
     #    8.*oc-1./16.*x12*x2z*tx-1./4.*x12*tx-1./16.*x12*txs+1.
     #    /8.*x2z*tx+1./8.*tx*x12s+1./8.*tx+1./8.*txs)
      gz30c= gz30c+rs2wz(7)*vvq*gtm2*yc*(-3./16.*o*x12
     #    *x2z*tx+3./8.*o*x12*x2z+1./8.*o*x2z*tx-1./8.*o*x2z*x12s
     #    +1./16.*o*x2z*txs-1./4.*o*x2z+1./16.*o*tx*x2zs-1./16.
     #    *o*x2zs-1./4.*os*x12*x2z-1./16.*os*x2z*tx+3./8.*os*x2z
     #    +1./16.*os*x2zs-1./8.*oc*x2z+3./8.*x12*x2z*tx+1./16.*
     #    x12*x2z*txs-1./8.*x2z*tx*x12s-1./4.*x2z*tx-1./4.*x2z*
     #    txs-1./16.*tx*x2zs)
      gz30c= gz30c+rs2wz(10)*bxpi*vvq*gtm2*yc*(1./8.*o*
     #    x12*x2zs-1./8.*o*x2zs+1./8.*os*x2zs+1./8.*x12*tx*x2zs
     #    -1./8.*tx*x2zs-1./8.*x2zs*txs)
      gz30c= gz30c+rs2wz(10)*vvq*gtm2*bxps*yc*(-1./16.*
     #    o*x12-1./16.*o*tx+1./16.*o-1./16.*os-1./16.*x12*tx+
     #    1./16.*tx)
      gz30c= gz30c+rs2wz(10)*vvq*gtm2*yc*bxp*(1./16.*o*
     #    x12*x2z-3./16.*o*x12*tx+1./4.*o*x12+1./8.*o*x2z*tx-1./
     #    8.*o*x2z+1./8.*o*tx-1./8.*o*x12s+1./16.*o*txs-1./8.*o
     #    -1./4.*os*x12+1./8.*os*x2z-1./16.*os*tx+1./4.*os-1./
     #    8.*oc+1./16.*x12*x2z*tx+1./4.*x12*tx+1./16.*x12*txs-1.
     #    /8.*x2z*tx-1./8.*tx*x12s-1./8.*tx-1./8.*txs)
      gz30c= gz30c+rs2wz(10)*vvq*gtm2*yc*(3./16.*o*x12*
     #    x2z*tx-3./8.*o*x12*x2z-1./8.*o*x2z*tx+1./8.*o*x2z*x12s
     #    -1./16.*o*x2z*txs+1./4.*o*x2z-1./16.*o*tx*x2zs+1./16.
     #    *o*x2zs+1./4.*os*x12*x2z+1./16.*os*x2z*tx-3./8.*os*x2z
     #    -1./16.*os*x2zs+1./8.*oc*x2z-3./8.*x12*x2z*tx-1./16.*
     #    x12*x2z*txs+1./8.*x2z*tx*x12s+1./4.*x2z*tx+1./4.*x2z*
     #    txs+1./16.*tx*x2zs)
      gz30c= gz30c+rs2wz(11)*bxpi*vvq*gtm2*yc*(1./4.*o*
     #    x2z*tx-1./4.*o*x2zs-1./4.*x12*x2z*tx-1./4.*x12*x2zs+1.
     #    /2.*x2z*txs+1./4.*x2zs)
      gz30c= gz30c+rs2wz(11)*vvq*gtm2*bxps*yc*(-3./4.
     #    +3./4.*o+3./4.*x12)
      gz30c= gz30c+rs2wz(11)*vvq*gtm2*yc*bxp*(1./4.-5./
     #    4.*o*x2z-3./8.*o+1./8.*os-1./2.*x12*x2z-x12*tx-5./8.
     #    *x12-1./2.*x2z*tx+5./4.*x2z+3./4.*tx+3./8.*x12s+1./
     #    2.*txs)
      gz30c= gz30c+rs2wz(11)*vvq*gtm2*yc*(-1./8.*o*x12
     #    *x2z-1./4.*o*x2z*tx+5./8.*o*x2z-1./4.*o*tx+1./2.*o*
     #    x2zs+1./4.*o*txs-1./8.*os*x2z+1./8.*os*tx+1./2.*x12*
     #    x2z*tx+7./8.*x12*x2z+1./4.*x12*tx+1./4.*x12*txs-3./4.
     #    *x2z*tx-1./4.*x2z*x12s-1./2.*x2z*txs-1./2.*x2z-1./8.*
     #    tx*x12s+1./2.*tx*x2zs-1./2.*x2zs-1./2.*txs)
      gz30c= gz30c+rs2wz(12)*bxpi*vvq*gtm2*yc*(-1./2.*o
     #    *x2zs-1./2.*x12*x2z*tx-1./4.*x12*x2zs+x2z*tx+1./2.*
     #    x2z*txs-1./2.*tx*x2zs+1./2.*x2zs)
      gz30c= gz30c+rs2wz(12)*vvq*gtm2*bxps*yc*(-1./8.
     #    +1./8.*o+1./8.*x12)
      gz30c= gz30c+rs2wz(12)*vvq*gtm2*yc*bxp*(1+3./2.*o
     #    *x12-1./8.*o*tx-2*o+os+1./8.*x12*x2z-1./8.*x12*tx
     #    -3./2.*x12+1./4.*tx+1./2.*x12s)
      gz30c= gz30c+rs2wz(12)*vvq*gtm2*yc*(-o*x12*x2z
     #    -1./4.*o*x12*tx-1./8.*o*x2z*tx+2*o*x2z+o*tx-1./8.*o
     #    *x2zs+1./4.*o*txs-1./2.*os*x2z-3./8.*x12*x2z*tx+5./4.
     #    *x12*x2z+3./2.*x12*tx+1./4.*x12*txs+1./4.*x2z*tx-1./4.
     #    *x2z*x12s-3./2.*x2z-1./4.*tx*x12s-tx+1./8.*x2zs-1./
     #    2.*txs)
      gz30c= gz30c+rs2wz(13)*bxpi*vvq*gtm2*yc*(-1./8.*o
     #    *x2z*tx-1./8.*o*x2zs+1./4.*o*txs-5./8.*x12*x2z*tx+1./
     #    4.*x12*txs+1./4.*x2z*tx+1./4.*x2z*txs+1./8.*x2zs)
      gz30c= gz30c+rs2wz(13)*vvq*gtm2*bxps*yc*(1./16.-1.
     #    /16.*o-1./16.*x12)
      gz30c= gz30c+rs2wz(13)*vvq*gtm2*yc*bxp*(-3./16.*o
     #    *tx+5./16.*o-5./16.*os-1./16.*x12*x2z+1./16.*x12*tx
     #    -1./16.*x12+1./8.*tx+1./16.*x12s)
      gz30c= gz30c+rs2wz(13)*vvq*gtm2*yc*(-3./16.*o*
     #    x12*x2z-3./8.*o*x12*tx+5./16.*o*x2z*tx+1./16.*o*x2z+1.
     #    /16.*o*x2zs-1./8.*o*txs+1./16.*os*x2z-1./16.*os*tx+3./
     #    16.*x12*x2z*tx+3./16.*x12*x2z+1./2.*x12*tx-1./8.*x12*
     #    txs-1./8.*x2z*tx-1./8.*x2z-5./16.*tx*x12s-1./4.*tx-
     #    1./16.*x2zs-1./4.*txs)
      gz30c= gz30c+rs2wz(14)*bxpi*vvq*gtm2*yc*(1./8.*o*
     #    x2z*tx+1./8.*o*x2zs+1./8.*x12*x2z*tx+1./4.*x2z*txs-1./
     #    4.*tx*x2zs-1./8.*x2zs)
      gz30c= gz30c+rs2wz(14)*vvq*gtm2*bxps*yc*(-1./16.
     #    +1./16.*o+1./16.*x12)
      gz30c= gz30c+rs2wz(14)*vvq*gtm2*yc*bxp*(-1./8.-
     #    1./4.*o*x12-3./16.*o*tx+5./16.*o-3./16.*os+1./16.*x12
     #    *x2z-3./16.*x12*tx+3./16.*x12-1./4.*x2z*tx+1./4.*tx
     #    -1./16.*x12s+1./4.*txs)
      gz30c= gz30c+rs2wz(14)*vvq*gtm2*yc*(3./16.*o*x12*
     #    x2z+1./8.*o*x12*tx+1./16.*o*x2z*tx-7./16.*o*x2z-1./8.
     #    *o*tx-1./16.*o*x2zs+3./16.*os*x2z+1./16.*os*tx+1./16.
     #    *x12*x2z*tx-3./16.*x12*x2z-1./8.*x12*tx-1./4.*x2z*txs
     #    +1./4.*x2z+1./16.*tx*x12s+1./4.*tx*x2zs+1./16.*x2zs
     #    -1./4.*txs)
      gz30c= gz30c+rt1wz(1)*bxpi*vvc*gsm2*ys*(-1./2.*o*
     #    x2z*tx-1./2.*o*txs-1./2.*x12*txs+1./2.*x2z*tx)
      gz30c= gz30c+rt1wz(1)*vvc*gsm2*bxps*ys*(-3./4.+
     #    3./4.*o+3./4.*x12)
      gz30c= gz30c+rt1wz(1)*vvc*gsm2*ys*bxp*(-1./4.+1.
     #    /4.*o*x12-o*x2z-o+5./4.*os-1./4.*x12*x2z-1./2.*x12*
     #    tx-1./4.*x12+x2z+3./4.*tx)
      gz30c= gz30c+rt1wz(1)*vvc*gsm2*ys*(-3./4.*o*x12*
     #    tx-1./2.*o*x2z*tx+11./4.*o*tx+1./4.*o*x2zs+1./4.*o*
     #    txs-1./4.*os*x2z-3./4.*os*tx-1./4.*x12*x2z*tx+5./4.*
     #    x12*tx+1./4.*x12*txs-3./4.*x2z*tx+1./4.*x2z-1./2.*tx
     #    -1./4.*x2zs)
      gz30c= gz30c+rt1wz(4)*bxpi*vvc*gsm2*ys*(1./8.*o*x12
     #    *x2z*tx+1./8.*o*x2z*txs-1./8.*o*tx*x2zs+1./8.*o*x2zs+
     #    1./8.*os*x2z*tx-1./8.*os*x2zs+1./8.*x12*x2z*txs-1./8.*
     #    tx*x2zs)
      gz30c= gz30c+rt1wz(4)*vvc*gsm2*bxps*ys*(1./8.+5./
     #    16.*o*x12+1./16.*o*tx-5./16.*o+3./16.*os+1./16.*x12*
     #    tx-1./4.*x12-1./16.*tx+1./8.*x12s)
      gz30c= gz30c+rt1wz(4)*vvc*gsm2*ys*bxp*(-3./16.*o*
     #    x12*x2z-3./16.*o*x12*tx-1./16.*o*x12-1./8.*o*x2z*tx+1.
     #    /2.*o*x2z+3./16.*o*tx-1./16.*o*x12s+1./16.*o*txs+1./8.
     #    *o-1./4.*os*x2z-3./16.*os+1./16.*oc-1./16.*x12*x2z*tx
     #    +1./4.*x12*x2z+5./16.*x12*tx+1./16.*x12*txs+1./8.*x2z
     #    *tx-1./4.*x2z-3./16.*tx*x12s-1./8.*tx)
      gz30c= gz30c+rt1wz(4)*vvc*gsm2*ys*(-1./8.*o*x12*
     #    x2z*tx+1./16.*o*x12*x2z-1./8.*o*x12*tx+1./8.*o*x12*txs
     #    -1./16.*o*x2z*tx-1./16.*o*x2z*txs-1./4.*o*x2z+1./16.*
     #    o*tx*x12s+1./16.*o*tx*x2zs-3./16.*o*x2zs-1./8.*o*txs-
     #    1./16.*os*x12*x2z+1./8.*os*x12*tx-1./8.*os*x2z*tx+5./16.
     #    *os*x2z-1./8.*os*tx+1./16.*os*x2zs+1./16.*os*txs-1./
     #    16.*oc*x2z+1./16.*oc*tx-5./16.*x12*x2z*tx-1./16.*x12*
     #    x2z*txs-1./8.*x12*txs+1./4.*x2z*tx-1./16.*tx*x2zs+1./
     #    16.*x12s*txs+1./8.*x2zs)
      gz30c= gz30c+rt1wz(7)*bxpi*vvc*gsm2*ys*(-1./8.*o*
     #    x12*x2zs-1./16.*o*x2z*txs-1./16.*o*x2zc+1./8.*o*x2zs-
     #    1./8.*os*x2zs-1./16.*x12*x2z*txs-1./16.*x12*tx*x2zs+1./
     #    16.*tx*x2zs+1./16.*x2zc)
      gz30c= gz30c+rt1wz(7)*vvc*gsm2*bxps*ys*(-3./32.
     #    -1./8.*o*x12+1./8.*o-1./32.*os+3./16.*x12-3./32.*
     #    x12s)
      gz30c= gz30c+rt1wz(7)*vvc*gsm2*ys*bxp*(3./16.*o*x12
     #    *x2z+3./16.*o*x12*tx-1./4.*o*x12-5./16.*o*x2z-1./16.*
     #    o*tx+1./8.*o*x12s+1./8.*o+1./4.*os*x12+1./16.*os*x2z
     #    +1./16.*os*tx-1./4.*os+1./8.*oc-5./16.*x12*x2z-3./
     #    16.*x12*tx+1./16.*x2z*x12s+1./4.*x2z+1./8.*tx*x12s+1./
     #    16.*tx)
      gz30c= gz30c+rt1wz(7)*vvc*gsm2*ys*(-1./8.*o*x12*
     #    x2z*tx+3./8.*o*x12*x2z-1./16.*o*x12*x2zs-1./16.*o*x12*
     #    txs+1./16.*o*x2z*tx-1./8.*o*x2z*x12s-1./4.*o*x2z+1./4.
     #    *o*x2zs+1./16.*o*txs-1./4.*os*x12*x2z-1./16.*os*x2z*tx
     #    +3./8.*os*x2z-1./32.*os*x2zs-1./32.*os*txs-1./8.*oc*
     #    x2z+1./4.*x12*x2z*tx+1./8.*x12*x2zs+1./16.*x12*txs-1./
     #    16.*x2z*tx*x12s-1./8.*x2z*tx-1./32.*x12s*txs-7./32.*
     #    x2zs)
      gz30c= gz30c+rt1wz(10)*bxpi*vvc*gsm2*ys*(1./8.*o*
     #    x12*x2zs+1./16.*o*x2z*txs+1./16.*o*x2zc-1./8.*o*x2zs+
     #    1./8.*os*x2zs+1./16.*x12*x2z*txs+1./16.*x12*tx*x2zs-1./
     #    16.*tx*x2zs-1./16.*x2zc)
      gz30c= gz30c+rt1wz(10)*vvc*gsm2*bxps*ys*(3./32.+1.
     #    /8.*o*x12-1./8.*o+1./32.*os-3./16.*x12+3./32.*x12s)
      gz30c= gz30c+rt1wz(10)*vvc*gsm2*ys*bxp*(-3./16.*o
     #    *x12*x2z-3./16.*o*x12*tx+1./4.*o*x12+5./16.*o*x2z+1./
     #    16.*o*tx-1./8.*o*x12s-1./8.*o-1./4.*os*x12-1./16.*os*
     #    x2z-1./16.*os*tx+1./4.*os-1./8.*oc+5./16.*x12*x2z+3.
     #    /16.*x12*tx-1./16.*x2z*x12s-1./4.*x2z-1./8.*tx*x12s-1.
     #    /16.*tx)
      gz30c= gz30c+rt1wz(10)*vvc*gsm2*ys*(1./8.*o*x12*
     #    x2z*tx-3./8.*o*x12*x2z+1./16.*o*x12*x2zs+1./16.*o*x12*
     #    txs-1./16.*o*x2z*tx+1./8.*o*x2z*x12s+1./4.*o*x2z-1./4.
     #    *o*x2zs-1./16.*o*txs+1./4.*os*x12*x2z+1./16.*os*x2z*tx
     #    -3./8.*os*x2z+1./32.*os*x2zs+1./32.*os*txs+1./8.*oc*
     #    x2z-1./4.*x12*x2z*tx-1./8.*x12*x2zs-1./16.*x12*txs+1./
     #    16.*x2z*tx*x12s+1./8.*x2z*tx+1./32.*x12s*txs+7./32.*
     #    x2zs)
      gz30c= gz30c+rt1wz(11)*vvc*gsm2*bxps*ys*(-1./4.
     #    +1./4.*o+1./4.*x12)
      gz30c= gz30c+rt1wz(11)*vvc*gsm2*ys*bxp*(-1./4.-
     #    3./8.*o*x12-1./4.*o*x2z-1./4.*o*tx+1./4.*o-3./8.*x12*
     #    tx+1./8.*x12+1./4.*x2z+1./2.*tx)
      gz30c= gz30c+rt1wz(11)*vvc*gsm2*ys*(-1./4.*o*x2z
     #    +1./4.*o*tx-1./2.*x2z*tx+1./4.*x2z)
      gz30c= gz30c+rt1wz(12)*bxpi*vvc*gsm2*ys*(1./4.*o*
     #    x2z*tx-1./4.*o*txs-1./4.*x12*txs+1./4.*x2z*tx)
      gz30c= gz30c+rt1wz(12)*vvc*gsm2*ys*bxp*(1./8.+1./
     #    4.*o*x12+1./8.*o*tx-1./2.*o+3./8.*os-1./4.*x12-1./8.
     #    *tx)
      gz30c= gz30c+rt1wz(12)*vvc*gsm2*ys*(-1./8.*o*x12
     #    *tx-1./8.*o*x2z*tx+5./8.*o*tx+1./8.*o*txs+1./8.*os*
     #    x2z-1./8.*os*tx+5./8.*x12*tx+1./8.*x12*txs+1./8.*x2z*
     #    tx-1./8.*x2z-1./4.*tx)
      gz30c= gz30c+rt1wz(13)*bxpi*vvc*gsm2*ys*(-1./8.*o
     #    *x2zs-1./8.*o*txs-1./8.*x12*x2z*tx-1./8.*x12*txs+1./8.
     #    *x2z*tx+1./8.*x2zs)
      gz30c= gz30c+rt1wz(13)*vvc*gsm2*ys*bxp*(3./16.+3./
     #    16.*o*x12-1./16.*o-1./8.*os-1./4.*x12+1./16.*x12s)
      gz30c= gz30c+rt1wz(13)*vvc*gsm2*ys*(-3./16.*o*
     #    x12*x2z-3./16.*o*x12*tx+7./16.*o*x2z-1./16.*o*tx-1./8.
     #    *os*x2z-1./8.*os*tx+3./16.*x12*x2z+5./16.*x12*tx-5./
     #    16.*x2z-1./16.*tx*x12s-1./8.*tx)
      gz30c= gz30c+rt1wz(14)*bxpi*vvc*gsm2*ys*(1./8.*o*
     #    x2z*tx+1./8.*o*x2zs+1./8.*x12*x2z*tx-1./8.*x2zs)
      gz30c= gz30c+rt1wz(14)*vvc*gsm2*bxps*ys*(-1./8.
     #    +1./8.*o+1./8.*x12)
      gz30c= gz30c+rt1wz(14)*vvc*gsm2*ys*bxp*(-1./8.-
     #    1./4.*o*x12-1./8.*o*x2z-1./16.*o*tx+5./16.*o-3./16.*
     #    os-3./16.*x12*tx+3./16.*x12+1./8.*x2z+3./16.*tx-1./
     #    16.*x12s)
      gz30c= gz30c+rt1wz(14)*vvc*gsm2*ys*(3./16.*o*x12*
     #    x2z+1./8.*o*x12*tx-1./16.*o*x2z*tx-7./16.*o*x2z-1./8.
     #    *o*tx+1./16.*o*txs+3./16.*os*x2z+1./16.*os*tx-3./16.*
     #    x12*x2z-1./8.*x12*tx+1./16.*x12*txs-3./16.*x2z*tx+1./
     #    4.*x2z+1./16.*tx*x12s)
*      
      gz10q= rwwgz(1,1)*xx*vvq*gstm2*yc*(-4*o*x2z*txs-4*
     #    x12*x2z*txs+4*x2z*txs)
      gz10q= gz10q+rwwgz(1,1)*bxpi*vvq*gstm2*yc*(-4*o*
     #    x2z*tx-8*o*txs-8*x12*txs+4*x2z*tx+4*txs)
      gz10q= gz10q+rwwgz(1,1)*vvq*gstm2*bxps*yc*(-2+2
     #    *o+2*x12)
      gz10q= gz10q+rwwgz(1,1)*vvq*gstm2*yc*bxp*(2+2*o*
     #    x12-2*o*x2z-14*o*tx-6*o+4*os-10*x12*tx-2*x12-2*
     #    x2z*tx+2*x2z+8*tx+2*txs)
      gz10q= gz10q+rwwgz(1,1)*vvq*gstm2*yc*(4*o*x12*tx
     #    +8*o*x2z*tx+4*o*x2z+8*o*tx+8*o*txs-2*os*x2z+2*os*
     #    tx+4*x12*x2z*tx+4*x12*tx+8*x12*txs-8*x2z*tx-2*x2z*
     #    txs-2*x2z+2*tx*x12s+2*tx*x2zs-4*tx-4*txs)
      gz10q= gz10q+rwwgz(1,4)*xx*vvq*gstm2*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)
      gz10q= gz10q+rwwgz(1,4)*bxpi*vvq*gstm2*yc*(o*x12*
     #    x2z*tx-o*x12*x2zs-o*x2z*tx+2*o*x2z*txs-3./2.*o*tx*
     #    x2zs+7./2.*o*x2zs+3./2.*os*x2z*tx-2*os*x2zs+x12*x2z*
     #    tx+2*x12*x2z*txs-1./2.*x12*tx*x2zs+x12*x2zs-1./2.*x2z
     #    *tx*x12s-2*x2z*txs+1./2.*tx*x2zs-3./2.*x2zs)
      gz10q= gz10q+rwwgz(1,4)*vvq*gstm2*bxps*yc*(1+3*o*
     #    x12-o*tx-3*o+2*os-x12*tx-2*x12+tx+x12s)
      gz10q= gz10q+rwwgz(1,4)*vvq*gstm2*yc*bxp*(-1./2.
     #    -7./2.*o*x12*x2z+o*x12*tx-o*x12-o*x2z*tx+13./2.*o*
     #    x2z-1./2.*o*tx-1./2.*o*x12s+5./2.*o*txs+3./2.*o-1./
     #    2.*os*x12-4*os*x2z+2*os*tx-os+3*x12*x2z+3./2.*x12*
     #    tx+5./2.*x12*txs+x12-x2z*tx-1./2.*x2z*x12s-5./2.*
     #    x2z-tx*x12s-1./2.*tx-1./2.*x12s-3./2.*txs)
      gz10q= gz10q+rwwgz(1,4)*vvq*gstm2*yc*(-3./2.*o*
     #    x12*x2z*tx+2*o*x12*x2z-1./2.*o*x12*tx+o*x12*x2zs+2*o*
     #    x2z*tx-5./2.*o*x2z*txs-4*o*x2z+2*o*tx*x2zs+1./2.*o*tx
     #    -9./2.*o*x2zs-3./2.*o*txs-2*os*x2z*tx+5./2.*os*x2z-
     #    os*tx+5./2.*os*x2zs-3./2.*x12*x2z*tx-5./2.*x12*x2z*txs
     #    -2*x12*x2z+1./2.*x12*tx*x2zs-1./2.*x12*tx-x12*x2zs-
     #    3./2.*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-1./2.*tx*
     #    x2zs+2*x2zs+txs)
      gz10q= gz10q+rwwgz(1,7)*xx*vvq*gstm2*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)
      gz10q= gz10q+rwwgz(1,7)*bxpi*vvq*gstm2*yc*(-3./4.
     #    *o*x12*x2z*tx-1./2.*o*x12*x2zs-3./4.*o*x2z*txs-1./4.*o*
     #    tx*x2zs+5./4.*o*x2zs-1./4.*os*x2z*tx-3./4.*os*x2zs+1./
     #    2.*x12*x2z*tx-3./4.*x12*x2z*txs+1./2.*x12*x2zs-1./2.*
     #    x2z*tx*x12s+1./2.*x2z*txs+1./4.*tx*x2zs-1./2.*x2zs)
      gz10q= gz10q+rwwgz(1,7)*vvq*gstm2*yc*bxp*(-3./4.*
     #    o*x12*x2z-1./4.*o*x2z*tx+3./4.*o*x2z-1./4.*o*txs+1./4.
     #    *os*x12-1./2.*os*x2z-1./4.*os+1./4.*oc-1./4.*x12*x2z*
     #    tx+1./2.*x12*x2z-1./4.*x12*txs+1./4.*x2z*tx-1./4.*x2z
     #    *x12s-1./4.*x2z+1./4.*txs)
      gz10q= gz10q+rwwgz(1,7)*vvq*gstm2*yc*(3./4.*o*x12*
     #    x2z*tx+3./4.*o*x12*x2z+1./2.*o*x12*x2zs+1./4.*o*x2z*tx
     #    +o*x2z*txs-3./4.*o*x2z+1./4.*o*tx*x2zs-5./4.*o*x2zs
     #    -1./4.*os*x12*x2z+1./4.*os*x2z*tx+3./4.*os*x2z+3./4.*
     #    os*x2zs-1./4.*oc*x2z-1./4.*x12*x2z*tx+x12*x2z*txs-1./
     #    2.*x12*x2z-1./2.*x12*x2zs+1./2.*x2z*tx*x12s-1./4.*x2z*
     #    tx+1./4.*x2z*x12s-3./4.*x2z*txs+1./4.*x2z-1./4.*tx*
     #    x2zs+1./2.*x2zs)
      gz10q= gz10q+rwwgz(1,8)*bxpi*vvq*gstm2*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)
      gz10q= gz10q+rwwgz(1,8)*vvq*gstm2*bxps*yc*(-1./2.
     #    -2*o*x12+o*tx+2*o-3./2.*os+x12*tx+x12-tx-1./2.
     #    *x12s)
      gz10q= gz10q+rwwgz(1,8)*vvq*gstm2*yc*bxp*(1./2.+5.
     #    /4.*o*x12*x2z-3./2.*o*x12*tx+5./4.*o*x12+5./4.*o*x2z*tx
     #    -13./4.*o*x2z+1./4.*o*tx+1./4.*o*x12s-2*o*txs-3./2.
     #    *o+1./2.*os*x12+9./4.*os*x2z-7./4.*os*tx+3./4.*os+1.
     #    /4.*oc+1./4.*x12*x2z*tx-x12*x2z-3./4.*x12*tx-2*x12*
     #    txs-x12+3./4.*x2z*tx+x2z+1./4.*tx*x12s+1./2.*tx+1.
     #    /2.*x12s+txs)
      gz10q= gz10q+rwwgz(1,8)*vvq*gstm2*yc*(1./2.*o*x12*
     #    x2z*tx-3./4.*o*x12*x2z+1./2.*o*x12*tx+1./2.*o*x12*txs
     #    -7./4.*o*x2z*tx+3./4.*o*x2z*txs+5./2.*o*x2z+1./4.*o*
     #    tx*x12s-3./4.*o*tx*x2zs-1./2.*o*tx+5./4.*o*x2zs+3./2.
     #    *o*txs-1./4.*os*x12*x2z+1./2.*os*x12*tx+1./2.*os*x2z*tx
     #    -5./4.*os*x2z+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+3./2.*x12*txs-x2z*txs-x2z-1.
     #    /2.*tx*x12s+1./4.*tx*x2zs+1./4.*x12s*txs-1./2.*x2zs-
     #    txs)
      gz10q= gz10q+rwwgz(1,9)*bxpi*vvq*gstm2*yc*(o*x2z*tx
     #    +o*txs+x12*txs-x2z*tx)
      gz10q= gz10q+rwwgz(1,9)*vvq*gstm2*yc*bxp*(5*o*tx+
     #    x12*tx-tx)
      gz10q= gz10q+rwwgz(1,9)*vvq*gstm2*yc*(-o*x12*tx
     #    -2*o*x2z*tx-3*o*tx-o*txs-os*tx-x12*tx-x12*txs+
     #    x2z*tx+tx)
      gz10q= gz10q+rwwgz(1,10)*xx*vvq*gstm2*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)
      gz10q= gz10q+rwwgz(1,10)*bxpi*vvq*gstm2*yc*(3./4.*o
     #    *x12*x2z*tx+1./2.*o*x12*x2zs+1./2.*o*x12*txs+5./4.*o*
     #    x2z*txs+1./4.*o*tx*x2zs-7./4.*o*x2zs+1./4.*os*x2z*tx+
     #    os*x2zs+1./4.*os*txs-x12*x2z*tx+5./4.*x12*x2z*txs-1./
     #    2.*x12*x2zs+1./2.*x2z*tx*x12s-x2z*txs-1./4.*tx*x2zs+1.
     #    /4.*x12s*txs+3./4.*x2zs)
      gz10q= gz10q+rwwgz(1,10)*vvq*gstm2*bxps*yc*(-1./4.
     #    -o*x12-1./2.*o*tx+o-3./4.*os-1./2.*x12*tx+1./2.*
     #    x12+1./2.*tx-1./4.*x12s)
      gz10q= gz10q+rwwgz(1,10)*vvq*gstm2*yc*bxp*(1./4.+
     #    11./8.*o*x12*x2z+5./4.*o*x12*tx+5./8.*o*x12+7./8.*o*x2z
     #    *tx-19./8.*o*x2z+1./8.*o*tx+1./8.*o*x12s+5./4.*o*txs
     #    -3./4.*o+13./8.*os*x2z+5./8.*os*tx+5./8.*os-1./8.*
     #    oc+3./8.*x12*x2z*tx-x12*x2z-3./8.*x12*tx+5./4.*x12*
     #    txs-1./2.*x12-7./8.*x2z*tx+1./4.*x2z*x12s+3./4.*x2z
     #    +5./8.*tx*x12s-1./4.*tx+1./4.*x12s-3./4.*txs)
      gz10q= gz10q+rwwgz(1,10)*vvq*gstm2*yc*(-o*x12*
     #    x2z*tx-9./8.*o*x12*x2z-3./4.*o*x12*tx-1./2.*o*x12*x2zs
     #    -3./4.*o*x12*txs-3./8.*o*x2z*tx-13./8.*o*x2z*txs+2*o*
     #    x2z-1./8.*o*tx*x12s-3./8.*o*tx*x2zs+15./8.*o*x2zs-3./
     #    4.*o*txs+1./8.*os*x12*x2z-1./4.*os*x12*tx-1./2.*os*x2z*
     #    tx-11./8.*os*x2z-1./4.*os*tx-9./8.*os*x2zs-3./8.*os*
     #    txs+1./8.*oc*x2z-1./8.*oc*tx+7./8.*x12*x2z*tx-13./8.*
     #    x12*x2z*txs+x12*x2z+1./2.*x12*tx+1./2.*x12*x2zs-3./4.
     #    *x12*txs-1./2.*x2z*tx*x12s+1./2.*x2z*tx-1./4.*x2z*x12s
     #    +5./4.*x2z*txs-3./4.*x2z-1./2.*tx*x12s+3./8.*tx*x2zs
     #    -3./8.*x12s*txs-3./4.*x2zs+1./2.*txs)
      gz10q= gz10q+rwwgz(1,11)*vvq*gstm2*bxps*yc*(-1+
     #    o+x12)
      gz10q= gz10q+rwwgz(1,11)*vvq*gstm2*yc*bxp*(-3./2.
     #    *o*x12-3./2.*o*x2z+1./2.*o*tx-1./2.*x12*x2z-3./2.*x12
     #    *tx+1./2.*x12-x2z*tx+3./2.*x2z+1./2.*tx-1./2.*x12s
     #    +txs)
      gz10q= gz10q+rwwgz(1,11)*vvq*gstm2*yc*(1./2.*o*x12
     #    *x2z+1./2.*o*x12*tx+1./2.*o*x2zs-1./2.*o*txs+3./2.*
     #    x12*x2z*tx-1./2.*x12*x2z-1./2.*x12*txs-1./2.*x2z*tx-
     #    x2z*txs+1./2.*tx*x12s+tx*x2zs-1./2.*x2zs)
      gz10q= gz10q+rwwgz(1,12)*xx*vvq*gstm2*yc*(-o*x2z
     #    *txs+o*tx*x2zs-x12*x2z*txs+2*x2z*txs-tx*x2zs)
      gz10q= gz10q+rwwgz(1,12)*bxpi*vvq*gstm2*yc*(2*o*x2z
     #    *tx-3*o*txs+x12*x2z*tx-3*x12*txs+2*txs)
      gz10q= gz10q+rwwgz(1,12)*vvq*gstm2*yc*bxp*(1+2*o*
     #    x12+1./2.*o*x2z-2*o*tx-5./2.*o+3./2.*os+1./2.*x12*
     #    x2z-2*x12*tx-3./2.*x12-1./2.*x2z+2*tx+1./2.*x12s)
      gz10q= gz10q+rwwgz(1,12)*vvq*gstm2*yc*(-1./2.*o*
     #    x12*x2z+o*x12*tx-3./2.*o*x2z*tx+3./2.*o*x2z+o*tx-1./
     #    2.*o*x2zs+3*o*txs-1./2.*os*x2z+1./2.*os*tx-1./2.*x12*
     #    x2z*tx+1./2.*x12*x2z+x12*tx+3*x12*txs-x2z*tx-x2z+
     #    1./2.*tx*x12s-tx+1./2.*x2zs-2*txs)
      gz10q= gz10q+rwwgz(1,13)*xx*vvq*gstm2*yc*(-o*x2z
     #    *txs-x12*x2z*txs+x2z*txs)
      gz10q= gz10q+rwwgz(1,13)*bxpi*vvq*gstm2*yc*(-1./2.
     #    *o*x2z*tx-3./2.*o*txs-3./2.*x12*txs+1./2.*x2z*tx+txs
     #    )
      gz10q= gz10q+rwwgz(1,13)*vvq*gstm2*yc*bxp*(-3./4.
     #    *o*x12-1./4.*o*x2z-3./4.*o*tx+1./2.*o-1./2.*os-1./4.
     #    *x12*x2z-3./4.*x12*tx+1./4.*x12+1./4.*x2z+3./4.*tx-
     #    1./4.*x12s)
      gz10q= gz10q+rwwgz(1,13)*vvq*gstm2*yc*(1./4.*o*x12
     #    *x2z+5./4.*o*x12*tx+o*x2z*tx+1./4.*o*x2zs+5./4.*o*txs
     #    +1./2.*os*tx+3./4.*x12*x2z*tx-1./4.*x12*x2z+5./4.*x12
     #    *txs-3./4.*x2z*tx+3./4.*tx*x12s-1./2.*tx-1./4.*x2zs
     #    -txs)
      gz10q= gz10q+rwwgz(1,14)*xx*vvq*gstm2*yc*(1./2.*o*
     #    x2z*txs+1./2.*o*tx*x2zs+1./2.*x12*x2z*txs-1./2.*tx*x2zs
     #    )
      gz10q= gz10q+rwwgz(1,14)*bxpi*vvq*gstm2*yc*(2*o*x2z
     #    *tx+1./2.*o*txs+1./2.*x12*x2z*tx+1./2.*x12*txs-x2z*tx
     #    )
      gz10q= gz10q+rwwgz(1,14)*vvq*gstm2*yc*bxp*(1./2.*o*
     #    x12+1./4.*o*x2z+o*tx+1./4.*o-1./4.*os+1./4.*x12*x2z
     #    -1./4.*x12-1./2.*x2z*tx-1./4.*x2z+1./4.*x12s+1./2.*
     #    txs)
      gz10q= gz10q+rwwgz(1,14)*vvq*gstm2*yc*(-1./4.*o*
     #    x12*x2z-1./2.*o*x12*tx-7./4.*o*x2z*tx-1./4.*o*x2z-3./
     #    2.*o*tx-1./4.*o*x2zs-1./2.*o*txs+1./4.*os*x2z-1./4.*
     #    os*tx-1./4.*x12*x2z*tx+1./4.*x12*x2z-1./2.*x12*tx-1./
     #    2.*x12*txs+1./2.*x2z*tx-1./2.*x2z*txs-1./4.*tx*x12s+1.
     #    /2.*tx*x2zs+1./2.*tx+1./4.*x2zs)
      gz10q= gz10q+rwwgz(4,1)*xx*vvq*gstm2*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)
      gz10q= gz10q+rwwgz(4,1)*bxpi*vvq*gstm2*yc*(o*x12*
     #    x2z*tx-o*x12*x2zs-o*x2z*tx+2*o*x2z*txs-3./2.*o*tx*
     #    x2zs+7./2.*o*x2zs+3./2.*os*x2z*tx-2*os*x2zs+x12*x2z*
     #    tx+2*x12*x2z*txs-1./2.*x12*tx*x2zs+x12*x2zs-1./2.*x2z
     #    *tx*x12s-2*x2z*txs+1./2.*tx*x2zs-3./2.*x2zs)
      gz10q= gz10q+rwwgz(4,1)*vvq*gstm2*bxps*yc*(1+3*o*
     #    x12-o*tx-3*o+2*os-x12*tx-2*x12+tx+x12s)
      gz10q= gz10q+rwwgz(4,1)*vvq*gstm2*yc*bxp*(-1./2.
     #    -7./2.*o*x12*x2z+o*x12*tx-o*x12-o*x2z*tx+13./2.*o*
     #    x2z-1./2.*o*tx-1./2.*o*x12s+5./2.*o*txs+3./2.*o-1./
     #    2.*os*x12-4*os*x2z+2*os*tx-os+3*x12*x2z+3./2.*x12*
     #    tx+5./2.*x12*txs+x12-x2z*tx-1./2.*x2z*x12s-5./2.*
     #    x2z-tx*x12s-1./2.*tx-1./2.*x12s-3./2.*txs)
      gz10q= gz10q+rwwgz(4,1)*vvq*gstm2*yc*(-3./2.*o*
     #    x12*x2z*tx+2*o*x12*x2z-1./2.*o*x12*tx+o*x12*x2zs+2*o*
     #    x2z*tx-5./2.*o*x2z*txs-4*o*x2z+2*o*tx*x2zs+1./2.*o*tx
     #    -9./2.*o*x2zs-3./2.*o*txs-2*os*x2z*tx+5./2.*os*x2z-
     #    os*tx+5./2.*os*x2zs-3./2.*x12*x2z*tx-5./2.*x12*x2z*txs
     #    -2*x12*x2z+1./2.*x12*tx*x2zs-1./2.*x12*tx-x12*x2zs-
     #    3./2.*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-1./2.*tx*
     #    x2zs+2*x2zs+txs)
      gz10q= gz10q+rwwgz(4,4)*xx*vvq*gstm2*yc*(-1./4.*
     #    o*x12*x2zc+1./4.*o*tx*x2zc-1./4.*o*x2zq-1./4.*x12*tx*
     #    x2zc-1./4.*tx*x2zq+1./4.*x2zq+1./4.*x2zc*txs)
      gz10q= gz10q+rwwgz(4,4)*bxpi*vvq*gstm2*yc*(1./4.*o*
     #    x12*x2zc-3./4.*o*x12*x2zs+1./4.*o*tx*x2zc+3./4.*o*tx*
     #    x2zs+1./4.*o*x12s*x2zs-5./4.*o*x2zc-1./4.*o*x2zs*txs+
     #    1./4.*os*x12*x2zs-1./4.*os*tx*x2zs+1./4.*os*x2zc+1./4.*
     #    x12*tx*x2zc-3./4.*x12*tx*x2zs-1./2.*x12*x2zc-1./4.*x12*
     #    x2zs*txs+1./4.*tx*x12s*x2zs-3./4.*tx*x2zc+x2zc+3./4.*
     #    x2zs*txs)
      gz10q= gz10q+rwwgz(4,4)*vvq*gstm2*bxps*yc*bxp*(1./2.
     #    +o*x12-o+1./2.*os-x12+1./2.*x12s)
      gz10q= gz10q+rwwgz(4,4)*vvq*gstm2*bxps*yc*(-1./4.
     #    -2*o*x12*x2z-1./2.*o*x2z*tx+3*o*x2z-1./2.*o*tx-1./2.
     #    *o*x12s+1./2.*o*txs+1./2.*o-1./2.*os*x12-5./4.*os*x2z
     #    +1./2.*os*tx-1./4.*os-1./2.*x12*x2z*tx+5./2.*x12*x2z
     #    +1./2.*x12*tx+1./2.*x12*txs+1./2.*x12+1./2.*x2z*tx-
     #    3./4.*x2z*x12s-7./4.*x2z-1./2.*tx*x12s-1./4.*x12s-1./
     #    2.*txs)
      gz10q= gz10q+rwwgz(4,4)*vvq*gstm2*yc*bxp*(5./4.*o*
     #    x12*x2zs-1./4.*o*x12+3./2.*o*x2z*tx+3./4.*o*x2z*x12s-
     #    3./4.*o*x2z*txs-7./4.*o*x2z+3./4.*o*tx*x2zs+1./4.*o*tx
     #    +1./4.*o*x12s-13./4.*o*x2zs-1./4.*o*txs+3./4.*os*x12*
     #    x2z+1./4.*os*x12-3./4.*os*x2z*tx+3./4.*os*x2z-1./4.*
     #    os*tx+os*x2zs-x12*x2z*tx-3./4.*x12*x2z*txs-3./2.*x12*
     #    x2z+3./4.*x12*tx*x2zs-1./4.*x12*tx-2*x12*x2zs-1./4.*
     #    x12*txs+3./4.*x2z*tx*x12s-1./4.*x2z*tx+1./2.*x2z*x12s
     #    +5./4.*x2z*txs+x2z+1./4.*tx*x12s-5./4.*tx*x2zs+1./4.
     #    *x12s*x2zs+9./4.*x2zs+1./4.*txs)
      gz10q= gz10q+rwwgz(4,4)*vvq*gstm2*yc*(3./4.*o*x12*
     #    x2z-1./4.*o*x12*x2zc-3./4.*o*x2z*tx-1./2.*o*x2z*x12s+
     #    1./2.*o*x2z*txs-1./4.*o*tx*x2zc-3./2.*o*tx*x2zs-1./4.*o
     #    *x12s*x2zs+3./2.*o*x2zc+1./4.*o*x2zs*txs+9./4.*o*x2zs
     #    -1./2.*os*x12*x2z-1./4.*os*x12*x2zs+1./2.*os*x2z*tx+1.
     #    /4.*os*tx*x2zs-1./4.*os*x2zc-3./4.*os*x2zs+3./4.*x12*
     #    x2z*tx+1./2.*x12*x2z*txs-1./4.*x12*tx*x2zc+1./2.*x12*tx
     #    *x2zs+1./2.*x12*x2zc+1./4.*x12*x2zs*txs+3./2.*x12*x2zs
     #    -1./2.*x2z*tx*x12s-3./4.*x2z*txs-1./4.*tx*x12s*x2zs+
     #    tx*x2zc+3./4.*tx*x2zs-1./4.*x12s*x2zs-5./4.*x2zc-x2zs
     #    *txs-3./2.*x2zs)
      gz10q= gz10q+rwwgz(4,7)*xx*vvq*gstm2*yc*(-1./16.
     #    *o*x12*x2zc+1./8.*o*x12*x2zs*txs+1./16.*o*tx*x12s*x2zs-
     #    1./16.*o*tx*x2zq-1./16.*o*tx*x2zc+1./16.*o*x2zq+1./16.*
     #    o*x2zc*txs+1./8.*os*x12*tx*x2zs-1./16.*os*x12*x2zc-1./
     #    16.*os*x2zq+1./16.*os*x2zc+1./16.*os*x2zs*txs+1./16.*oc
     #    *tx*x2zs-1./16.*oc*x2zc-1./16.*x12*tx*x2zc+1./16.*x12*
     #    x2zc*txs+1./16.*tx*x2zq+1./16.*x12s*x2zs*txs-1./8.*x2zc
     #    *txs)
      gz10q= gz10q+rwwgz(4,7)*bxpi*vvq*gstm2*yc*(1./8.*o*
     #    x12*x2z*txs+1./8.*o*x12*tx*x2zs-1./16.*o*x12*x2zc-1./8.
     #    *o*x12*x2zs+1./16.*o*x2z*tx*x12s-1./8.*o*tx*x2zc-1./8.*
     #    o*tx*x2zs+1./16.*o*x12s*x2zs+1./8.*o*x2zc+3./16.*o*x2zs
     #    *txs+1./8.*os*x12*x2z*tx-1./16.*os*x12*x2zs+1./16.*os*
     #    x2z*txs+1./16.*os*tx*x2zs-1./8.*os*x2zc+1./8.*os*x2zs
     #    +1./16.*oc*x2z*tx-1./8.*oc*x2zs-1./16.*x12*tx*x2zc-1./
     #    8.*x12*tx*x2zs+3./16.*x12*x2zs*txs+1./16.*x2z*x12s*txs+
     #    1./16.*tx*x12s*x2zs+1./8.*tx*x2zc-1./4.*x2zs*txs)
      gz10q= gz10q+rwwgz(4,7)*vvq*gstm2*yc*bxp*(1./4.*o*
     #    x12*x2z*tx-1./8.*o*x12*x2z+1./16.*o*x12*tx-3./32.*o*x12
     #    *x2zs-1./8.*o*x12*txs-1./8.*o*x2z*tx+1./8.*o*x2z*x12s
     #    +3./16.*o*x2z*txs-3./32.*o*tx*x12s-3./32.*o*tx*x2zs+1.
     #    /32.*o*x12s-1./32.*o*x12c+3./32.*o*x2zs+1./16.*o*txs+
     #    1./16.*os*x12*x2z-3./32.*os*x12*tx+1./8.*os*x2z*tx+1./
     #    16.*os*x2z+1./32.*os*tx-1./32.*os*x12s-3./32.*os*x2zs
     #    -1./16.*os*txs+1./32.*oc*x12-1./16.*oc*x2z-1./32.*oc*
     #    tx-1./32.*oc+1./32.*oq-1./8.*x12*x2z*tx+3./16.*x12*
     #    x2z*txs-3./32.*x12*tx*x2zs+1./16.*x12*txs+1./8.*x2z*tx*
     #    x12s-3./16.*x2z*txs+1./32.*tx*x12s-1./32.*tx*x12c+3./
     #    32.*tx*x2zs-1./16.*x12s*txs)
      gz10q= gz10q+rwwgz(4,7)*vvq*gstm2*yc*(-3./16.*o*
     #    x12*x2z*tx-1./8.*o*x12*x2z*txs+1./16.*o*x12*x2z-5./32.*
     #    o*x12*tx*x2zs+1./16.*o*x12*x2zc+1./4.*o*x12*x2zs-3./32.
     #    *o*x2z*tx*x12s+1./16.*o*x2z*tx-3./32.*o*x2z*x12s-3./16.
     #    *o*x2z*txs+1./32.*o*tx*x12c+5./32.*o*tx*x2zc+1./4.*o*tx
     #    *x2zs-1./16.*o*x12s*x2zs+3./32.*o*x12s*txs-5./32.*o*
     #    x2zc-7./32.*o*x2zs*txs-1./16.*o*x2zs-3./16.*os*x12*x2z*
     #    tx+1./16.*os*x12*x2zs+3./32.*os*x12*txs-3./32.*os*x2z*
     #    tx-1./32.*os*x2z*x12s-1./16.*os*x2z*txs-1./16.*os*x2z
     #    +3./32.*os*tx*x12s-3./32.*os*tx*x2zs+5./32.*os*x2zc-1.
     #    /16.*os*x2zs-1./16.*oc*x12*x2z+3./32.*oc*x12*tx-3./32.*
     #    oc*x2z*tx+3./32.*oc*x2z+1./8.*oc*x2zs+1./32.*oc*txs-1.
     #    /32.*oq*x2z+1./32.*oq*tx+1./16.*x12*x2z*tx-3./16.*x12*
     #    x2z*txs+1./16.*x12*tx*x2zc+1./4.*x12*tx*x2zs-7./32.*x12
     #    *x2zs*txs-3./32.*x2z*tx*x12s-1./16.*x2z*x12s*txs+1./8.*
     #    x2z*txs)
      gz10q= gz10q+rwwgz(4,7)*vvq*gstm2*yc*(-1./16.*tx
     #    *x12s*x2zs-5./32.*tx*x2zc-1./16.*tx*x2zs+1./32.*x12c*
     #    txs+5./16.*x2zs*txs)
      gz10q= gz10q+rwwgz(4,8)*bxpi*vvq*gstm2*yc*(1./4.*o*
     #    x12*x2zs-1./4.*o*tx*x2zs+1./4.*o*x2zc+1./4.*x12*tx*x2zs
     #    +1./4.*tx*x2zc-1./4.*x2zc-1./4.*x2zs*txs)
      gz10q= gz10q+rwwgz(4,8)*vvq*gstm2*bxps*yc*bxp*(-1./
     #    2.-o*x12+o-1./2.*os+x12-1./2.*x12s)
      gz10q= gz10q+rwwgz(4,8)*vvq*gstm2*bxps*yc*(1./4.+
     #    5./4.*o*x12*x2z-1./2.*o*x12+1./2.*o*x2z*tx-9./4.*o*x2z
     #    +1./2.*o*tx+7./8.*o*x12s-1./2.*o*txs-3./8.*o+7./8.*
     #    os*x12+7./8.*os*x2z-1./2.*os*tx+1./8.*oc+1./2.*x12*
     #    x2z*tx-7./4.*x12*x2z-1./2.*x12*tx-1./2.*x12*txs-3./8.
     #    *x12-1./2.*x2z*tx+3./8.*x2z*x12s+11./8.*x2z+1./2.*tx*
     #    x12s+1./8.*x12c+1./2.*txs)
      gz10q= gz10q+rwwgz(4,8)*vvq*gstm2*yc*bxp*(-1./4.*
     #    o*x12*x2z*tx+3./4.*o*x12*x2z-3./8.*o*x12*x2zs+1./4.*o*
     #    x12*txs+1./4.*o*x12-o*x2z*tx-1./2.*o*x2z*x12s+3./8.*o
     #    *x2z*txs+o*x2z-1./8.*o*tx*x12s-3./8.*o*tx*x2zs-1./4.*
     #    o*tx-1./8.*o*x12s-1./8.*o*x12c+13./8.*o*x2zs+1./8.*o*
     #    txs-5./8.*os*x12*x2z+1./8.*os*x12*tx-1./8.*os*x12+1./
     #    4.*os*x2z*tx-1./8.*os*x2z+1./8.*os*tx-1./4.*os*x12s-3.
     #    /8.*os*x2zs+1./8.*os*txs-1./8.*oc*x12-1./8.*oc*x2z+1./
     #    8.*oc*tx+3./4.*x12*x2z*tx+3./8.*x12*x2z*txs+3./4.*x12*
     #    x2z-3./8.*x12*tx*x2zs+1./4.*x12*tx+3./4.*x12*x2zs+1./
     #    8.*x12*txs-1./2.*x2z*tx*x12s+1./4.*x2z*tx-7./8.*x2z*txs
     #    -3./4.*x2z-1./8.*tx*x12s-1./8.*tx*x12c+7./8.*tx*x2zs
     #    +1./8.*x12s*txs-5./4.*x2zs-1./4.*txs)
      gz10q= gz10q+rwwgz(4,8)*vvq*gstm2*yc*(-1./2.*o*
     #    x12*x2z-1./4.*o*x12*x2zs+1./2.*o*x2z*tx+1./8.*o*x2z*
     #    x12s-1./8.*o*x2z*txs+1./2.*o*tx*x2zs-3./8.*o*x2zc-7./
     #    8.*o*x2zs+1./8.*os*x12*x2z-1./8.*os*x2z*tx+1./8.*os*
     #    x2zs-1./2.*x12*x2z*tx-1./8.*x12*x2z*txs-1./4.*x12*tx*
     #    x2zs-3./8.*x12*x2zs+1./8.*x2z*tx*x12s+1./2.*x2z*txs-3.
     #    /8.*tx*x2zc-1./2.*tx*x2zs+3./8.*x2zc+3./8.*x2zs*txs+3.
     #    /4.*x2zs)
      gz10q= gz10q+rwwgz(4,9)*bxpi*vvq*gstm2*yc*(-1./4.
     #    *o*x12*x2z*tx-1./4.*o*x2z*txs+1./4.*o*tx*x2zs-1./4.*o*
     #    x2zs-1./4.*os*x2z*tx+1./4.*os*x2zs-1./4.*x12*x2z*txs+
     #    1./4.*tx*x2zs)
      gz10q= gz10q+rwwgz(4,9)*vvq*gstm2*bxps*yc*(-1./2.
     #    *o*x12+1./2.*o*tx+1./2.*o-1./2.*os+1./2.*x12*tx-1./
     #    2.*tx)
      gz10q= gz10q+rwwgz(4,9)*vvq*gstm2*yc*bxp*(3./8.*o*
     #    x12*x2z-3./4.*o*x12*tx+1./8.*o*x12+1./8.*o*x2z*tx-7./
     #    8.*o*x2z-1./8.*o*tx+1./8.*o*x12s-1./2.*o*txs-1./4.*o
     #    +1./4.*os*x12+7./8.*os*x2z-5./8.*os*tx+1./8.*os+1./
     #    8.*oc-3./8.*x12*x2z*tx-1./8.*x12*tx-1./2.*x12*txs+7./
     #    8.*x2z*tx-1./8.*tx*x12s+1./4.*tx)
      gz10q= gz10q+rwwgz(4,9)*vvq*gstm2*yc*(1./4.*o*x12*
     #    x2z*tx-1./8.*o*x12*x2z+1./4.*o*x12*tx+1./4.*o*x12*txs
     #    -1./8.*o*x2z*tx+3./8.*o*x2z*txs+1./2.*o*x2z+1./8.*o*
     #    tx*x12s-3./8.*o*tx*x2zs+3./8.*o*x2zs+1./4.*o*txs-1./8.
     #    *os*x12*x2z+1./4.*os*x12*tx+1./4.*os*x2z*tx-3./8.*os*
     #    x2z+1./4.*os*tx-3./8.*os*x2zs+1./8.*os*txs-1./8.*oc*
     #    x2z+1./8.*oc*tx+1./8.*x12*x2z*tx+3./8.*x12*x2z*txs+1./
     #    4.*x12*txs-1./2.*x2z*tx-3./8.*tx*x2zs+1./8.*x12s*txs)
      gz10q= gz10q+rwwgz(4,10)*xx*vvq*gstm2*yc*(1./16.*o
     #    *x12*x2zc-1./8.*o*x12*x2zs*txs-1./16.*o*tx*x12s*x2zs+1./
     #    16.*o*tx*x2zq+1./16.*o*tx*x2zc-1./16.*o*x2zq-1./16.*o*
     #    x2zc*txs-1./8.*os*x12*tx*x2zs+1./16.*os*x12*x2zc+1./16.
     #    *os*x2zq-1./16.*os*x2zc-1./16.*os*x2zs*txs-1./16.*oc*tx
     #    *x2zs+1./16.*oc*x2zc+1./16.*x12*tx*x2zc-1./16.*x12*x2zc
     #    *txs-1./16.*tx*x2zq-1./16.*x12s*x2zs*txs+1./8.*x2zc*txs
     #    )
      gz10q= gz10q+rwwgz(4,10)*bxpi*vvq*gstm2*yc*(-1./4.
     #    *o*x12*x2z*txs-1./8.*o*x12*tx*x2zs+1./16.*o*x12*x2zc+3./
     #    16.*o*x12*x2zs-1./8.*o*x2z*tx*x12s+3./16.*o*tx*x2zc+3./
     #    16.*o*tx*x2zs-1./16.*o*x12s*x2zs-3./16.*o*x2zc-1./4.*o*
     #    x2zs*txs-1./4.*os*x12*x2z*tx+1./8.*os*x12*x2zs-1./8.*os
     #    *x2z*txs-1./16.*os*tx*x2zs+3./16.*os*x2zc-3./16.*os*
     #    x2zs-1./8.*oc*x2z*tx+3./16.*oc*x2zs+1./16.*x12*tx*x2zc
     #    +3./16.*x12*tx*x2zs-1./4.*x12*x2zs*txs-1./8.*x2z*x12s*
     #    txs-1./16.*tx*x12s*x2zs-3./16.*tx*x2zc+3./8.*x2zs*txs)
      gz10q= gz10q+rwwgz(4,10)*vvq*gstm2*bxps*yc*(-1./8.
     #    *o*x12*x2z+1./4.*o*x12*tx-1./8.*o*x12-1./8.*o*x2z*tx+
     #    1./8.*o*x2z-1./8.*o*tx+1./8.*o*x12s+1./4.*o*txs-1./8.
     #    *os*x2z+1./8.*os*tx+1./8.*os-1./8.*oc-1./8.*x12*x2z*
     #    tx-1./8.*x12*tx+1./4.*x12*txs+1./8.*x2z*tx+1./8.*tx*
     #    x12s-1./4.*txs)
      gz10q= gz10q+rwwgz(4,10)*vvq*gstm2*yc*bxp*(-3./8.
     #    *o*x12*x2z*tx+3./8.*o*x12*x2z-1./8.*o*x12*tx+3./16.*o*
     #    x12*x2zs-1./4.*o*x12*txs+1./16.*o*x12+3./8.*o*x2z*tx-
     #    3./16.*o*x2z*x12s-1./2.*o*x2z*txs-1./16.*o*x2z-1./8.*o*
     #    tx*x12s+5./16.*o*tx*x2zs+1./16.*o*tx-1./16.*o*x12s-5./
     #    16.*o*x2zs-1./8.*o*txs+1./8.*os*x12*x2z-1./4.*os*x12*tx
     #    -3./16.*os*x2z*tx-1./4.*os*x2z-1./16.*os*tx+5./16.*os
     #    *x2zs-1./8.*os*txs-1./16.*os+5./16.*oc*x2z-1./8.*oc*
     #    tx+1./16.*oc+3./8.*x12*x2z*tx-1./2.*x12*x2z*txs+3./16.
     #    *x12*tx*x2zs+1./16.*x12*tx-1./8.*x12*txs-3./16.*x2z*tx*
     #    x12s-1./16.*x2z*tx+5./8.*x2z*txs-1./16.*tx*x12s-5./16.
     #    *tx*x2zs-1./8.*x12s*txs+1./8.*txs)
      gz10q= gz10q+rwwgz(4,10)*vvq*gstm2*yc*(1./4.*o*x12
     #    *x2z*tx+3./8.*o*x12*x2z*txs-3./16.*o*x12*x2z+1./8.*o*
     #    x12*tx*x2zs-1./16.*o*x12*x2zc-3./8.*o*x12*x2zs+1./8.*o*
     #    x12*txs+3./16.*o*x2z*tx*x12s-3./16.*o*x2z*tx+1./8.*o*
     #    x2z*x12s+5./16.*o*x2z*txs+1./16.*o*tx*x12s-1./4.*o*tx*
     #    x2zc-7./16.*o*tx*x2zs+1./16.*o*x12s*x2zs+1./4.*o*x2zc
     #    +5./16.*o*x2zs*txs+3./16.*o*x2zs+3./8.*os*x12*x2z*tx-
     #    1./16.*os*x12*x2z+1./8.*os*x12*tx-3./16.*os*x12*x2zs+1./
     #    8.*os*x2z*tx+3./16.*os*x2z*txs+3./16.*os*x2z+1./16.*os*
     #    tx*x2zs-1./4.*os*x2zc+1./16.*os*x2zs+1./16.*os*txs+3./
     #    16.*oc*x2z*tx-3./16.*oc*x2z+1./16.*oc*tx-1./4.*oc*x2zs
     #    -3./16.*x12*x2z*tx+5./16.*x12*x2z*txs-1./16.*x12*tx*
     #    x2zc-3./8.*x12*tx*x2zs+5./16.*x12*x2zs*txs+1./8.*x2z*tx
     #    *x12s+3./16.*x2z*x12s*txs-3./8.*x2z*txs+1./16.*tx*x12s*
     #    x2zs+1./4.*tx*x2zc+3./16.*tx*x2zs+1./16.*x12s*txs-1./
     #    2.*x2zs*txs)
      gz10q= gz10q+rwwgz(4,12)*xx*vvq*gstm2*yc*(-1./4.
     #    *o*tx*x2zs+1./4.*o*x2zc+1./4.*x12*tx*x2zs+1./2.*tx*x2zc
     #    -1./4.*x2zc-1./2.*x2zs*txs)
      gz10q= gz10q+rwwgz(4,12)*bxpi*vvq*gstm2*yc*(-1./4.
     #    *o*x12*x2zs-1./2.*o*x2z*tx+1./2.*o*x2z*txs-1./2.*o*tx*
     #    x2zs+o*x2zs+1./4.*os*x2z*tx-1./4.*os*x2zs+1./2.*x12*
     #    x2z*tx+1./2.*x12*x2z*txs-1./2.*x12*tx*x2zs+1./2.*x12*
     #    x2zs-1./4.*x2z*tx*x12s-x2z*txs+tx*x2zs-3./4.*x2zs)
      gz10q= gz10q+rwwgz(4,12)*vvq*gstm2*bxps*yc*(1./2.
     #    +o*x12-o+1./2.*os-x12+1./2.*x12s)
      gz10q= gz10q+rwwgz(4,12)*vvq*gstm2*yc*bxp*(-1./4.
     #    -o*x12*x2z-1./4.*o*x12-3./4.*o*x2z*tx+2*o*x2z-1./2.
     #    *o*tx-1./4.*o*x12s+3./4.*o*txs+1./2.*o-1./4.*os*x12
     #    -3./4.*os*x2z+1./2.*os*tx-1./4.*os-3./4.*x12*x2z*tx
     #    +3./2.*x12*x2z+1./2.*x12*tx+3./4.*x12*txs+1./2.*x12
     #    +3./4.*x2z*tx-1./4.*x2z*x12s-5./4.*x2z-1./2.*tx*x12s
     #    -1./4.*x12s-3./4.*txs)
      gz10q= gz10q+rwwgz(4,12)*vvq*gstm2*yc*(1./2.*o*x12
     #    *x2z+1./4.*o*x12*x2zs+5./4.*o*x2z*tx-1./2.*o*x2z*txs-
     #    5./4.*o*x2z+1./2.*o*tx*x2zs+1./4.*o*tx-5./4.*o*x2zs-1.
     #    /2.*o*txs-1./4.*os*x2z*tx+1./2.*os*x2z-1./4.*os*tx+1./
     #    4.*os*x2zs-1./4.*x12*x2z*tx-1./2.*x12*x2z*txs-x12*x2z
     #    +1./2.*x12*tx*x2zs-1./4.*x12*tx-1./2.*x12*x2zs-1./2.*
     #    x12*txs+1./4.*x2z*tx*x12s-1./2.*x2z*tx+1./4.*x2z*x12s
     #    +5./4.*x2z*txs+3./4.*x2z+1./4.*tx*x12s-5./4.*tx*x2zs
     #    +x2zs+1./2.*txs)
      gz10q= gz10q+rwwgz(4,13)*xx*vvq*gstm2*yc*(1./8.*o*
     #    x12*tx*x2zs-1./8.*o*tx*x2zc-1./8.*o*tx*x2zs+1./4.*o*
     #    x2zc+1./8.*o*x2zs*txs+1./8.*os*tx*x2zs-1./8.*os*x2zc+
     #    1./8.*x12*tx*x2zs+1./8.*x12*x2zs*txs+1./8.*tx*x2zc-1./8.
     #    *x2zc-1./4.*x2zs*txs)
      gz10q= gz10q+rwwgz(4,13)*bxpi*vvq*gstm2*yc*(1./8.*o
     #    *x12*x2z*tx-1./4.*o*x12*x2zs-1./4.*o*x2z*tx+3./8.*o*x2z
     #    *txs-1./4.*o*tx*x2zs+3./4.*o*x2zs+1./4.*os*x2z*tx-3./
     #    8.*os*x2zs+1./4.*x12*x2z*tx+3./8.*x12*x2z*txs-1./8.*x12
     #    *tx*x2zs+1./4.*x12*x2zs-1./8.*x2z*tx*x12s-1./2.*x2z*txs
     #    +1./4.*tx*x2zs-3./8.*x2zs)
      gz10q= gz10q+rwwgz(4,13)*vvq*gstm2*bxps*yc*(1./8.
     #    +1./4.*o*x12-1./4.*o+1./8.*os-1./4.*x12+1./8.*x12s
     #    )
      gz10q= gz10q+rwwgz(4,13)*vvq*gstm2*yc*bxp*(-1./8.
     #    -9./16.*o*x12*x2z+1./8.*o*x12*tx-5./16.*o*x12-3./16.*
     #    o*x2z*tx+13./16.*o*x2z-3./16.*o*tx+1./16.*o*x12s+3./8.
     #    *o*txs+1./4.*o-7./16.*os*x2z+3./16.*os*tx-1./16.*os
     #    -1./16.*oc-3./16.*x12*x2z*tx+1./2.*x12*x2z+1./16.*x12
     #    *tx+3./8.*x12*txs+1./4.*x12+3./16.*x2z*tx-1./8.*x2z*
     #    x12s-3./8.*x2z-1./16.*tx*x12s-1./8.*x12s-3./8.*txs)
      gz10q= gz10q+rwwgz(4,13)*vvq*gstm2*yc*(-1./8.*o*
     #    x12*x2z*tx+9./16.*o*x12*x2z+1./4.*o*x12*x2zs-1./8.*o*
     #    x12*txs+7./16.*o*x2z*tx-7./16.*o*x2z*txs-3./4.*o*x2z-
     #    1./16.*o*tx*x12s+5./16.*o*tx*x2zs+1./8.*o*tx-13./16.*o*
     #    x2zs-1./4.*o*txs+1./16.*os*x12*x2z-1./8.*os*x12*tx-1./
     #    4.*os*x2z*tx+5./16.*os*x2z-1./8.*os*tx+7./16.*os*x2zs
     #    -1./16.*os*txs+1./16.*oc*x2z-1./16.*oc*tx-1./16.*x12*
     #    x2z*tx-7./16.*x12*x2z*txs-1./2.*x12*x2z+1./8.*x12*tx*
     #    x2zs-1./8.*x12*tx-1./4.*x12*x2zs-1./4.*x12*txs+1./8.*
     #    x2z*tx*x12s-1./8.*x2z*tx+1./8.*x2z*x12s+5./8.*x2z*txs
     #    +3./8.*x2z+1./8.*tx*x12s-5./16.*tx*x2zs-1./16.*x12s*
     #    txs+3./8.*x2zs+1./4.*txs)
      gz10q= gz10q+rwwgz(4,14)*xx*vvq*gstm2*yc*(-1./8.
     #    *o*x12*tx*x2zs+1./8.*o*tx*x2zc-1./8.*o*x2zc-1./8.*o*
     #    x2zs*txs-1./8.*os*tx*x2zs+1./8.*os*x2zc-1./8.*x12*x2zs*
     #    txs+1./8.*tx*x2zc)
      gz10q= gz10q+rwwgz(4,14)*bxpi*vvq*gstm2*yc*(-1./4.
     #    *o*x12*x2z*tx+1./8.*o*x12*x2zs-1./4.*o*x2z*txs+1./8.*o*
     #    tx*x2zs-3./8.*o*x2zs-1./4.*os*x2z*tx+3./8.*os*x2zs-1./
     #    4.*x12*x2z*txs-1./8.*x12*tx*x2zs+3./8.*tx*x2zs)
      gz10q= gz10q+rwwgz(4,14)*vvq*gstm2*bxps*yc*(-1./8.
     #    *o*x12+1./8.*o*tx+1./8.*o-1./8.*os+1./8.*x12*tx-1./
     #    8.*tx)
      gz10q= gz10q+rwwgz(4,14)*vvq*gstm2*yc*bxp*(1./4.*o*
     #    x12*x2z-1./8.*o*x12*tx+1./8.*o*x12-1./8.*o*x2z*tx-3./
     #    8.*o*x2z-1./8.*o*tx-1./8.*o*txs-1./8.*o+3./8.*os*x2z
     #    -1./8.*os*tx+1./8.*os-1./4.*x12*x2z*tx-1./8.*x12*tx
     #    -1./8.*x12*txs+3./8.*x2z*tx+1./8.*tx)
      gz10q= gz10q+rwwgz(4,14)*vvq*gstm2*yc*(1./4.*o*x12
     #    *x2z*tx-1./4.*o*x12*x2z+1./8.*o*x12*tx-1./8.*o*x12*x2zs
     #    +1./8.*o*x2z*tx+1./4.*o*x2z*txs+3./8.*o*x2z-1./8.*o*
     #    tx*x2zs+3./8.*o*x2zs+1./8.*o*txs+1./4.*os*x2z*tx-3./8.
     #    *os*x2z+1./8.*os*tx-3./8.*os*x2zs+1./4.*x12*x2z*tx+1./
     #    4.*x12*x2z*txs+1./8.*x12*tx*x2zs+1./8.*x12*txs-3./8.*
     #    x2z*tx-3./8.*tx*x2zs)
      gz10q= gz10q+rwwgz(7,1)*xx*vvq*gstm2*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)
      gz10q= gz10q+rwwgz(7,1)*bxpi*vvq*gstm2*yc*(-3./4.
     #    *o*x12*x2z*tx-1./2.*o*x12*x2zs-3./4.*o*x2z*txs-1./4.*o*
     #    tx*x2zs+5./4.*o*x2zs-1./4.*os*x2z*tx-3./4.*os*x2zs+1./
     #    2.*x12*x2z*tx-3./4.*x12*x2z*txs+1./2.*x12*x2zs-1./2.*
     #    x2z*tx*x12s+1./2.*x2z*txs+1./4.*tx*x2zs-1./2.*x2zs)
      gz10q= gz10q+rwwgz(7,1)*vvq*gstm2*yc*bxp*(-3./4.*
     #    o*x12*x2z-1./4.*o*x2z*tx+3./4.*o*x2z-1./4.*o*txs+1./4.
     #    *os*x12-1./2.*os*x2z-1./4.*os+1./4.*oc-1./4.*x12*x2z*
     #    tx+1./2.*x12*x2z-1./4.*x12*txs+1./4.*x2z*tx-1./4.*x2z
     #    *x12s-1./4.*x2z+1./4.*txs)
      gz10q= gz10q+rwwgz(7,1)*vvq*gstm2*yc*(3./4.*o*x12*
     #    x2z*tx+3./4.*o*x12*x2z+1./2.*o*x12*x2zs+1./4.*o*x2z*tx
     #    +o*x2z*txs-3./4.*o*x2z+1./4.*o*tx*x2zs-5./4.*o*x2zs
     #    -1./4.*os*x12*x2z+1./4.*os*x2z*tx+3./4.*os*x2z+3./4.*
     #    os*x2zs-1./4.*oc*x2z-1./4.*x12*x2z*tx+x12*x2z*txs-1./
     #    2.*x12*x2z-1./2.*x12*x2zs+1./2.*x2z*tx*x12s-1./4.*x2z*
     #    tx+1./4.*x2z*x12s-3./4.*x2z*txs+1./4.*x2z-1./4.*tx*
     #    x2zs+1./2.*x2zs)
      gz10q= gz10q+rwwgz(7,4)*xx*vvq*gstm2*yc*(-1./16.
     #    *o*x12*x2zc+1./8.*o*x12*x2zs*txs+1./16.*o*tx*x12s*x2zs-
     #    1./16.*o*tx*x2zq-1./16.*o*tx*x2zc+1./16.*o*x2zq+1./16.*
     #    o*x2zc*txs+1./8.*os*x12*tx*x2zs-1./16.*os*x12*x2zc-1./
     #    16.*os*x2zq+1./16.*os*x2zc+1./16.*os*x2zs*txs+1./16.*oc
     #    *tx*x2zs-1./16.*oc*x2zc-1./16.*x12*tx*x2zc+1./16.*x12*
     #    x2zc*txs+1./16.*tx*x2zq+1./16.*x12s*x2zs*txs-1./8.*x2zc
     #    *txs)
      gz10q= gz10q+rwwgz(7,4)*bxpi*vvq*gstm2*yc*(1./8.*o*
     #    x12*x2z*txs+1./8.*o*x12*tx*x2zs-1./16.*o*x12*x2zc-1./8.
     #    *o*x12*x2zs+1./16.*o*x2z*tx*x12s-1./8.*o*tx*x2zc-1./8.*
     #    o*tx*x2zs+1./16.*o*x12s*x2zs+1./8.*o*x2zc+3./16.*o*x2zs
     #    *txs+1./8.*os*x12*x2z*tx-1./16.*os*x12*x2zs+1./16.*os*
     #    x2z*txs+1./16.*os*tx*x2zs-1./8.*os*x2zc+1./8.*os*x2zs
     #    +1./16.*oc*x2z*tx-1./8.*oc*x2zs-1./16.*x12*tx*x2zc-1./
     #    8.*x12*tx*x2zs+3./16.*x12*x2zs*txs+1./16.*x2z*x12s*txs+
     #    1./16.*tx*x12s*x2zs+1./8.*tx*x2zc-1./4.*x2zs*txs)
      gz10q= gz10q+rwwgz(7,4)*vvq*gstm2*yc*bxp*(1./4.*o*
     #    x12*x2z*tx-1./8.*o*x12*x2z+1./16.*o*x12*tx-3./32.*o*x12
     #    *x2zs-1./8.*o*x12*txs-1./8.*o*x2z*tx+1./8.*o*x2z*x12s
     #    +3./16.*o*x2z*txs-3./32.*o*tx*x12s-3./32.*o*tx*x2zs+1.
     #    /32.*o*x12s-1./32.*o*x12c+3./32.*o*x2zs+1./16.*o*txs+
     #    1./16.*os*x12*x2z-3./32.*os*x12*tx+1./8.*os*x2z*tx+1./
     #    16.*os*x2z+1./32.*os*tx-1./32.*os*x12s-3./32.*os*x2zs
     #    -1./16.*os*txs+1./32.*oc*x12-1./16.*oc*x2z-1./32.*oc*
     #    tx-1./32.*oc+1./32.*oq-1./8.*x12*x2z*tx+3./16.*x12*
     #    x2z*txs-3./32.*x12*tx*x2zs+1./16.*x12*txs+1./8.*x2z*tx*
     #    x12s-3./16.*x2z*txs+1./32.*tx*x12s-1./32.*tx*x12c+3./
     #    32.*tx*x2zs-1./16.*x12s*txs)
      gz10q= gz10q+rwwgz(7,4)*vvq*gstm2*yc*(-3./16.*o*
     #    x12*x2z*tx-1./8.*o*x12*x2z*txs+1./16.*o*x12*x2z-5./32.*
     #    o*x12*tx*x2zs+1./16.*o*x12*x2zc+1./4.*o*x12*x2zs-3./32.
     #    *o*x2z*tx*x12s+1./16.*o*x2z*tx-3./32.*o*x2z*x12s-3./16.
     #    *o*x2z*txs+1./32.*o*tx*x12c+5./32.*o*tx*x2zc+1./4.*o*tx
     #    *x2zs-1./16.*o*x12s*x2zs+3./32.*o*x12s*txs-5./32.*o*
     #    x2zc-7./32.*o*x2zs*txs-1./16.*o*x2zs-3./16.*os*x12*x2z*
     #    tx+1./16.*os*x12*x2zs+3./32.*os*x12*txs-3./32.*os*x2z*
     #    tx-1./32.*os*x2z*x12s-1./16.*os*x2z*txs-1./16.*os*x2z
     #    +3./32.*os*tx*x12s-3./32.*os*tx*x2zs+5./32.*os*x2zc-1.
     #    /16.*os*x2zs-1./16.*oc*x12*x2z+3./32.*oc*x12*tx-3./32.*
     #    oc*x2z*tx+3./32.*oc*x2z+1./8.*oc*x2zs+1./32.*oc*txs-1.
     #    /32.*oq*x2z+1./32.*oq*tx+1./16.*x12*x2z*tx-3./16.*x12*
     #    x2z*txs+1./16.*x12*tx*x2zc+1./4.*x12*tx*x2zs-7./32.*x12
     #    *x2zs*txs-3./32.*x2z*tx*x12s-1./16.*x2z*x12s*txs+1./8.*
     #    x2z*txs)
      gz10q= gz10q+rwwgz(7,4)*vvq*gstm2*yc*(-1./16.*tx
     #    *x12s*x2zs-5./32.*tx*x2zc-1./16.*tx*x2zs+1./32.*x12c*
     #    txs+5./16.*x2zs*txs)
      gz10q= gz10q+rwwgz(7,7)*xx*vvq*gstm2*yc*(-1./8.*
     #    o*x12*x2zs*txs+1./8.*o*x2zq-1./16.*o*x2zc*txs-1./16.*os
     #    *x12*x2zc-1./16.*os*x2zq+1./16.*os*x2zc-1./16.*os*x2zs*
     #    txs-1./16.*oc*x2zc+1./8.*x12*tx*x2zc-1./16.*x12*x2zc*
     #    txs-1./16.*x12s*x2zs*txs-1./16.*x2zq+1./16.*x2zc*txs)
      gz10q= gz10q+rwwgz(7,7)*bxpi*vvq*gstm2*yc*(-1./8.
     #    *o*x12*tx*x2zs-1./8.*o*x12*x2zc+1./4.*o*x2zc-1./16.*o*
     #    x2zs*txs-1./16.*os*x12*x2zs-1./8.*os*x2zc+1./16.*os*
     #    x2zs-1./16.*oc*x2zs+1./8.*x12*tx*x2zs+1./8.*x12*x2zc-
     #    1./16.*x12*x2zs*txs-1./8.*tx*x12s*x2zs-1./8.*x2zc+1./16.
     #    *x2zs*txs)
      gz10q= gz10q+rwwgz(7,7)*vvq*gstm2*bxps*yc*(1./16.
     #    +3./8.*o*x12-3./16.*o*x12s-3./16.*o-3./16.*os*x12+3.
     #    /16.*os-1./16.*oc-3./16.*x12+3./16.*x12s-1./16.*x12c
     #    )
      gz10q= gz10q+rwwgz(7,7)*vvq*gstm2*yc*bxp*(-1./2.*
     #    o*x12*x2z-1./4.*o*x12*tx-1./8.*o*x12*x2zs+1./8.*o*x12*
     #    txs+1./8.*o*x2z*x12s+3./8.*o*x2z+1./4.*o*tx*x12s+1./8.
     #    *o*x2zs-1./8.*o*txs+1./4.*os*x12*x2z+1./8.*os*x12*tx-
     #    1./8.*os*x12-3./8.*os*x2z+1./16.*os*x12s-1./16.*os*x2zs
     #    +1./16.*os*txs+1./16.*os+1./8.*oc*x12+1./8.*oc*x2z-
     #    1./8.*oc+1./16.*oq+1./4.*x12*x2z+1./8.*x12*tx+1./8.*
     #    x12*x2zs-1./8.*x12*txs-1./8.*x2z*x12s-1./8.*x2z-1./4.
     #    *tx*x12s+1./8.*tx*x12c-1./16.*x12s*x2zs+1./16.*x12s*txs
     #    -1./16.*x2zs+1./16.*txs)
      gz10q= gz10q+rwwgz(7,7)*vvq*gstm2*yc*(1./8.*o*x12*
     #    x2z*tx-1./8.*o*x12*x2z*txs+1./8.*o*x12*tx*x2zs+1./8.*o*
     #    x12*x2zc+1./4.*o*x12*x2zs+1./8.*o*x12*txs+1./8.*o*x2z*
     #    txs-3./16.*o*x12s*txs-1./4.*o*x2zc+1./16.*o*x2zs*txs-
     #    5./16.*o*x2zs+1./8.*os*x12*x2z-3./16.*os*x12*txs-1./16.
     #    *os*x2z*x12s-1./16.*os*x2z*txs-1./16.*os*x2z+1./8.*os*
     #    x2zc+3./16.*os*x2zs+1./16.*os*txs-1./8.*oc*x12*x2z+1./
     #    8.*oc*x2z-1./16.*oc*txs-1./16.*oq*x2z-1./8.*x12*x2z*tx
     #    +1./8.*x12*x2z*txs-1./8.*x12*tx*x2zs-1./8.*x12*x2zc+1.
     #    /16.*x12*x2zs*txs-3./16.*x12*x2zs+1./8.*x2z*tx*x12s-1./
     #    16.*x2z*x12s*txs-1./16.*x2z*txs+1./8.*tx*x12s*x2zs+1./
     #    16.*x12s*x2zs+1./16.*x12s*txs-1./16.*x12c*txs+1./8.*
     #    x2zc-1./16.*x2zs*txs+1./8.*x2zs)
      gz10q= gz10q+rwwgz(7,8)*bxpi*vvq*gstm2*yc*(-1./8.
     #    *o*x12*x2z*txs+1./16.*o*x12*x2zs-1./16.*o*x2z*tx*x12s+1.
     #    /16.*o*tx*x2zc+1./16.*o*tx*x2zs-1./16.*o*x2zc-1./16.*o*
     #    x2zs*txs-1./8.*os*x12*x2z*tx+1./16.*os*x12*x2zs-1./16.*
     #    os*x2z*txs+1./16.*os*x2zc-1./16.*os*x2zs-1./16.*oc*x2z*
     #    tx+1./16.*oc*x2zs+1./16.*x12*tx*x2zs-1./16.*x12*x2zs*
     #    txs-1./16.*x2z*x12s*txs-1./16.*tx*x2zc+1./8.*x2zs*txs)
      gz10q= gz10q+rwwgz(7,8)*vvq*gstm2*yc*bxp*(-1./8.*
     #    o*x12*x2z*tx+3./16.*o*x12*tx+3./32.*o*x12*x2zs-1./8.*o*
     #    x12*txs-1./16.*o*x12-1./16.*o*x2z*x12s-3./16.*o*x2z*txs
     #    +1./16.*o*x2z-3./32.*o*tx*x12s+3./32.*o*tx*x2zs-1./16.
     #    *o*tx+3./32.*o*x12s-1./32.*o*x12c-3./32.*o*x2zs+3./16.
     #    *o*txs+1./16.*os*x12*x2z-3./32.*os*x12*tx-1./16.*os*x2z
     #    *tx-3./16.*os*x2z+3./32.*os*tx-1./32.*os*x12s+3./32.*
     #    os*x2zs-1./16.*os*txs+1./16.*os+1./32.*oc*x12+1./8.*
     #    oc*x2z-1./32.*oc*tx-3./32.*oc+1./32.*oq-3./16.*x12*
     #    x2z*txs+3./32.*x12*tx*x2zs-1./16.*x12*tx+3./16.*x12*txs
     #    -1./16.*x2z*tx*x12s+1./16.*x2z*tx+3./16.*x2z*txs+3./
     #    32.*tx*x12s-1./32.*tx*x12c-3./32.*tx*x2zs-1./16.*x12s*
     #    txs-1./8.*txs)
      gz10q= gz10q+rwwgz(7,8)*vvq*gstm2*yc*(1./16.*o*x12
     #    *x2z*tx+1./4.*o*x12*x2z*txs-1./32.*o*x12*tx*x2zs-1./8.*
     #    o*x12*x2zs-1./8.*o*x12*txs+3./32.*o*x2z*tx*x12s+1./32.*
     #    o*x2z*x12s-1./16.*o*tx*x12s+1./32.*o*tx*x12c-3./32.*o*
     #    tx*x2zc-1./16.*o*tx*x2zs+3./32.*o*x12s*txs+3./32.*o*
     #    x2zc+3./32.*o*x2zs*txs+3./16.*os*x12*x2z*tx+1./16.*os*
     #    x12*x2z-1./8.*os*x12*tx-1./8.*os*x12*x2zs+3./32.*os*x12
     #    *txs+1./32.*os*x2z*tx-1./32.*os*x2z*x12s+1./8.*os*x2z*
     #    txs+3./32.*os*tx*x12s-1./32.*os*tx*x2zs-3./32.*os*x2zc
     #    +1./8.*os*x2zs-1./16.*os*txs-1./16.*oc*x12*x2z+3./32.
     #    *oc*x12*tx+3./32.*oc*x2z*tx+1./32.*oc*x2z-1./16.*oc*tx
     #    -1./8.*oc*x2zs+1./32.*oc*txs-1./32.*oq*x2z+1./32.*oq*
     #    tx-1./8.*x12*tx*x2zs+3./32.*x12*x2zs*txs+1./32.*x2z*tx*
     #    x12s+1./8.*x2z*x12s*txs+3./32.*tx*x2zc-1./16.*x12s*txs
     #    +1./32.*x12c*txs-3./16.*x2zs*txs)
      gz10q= gz10q+rwwgz(7,9)*bxpi*vvq*gstm2*yc*(1./8.*o*
     #    x12*x2z*tx+1./8.*o*x2z*txs+1./8.*o*tx*x2zs-1./8.*o*x2zs
     #    +1./8.*os*x2z*tx+1./8.*os*x2zs+1./8.*x12*x2z*txs-1./8.
     #    *tx*x2zs)
      gz10q= gz10q+rwwgz(7,9)*vvq*gstm2*yc*bxp*(3./16.*o*
     #    x12*x2z+1./8.*o*x12*tx-3./16.*o*x12+3./16.*o*x2z*tx-3.
     #    /16.*o*x2z-3./16.*o*tx+1./16.*o*x12s+1./8.*o+1./8.*os
     #    *x12+3./16.*os*x2z+1./16.*os*tx-3./16.*os+1./16.*oc
     #    +3./16.*x12*x2z*tx-3./16.*x12*tx-3./16.*x2z*tx+1./16.
     #    *tx*x12s+1./8.*tx)
      gz10q= gz10q+rwwgz(7,9)*vvq*gstm2*yc*(-1./4.*o*
     #    x12*x2z*tx-1./16.*o*x12*x2z+1./8.*o*x12*tx-1./8.*o*x12*
     #    txs+1./16.*o*x2z*tx-3./16.*o*x2z*txs-1./16.*o*tx*x12s
     #    -3./16.*o*tx*x2zs+3./16.*o*x2zs+1./8.*o*txs-1./16.*os
     #    *x12*x2z-1./8.*os*x12*tx-1./4.*os*x2z*tx+1./16.*os*x2z
     #    +1./8.*os*tx-3./16.*os*x2zs-1./16.*os*txs-1./16.*oc*
     #    x2z-1./16.*oc*tx-1./16.*x12*x2z*tx-3./16.*x12*x2z*txs
     #    +1./8.*x12*txs+3./16.*tx*x2zs-1./16.*x12s*txs)
      gz10q= gz10q+rwwgz(7,10)*xx*vvq*gstm2*yc*(1./8.*o*
     #    x12*x2zs*txs-1./8.*o*x2zq+1./16.*o*x2zc*txs+1./16.*os*
     #    x12*x2zc+1./16.*os*x2zq-1./16.*os*x2zc+1./16.*os*x2zs*
     #    txs+1./16.*oc*x2zc-1./8.*x12*tx*x2zc+1./16.*x12*x2zc*
     #    txs+1./16.*x12s*x2zs*txs+1./16.*x2zq-1./16.*x2zc*txs)
      gz10q= gz10q+rwwgz(7,10)*bxpi*vvq*gstm2*yc*(1./8.*o
     #    *x12*x2z*txs+1./8.*o*x12*tx*x2zs+1./8.*o*x12*x2zc-3./8.
     #    *o*x2zc+1./8.*o*x2zs*txs+1./8.*os*x12*x2zs+1./16.*os*
     #    x2z*txs+3./16.*os*x2zc-1./8.*os*x2zs+1./8.*oc*x2zs-1./
     #    4.*x12*tx*x2zs-1./8.*x12*x2zc+1./8.*x12*x2zs*txs+1./16.
     #    *x2z*x12s*txs+1./8.*tx*x12s*x2zs+3./16.*x2zc-1./8.*x2zs
     #    *txs)
      gz10q= gz10q+rwwgz(7,10)*vvq*gstm2*bxps*yc*(-3./
     #    16.*o*x12*x2z-1./8.*o*x12+3./16.*o*x2z+3./32.*o*x12s+
     #    1./32.*o+3./32.*os*x12-3./32.*os*x2z-1./16.*os+1./32.
     #    *oc+3./16.*x12*x2z+1./32.*x12-3./32.*x2z*x12s-3./32.*
     #    x2z-1./16.*x12s+1./32.*x12c)
      gz10q= gz10q+rwwgz(7,10)*vvq*gstm2*yc*bxp*(3./16.*o
     #    *x12*x2z*tx+5./16.*o*x12*x2z+1./16.*o*x12*tx+5./16.*o*
     #    x12*x2zs-1./16.*o*x12*txs-1./16.*o*x2z*x12s+3./32.*o*
     #    x2z*txs-3./16.*o*x2z-1./8.*o*tx*x12s-1./2.*o*x2zs+1./
     #    32.*o*txs-1./32.*os*x12*x2z-1./16.*os*x12*tx+1./32.*os*
     #    x12+3./32.*os*x2z-1./32.*os*x12s+1./4.*os*x2zs-1./32.
     #    *os*txs-1./16.*oc*x12+1./32.*oc*x2z+1./32.*oc-1./32.*
     #    oq-3./16.*x12*x2z*tx+3./32.*x12*x2z*txs-3./16.*x12*x2z
     #    -5./16.*x12*x2zs+1./32.*x12*txs+3./16.*x2z*tx*x12s+1./
     #    8.*x2z*x12s-3./32.*x2z*txs+1./16.*x2z+1./16.*tx*x12s-
     #    1./16.*tx*x12c+1./16.*x12s*x2zs-1./32.*x12s*txs+1./4.*
     #    x2zs)
      gz10q= gz10q+rwwgz(7,10)*vvq*gstm2*yc*(-3./16.*o
     #    *x12*x2z*tx-1./8.*o*x12*x2z*txs-1./8.*o*x12*tx*x2zs-1./
     #    8.*o*x12*x2zc-5./16.*o*x12*x2zs-3./32.*o*x2z*txs+3./32.
     #    *o*x12s*txs+7./16.*o*x2zc-5./32.*o*x2zs*txs+13./32.*o*
     #    x2zs-3./32.*os*x12*x2z-1./8.*os*x12*x2zs+3./32.*os*x12*
     #    txs+1./32.*os*x2z*x12s-1./16.*os*x2z*txs+1./16.*os*x2z
     #    -7./32.*os*x2zc-3./32.*os*x2zs+1./16.*oc*x12*x2z-3./
     #    32.*oc*x2z-1./8.*oc*x2zs+1./32.*oc*txs+1./32.*oq*x2z+
     #    1./8.*x12*x2z*tx-3./32.*x12*x2z*txs+5./16.*x12*tx*x2zs+
     #    1./8.*x12*x2zc-5./32.*x12*x2zs*txs+9./32.*x12*x2zs-3./
     #    16.*x2z*tx*x12s-1./16.*x2z*x12s*txs+1./16.*x2z*txs-1./8.
     #    *tx*x12s*x2zs-1./16.*x12s*x2zs+1./32.*x12c*txs-7./32.*
     #    x2zc+5./32.*x2zs*txs-3./16.*x2zs)
      gz10q= gz10q+rwwgz(7,11)*vvq*gstm2*yc*bxp*(1./16.*o
     #    *x12*x2z-1./8.*o*x12*tx+1./16.*o*x12+1./16.*o*x2z*tx-
     #    1./16.*o*x2z+1./16.*o*tx-1./16.*o*x12s-1./8.*o*txs+1./
     #    16.*os*x2z-1./16.*os*tx-1./16.*os+1./16.*oc+1./16.*
     #    x12*x2z*tx+1./16.*x12*tx-1./8.*x12*txs-1./16.*x2z*tx-
     #    1./16.*tx*x12s+1./8.*txs)
      gz10q= gz10q+rwwgz(7,11)*vvq*gstm2*yc*(-1./16.*o
     #    *x12*x2z+1./8.*o*x12*txs-1./16.*o*x2z*tx+1./16.*o*x2z*
     #    txs+1./16.*o*tx*x12s-1./16.*o*tx*x2zs+1./16.*o*x2zs-1.
     #    /16.*os*x12*x2z+1./8.*os*x12*tx+1./16.*os*x2z-1./16.*os
     #    *x2zs+1./16.*os*txs-1./16.*oc*x2z+1./16.*oc*tx-1./16.
     #    *x12*x2z*tx+1./16.*x12*x2z*txs-1./8.*x2z*txs+1./16.*tx*
     #    x2zs+1./16.*x12s*txs)
      gz10q= gz10q+rwwgz(7,12)*xx*vvq*gstm2*yc*(-1./4.
     #    *o*x12*x2z*txs+1./8.*o*x12*tx*x2zs+1./8.*o*tx*x2zc+1./8.
     #    *o*x2zc-1./8.*o*x2zs*txs-1./8.*os*x2z*txs+1./8.*os*tx*
     #    x2zs+1./4.*x12*tx*x2zs-1./8.*x12*x2zs*txs-1./8.*x2z*
     #    x12s*txs-1./8.*tx*x2zc-1./8.*x2zc+1./4.*x2zs*txs)
      gz10q= gz10q+rwwgz(7,12)*bxpi*vvq*gstm2*yc*(-1./4.
     #    *o*x12*x2z*tx-1./8.*o*x12*x2zs-1./4.*o*x2z*txs+1./8.*o*
     #    tx*x2zs+3./8.*o*x2zs-1./8.*os*x2zs+1./4.*x12*x2z*tx-1.
     #    /4.*x12*x2z*txs+1./8.*x12*tx*x2zs+1./4.*x12*x2zs-1./4.*
     #    x2z*tx*x12s+1./4.*x2z*txs-1./8.*tx*x2zs-1./4.*x2zs)
      gz10q= gz10q+rwwgz(7,12)*vvq*gstm2*yc*bxp*(-1./4.
     #    *o*x12*x2z+1./4.*o*x2z-1./8.*os*x2z+1./4.*x12*x2z-1./
     #    8.*x2z*x12s-1./8.*x2z)
      gz10q= gz10q+rwwgz(7,12)*vvq*gstm2*yc*(1./4.*o*x12
     #    *x2z*tx+1./4.*o*x12*x2z+1./8.*o*x12*x2zs+1./4.*o*x2z*
     #    txs-1./4.*o*x2z-1./8.*o*tx*x2zs-3./8.*o*x2zs+1./8.*os
     #    *x2z+1./8.*os*x2zs-1./4.*x12*x2z*tx+1./4.*x12*x2z*txs
     #    -1./4.*x12*x2z-1./8.*x12*tx*x2zs-1./4.*x12*x2zs+1./4.
     #    *x2z*tx*x12s+1./8.*x2z*x12s-1./4.*x2z*txs+1./8.*x2z+1.
     #    /8.*tx*x2zs+1./4.*x2zs)
      gz10q= gz10q+rwwgz(7,13)*xx*vvq*gstm2*yc*(-1./8.
     #    *o*x12*x2z*txs+1./8.*o*x2zc-1./8.*o*x2zs*txs-1./16.*os*
     #    x2z*txs-1./16.*os*x2zc+1./8.*x12*tx*x2zs-1./8.*x12*x2zs
     #    *txs-1./16.*x2z*x12s*txs-1./16.*x2zc+1./8.*x2zs*txs)
      gz10q= gz10q+rwwgz(7,13)*bxpi*vvq*gstm2*yc*(-1./8.
     #    *o*x12*x2z*tx-1./8.*o*x12*x2zs-1./8.*o*x2z*txs+1./4.*o*
     #    x2zs-1./8.*os*x2zs+1./8.*x12*x2z*tx-1./8.*x12*x2z*txs
     #    +1./8.*x12*x2zs-1./8.*x2z*tx*x12s+1./8.*x2z*txs-1./8.
     #    *x2zs)
      gz10q= gz10q+rwwgz(7,13)*vvq*gstm2*yc*bxp*(-1./8.
     #    *o*x12*x2z+1./8.*o*x2z-1./16.*os*x2z+1./8.*x12*x2z-1./
     #    16.*x2z*x12s-1./16.*x2z)
      gz10q= gz10q+rwwgz(7,13)*vvq*gstm2*yc*(1./8.*o*x12
     #    *x2z*tx+1./8.*o*x12*x2z+1./8.*o*x12*x2zs+1./8.*o*x2z*
     #    txs-1./8.*o*x2z-1./4.*o*x2zs+1./16.*os*x2z+1./8.*os*
     #    x2zs-1./8.*x12*x2z*tx+1./8.*x12*x2z*txs-1./8.*x12*x2z
     #    -1./8.*x12*x2zs+1./8.*x2z*tx*x12s+1./16.*x2z*x12s-1./
     #    8.*x2z*txs+1./16.*x2z+1./8.*x2zs)
      gz10q= gz10q+rwwgz(7,14)*xx*vvq*gstm2*yc*(1./16.*o
     #    *x12*tx*x2zs+1./16.*o*tx*x2zc-1./16.*o*x2zc+1./16.*o*
     #    x2zs*txs+1./16.*os*tx*x2zs+1./16.*os*x2zc+1./16.*x12*
     #    x2zs*txs-1./16.*tx*x2zc)
      gz10q= gz10q+rwwgz(7,14)*bxpi*vvq*gstm2*yc*(1./16.*
     #    o*x12*x2z*tx+1./16.*o*x12*x2zs+1./16.*o*x2z*txs+1./8.*o
     #    *tx*x2zs-1./8.*o*x2zs+1./16.*os*x2z*tx+1./8.*os*x2zs+
     #    1./16.*x12*x2z*txs+1./16.*x12*tx*x2zs-1./8.*tx*x2zs)
      gz10q= gz10q+rwwgz(7,14)*vvq*gstm2*bxps*yc*(1./16.
     #    +1./8.*o*x12-1./8.*o+1./16.*os-1./8.*x12+1./16.*
     #    x12s)
      gz10q= gz10q+rwwgz(7,14)*vvq*gstm2*yc*bxp*(-1./16.
     #    *o*x12*x2z-1./8.*o*x12*tx+1./16.*o*x2z*tx+3./16.*o*x2z
     #    -1./16.*o*txs-1./16.*os*x12-1./16.*os*x2z+1./16.*os
     #    -1./16.*oc+1./16.*x12*x2z*tx+1./8.*x12*x2z+1./8.*x12*
     #    tx-1./16.*x12*txs-1./16.*x2z*tx-1./8.*x2z-1./8.*tx*
     #    x12s+1./16.*txs)
      gz10q= gz10q+rwwgz(7,14)*vvq*gstm2*yc*(-1./16.*o
     #    *x12*x2z*tx-1./16.*o*x12*x2z-1./16.*o*x12*x2zs+1./8.*o*
     #    x12*txs-1./16.*o*x2z*tx+1./16.*o*x2z-1./8.*o*tx*x2zs+
     #    1./16.*os*x12*x2z-1./16.*os*x2z*tx-1./8.*os*x2z-1./16.*
     #    os*x2zs+1./16.*os*txs+1./16.*oc*x2z-3./16.*x12*x2z*tx
     #    -1./16.*x12*tx*x2zs+1./16.*x2z*tx-1./16.*x2z*txs+1./8.
     #    *tx*x2zs+1./16.*x12s*txs+1./16.*x2zs)
      gz10q= gz10q+rwwgz(8,1)*bxpi*vvq*gstm2*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)
      gz10q= gz10q+rwwgz(8,1)*vvq*gstm2*bxps*yc*(-1./2.
     #    -2*o*x12+o*tx+2*o-3./2.*os+x12*tx+x12-tx-1./2.
     #    *x12s)
      gz10q= gz10q+rwwgz(8,1)*vvq*gstm2*yc*bxp*(1./2.+5.
     #    /4.*o*x12*x2z-3./2.*o*x12*tx+5./4.*o*x12+5./4.*o*x2z*tx
     #    -13./4.*o*x2z+1./4.*o*tx+1./4.*o*x12s-2*o*txs-3./2.
     #    *o+1./2.*os*x12+9./4.*os*x2z-7./4.*os*tx+3./4.*os+1.
     #    /4.*oc+1./4.*x12*x2z*tx-x12*x2z-3./4.*x12*tx-2*x12*
     #    txs-x12+3./4.*x2z*tx+x2z+1./4.*tx*x12s+1./2.*tx+1.
     #    /2.*x12s+txs)
      gz10q= gz10q+rwwgz(8,1)*vvq*gstm2*yc*(1./2.*o*x12*
     #    x2z*tx-3./4.*o*x12*x2z+1./2.*o*x12*tx+1./2.*o*x12*txs
     #    -7./4.*o*x2z*tx+3./4.*o*x2z*txs+5./2.*o*x2z+1./4.*o*
     #    tx*x12s-3./4.*o*tx*x2zs-1./2.*o*tx+5./4.*o*x2zs+3./2.
     #    *o*txs-1./4.*os*x12*x2z+1./2.*os*x12*tx+1./2.*os*x2z*tx
     #    -5./4.*os*x2z+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+3./2.*x12*txs-x2z*txs-x2z-1.
     #    /2.*tx*x12s+1./4.*tx*x2zs+1./4.*x12s*txs-1./2.*x2zs-
     #    txs)
      gz10q= gz10q+rwwgz(8,4)*bxpi*vvq*gstm2*yc*(1./4.*o*
     #    x12*x2zs-1./4.*o*tx*x2zs+1./4.*o*x2zc+1./4.*x12*tx*x2zs
     #    +1./4.*tx*x2zc-1./4.*x2zc-1./4.*x2zs*txs)
      gz10q= gz10q+rwwgz(8,4)*vvq*gstm2*bxps*yc*bxp*(-1./
     #    2.-o*x12+o-1./2.*os+x12-1./2.*x12s)
      gz10q= gz10q+rwwgz(8,4)*vvq*gstm2*bxps*yc*(1./4.+
     #    5./4.*o*x12*x2z-1./2.*o*x12+1./2.*o*x2z*tx-9./4.*o*x2z
     #    +1./2.*o*tx+7./8.*o*x12s-1./2.*o*txs-3./8.*o+7./8.*
     #    os*x12+7./8.*os*x2z-1./2.*os*tx+1./8.*oc+1./2.*x12*
     #    x2z*tx-7./4.*x12*x2z-1./2.*x12*tx-1./2.*x12*txs-3./8.
     #    *x12-1./2.*x2z*tx+3./8.*x2z*x12s+11./8.*x2z+1./2.*tx*
     #    x12s+1./8.*x12c+1./2.*txs)
      gz10q= gz10q+rwwgz(8,4)*vvq*gstm2*yc*bxp*(-1./4.*
     #    o*x12*x2z*tx+3./4.*o*x12*x2z-3./8.*o*x12*x2zs+1./4.*o*
     #    x12*txs+1./4.*o*x12-o*x2z*tx-1./2.*o*x2z*x12s+3./8.*o
     #    *x2z*txs+o*x2z-1./8.*o*tx*x12s-3./8.*o*tx*x2zs-1./4.*
     #    o*tx-1./8.*o*x12s-1./8.*o*x12c+13./8.*o*x2zs+1./8.*o*
     #    txs-5./8.*os*x12*x2z+1./8.*os*x12*tx-1./8.*os*x12+1./
     #    4.*os*x2z*tx-1./8.*os*x2z+1./8.*os*tx-1./4.*os*x12s-3.
     #    /8.*os*x2zs+1./8.*os*txs-1./8.*oc*x12-1./8.*oc*x2z+1./
     #    8.*oc*tx+3./4.*x12*x2z*tx+3./8.*x12*x2z*txs+3./4.*x12*
     #    x2z-3./8.*x12*tx*x2zs+1./4.*x12*tx+3./4.*x12*x2zs+1./
     #    8.*x12*txs-1./2.*x2z*tx*x12s+1./4.*x2z*tx-7./8.*x2z*txs
     #    -3./4.*x2z-1./8.*tx*x12s-1./8.*tx*x12c+7./8.*tx*x2zs
     #    +1./8.*x12s*txs-5./4.*x2zs-1./4.*txs)
      gz10q= gz10q+rwwgz(8,4)*vvq*gstm2*yc*(-1./2.*o*
     #    x12*x2z-1./4.*o*x12*x2zs+1./2.*o*x2z*tx+1./8.*o*x2z*
     #    x12s-1./8.*o*x2z*txs+1./2.*o*tx*x2zs-3./8.*o*x2zc-7./
     #    8.*o*x2zs+1./8.*os*x12*x2z-1./8.*os*x2z*tx+1./8.*os*
     #    x2zs-1./2.*x12*x2z*tx-1./8.*x12*x2z*txs-1./4.*x12*tx*
     #    x2zs-3./8.*x12*x2zs+1./8.*x2z*tx*x12s+1./2.*x2z*txs-3.
     #    /8.*tx*x2zc-1./2.*tx*x2zs+3./8.*x2zc+3./8.*x2zs*txs+3.
     #    /4.*x2zs)
      gz10q= gz10q+rwwgz(8,7)*bxpi*vvq*gstm2*yc*(-1./8.
     #    *o*x12*x2z*txs+1./16.*o*x12*x2zs-1./16.*o*x2z*tx*x12s+1.
     #    /16.*o*tx*x2zc+1./16.*o*tx*x2zs-1./16.*o*x2zc-1./16.*o*
     #    x2zs*txs-1./8.*os*x12*x2z*tx+1./16.*os*x12*x2zs-1./16.*
     #    os*x2z*txs+1./16.*os*x2zc-1./16.*os*x2zs-1./16.*oc*x2z*
     #    tx+1./16.*oc*x2zs+1./16.*x12*tx*x2zs-1./16.*x12*x2zs*
     #    txs-1./16.*x2z*x12s*txs-1./16.*tx*x2zc+1./8.*x2zs*txs)
      gz10q= gz10q+rwwgz(8,7)*vvq*gstm2*yc*bxp*(-1./8.*
     #    o*x12*x2z*tx+3./16.*o*x12*tx+3./32.*o*x12*x2zs-1./8.*o*
     #    x12*txs-1./16.*o*x12-1./16.*o*x2z*x12s-3./16.*o*x2z*txs
     #    +1./16.*o*x2z-3./32.*o*tx*x12s+3./32.*o*tx*x2zs-1./16.
     #    *o*tx+3./32.*o*x12s-1./32.*o*x12c-3./32.*o*x2zs+3./16.
     #    *o*txs+1./16.*os*x12*x2z-3./32.*os*x12*tx-1./16.*os*x2z
     #    *tx-3./16.*os*x2z+3./32.*os*tx-1./32.*os*x12s+3./32.*
     #    os*x2zs-1./16.*os*txs+1./16.*os+1./32.*oc*x12+1./8.*
     #    oc*x2z-1./32.*oc*tx-3./32.*oc+1./32.*oq-3./16.*x12*
     #    x2z*txs+3./32.*x12*tx*x2zs-1./16.*x12*tx+3./16.*x12*txs
     #    -1./16.*x2z*tx*x12s+1./16.*x2z*tx+3./16.*x2z*txs+3./
     #    32.*tx*x12s-1./32.*tx*x12c-3./32.*tx*x2zs-1./16.*x12s*
     #    txs-1./8.*txs)
      gz10q= gz10q+rwwgz(8,7)*vvq*gstm2*yc*(1./16.*o*x12
     #    *x2z*tx+1./4.*o*x12*x2z*txs-1./32.*o*x12*tx*x2zs-1./8.*
     #    o*x12*x2zs-1./8.*o*x12*txs+3./32.*o*x2z*tx*x12s+1./32.*
     #    o*x2z*x12s-1./16.*o*tx*x12s+1./32.*o*tx*x12c-3./32.*o*
     #    tx*x2zc-1./16.*o*tx*x2zs+3./32.*o*x12s*txs+3./32.*o*
     #    x2zc+3./32.*o*x2zs*txs+3./16.*os*x12*x2z*tx+1./16.*os*
     #    x12*x2z-1./8.*os*x12*tx-1./8.*os*x12*x2zs+3./32.*os*x12
     #    *txs+1./32.*os*x2z*tx-1./32.*os*x2z*x12s+1./8.*os*x2z*
     #    txs+3./32.*os*tx*x12s-1./32.*os*tx*x2zs-3./32.*os*x2zc
     #    +1./8.*os*x2zs-1./16.*os*txs-1./16.*oc*x12*x2z+3./32.
     #    *oc*x12*tx+3./32.*oc*x2z*tx+1./32.*oc*x2z-1./16.*oc*tx
     #    -1./8.*oc*x2zs+1./32.*oc*txs-1./32.*oq*x2z+1./32.*oq*
     #    tx-1./8.*x12*tx*x2zs+3./32.*x12*x2zs*txs+1./32.*x2z*tx*
     #    x12s+1./8.*x2z*x12s*txs+3./32.*tx*x2zc-1./16.*x12s*txs
     #    +1./32.*x12c*txs-3./16.*x2zs*txs)
      gz10q= gz10q+rwwgz(8,8)*vvq*gstm2*bxps*yc*bxp*(1./2.
     #    +o*x12-o+1./2.*os-x12+1./2.*x12s)
      gz10q= gz10q+rwwgz(8,8)*vvq*gstm2*bxps*yc*(-1./2.
     #    -1./2.*o*x12*x2z-1./2.*o*x12-1./2.*o*x2z*tx+3./2.*o*
     #    x2z-1./2.*o*tx-1./2.*o*x12s+1./2.*o*txs+o-1./2.*os*
     #    x12-1./2.*os*x2z+1./2.*os*tx-1./2.*os-1./2.*x12*x2z*
     #    tx+x12*x2z+1./2.*x12*tx+1./2.*x12*txs+x12+1./2.*x2z
     #    *tx-x2z-1./2.*tx*x12s-1./2.*x12s-1./2.*txs)
      gz10q= gz10q+rwwgz(8,8)*vvq*gstm2*yc*bxp*(-1./2.*
     #    o*x12+o*x2z*tx-3./2.*o*x2z+1./2.*o*tx+1./2.*o*x12s-
     #    1./2.*o*x2zs-1./2.*o*txs+1./2.*os*x12+1./2.*os*x2z-1./
     #    2.*os*tx-x12*x2z-1./2.*x12*tx-1./2.*x12*txs-1./2.*x2z
     #    *tx+1./2.*x2z*txs+x2z+1./2.*tx*x12s-1./2.*tx*x2zs+1.
     #    /2.*x2zs+1./2.*txs)
      gz10q= gz10q+rwwgz(8,8)*vvq*gstm2*yc*(1./2.*o*x12*
     #    x2z-1./2.*o*x2z*tx+1./2.*o*x2zs+1./2.*x12*x2z*tx-1./2.
     #    *x2z*txs+1./2.*tx*x2zs-1./2.*x2zs)
      gz10q= gz10q+rwwgz(8,9)*vvq*gstm2*bxps*yc*(1./2.*o*
     #    x12-1./2.*o*tx-1./2.*o+1./2.*os-1./2.*x12*tx+1./2.*
     #    tx)
      gz10q= gz10q+rwwgz(8,9)*vvq*gstm2*yc*bxp*(1./2.*o*
     #    x12*tx-1./2.*o*x12-1./2.*o*x2z*tx+1./2.*o*x2z+1./2.*o
     #    *tx+1./2.*o*txs+1./2.*o-1./2.*os*x2z+1./2.*os*tx-1./
     #    2.*os+1./2.*x12*tx+1./2.*x12*txs-1./2.*x2z*tx-1./2.*
     #    tx)
      gz10q= gz10q+rwwgz(8,9)*vvq*gstm2*yc*(-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)
      gz10q= gz10q+rwwgz(8,10)*bxpi*vvq*gstm2*yc*(1./8.*o
     #    *x12*x2z*txs-1./16.*o*x12*x2zs+1./16.*o*x2z*tx*x12s-1./
     #    16.*o*tx*x2zc-1./16.*o*tx*x2zs+1./16.*o*x2zc+1./16.*o*
     #    x2zs*txs+1./8.*os*x12*x2z*tx-1./16.*os*x12*x2zs+1./16.*
     #    os*x2z*txs-1./16.*os*x2zc+1./16.*os*x2zs+1./16.*oc*x2z*
     #    tx-1./16.*oc*x2zs-1./16.*x12*tx*x2zs+1./16.*x12*x2zs*
     #    txs+1./16.*x2z*x12s*txs+1./16.*tx*x2zc-1./8.*x2zs*txs)
      gz10q= gz10q+rwwgz(8,10)*vvq*gstm2*bxps*yc*(1./8.*o
     #    *x12*x2z-1./4.*o*x12*tx+1./8.*o*x12+1./8.*o*x2z*tx-1./
     #    8.*o*x2z+1./8.*o*tx-1./8.*o*x12s-1./4.*o*txs+1./8.*os
     #    *x2z-1./8.*os*tx-1./8.*os+1./8.*oc+1./8.*x12*x2z*tx
     #    +1./8.*x12*tx-1./4.*x12*txs-1./8.*x2z*tx-1./8.*tx*
     #    x12s+1./4.*txs)
      gz10q= gz10q+rwwgz(8,10)*vvq*gstm2*yc*bxp*(1./8.*o*
     #    x12*x2z*tx-1./4.*o*x12*x2z+1./16.*o*x12*tx-3./32.*o*x12
     #    *x2zs+3./8.*o*x12*txs-1./16.*o*x12-1./4.*o*x2z*tx+1./
     #    16.*o*x2z*x12s+5./16.*o*x2z*txs+1./16.*o*x2z+7./32.*o*
     #    tx*x12s-7./32.*o*tx*x2zs-1./16.*o*tx+1./32.*o*x12s+1./
     #    32.*o*x12c+7./32.*o*x2zs+1./16.*o*txs-3./16.*os*x12*x2z
     #    +11./32.*os*x12*tx+1./16.*os*x2z*tx+3./16.*os*x2z+1./
     #    32.*os*tx+1./32.*os*x12s-7./32.*os*x2zs+3./16.*os*txs
     #    +1./16.*os-1./32.*oc*x12-1./4.*oc*x2z+5./32.*oc*tx-
     #    1./32.*oc-1./32.*oq-1./4.*x12*x2z*tx+5./16.*x12*x2z*txs
     #    -3./32.*x12*tx*x2zs-1./16.*x12*tx+1./16.*x12*txs+1./
     #    16.*x2z*tx*x12s+1./16.*x2z*tx-7./16.*x2z*txs+1./32.*tx*
     #    x12s+1./32.*tx*x12c+7./32.*tx*x2zs+3./16.*x12s*txs-1./
     #    8.*txs)
      gz10q= gz10q+rwwgz(8,10)*vvq*gstm2*yc*(-1./16.*o
     #    *x12*x2z*tx-1./4.*o*x12*x2z*txs+1./8.*o*x12*x2z+1./32.*
     #    o*x12*tx*x2zs+1./8.*o*x12*x2zs-1./8.*o*x12*txs-3./32.*o
     #    *x2z*tx*x12s+1./8.*o*x2z*tx-1./32.*o*x2z*x12s-1./8.*o*
     #    x2z*txs-1./16.*o*tx*x12s-1./32.*o*tx*x12c+3./32.*o*tx*
     #    x2zc+3./16.*o*tx*x2zs-3./32.*o*x12s*txs-3./32.*o*x2zc
     #    -3./32.*o*x2zs*txs-1./8.*o*x2zs-3./16.*os*x12*x2z*tx+
     #    1./16.*os*x12*x2z-1./8.*os*x12*tx+1./8.*os*x12*x2zs-3./
     #    32.*os*x12*txs-1./32.*os*x2z*tx+1./32.*os*x2z*x12s-1./8.
     #    *os*x2z*txs-1./8.*os*x2z-3./32.*os*tx*x12s+1./32.*os*tx
     #    *x2zs+3./32.*os*x2zc-1./16.*os*txs+1./16.*oc*x12*x2z-
     #    3./32.*oc*x12*tx-3./32.*oc*x2z*tx+3./32.*oc*x2z-1./16.*
     #    oc*tx+1./8.*oc*x2zs-1./32.*oc*txs+1./32.*oq*x2z-1./32.
     #    *oq*tx+1./8.*x12*x2z*tx-1./8.*x12*x2z*txs+1./8.*x12*tx*
     #    x2zs-3./32.*x12*x2zs*txs-1./32.*x2z*tx*x12s-1./8.*x2z*
     #    x12s*txs)
      gz10q= gz10q+rwwgz(8,10)*vvq*gstm2*yc*(1./4.*x2z*
     #    txs-3./32.*tx*x2zc-1./8.*tx*x2zs-1./16.*x12s*txs-1./
     #    32.*x12c*txs+3./16.*x2zs*txs)
      gz10q= gz10q+rwwgz(8,11)*vvq*gstm2*bxps*yc*(1./4.
     #    +1./2.*o*x12-1./2.*o+1./4.*os-1./2.*x12+1./4.*x12s
     #    )
      gz10q= gz10q+rwwgz(8,11)*vvq*gstm2*yc*bxp*(-1./4.
     #    *o*x12*x2z+1./4.*o*x12-1./4.*o*x2z*tx+3./4.*o*x2z-1./
     #    4.*o*tx-1./4.*o*x12s+1./4.*o*txs-1./4.*os*x12-1./4.*
     #    os*x2z+1./4.*os*tx-1./4.*x12*x2z*tx+1./2.*x12*x2z+1./
     #    4.*x12*tx+1./4.*x12*txs+1./4.*x2z*tx-1./2.*x2z-1./4.*
     #    tx*x12s-1./4.*txs)
      gz10q= gz10q+rwwgz(8,11)*vvq*gstm2*yc*(-1./4.*o*
     #    x12*x2z+1./4.*o*x2z*tx-1./4.*o*x2zs-1./4.*x12*x2z*tx+
     #    1./4.*x2z*txs-1./4.*tx*x2zs+1./4.*x2zs)
      gz10q= gz10q+rwwgz(8,12)*bxpi*vvq*gstm2*yc*(1./4.*o
     #    *x2z*tx-1./4.*o*x2zs-1./4.*x12*x2z*tx+1./2.*x2z*txs-1.
     #    /2.*tx*x2zs+1./4.*x2zs)
      gz10q= gz10q+rwwgz(8,12)*vvq*gstm2*bxps*yc*(-1./2.
     #    -o*x12+o-1./2.*os+x12-1./2.*x12s)
      gz10q= gz10q+rwwgz(8,12)*vvq*gstm2*yc*bxp*(1./4.+
     #    1./2.*o*x12*x2z+1./4.*o*x12+3./4.*o*x2z*tx-3./2.*o*x2z
     #    +1./2.*o*tx+1./4.*o*x12s-3./4.*o*txs-1./2.*o+1./4.*
     #    os*x12+1./2.*os*x2z-1./2.*os*tx+1./4.*os+3./4.*x12*
     #    x2z*tx-x12*x2z-1./2.*x12*tx-3./4.*x12*txs-1./2.*x12
     #    -3./4.*x2z*tx+x2z+1./2.*tx*x12s+1./4.*x12s+3./4.*
     #    txs)
      gz10q= gz10q+rwwgz(8,12)*vvq*gstm2*yc*(-o*x2z*tx
     #    +3./4.*o*x2z-1./4.*o*tx+1./2.*o*x2zs+1./2.*o*txs-1./
     #    4.*os*x2z+1./4.*os*tx+1./2.*x12*x2z+1./4.*x12*tx+1./2.
     #    *x12*txs+1./2.*x2z*tx-3./4.*x2z*txs-1./2.*x2z-1./4.*
     #    tx*x12s+3./4.*tx*x2zs-1./2.*x2zs-1./2.*txs)
      gz10q= gz10q+rwwgz(8,13)*bxpi*vvq*gstm2*yc*(-1./8.
     #    *o*x12*x2z*tx+1./8.*o*x2z*tx-1./8.*o*x2z*txs+1./8.*o*tx
     #    *x2zs-1./4.*o*x2zs-1./8.*os*x2z*tx+1./8.*os*x2zs-1./8.
     #    *x12*x2z*tx-1./8.*x12*x2z*txs+1./4.*x2z*txs-1./8.*tx*
     #    x2zs+1./8.*x2zs)
      gz10q= gz10q+rwwgz(8,13)*vvq*gstm2*bxps*yc*(-1./8.
     #    -1./4.*o*x12+1./4.*o-1./8.*os+1./4.*x12-1./8.*x12s
     #    )
      gz10q= gz10q+rwwgz(8,13)*vvq*gstm2*yc*bxp*(1./8.+
     #    5./16.*o*x12*x2z-1./8.*o*x12*tx+5./16.*o*x12+3./16.*o*
     #    x2z*tx-9./16.*o*x2z+3./16.*o*tx-1./16.*o*x12s-3./8.*o
     #    *txs-1./4.*o+5./16.*os*x2z-3./16.*os*tx+1./16.*os+1.
     #    /16.*oc+3./16.*x12*x2z*tx-1./4.*x12*x2z-1./16.*x12*tx
     #    -3./8.*x12*txs-1./4.*x12-3./16.*x2z*tx+1./4.*x2z+1./
     #    16.*tx*x12s+1./8.*x12s+3./8.*txs)
      gz10q= gz10q+rwwgz(8,13)*vvq*gstm2*yc*(1./8.*o*x12
     #    *x2z*tx-5./16.*o*x12*x2z+1./8.*o*x12*txs-5./16.*o*x2z*
     #    tx+3./16.*o*x2z*txs+1./2.*o*x2z+1./16.*o*tx*x12s-3./
     #    16.*o*tx*x2zs-1./8.*o*tx+5./16.*o*x2zs+1./4.*o*txs-1./
     #    16.*os*x12*x2z+1./8.*os*x12*tx+1./8.*os*x2z*tx-3./16.*
     #    os*x2z+1./8.*os*tx-3./16.*os*x2zs+1./16.*os*txs-1./16.
     #    *oc*x2z+1./16.*oc*tx-1./16.*x12*x2z*tx+3./16.*x12*x2z*
     #    txs+1./4.*x12*x2z+1./8.*x12*tx+1./4.*x12*txs+1./8.*
     #    x2z*tx-3./8.*x2z*txs-1./4.*x2z-1./8.*tx*x12s+3./16.*
     #    tx*x2zs+1./16.*x12s*txs-1./8.*x2zs-1./4.*txs)
      gz10q= gz10q+rwwgz(8,14)*bxpi*vvq*gstm2*yc*(1./8.*o
     #    *x12*x2z*tx+1./8.*o*x2z*txs-1./8.*o*tx*x2zs+1./8.*o*
     #    x2zs+1./8.*os*x2z*tx-1./8.*os*x2zs+1./8.*x12*x2z*txs-
     #    1./8.*tx*x2zs)
      gz10q= gz10q+rwwgz(8,14)*vvq*gstm2*bxps*yc*(1./8.*o
     #    *x12-1./8.*o*tx-1./8.*o+1./8.*os-1./8.*x12*tx+1./8.
     #    *tx)
      gz10q= gz10q+rwwgz(8,14)*vvq*gstm2*yc*bxp*(-3./16.
     #    *o*x12*x2z+1./4.*o*x12*tx-3./16.*o*x12-1./16.*o*x2z*tx
     #    +5./16.*o*x2z+1./16.*o*tx+1./16.*o*x12s+1./4.*o*txs
     #    +1./8.*o-5./16.*os*x2z+3./16.*os*tx-1./16.*os-1./16.
     #    *oc+1./16.*x12*x2z*tx+1./16.*x12*tx+1./4.*x12*txs-3./
     #    16.*x2z*tx+1./16.*tx*x12s-1./8.*tx-1./8.*txs)
      gz10q= gz10q+rwwgz(8,14)*vvq*gstm2*yc*(-1./8.*o*
     #    x12*x2z*tx+3./16.*o*x12*x2z-1./8.*o*x12*tx-1./8.*o*x12*
     #    txs+1./16.*o*x2z*tx-3./16.*o*x2z*txs-1./4.*o*x2z-1./
     #    16.*o*tx*x12s+3./16.*o*tx*x2zs-3./16.*o*x2zs-1./8.*o*
     #    txs+1./16.*os*x12*x2z-1./8.*os*x12*tx-1./8.*os*x2z*tx
     #    +3./16.*os*x2z-1./8.*os*tx+3./16.*os*x2zs-1./16.*os*
     #    txs+1./16.*oc*x2z-1./16.*oc*tx-1./16.*x12*x2z*tx-3./
     #    16.*x12*x2z*txs-1./8.*x12*txs+1./4.*x2z*tx+1./8.*x2z*
     #    txs+1./16.*tx*x2zs-1./16.*x12s*txs)
      gz10q= gz10q+rwwgz(9,1)*bxpi*vvq*gstm2*yc*(o*x2z*tx
     #    +o*txs+x12*txs-x2z*tx)
      gz10q= gz10q+rwwgz(9,1)*vvq*gstm2*yc*bxp*(5*o*tx+
     #    x12*tx-tx)
      gz10q= gz10q+rwwgz(9,1)*vvq*gstm2*yc*(-o*x12*tx
     #    -2*o*x2z*tx-3*o*tx-o*txs-os*tx-x12*tx-x12*txs+
     #    x2z*tx+tx)
      gz10q= gz10q+rwwgz(9,4)*bxpi*vvq*gstm2*yc*(-1./4.
     #    *o*x12*x2z*tx-1./4.*o*x2z*txs+1./4.*o*tx*x2zs-1./4.*o*
     #    x2zs-1./4.*os*x2z*tx+1./4.*os*x2zs-1./4.*x12*x2z*txs+
     #    1./4.*tx*x2zs)
      gz10q= gz10q+rwwgz(9,4)*vvq*gstm2*bxps*yc*(-1./2.
     #    *o*x12+1./2.*o*tx+1./2.*o-1./2.*os+1./2.*x12*tx-1./
     #    2.*tx)
      gz10q= gz10q+rwwgz(9,4)*vvq*gstm2*yc*bxp*(3./8.*o*
     #    x12*x2z-3./4.*o*x12*tx+1./8.*o*x12+1./8.*o*x2z*tx-7./
     #    8.*o*x2z-1./8.*o*tx+1./8.*o*x12s-1./2.*o*txs-1./4.*o
     #    +1./4.*os*x12+7./8.*os*x2z-5./8.*os*tx+1./8.*os+1./
     #    8.*oc-3./8.*x12*x2z*tx-1./8.*x12*tx-1./2.*x12*txs+7./
     #    8.*x2z*tx-1./8.*tx*x12s+1./4.*tx)
      gz10q= gz10q+rwwgz(9,4)*vvq*gstm2*yc*(1./4.*o*x12*
     #    x2z*tx-1./8.*o*x12*x2z+1./4.*o*x12*tx+1./4.*o*x12*txs
     #    -1./8.*o*x2z*tx+3./8.*o*x2z*txs+1./2.*o*x2z+1./8.*o*
     #    tx*x12s-3./8.*o*tx*x2zs+3./8.*o*x2zs+1./4.*o*txs-1./8.
     #    *os*x12*x2z+1./4.*os*x12*tx+1./4.*os*x2z*tx-3./8.*os*
     #    x2z+1./4.*os*tx-3./8.*os*x2zs+1./8.*os*txs-1./8.*oc*
     #    x2z+1./8.*oc*tx+1./8.*x12*x2z*tx+3./8.*x12*x2z*txs+1./
     #    4.*x12*txs-1./2.*x2z*tx-3./8.*tx*x2zs+1./8.*x12s*txs)
      gz10q= gz10q+rwwgz(9,7)*bxpi*vvq*gstm2*yc*(1./8.*o*
     #    x12*x2z*tx+1./8.*o*x2z*txs+1./8.*o*tx*x2zs-1./8.*o*x2zs
     #    +1./8.*os*x2z*tx+1./8.*os*x2zs+1./8.*x12*x2z*txs-1./8.
     #    *tx*x2zs)
      gz10q= gz10q+rwwgz(9,7)*vvq*gstm2*yc*bxp*(3./16.*o*
     #    x12*x2z+1./8.*o*x12*tx-3./16.*o*x12+3./16.*o*x2z*tx-3.
     #    /16.*o*x2z-3./16.*o*tx+1./16.*o*x12s+1./8.*o+1./8.*os
     #    *x12+3./16.*os*x2z+1./16.*os*tx-3./16.*os+1./16.*oc
     #    +3./16.*x12*x2z*tx-3./16.*x12*tx-3./16.*x2z*tx+1./16.
     #    *tx*x12s+1./8.*tx)
      gz10q= gz10q+rwwgz(9,7)*vvq*gstm2*yc*(-1./4.*o*
     #    x12*x2z*tx-1./16.*o*x12*x2z+1./8.*o*x12*tx-1./8.*o*x12*
     #    txs+1./16.*o*x2z*tx-3./16.*o*x2z*txs-1./16.*o*tx*x12s
     #    -3./16.*o*tx*x2zs+3./16.*o*x2zs+1./8.*o*txs-1./16.*os
     #    *x12*x2z-1./8.*os*x12*tx-1./4.*os*x2z*tx+1./16.*os*x2z
     #    +1./8.*os*tx-3./16.*os*x2zs-1./16.*os*txs-1./16.*oc*
     #    x2z-1./16.*oc*tx-1./16.*x12*x2z*tx-3./16.*x12*x2z*txs
     #    +1./8.*x12*txs+3./16.*tx*x2zs-1./16.*x12s*txs)
      gz10q= gz10q+rwwgz(9,8)*vvq*gstm2*bxps*yc*(1./2.*o*
     #    x12-1./2.*o*tx-1./2.*o+1./2.*os-1./2.*x12*tx+1./2.*
     #    tx)
      gz10q= gz10q+rwwgz(9,8)*vvq*gstm2*yc*bxp*(1./2.*o*
     #    x12*tx-1./2.*o*x12-1./2.*o*x2z*tx+1./2.*o*x2z+1./2.*o
     #    *tx+1./2.*o*txs+1./2.*o-1./2.*os*x2z+1./2.*os*tx-1./
     #    2.*os+1./2.*x12*tx+1./2.*x12*txs-1./2.*x2z*tx-1./2.*
     #    tx)
      gz10q= gz10q+rwwgz(9,8)*vvq*gstm2*yc*(-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)
      gz10q= gz10q+rwwgz(9,9)*vvq*gstm2*yc*bxp*(-2*o*tx
     #    )
      gz10q= gz10q+rwwgz(9,9)*vvq*gstm2*yc*(2*o*tx)
      gz10q= gz10q+rwwgz(9,10)*bxpi*vvq*gstm2*yc*(-1./8.
     #    *o*x12*x2z*tx-1./8.*o*x2z*txs-1./8.*o*tx*x2zs+1./8.*o*
     #    x2zs-1./8.*os*x2z*tx-1./8.*os*x2zs-1./8.*x12*x2z*txs+
     #    1./8.*tx*x2zs)
      gz10q= gz10q+rwwgz(9,10)*vvq*gstm2*bxps*yc*(1./4.*o
     #    *x12+1./4.*o*tx-1./4.*o+1./4.*os+1./4.*x12*tx-1./4.
     #    *tx)
      gz10q= gz10q+rwwgz(9,10)*vvq*gstm2*yc*bxp*(-3./16.
     #    *o*x12*x2z-3./8.*o*x12*tx-1./16.*o*x12-7./16.*o*x2z*tx
     #    +7./16.*o*x2z-1./16.*o*tx-1./16.*o*x12s-1./4.*o*txs
     #    +1./8.*o-1./8.*os*x12-7./16.*os*x2z-5./16.*os*tx-1./
     #    16.*os-1./16.*oc-3./16.*x12*x2z*tx-1./16.*x12*tx-1./4.
     #    *x12*txs+7./16.*x2z*tx-1./16.*tx*x12s+1./8.*tx)
      gz10q= gz10q+rwwgz(9,10)*vvq*gstm2*yc*(1./4.*o*x12
     #    *x2z*tx+1./16.*o*x12*x2z+1./8.*o*x12*tx+1./8.*o*x12*txs
     #    +3./16.*o*x2z*tx+3./16.*o*x2z*txs-1./4.*o*x2z+1./16.*
     #    o*tx*x12s+3./16.*o*tx*x2zs-3./16.*o*x2zs+1./8.*o*txs+
     #    1./16.*os*x12*x2z+1./8.*os*x12*tx+1./4.*os*x2z*tx+3./16.
     #    *os*x2z+1./8.*os*tx+3./16.*os*x2zs+1./16.*os*txs+1./
     #    16.*oc*x2z+1./16.*oc*tx+1./16.*x12*x2z*tx+3./16.*x12*
     #    x2z*txs+1./8.*x12*txs-1./4.*x2z*tx-3./16.*tx*x2zs+1./
     #    16.*x12s*txs)
      gz10q= gz10q+rwwgz(9,11)*vvq*gstm2*yc*bxp*(1./4.*o*
     #    x12-1./4.*o*tx-1./4.*o+1./4.*os-1./4.*x12*tx+1./4.*
     #    tx)
      gz10q= gz10q+rwwgz(9,11)*vvq*gstm2*yc*(1./4.*o*x12
     #    *tx-1./4.*o*x2z*tx+1./4.*o*x2z+1./4.*o*txs-1./4.*os*
     #    x2z+1./4.*os*tx+1./4.*x12*txs-1./4.*x2z*tx)
      gz10q= gz10q+rwwgz(9,12)*bxpi*vvq*gstm2*yc*(-1./2.
     #    *o*x2z*tx+1./2.*o*txs+1./2.*x12*txs-1./2.*x2z*tx)
      gz10q= gz10q+rwwgz(9,12)*vvq*gstm2*yc*bxp*(-1./4.
     #    *o*x12+3./4.*o*tx+1./4.*o-1./4.*os+3./4.*x12*tx-3./
     #    4.*tx)
      gz10q= gz10q+rwwgz(9,12)*vvq*gstm2*yc*(-1./4.*o*
     #    x12*tx+3./4.*o*x2z*tx-1./4.*o*x2z-1./2.*o*tx-3./4.*o*
     #    txs+1./4.*os*x2z-1./4.*os*tx-1./2.*x12*tx-3./4.*x12*
     #    txs+3./4.*x2z*tx+1./2.*tx)
      gz10q= gz10q+rwwgz(9,13)*bxpi*vvq*gstm2*yc*(1./4.*o
     #    *x2z*tx+1./4.*o*txs+1./4.*x12*txs-1./4.*x2z*tx)
      gz10q= gz10q+rwwgz(9,13)*vvq*gstm2*yc*bxp*(1./8.*o*
     #    x12+3./8.*o*tx-1./8.*o+1./8.*os+3./8.*x12*tx-3./8.*
     #    tx)
      gz10q= gz10q+rwwgz(9,13)*vvq*gstm2*yc*(-1./8.*o*
     #    x12*tx-3./8.*o*x2z*tx+1./8.*o*x2z-1./4.*o*tx-3./8.*o*
     #    txs-1./8.*os*x2z-1./8.*os*tx-1./4.*x12*tx-3./8.*x12*
     #    txs+3./8.*x2z*tx+1./4.*tx)
      gz10q= gz10q+rwwgz(9,14)*bxpi*vvq*gstm2*yc*(-1./2.
     #    *o*x2z*tx)
      gz10q= gz10q+rwwgz(9,14)*vvq*gstm2*yc*bxp*(-1./8.
     #    *o*x12-5./8.*o*tx+1./8.*o-1./8.*os-1./8.*x12*tx+1./
     #    8.*tx)
      gz10q= gz10q+rwwgz(9,14)*vvq*gstm2*yc*(1./8.*o*x12
     #    *tx+5./8.*o*x2z*tx-1./8.*o*x2z+1./2.*o*tx+1./8.*o*txs
     #    +1./8.*os*x2z+1./8.*os*tx+1./8.*x12*txs-1./8.*x2z*tx
     #    )
      gz10q= gz10q+rwwgz(10,1)*xx*vvq*gstm2*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)
      gz10q= gz10q+rwwgz(10,1)*bxpi*vvq*gstm2*yc*(3./4.*o
     #    *x12*x2z*tx+1./2.*o*x12*x2zs+1./2.*o*x12*txs+5./4.*o*
     #    x2z*txs+1./4.*o*tx*x2zs-7./4.*o*x2zs+1./4.*os*x2z*tx+
     #    os*x2zs+1./4.*os*txs-x12*x2z*tx+5./4.*x12*x2z*txs-1./
     #    2.*x12*x2zs+1./2.*x2z*tx*x12s-x2z*txs-1./4.*tx*x2zs+1.
     #    /4.*x12s*txs+3./4.*x2zs)
      gz10q= gz10q+rwwgz(10,1)*vvq*gstm2*bxps*yc*(-1./4.
     #    -o*x12-1./2.*o*tx+o-3./4.*os-1./2.*x12*tx+1./2.*
     #    x12+1./2.*tx-1./4.*x12s)
      gz10q= gz10q+rwwgz(10,1)*vvq*gstm2*yc*bxp*(1./4.+
     #    11./8.*o*x12*x2z+5./4.*o*x12*tx+5./8.*o*x12+7./8.*o*x2z
     #    *tx-19./8.*o*x2z+1./8.*o*tx+1./8.*o*x12s+5./4.*o*txs
     #    -3./4.*o+13./8.*os*x2z+5./8.*os*tx+5./8.*os-1./8.*
     #    oc+3./8.*x12*x2z*tx-x12*x2z-3./8.*x12*tx+5./4.*x12*
     #    txs-1./2.*x12-7./8.*x2z*tx+1./4.*x2z*x12s+3./4.*x2z
     #    +5./8.*tx*x12s-1./4.*tx+1./4.*x12s-3./4.*txs)
      gz10q= gz10q+rwwgz(10,1)*vvq*gstm2*yc*(-o*x12*
     #    x2z*tx-9./8.*o*x12*x2z-3./4.*o*x12*tx-1./2.*o*x12*x2zs
     #    -3./4.*o*x12*txs-3./8.*o*x2z*tx-13./8.*o*x2z*txs+2*o*
     #    x2z-1./8.*o*tx*x12s-3./8.*o*tx*x2zs+15./8.*o*x2zs-3./
     #    4.*o*txs+1./8.*os*x12*x2z-1./4.*os*x12*tx-1./2.*os*x2z*
     #    tx-11./8.*os*x2z-1./4.*os*tx-9./8.*os*x2zs-3./8.*os*
     #    txs+1./8.*oc*x2z-1./8.*oc*tx+7./8.*x12*x2z*tx-13./8.*
     #    x12*x2z*txs+x12*x2z+1./2.*x12*tx+1./2.*x12*x2zs-3./4.
     #    *x12*txs-1./2.*x2z*tx*x12s+1./2.*x2z*tx-1./4.*x2z*x12s
     #    +5./4.*x2z*txs-3./4.*x2z-1./2.*tx*x12s+3./8.*tx*x2zs
     #    -3./8.*x12s*txs-3./4.*x2zs+1./2.*txs)
      gz10q= gz10q+rwwgz(10,4)*xx*vvq*gstm2*yc*(1./16.*o
     #    *x12*x2zc-1./8.*o*x12*x2zs*txs-1./16.*o*tx*x12s*x2zs+1./
     #    16.*o*tx*x2zq+1./16.*o*tx*x2zc-1./16.*o*x2zq-1./16.*o*
     #    x2zc*txs-1./8.*os*x12*tx*x2zs+1./16.*os*x12*x2zc+1./16.
     #    *os*x2zq-1./16.*os*x2zc-1./16.*os*x2zs*txs-1./16.*oc*tx
     #    *x2zs+1./16.*oc*x2zc+1./16.*x12*tx*x2zc-1./16.*x12*x2zc
     #    *txs-1./16.*tx*x2zq-1./16.*x12s*x2zs*txs+1./8.*x2zc*txs
     #    )
      gz10q= gz10q+rwwgz(10,4)*bxpi*vvq*gstm2*yc*(-1./4.
     #    *o*x12*x2z*txs-1./8.*o*x12*tx*x2zs+1./16.*o*x12*x2zc+3./
     #    16.*o*x12*x2zs-1./8.*o*x2z*tx*x12s+3./16.*o*tx*x2zc+3./
     #    16.*o*tx*x2zs-1./16.*o*x12s*x2zs-3./16.*o*x2zc-1./4.*o*
     #    x2zs*txs-1./4.*os*x12*x2z*tx+1./8.*os*x12*x2zs-1./8.*os
     #    *x2z*txs-1./16.*os*tx*x2zs+3./16.*os*x2zc-3./16.*os*
     #    x2zs-1./8.*oc*x2z*tx+3./16.*oc*x2zs+1./16.*x12*tx*x2zc
     #    +3./16.*x12*tx*x2zs-1./4.*x12*x2zs*txs-1./8.*x2z*x12s*
     #    txs-1./16.*tx*x12s*x2zs-3./16.*tx*x2zc+3./8.*x2zs*txs)
      gz10q= gz10q+rwwgz(10,4)*vvq*gstm2*bxps*yc*(-1./8.
     #    *o*x12*x2z+1./4.*o*x12*tx-1./8.*o*x12-1./8.*o*x2z*tx+
     #    1./8.*o*x2z-1./8.*o*tx+1./8.*o*x12s+1./4.*o*txs-1./8.
     #    *os*x2z+1./8.*os*tx+1./8.*os-1./8.*oc-1./8.*x12*x2z*
     #    tx-1./8.*x12*tx+1./4.*x12*txs+1./8.*x2z*tx+1./8.*tx*
     #    x12s-1./4.*txs)
      gz10q= gz10q+rwwgz(10,4)*vvq*gstm2*yc*bxp*(-3./8.
     #    *o*x12*x2z*tx+3./8.*o*x12*x2z-1./8.*o*x12*tx+3./16.*o*
     #    x12*x2zs-1./4.*o*x12*txs+1./16.*o*x12+3./8.*o*x2z*tx-
     #    3./16.*o*x2z*x12s-1./2.*o*x2z*txs-1./16.*o*x2z-1./8.*o*
     #    tx*x12s+5./16.*o*tx*x2zs+1./16.*o*tx-1./16.*o*x12s-5./
     #    16.*o*x2zs-1./8.*o*txs+1./8.*os*x12*x2z-1./4.*os*x12*tx
     #    -3./16.*os*x2z*tx-1./4.*os*x2z-1./16.*os*tx+5./16.*os
     #    *x2zs-1./8.*os*txs-1./16.*os+5./16.*oc*x2z-1./8.*oc*
     #    tx+1./16.*oc+3./8.*x12*x2z*tx-1./2.*x12*x2z*txs+3./16.
     #    *x12*tx*x2zs+1./16.*x12*tx-1./8.*x12*txs-3./16.*x2z*tx*
     #    x12s-1./16.*x2z*tx+5./8.*x2z*txs-1./16.*tx*x12s-5./16.
     #    *tx*x2zs-1./8.*x12s*txs+1./8.*txs)
      gz10q= gz10q+rwwgz(10,4)*vvq*gstm2*yc*(1./4.*o*x12
     #    *x2z*tx+3./8.*o*x12*x2z*txs-3./16.*o*x12*x2z+1./8.*o*
     #    x12*tx*x2zs-1./16.*o*x12*x2zc-3./8.*o*x12*x2zs+1./8.*o*
     #    x12*txs+3./16.*o*x2z*tx*x12s-3./16.*o*x2z*tx+1./8.*o*
     #    x2z*x12s+5./16.*o*x2z*txs+1./16.*o*tx*x12s-1./4.*o*tx*
     #    x2zc-7./16.*o*tx*x2zs+1./16.*o*x12s*x2zs+1./4.*o*x2zc
     #    +5./16.*o*x2zs*txs+3./16.*o*x2zs+3./8.*os*x12*x2z*tx-
     #    1./16.*os*x12*x2z+1./8.*os*x12*tx-3./16.*os*x12*x2zs+1./
     #    8.*os*x2z*tx+3./16.*os*x2z*txs+3./16.*os*x2z+1./16.*os*
     #    tx*x2zs-1./4.*os*x2zc+1./16.*os*x2zs+1./16.*os*txs+3./
     #    16.*oc*x2z*tx-3./16.*oc*x2z+1./16.*oc*tx-1./4.*oc*x2zs
     #    -3./16.*x12*x2z*tx+5./16.*x12*x2z*txs-1./16.*x12*tx*
     #    x2zc-3./8.*x12*tx*x2zs+5./16.*x12*x2zs*txs+1./8.*x2z*tx
     #    *x12s+3./16.*x2z*x12s*txs-3./8.*x2z*txs+1./16.*tx*x12s*
     #    x2zs+1./4.*tx*x2zc+3./16.*tx*x2zs+1./16.*x12s*txs-1./
     #    2.*x2zs*txs)
      gz10q= gz10q+rwwgz(10,7)*xx*vvq*gstm2*yc*(1./8.*o*
     #    x12*x2zs*txs-1./8.*o*x2zq+1./16.*o*x2zc*txs+1./16.*os*
     #    x12*x2zc+1./16.*os*x2zq-1./16.*os*x2zc+1./16.*os*x2zs*
     #    txs+1./16.*oc*x2zc-1./8.*x12*tx*x2zc+1./16.*x12*x2zc*
     #    txs+1./16.*x12s*x2zs*txs+1./16.*x2zq-1./16.*x2zc*txs)
      gz10q= gz10q+rwwgz(10,7)*bxpi*vvq*gstm2*yc*(1./8.*o
     #    *x12*x2z*txs+1./8.*o*x12*tx*x2zs+1./8.*o*x12*x2zc-3./8.
     #    *o*x2zc+1./8.*o*x2zs*txs+1./8.*os*x12*x2zs+1./16.*os*
     #    x2z*txs+3./16.*os*x2zc-1./8.*os*x2zs+1./8.*oc*x2zs-1./
     #    4.*x12*tx*x2zs-1./8.*x12*x2zc+1./8.*x12*x2zs*txs+1./16.
     #    *x2z*x12s*txs+1./8.*tx*x12s*x2zs+3./16.*x2zc-1./8.*x2zs
     #    *txs)
      gz10q= gz10q+rwwgz(10,7)*vvq*gstm2*bxps*yc*(-3./
     #    16.*o*x12*x2z-1./8.*o*x12+3./16.*o*x2z+3./32.*o*x12s+
     #    1./32.*o+3./32.*os*x12-3./32.*os*x2z-1./16.*os+1./32.
     #    *oc+3./16.*x12*x2z+1./32.*x12-3./32.*x2z*x12s-3./32.*
     #    x2z-1./16.*x12s+1./32.*x12c)
      gz10q= gz10q+rwwgz(10,7)*vvq*gstm2*yc*bxp*(3./16.*o
     #    *x12*x2z*tx+5./16.*o*x12*x2z+1./16.*o*x12*tx+5./16.*o*
     #    x12*x2zs-1./16.*o*x12*txs-1./16.*o*x2z*x12s+3./32.*o*
     #    x2z*txs-3./16.*o*x2z-1./8.*o*tx*x12s-1./2.*o*x2zs+1./
     #    32.*o*txs-1./32.*os*x12*x2z-1./16.*os*x12*tx+1./32.*os*
     #    x12+3./32.*os*x2z-1./32.*os*x12s+1./4.*os*x2zs-1./32.
     #    *os*txs-1./16.*oc*x12+1./32.*oc*x2z+1./32.*oc-1./32.*
     #    oq-3./16.*x12*x2z*tx+3./32.*x12*x2z*txs-3./16.*x12*x2z
     #    -5./16.*x12*x2zs+1./32.*x12*txs+3./16.*x2z*tx*x12s+1./
     #    8.*x2z*x12s-3./32.*x2z*txs+1./16.*x2z+1./16.*tx*x12s-
     #    1./16.*tx*x12c+1./16.*x12s*x2zs-1./32.*x12s*txs+1./4.*
     #    x2zs)
      gz10q= gz10q+rwwgz(10,7)*vvq*gstm2*yc*(-3./16.*o
     #    *x12*x2z*tx-1./8.*o*x12*x2z*txs-1./8.*o*x12*tx*x2zs-1./
     #    8.*o*x12*x2zc-5./16.*o*x12*x2zs-3./32.*o*x2z*txs+3./32.
     #    *o*x12s*txs+7./16.*o*x2zc-5./32.*o*x2zs*txs+13./32.*o*
     #    x2zs-3./32.*os*x12*x2z-1./8.*os*x12*x2zs+3./32.*os*x12*
     #    txs+1./32.*os*x2z*x12s-1./16.*os*x2z*txs+1./16.*os*x2z
     #    -7./32.*os*x2zc-3./32.*os*x2zs+1./16.*oc*x12*x2z-3./
     #    32.*oc*x2z-1./8.*oc*x2zs+1./32.*oc*txs+1./32.*oq*x2z+
     #    1./8.*x12*x2z*tx-3./32.*x12*x2z*txs+5./16.*x12*tx*x2zs+
     #    1./8.*x12*x2zc-5./32.*x12*x2zs*txs+9./32.*x12*x2zs-3./
     #    16.*x2z*tx*x12s-1./16.*x2z*x12s*txs+1./16.*x2z*txs-1./8.
     #    *tx*x12s*x2zs-1./16.*x12s*x2zs+1./32.*x12c*txs-7./32.*
     #    x2zc+5./32.*x2zs*txs-3./16.*x2zs)
      gz10q= gz10q+rwwgz(10,8)*bxpi*vvq*gstm2*yc*(1./8.*o
     #    *x12*x2z*txs-1./16.*o*x12*x2zs+1./16.*o*x2z*tx*x12s-1./
     #    16.*o*tx*x2zc-1./16.*o*tx*x2zs+1./16.*o*x2zc+1./16.*o*
     #    x2zs*txs+1./8.*os*x12*x2z*tx-1./16.*os*x12*x2zs+1./16.*
     #    os*x2z*txs-1./16.*os*x2zc+1./16.*os*x2zs+1./16.*oc*x2z*
     #    tx-1./16.*oc*x2zs-1./16.*x12*tx*x2zs+1./16.*x12*x2zs*
     #    txs+1./16.*x2z*x12s*txs+1./16.*tx*x2zc-1./8.*x2zs*txs)
      gz10q= gz10q+rwwgz(10,8)*vvq*gstm2*bxps*yc*(1./8.*o
     #    *x12*x2z-1./4.*o*x12*tx+1./8.*o*x12+1./8.*o*x2z*tx-1./
     #    8.*o*x2z+1./8.*o*tx-1./8.*o*x12s-1./4.*o*txs+1./8.*os
     #    *x2z-1./8.*os*tx-1./8.*os+1./8.*oc+1./8.*x12*x2z*tx
     #    +1./8.*x12*tx-1./4.*x12*txs-1./8.*x2z*tx-1./8.*tx*
     #    x12s+1./4.*txs)
      gz10q= gz10q+rwwgz(10,8)*vvq*gstm2*yc*bxp*(1./8.*o*
     #    x12*x2z*tx-1./4.*o*x12*x2z+1./16.*o*x12*tx-3./32.*o*x12
     #    *x2zs+3./8.*o*x12*txs-1./16.*o*x12-1./4.*o*x2z*tx+1./
     #    16.*o*x2z*x12s+5./16.*o*x2z*txs+1./16.*o*x2z+7./32.*o*
     #    tx*x12s-7./32.*o*tx*x2zs-1./16.*o*tx+1./32.*o*x12s+1./
     #    32.*o*x12c+7./32.*o*x2zs+1./16.*o*txs-3./16.*os*x12*x2z
     #    +11./32.*os*x12*tx+1./16.*os*x2z*tx+3./16.*os*x2z+1./
     #    32.*os*tx+1./32.*os*x12s-7./32.*os*x2zs+3./16.*os*txs
     #    +1./16.*os-1./32.*oc*x12-1./4.*oc*x2z+5./32.*oc*tx-
     #    1./32.*oc-1./32.*oq-1./4.*x12*x2z*tx+5./16.*x12*x2z*txs
     #    -3./32.*x12*tx*x2zs-1./16.*x12*tx+1./16.*x12*txs+1./
     #    16.*x2z*tx*x12s+1./16.*x2z*tx-7./16.*x2z*txs+1./32.*tx*
     #    x12s+1./32.*tx*x12c+7./32.*tx*x2zs+3./16.*x12s*txs-1./
     #    8.*txs)
      gz10q= gz10q+rwwgz(10,8)*vvq*gstm2*yc*(-1./16.*o
     #    *x12*x2z*tx-1./4.*o*x12*x2z*txs+1./8.*o*x12*x2z+1./32.*
     #    o*x12*tx*x2zs+1./8.*o*x12*x2zs-1./8.*o*x12*txs-3./32.*o
     #    *x2z*tx*x12s+1./8.*o*x2z*tx-1./32.*o*x2z*x12s-1./8.*o*
     #    x2z*txs-1./16.*o*tx*x12s-1./32.*o*tx*x12c+3./32.*o*tx*
     #    x2zc+3./16.*o*tx*x2zs-3./32.*o*x12s*txs-3./32.*o*x2zc
     #    -3./32.*o*x2zs*txs-1./8.*o*x2zs-3./16.*os*x12*x2z*tx+
     #    1./16.*os*x12*x2z-1./8.*os*x12*tx+1./8.*os*x12*x2zs-3./
     #    32.*os*x12*txs-1./32.*os*x2z*tx+1./32.*os*x2z*x12s-1./8.
     #    *os*x2z*txs-1./8.*os*x2z-3./32.*os*tx*x12s+1./32.*os*tx
     #    *x2zs+3./32.*os*x2zc-1./16.*os*txs+1./16.*oc*x12*x2z-
     #    3./32.*oc*x12*tx-3./32.*oc*x2z*tx+3./32.*oc*x2z-1./16.*
     #    oc*tx+1./8.*oc*x2zs-1./32.*oc*txs+1./32.*oq*x2z-1./32.
     #    *oq*tx+1./8.*x12*x2z*tx-1./8.*x12*x2z*txs+1./8.*x12*tx*
     #    x2zs-3./32.*x12*x2zs*txs-1./32.*x2z*tx*x12s-1./8.*x2z*
     #    x12s*txs)
      gz10q= gz10q+rwwgz(10,8)*vvq*gstm2*yc*(1./4.*x2z*
     #    txs-3./32.*tx*x2zc-1./8.*tx*x2zs-1./16.*x12s*txs-1./
     #    32.*x12c*txs+3./16.*x2zs*txs)
      gz10q= gz10q+rwwgz(10,9)*bxpi*vvq*gstm2*yc*(-1./8.
     #    *o*x12*x2z*tx-1./8.*o*x2z*txs-1./8.*o*tx*x2zs+1./8.*o*
     #    x2zs-1./8.*os*x2z*tx-1./8.*os*x2zs-1./8.*x12*x2z*txs+
     #    1./8.*tx*x2zs)
      gz10q= gz10q+rwwgz(10,9)*vvq*gstm2*bxps*yc*(1./4.*o
     #    *x12+1./4.*o*tx-1./4.*o+1./4.*os+1./4.*x12*tx-1./4.
     #    *tx)
      gz10q= gz10q+rwwgz(10,9)*vvq*gstm2*yc*bxp*(-3./16.
     #    *o*x12*x2z-3./8.*o*x12*tx-1./16.*o*x12-7./16.*o*x2z*tx
     #    +7./16.*o*x2z-1./16.*o*tx-1./16.*o*x12s-1./4.*o*txs
     #    +1./8.*o-1./8.*os*x12-7./16.*os*x2z-5./16.*os*tx-1./
     #    16.*os-1./16.*oc-3./16.*x12*x2z*tx-1./16.*x12*tx-1./4.
     #    *x12*txs+7./16.*x2z*tx-1./16.*tx*x12s+1./8.*tx)
      gz10q= gz10q+rwwgz(10,9)*vvq*gstm2*yc*(1./4.*o*x12
     #    *x2z*tx+1./16.*o*x12*x2z+1./8.*o*x12*tx+1./8.*o*x12*txs
     #    +3./16.*o*x2z*tx+3./16.*o*x2z*txs-1./4.*o*x2z+1./16.*
     #    o*tx*x12s+3./16.*o*tx*x2zs-3./16.*o*x2zs+1./8.*o*txs+
     #    1./16.*os*x12*x2z+1./8.*os*x12*tx+1./4.*os*x2z*tx+3./16.
     #    *os*x2z+1./8.*os*tx+3./16.*os*x2zs+1./16.*os*txs+1./
     #    16.*oc*x2z+1./16.*oc*tx+1./16.*x12*x2z*tx+3./16.*x12*
     #    x2z*txs+1./8.*x12*txs-1./4.*x2z*tx-3./16.*tx*x2zs+1./
     #    16.*x12s*txs)
      gz10q= gz10q+rwwgz(10,10)*xx*vvq*gstm2*yc*(-1./8.
     #    *o*x12*x2zs*txs+1./8.*o*x2zq-1./16.*o*x2zc*txs-1./16.*
     #    os*x12*x2zc-1./16.*os*x2zq+1./16.*os*x2zc-1./16.*os*
     #    x2zs*txs-1./16.*oc*x2zc+1./8.*x12*tx*x2zc-1./16.*x12*
     #    x2zc*txs-1./16.*x12s*x2zs*txs-1./16.*x2zq+1./16.*x2zc*
     #    txs)
      gz10q= gz10q+rwwgz(10,10)*bxpi*vvq*gstm2*yc*(-1./
     #    4.*o*x12*x2z*txs-1./8.*o*x12*tx*x2zs-1./8.*o*x12*x2zc+1.
     #    /2.*o*x2zc-3./16.*o*x2zs*txs-3./16.*os*x12*x2zs-1./8.*
     #    os*x2z*txs-1./4.*os*x2zc+3./16.*os*x2zs-3./16.*oc*x2zs
     #    +3./8.*x12*tx*x2zs+1./8.*x12*x2zc-3./16.*x12*x2zs*txs
     #    -1./8.*x2z*x12s*txs-1./8.*tx*x12s*x2zs-1./4.*x2zc+3./
     #    16.*x2zs*txs)
      gz10q= gz10q+rwwgz(10,10)*vvq*gstm2*bxps*yc*bxp*(-
     #    1./8.-1./4.*o*x12+1./4.*o-1./8.*os+1./4.*x12-1./8.*
     #    x12s)
      gz10q= gz10q+rwwgz(10,10)*vvq*gstm2*bxps*yc*(1./16.
     #    +5./8.*o*x12*x2z+1./4.*o*x12*tx+1./8.*o*x12-7./8.*o*
     #    x2z+1./8.*o*txs-1./8.*o+1./8.*os*x12+7./16.*os*x2z-
     #    1./16.*os+1./8.*oc-5./8.*x12*x2z-1./4.*x12*tx+1./8.*
     #    x12*txs-1./8.*x12+3./16.*x2z*x12s+7./16.*x2z+1./4.*tx
     #    *x12s+1./16.*x12s-1./8.*txs)
      gz10q= gz10q+rwwgz(10,10)*vvq*gstm2*yc*bxp*(-3./8.
     #    *o*x12*x2z*tx-3./8.*o*x12*x2z-1./8.*o*x12*tx-1./2.*o*
     #    x12*x2zs-1./4.*o*x12*txs-5./16.*o*x2z*txs+1./2.*o*x2z
     #    +9./8.*o*x2zs-1./16.*o*txs-5./16.*os*x12*x2z-1./16.*
     #    os*x12+1./16.*os*x2z-9./16.*os*x2zs-1./8.*os*txs+1./
     #    16.*os-5./16.*oc*x2z-1./16.*oc+5./8.*x12*x2z*tx-5./16.
     #    *x12*x2z*txs+3./8.*x12*x2z+1./8.*x12*tx+1./2.*x12*x2zs
     #    -1./16.*x12*txs-3./8.*x2z*tx*x12s-1./8.*x2z*x12s+5./
     #    16.*x2z*txs-1./4.*x2z-1./8.*tx*x12s-1./16.*x12s*x2zs-
     #    1./8.*x12s*txs-9./16.*x2zs+1./16.*txs)
      gz10q= gz10q+rwwgz(10,10)*vvq*gstm2*yc*(1./4.*o*
     #    x12*x2z*tx+3./8.*o*x12*x2z*txs+1./8.*o*x12*tx*x2zs+1./8.
     #    *o*x12*x2zc+3./8.*o*x12*x2zs+1./8.*o*x12*txs+3./16.*o*
     #    x2z*txs-5./8.*o*x2zc+1./4.*o*x2zs*txs-3./4.*o*x2zs+3./
     #    16.*os*x12*x2z+1./4.*os*x12*x2zs+3./16.*os*x2z*txs-3./
     #    16.*os*x2z+5./16.*os*x2zc+1./8.*os*x2zs+1./16.*os*txs
     #    +3./16.*oc*x2z+1./4.*oc*x2zs-3./8.*x12*x2z*tx+3./16.*
     #    x12*x2z*txs-1./2.*x12*tx*x2zs-1./8.*x12*x2zc+1./4.*x12*
     #    x2zs*txs-3./8.*x12*x2zs+1./4.*x2z*tx*x12s+3./16.*x2z*
     #    x12s*txs-3./16.*x2z*txs+1./8.*tx*x12s*x2zs+1./16.*x12s*
     #    x2zs+1./16.*x12s*txs+5./16.*x2zc-1./4.*x2zs*txs+3./8.
     #    *x2zs)
      gz10q= gz10q+rwwgz(10,12)*xx*vvq*gstm2*yc*(1./4.*o
     #    *x12*x2z*txs-1./8.*o*x12*tx*x2zs-1./8.*o*tx*x2zc-1./8.*
     #    o*x2zc+1./8.*o*x2zs*txs+1./8.*os*x2z*txs-1./8.*os*tx*
     #    x2zs-1./4.*x12*tx*x2zs+1./8.*x12*x2zs*txs+1./8.*x2z*
     #    x12s*txs+1./8.*tx*x2zc+1./8.*x2zc-1./4.*x2zs*txs)
      gz10q= gz10q+rwwgz(10,12)*bxpi*vvq*gstm2*yc*(1./8.*
     #    o*x12*x2z*tx+1./8.*o*x12*x2zs+1./4.*o*x12*txs+3./8.*o*
     #    x2z*txs-1./4.*o*tx*x2zs-1./2.*o*x2zs-1./8.*os*x2z*tx+
     #    1./8.*os*x2zs+1./8.*os*txs-1./2.*x12*x2z*tx+3./8.*x12*
     #    x2z*txs-1./8.*x12*tx*x2zs-1./4.*x12*x2zs+1./4.*x2z*tx*
     #    x12s-1./2.*x2z*txs+1./4.*tx*x2zs+1./8.*x12s*txs+3./8.
     #    *x2zs)
      gz10q= gz10q+rwwgz(10,12)*vvq*gstm2*bxps*yc*(-1./
     #    8.-1./4.*o*x12+1./4.*o-1./8.*os+1./4.*x12-1./8.*
     #    x12s)
      gz10q= gz10q+rwwgz(10,12)*vvq*gstm2*yc*bxp*(1./8.
     #    +5./16.*o*x12*x2z+3./8.*o*x12*tx+3./16.*o*x12-3./16.*
     #    o*x2z*tx-9./16.*o*x2z-1./16.*o*tx+1./16.*o*x12s+3./8.
     #    *o*txs-1./4.*o+3./16.*os*x2z+1./16.*os*tx+3./16.*os
     #    -1./16.*oc-3./16.*x12*x2z*tx-1./2.*x12*x2z-5./16.*x12
     #    *tx+3./8.*x12*txs-1./4.*x12+3./16.*x2z*tx+1./8.*x2z*
     #    x12s+3./8.*x2z+5./16.*tx*x12s+1./8.*x12s-3./8.*txs)
      gz10q= gz10q+rwwgz(10,12)*vvq*gstm2*yc*(-1./8.*o
     #    *x12*x2z*tx-5./16.*o*x12*x2z-1./4.*o*x12*tx-1./8.*o*x12
     #    *x2zs-3./8.*o*x12*txs+3./16.*o*x2z*tx-7./16.*o*x2z*txs
     #    +5./8.*o*x2z-1./16.*o*tx*x12s+5./16.*o*tx*x2zs+7./16.
     #    *o*x2zs-1./4.*o*txs+1./16.*os*x12*x2z-1./8.*os*x12*tx
     #    +1./8.*os*x2z*tx-5./16.*os*x2z-1./16.*os*x2zs-3./16.*
     #    os*txs+1./16.*oc*x2z-1./16.*oc*tx+11./16.*x12*x2z*tx-
     #    7./16.*x12*x2z*txs+1./2.*x12*x2z+1./8.*x12*tx*x2zs+1./4.
     #    *x12*tx+1./4.*x12*x2zs-1./4.*x12*txs-1./4.*x2z*tx*x12s
     #    -1./8.*x2z*tx-1./8.*x2z*x12s+5./8.*x2z*txs-3./8.*x2z
     #    -1./4.*tx*x12s-5./16.*tx*x2zs-3./16.*x12s*txs-3./8.*
     #    x2zs+1./4.*txs)
      gz10q= gz10q+rwwgz(10,13)*xx*vvq*gstm2*yc*(1./8.*o
     #    *x12*x2z*txs-1./8.*o*x2zc+1./8.*o*x2zs*txs+1./16.*os*
     #    x2z*txs+1./16.*os*x2zc-1./8.*x12*tx*x2zs+1./8.*x12*x2zs
     #    *txs+1./16.*x2z*x12s*txs+1./16.*x2zc-1./8.*x2zs*txs)
      gz10q= gz10q+rwwgz(10,13)*bxpi*vvq*gstm2*yc*(1./8.*
     #    o*x12*x2z*tx+1./8.*o*x12*x2zs+1./8.*o*x12*txs+1./4.*o*
     #    x2z*txs-3./8.*o*x2zs+3./16.*os*x2zs+1./16.*os*txs-1./
     #    4.*x12*x2z*tx+1./4.*x12*x2z*txs-1./8.*x12*x2zs+1./8.*
     #    x2z*tx*x12s-1./4.*x2z*txs+1./16.*x12s*txs+3./16.*x2zs)
      gz10q= gz10q+rwwgz(10,13)*vvq*gstm2*bxps*yc*(-1./
     #    8.-1./4.*o*x12+1./4.*o-1./8.*os+1./4.*x12-1./8.*
     #    x12s)
      gz10q= gz10q+rwwgz(10,13)*vvq*gstm2*yc*bxp*(1./16.
     #    +3./8.*o*x12*x2z+1./4.*o*x12*tx+1./8.*o*x12-5./8.*o*
     #    x2z+3./16.*o*txs-1./8.*o+1./16.*os*x12+5./16.*os*x2z
     #    +1./16.*oc-3./8.*x12*x2z-1./4.*x12*tx+3./16.*x12*txs
     #    -1./8.*x12+1./16.*x2z*x12s+5./16.*x2z+1./4.*tx*x12s
     #    +1./16.*x12s-3./16.*txs)
      gz10q= gz10q+rwwgz(10,13)*vvq*gstm2*yc*(-1./8.*o
     #    *x12*x2z*tx-1./4.*o*x12*x2z-1./8.*o*x12*tx-1./8.*o*x12*
     #    x2zs-1./4.*o*x12*txs-5./16.*o*x2z*txs+3./8.*o*x2z+1./
     #    2.*o*x2zs-1./8.*o*txs-1./16.*os*x12*x2z-1./8.*os*x2z-
     #    1./4.*os*x2zs-1./8.*os*txs-1./16.*oc*x2z+3./8.*x12*x2z*
     #    tx-5./16.*x12*x2z*txs+1./4.*x12*x2z+1./8.*x12*tx+1./8.
     #    *x12*x2zs-1./8.*x12*txs-1./8.*x2z*tx*x12s-1./16.*x2z*
     #    x12s+5./16.*x2z*txs-3./16.*x2z-1./8.*tx*x12s-1./8.*
     #    x12s*txs-1./4.*x2zs+1./8.*txs)
      gz10q= gz10q+rwwgz(10,14)*xx*vvq*gstm2*yc*(-1./
     #    16.*o*x12*tx*x2zs-1./16.*o*tx*x2zc+1./16.*o*x2zc-1./16.
     #    *o*x2zs*txs-1./16.*os*tx*x2zs-1./16.*os*x2zc-1./16.*x12
     #    *x2zs*txs+1./16.*tx*x2zc)
      gz10q= gz10q+rwwgz(10,14)*bxpi*vvq*gstm2*yc*(-1./
     #    8.*o*x12*x2z*tx-1./16.*o*x12*x2zs-1./8.*o*x2z*txs-3./16.
     #    *o*tx*x2zs+3./16.*o*x2zs-1./8.*os*x2z*tx-3./16.*os*x2zs
     #    -1./8.*x12*x2z*txs-1./16.*x12*tx*x2zs+3./16.*tx*x2zs)
      gz10q= gz10q+rwwgz(10,14)*vvq*gstm2*bxps*yc*(1./16.
     #    *o*x12+1./16.*o*tx-1./16.*o+1./16.*os+1./16.*x12*tx
     #    -1./16.*tx)
      gz10q= gz10q+rwwgz(10,14)*vvq*gstm2*yc*bxp*(-1./8.
     #    *o*x12*x2z-1./16.*o*x12*tx-1./16.*o*x12-3./16.*o*x2z*tx
     #    +3./16.*o*x2z-1./16.*o*tx-1./16.*o*txs+1./16.*o-3./
     #    16.*os*x2z-1./16.*os*tx-1./16.*os-1./8.*x12*x2z*tx-1./
     #    16.*x12*tx-1./16.*x12*txs+3./16.*x2z*tx+1./16.*tx)
      gz10q= gz10q+rwwgz(10,14)*vvq*gstm2*yc*(1./8.*o*
     #    x12*x2z*tx+1./8.*o*x12*x2z+1./16.*o*x12*tx+1./16.*o*x12
     #    *x2zs+3./16.*o*x2z*tx+1./8.*o*x2z*txs-3./16.*o*x2z+3./
     #    16.*o*tx*x2zs-3./16.*o*x2zs+1./16.*o*txs+1./8.*os*x2z*
     #    tx+3./16.*os*x2z+1./16.*os*tx+3./16.*os*x2zs+1./8.*
     #    x12*x2z*tx+1./8.*x12*x2z*txs+1./16.*x12*tx*x2zs+1./16.*
     #    x12*txs-3./16.*x2z*tx-3./16.*tx*x2zs)
      gz10q= gz10q+rwwgz(11,1)*vvq*gstm2*bxps*yc*(-1+
     #    o+x12)
      gz10q= gz10q+rwwgz(11,1)*vvq*gstm2*yc*bxp*(-3./2.
     #    *o*x12-3./2.*o*x2z+1./2.*o*tx-1./2.*x12*x2z-3./2.*x12
     #    *tx+1./2.*x12-x2z*tx+3./2.*x2z+1./2.*tx-1./2.*x12s
     #    +txs)
      gz10q= gz10q+rwwgz(11,1)*vvq*gstm2*yc*(1./2.*o*x12
     #    *x2z+1./2.*o*x12*tx+1./2.*o*x2zs-1./2.*o*txs+3./2.*
     #    x12*x2z*tx-1./2.*x12*x2z-1./2.*x12*txs-1./2.*x2z*tx-
     #    x2z*txs+1./2.*tx*x12s+tx*x2zs-1./2.*x2zs)
      gz10q= gz10q+rwwgz(11,7)*vvq*gstm2*yc*bxp*(1./16.*o
     #    *x12*x2z-1./8.*o*x12*tx+1./16.*o*x12+1./16.*o*x2z*tx-
     #    1./16.*o*x2z+1./16.*o*tx-1./16.*o*x12s-1./8.*o*txs+1./
     #    16.*os*x2z-1./16.*os*tx-1./16.*os+1./16.*oc+1./16.*
     #    x12*x2z*tx+1./16.*x12*tx-1./8.*x12*txs-1./16.*x2z*tx-
     #    1./16.*tx*x12s+1./8.*txs)
      gz10q= gz10q+rwwgz(11,7)*vvq*gstm2*yc*(-1./16.*o
     #    *x12*x2z+1./8.*o*x12*txs-1./16.*o*x2z*tx+1./16.*o*x2z*
     #    txs+1./16.*o*tx*x12s-1./16.*o*tx*x2zs+1./16.*o*x2zs-1.
     #    /16.*os*x12*x2z+1./8.*os*x12*tx+1./16.*os*x2z-1./16.*os
     #    *x2zs+1./16.*os*txs-1./16.*oc*x2z+1./16.*oc*tx-1./16.
     #    *x12*x2z*tx+1./16.*x12*x2z*txs-1./8.*x2z*txs+1./16.*tx*
     #    x2zs+1./16.*x12s*txs)
      gz10q= gz10q+rwwgz(11,8)*vvq*gstm2*bxps*yc*(1./4.
     #    +1./2.*o*x12-1./2.*o+1./4.*os-1./2.*x12+1./4.*x12s
     #    )
      gz10q= gz10q+rwwgz(11,8)*vvq*gstm2*yc*bxp*(-1./4.
     #    *o*x12*x2z+1./4.*o*x12-1./4.*o*x2z*tx+3./4.*o*x2z-1./
     #    4.*o*tx-1./4.*o*x12s+1./4.*o*txs-1./4.*os*x12-1./4.*
     #    os*x2z+1./4.*os*tx-1./4.*x12*x2z*tx+1./2.*x12*x2z+1./
     #    4.*x12*tx+1./4.*x12*txs+1./4.*x2z*tx-1./2.*x2z-1./4.*
     #    tx*x12s-1./4.*txs)
      gz10q= gz10q+rwwgz(11,8)*vvq*gstm2*yc*(-1./4.*o*
     #    x12*x2z+1./4.*o*x2z*tx-1./4.*o*x2zs-1./4.*x12*x2z*tx+
     #    1./4.*x2z*txs-1./4.*tx*x2zs+1./4.*x2zs)
      gz10q= gz10q+rwwgz(11,9)*vvq*gstm2*yc*bxp*(1./4.*o*
     #    x12-1./4.*o*tx-1./4.*o+1./4.*os-1./4.*x12*tx+1./4.*
     #    tx)
      gz10q= gz10q+rwwgz(11,9)*vvq*gstm2*yc*(1./4.*o*x12
     #    *tx-1./4.*o*x2z*tx+1./4.*o*x2z+1./4.*o*txs-1./4.*os*
     #    x2z+1./4.*os*tx+1./4.*x12*txs-1./4.*x2z*tx)
      gz10q= gz10q+rwwgz(11,11)*vvq*gstm2*bxps*yc*(-1./
     #    2.+1./2.*o+1./2.*x12)
      gz10q= gz10q+rwwgz(11,11)*vvq*gstm2*yc*bxp*(-1./2.
     #    *o*x12-o*x2z+1./2.*o*tx-1./2.*x12*x2z-1./2.*x12*tx-
     #    1./2.*x2z*tx+x2z+1./2.*txs)
      gz10q= gz10q+rwwgz(11,11)*vvq*gstm2*yc*(1./2.*o*
     #    x12*x2z-1./2.*o*x2z*tx+1./2.*o*x2zs+1./2.*x12*x2z*tx-
     #    1./2.*x2z*txs+1./2.*tx*x2zs-1./2.*x2zs)
      gz10q= gz10q+rwwgz(11,12)*vvq*gstm2*yc*bxp*(-1./4.
     #    *o*x12+1./4.*o*x2z-1./4.*o*tx+1./4.*x12*x2z-1./4.*x12
     #    *tx+1./4.*x12-1./4.*x2z+1./4.*tx-1./4.*x12s)
      gz10q= gz10q+rwwgz(11,12)*vvq*gstm2*yc*(-1./4.*o
     #    *x12*x2z+1./4.*o*x12*tx+1./2.*o*x2z*tx-1./4.*o*x2zs-1.
     #    /4.*o*txs+1./4.*x12*x2z*tx-1./4.*x12*x2z-1./4.*x12*txs
     #    -1./4.*x2z*tx+1./4.*tx*x12s+1./4.*x2zs)
      gz10q= gz10q+rwwgz(11,13)*vvq*gstm2*yc*bxp*(-1./4.
     #    *o*x12-1./8.*o*x2z+1./8.*o-1./8.*os-1./8.*x12*x2z+1.
     #    /8.*x12+1./8.*x2z-1./8.*x12s)
      gz10q= gz10q+rwwgz(11,13)*vvq*gstm2*yc*(3./8.*o*
     #    x12*x2z+1./8.*o*x2z*tx-1./8.*o*x2z+1./8.*o*x2zs-1./4.
     #    *o*txs+1./8.*os*x2z-1./8.*os*tx+3./8.*x12*x2z*tx-1./8.
     #    *x12*x2z-1./4.*x12*txs+1./8.*tx*x12s-1./8.*x2zs)
      gz10q= gz10q+rwwgz(11,14)*vvq*gstm2*yc*bxp*(1./4.*o
     #    *x12-1./4.*x2z*tx+1./4.*txs)
      gz10q= gz10q+rwwgz(11,14)*vvq*gstm2*yc*(-1./4.*o
     #    *x12*x2z-1./4.*x2z*txs+1./4.*tx*x2zs)
      gz10q= gz10q+rwwgz(12,1)*xx*vvq*gstm2*yc*(-o*x2z
     #    *txs+o*tx*x2zs-x12*x2z*txs+2*x2z*txs-tx*x2zs)
      gz10q= gz10q+rwwgz(12,1)*bxpi*vvq*gstm2*yc*(2*o*x2z
     #    *tx-3*o*txs+x12*x2z*tx-3*x12*txs+2*txs)
      gz10q= gz10q+rwwgz(12,1)*vvq*gstm2*yc*bxp*(1+2*o*
     #    x12+1./2.*o*x2z-2*o*tx-5./2.*o+3./2.*os+1./2.*x12*
     #    x2z-2*x12*tx-3./2.*x12-1./2.*x2z+2*tx+1./2.*x12s)
      gz10q= gz10q+rwwgz(12,1)*vvq*gstm2*yc*(-1./2.*o*
     #    x12*x2z+o*x12*tx-3./2.*o*x2z*tx+3./2.*o*x2z+o*tx-1./
     #    2.*o*x2zs+3*o*txs-1./2.*os*x2z+1./2.*os*tx-1./2.*x12*
     #    x2z*tx+1./2.*x12*x2z+x12*tx+3*x12*txs-x2z*tx-x2z+
     #    1./2.*tx*x12s-tx+1./2.*x2zs-2*txs)
      gz10q= gz10q+rwwgz(12,4)*xx*vvq*gstm2*yc*(-1./4.
     #    *o*tx*x2zs+1./4.*o*x2zc+1./4.*x12*tx*x2zs+1./2.*tx*x2zc
     #    -1./4.*x2zc-1./2.*x2zs*txs)
      gz10q= gz10q+rwwgz(12,4)*bxpi*vvq*gstm2*yc*(-1./4.
     #    *o*x12*x2zs-1./2.*o*x2z*tx+1./2.*o*x2z*txs-1./2.*o*tx*
     #    x2zs+o*x2zs+1./4.*os*x2z*tx-1./4.*os*x2zs+1./2.*x12*
     #    x2z*tx+1./2.*x12*x2z*txs-1./2.*x12*tx*x2zs+1./2.*x12*
     #    x2zs-1./4.*x2z*tx*x12s-x2z*txs+tx*x2zs-3./4.*x2zs)
      gz10q= gz10q+rwwgz(12,4)*vvq*gstm2*bxps*yc*(1./2.
     #    +o*x12-o+1./2.*os-x12+1./2.*x12s)
      gz10q= gz10q+rwwgz(12,4)*vvq*gstm2*yc*bxp*(-1./4.
     #    -o*x12*x2z-1./4.*o*x12-3./4.*o*x2z*tx+2*o*x2z-1./2.
     #    *o*tx-1./4.*o*x12s+3./4.*o*txs+1./2.*o-1./4.*os*x12
     #    -3./4.*os*x2z+1./2.*os*tx-1./4.*os-3./4.*x12*x2z*tx
     #    +3./2.*x12*x2z+1./2.*x12*tx+3./4.*x12*txs+1./2.*x12
     #    +3./4.*x2z*tx-1./4.*x2z*x12s-5./4.*x2z-1./2.*tx*x12s
     #    -1./4.*x12s-3./4.*txs)
      gz10q= gz10q+rwwgz(12,4)*vvq*gstm2*yc*(1./2.*o*x12
     #    *x2z+1./4.*o*x12*x2zs+5./4.*o*x2z*tx-1./2.*o*x2z*txs-
     #    5./4.*o*x2z+1./2.*o*tx*x2zs+1./4.*o*tx-5./4.*o*x2zs-1.
     #    /2.*o*txs-1./4.*os*x2z*tx+1./2.*os*x2z-1./4.*os*tx+1./
     #    4.*os*x2zs-1./4.*x12*x2z*tx-1./2.*x12*x2z*txs-x12*x2z
     #    +1./2.*x12*tx*x2zs-1./4.*x12*tx-1./2.*x12*x2zs-1./2.*
     #    x12*txs+1./4.*x2z*tx*x12s-1./2.*x2z*tx+1./4.*x2z*x12s
     #    +5./4.*x2z*txs+3./4.*x2z+1./4.*tx*x12s-5./4.*tx*x2zs
     #    +x2zs+1./2.*txs)
      gz10q= gz10q+rwwgz(12,7)*xx*vvq*gstm2*yc*(-1./4.
     #    *o*x12*x2z*txs+1./8.*o*x12*tx*x2zs+1./8.*o*tx*x2zc+1./8.
     #    *o*x2zc-1./8.*o*x2zs*txs-1./8.*os*x2z*txs+1./8.*os*tx*
     #    x2zs+1./4.*x12*tx*x2zs-1./8.*x12*x2zs*txs-1./8.*x2z*
     #    x12s*txs-1./8.*tx*x2zc-1./8.*x2zc+1./4.*x2zs*txs)
      gz10q= gz10q+rwwgz(12,7)*bxpi*vvq*gstm2*yc*(-1./4.
     #    *o*x12*x2z*tx-1./8.*o*x12*x2zs-1./4.*o*x2z*txs+1./8.*o*
     #    tx*x2zs+3./8.*o*x2zs-1./8.*os*x2zs+1./4.*x12*x2z*tx-1.
     #    /4.*x12*x2z*txs+1./8.*x12*tx*x2zs+1./4.*x12*x2zs-1./4.*
     #    x2z*tx*x12s+1./4.*x2z*txs-1./8.*tx*x2zs-1./4.*x2zs)
      gz10q= gz10q+rwwgz(12,7)*vvq*gstm2*yc*bxp*(-1./4.
     #    *o*x12*x2z+1./4.*o*x2z-1./8.*os*x2z+1./4.*x12*x2z-1./
     #    8.*x2z*x12s-1./8.*x2z)
      gz10q= gz10q+rwwgz(12,7)*vvq*gstm2*yc*(1./4.*o*x12
     #    *x2z*tx+1./4.*o*x12*x2z+1./8.*o*x12*x2zs+1./4.*o*x2z*
     #    txs-1./4.*o*x2z-1./8.*o*tx*x2zs-3./8.*o*x2zs+1./8.*os
     #    *x2z+1./8.*os*x2zs-1./4.*x12*x2z*tx+1./4.*x12*x2z*txs
     #    -1./4.*x12*x2z-1./8.*x12*tx*x2zs-1./4.*x12*x2zs+1./4.
     #    *x2z*tx*x12s+1./8.*x2z*x12s-1./4.*x2z*txs+1./8.*x2z+1.
     #    /8.*tx*x2zs+1./4.*x2zs)
      gz10q= gz10q+rwwgz(12,8)*bxpi*vvq*gstm2*yc*(1./4.*o
     #    *x2z*tx-1./4.*o*x2zs-1./4.*x12*x2z*tx+1./2.*x2z*txs-1.
     #    /2.*tx*x2zs+1./4.*x2zs)
      gz10q= gz10q+rwwgz(12,8)*vvq*gstm2*bxps*yc*(-1./2.
     #    -o*x12+o-1./2.*os+x12-1./2.*x12s)
      gz10q= gz10q+rwwgz(12,8)*vvq*gstm2*yc*bxp*(1./4.+
     #    1./2.*o*x12*x2z+1./4.*o*x12+3./4.*o*x2z*tx-3./2.*o*x2z
     #    +1./2.*o*tx+1./4.*o*x12s-3./4.*o*txs-1./2.*o+1./4.*
     #    os*x12+1./2.*os*x2z-1./2.*os*tx+1./4.*os+3./4.*x12*
     #    x2z*tx-x12*x2z-1./2.*x12*tx-3./4.*x12*txs-1./2.*x12
     #    -3./4.*x2z*tx+x2z+1./2.*tx*x12s+1./4.*x12s+3./4.*
     #    txs)
      gz10q= gz10q+rwwgz(12,8)*vvq*gstm2*yc*(-o*x2z*tx
     #    +3./4.*o*x2z-1./4.*o*tx+1./2.*o*x2zs+1./2.*o*txs-1./
     #    4.*os*x2z+1./4.*os*tx+1./2.*x12*x2z+1./4.*x12*tx+1./2.
     #    *x12*txs+1./2.*x2z*tx-3./4.*x2z*txs-1./2.*x2z-1./4.*
     #    tx*x12s+3./4.*tx*x2zs-1./2.*x2zs-1./2.*txs)
      gz10q= gz10q+rwwgz(12,9)*bxpi*vvq*gstm2*yc*(-1./2.
     #    *o*x2z*tx+1./2.*o*txs+1./2.*x12*txs-1./2.*x2z*tx)
      gz10q= gz10q+rwwgz(12,9)*vvq*gstm2*yc*bxp*(-1./4.
     #    *o*x12+3./4.*o*tx+1./4.*o-1./4.*os+3./4.*x12*tx-3./
     #    4.*tx)
      gz10q= gz10q+rwwgz(12,9)*vvq*gstm2*yc*(-1./4.*o*
     #    x12*tx+3./4.*o*x2z*tx-1./4.*o*x2z-1./2.*o*tx-3./4.*o*
     #    txs+1./4.*os*x2z-1./4.*os*tx-1./2.*x12*tx-3./4.*x12*
     #    txs+3./4.*x2z*tx+1./2.*tx)
      gz10q= gz10q+rwwgz(12,10)*xx*vvq*gstm2*yc*(1./4.*o
     #    *x12*x2z*txs-1./8.*o*x12*tx*x2zs-1./8.*o*tx*x2zc-1./8.*
     #    o*x2zc+1./8.*o*x2zs*txs+1./8.*os*x2z*txs-1./8.*os*tx*
     #    x2zs-1./4.*x12*tx*x2zs+1./8.*x12*x2zs*txs+1./8.*x2z*
     #    x12s*txs+1./8.*tx*x2zc+1./8.*x2zc-1./4.*x2zs*txs)
      gz10q= gz10q+rwwgz(12,10)*bxpi*vvq*gstm2*yc*(1./8.*
     #    o*x12*x2z*tx+1./8.*o*x12*x2zs+1./4.*o*x12*txs+3./8.*o*
     #    x2z*txs-1./4.*o*tx*x2zs-1./2.*o*x2zs-1./8.*os*x2z*tx+
     #    1./8.*os*x2zs+1./8.*os*txs-1./2.*x12*x2z*tx+3./8.*x12*
     #    x2z*txs-1./8.*x12*tx*x2zs-1./4.*x12*x2zs+1./4.*x2z*tx*
     #    x12s-1./2.*x2z*txs+1./4.*tx*x2zs+1./8.*x12s*txs+3./8.
     #    *x2zs)
      gz10q= gz10q+rwwgz(12,10)*vvq*gstm2*bxps*yc*(-1./
     #    8.-1./4.*o*x12+1./4.*o-1./8.*os+1./4.*x12-1./8.*
     #    x12s)
      gz10q= gz10q+rwwgz(12,10)*vvq*gstm2*yc*bxp*(1./8.
     #    +5./16.*o*x12*x2z+3./8.*o*x12*tx+3./16.*o*x12-3./16.*
     #    o*x2z*tx-9./16.*o*x2z-1./16.*o*tx+1./16.*o*x12s+3./8.
     #    *o*txs-1./4.*o+3./16.*os*x2z+1./16.*os*tx+3./16.*os
     #    -1./16.*oc-3./16.*x12*x2z*tx-1./2.*x12*x2z-5./16.*x12
     #    *tx+3./8.*x12*txs-1./4.*x12+3./16.*x2z*tx+1./8.*x2z*
     #    x12s+3./8.*x2z+5./16.*tx*x12s+1./8.*x12s-3./8.*txs)
      gz10q= gz10q+rwwgz(12,10)*vvq*gstm2*yc*(-1./8.*o
     #    *x12*x2z*tx-5./16.*o*x12*x2z-1./4.*o*x12*tx-1./8.*o*x12
     #    *x2zs-3./8.*o*x12*txs+3./16.*o*x2z*tx-7./16.*o*x2z*txs
     #    +5./8.*o*x2z-1./16.*o*tx*x12s+5./16.*o*tx*x2zs+7./16.
     #    *o*x2zs-1./4.*o*txs+1./16.*os*x12*x2z-1./8.*os*x12*tx
     #    +1./8.*os*x2z*tx-5./16.*os*x2z-1./16.*os*x2zs-3./16.*
     #    os*txs+1./16.*oc*x2z-1./16.*oc*tx+11./16.*x12*x2z*tx-
     #    7./16.*x12*x2z*txs+1./2.*x12*x2z+1./8.*x12*tx*x2zs+1./4.
     #    *x12*tx+1./4.*x12*x2zs-1./4.*x12*txs-1./4.*x2z*tx*x12s
     #    -1./8.*x2z*tx-1./8.*x2z*x12s+5./8.*x2z*txs-3./8.*x2z
     #    -1./4.*tx*x12s-5./16.*tx*x2zs-3./16.*x12s*txs-3./8.*
     #    x2zs+1./4.*txs)
      gz10q= gz10q+rwwgz(12,11)*vvq*gstm2*yc*bxp*(-1./4.
     #    *o*x12+1./4.*o*x2z-1./4.*o*tx+1./4.*x12*x2z-1./4.*x12
     #    *tx+1./4.*x12-1./4.*x2z+1./4.*tx-1./4.*x12s)
      gz10q= gz10q+rwwgz(12,11)*vvq*gstm2*yc*(-1./4.*o
     #    *x12*x2z+1./4.*o*x12*tx+1./2.*o*x2z*tx-1./4.*o*x2zs-1.
     #    /4.*o*txs+1./4.*x12*x2z*tx-1./4.*x12*x2z-1./4.*x12*txs
     #    -1./4.*x2z*tx+1./4.*tx*x12s+1./4.*x2zs)
      gz10q= gz10q+rwwgz(12,12)*xx*vvq*gstm2*yc*(x2z*txs
     #    -tx*x2zs)
      gz10q= gz10q+rwwgz(12,12)*bxpi*vvq*gstm2*yc*(o*x2z*
     #    tx-o*txs+x12*x2z*tx-x12*txs-x2z*tx+txs)
      gz10q= gz10q+rwwgz(12,12)*vvq*gstm2*yc*bxp*(1./2.
     #    +o*x12-o+1./2.*os-x12+1./2.*x12s)
      gz10q= gz10q+rwwgz(12,12)*vvq*gstm2*yc*(-o*x2z*
     #    tx+1./2.*o*x2z+o*txs-x12*x2z*tx+1./2.*x12*x2z+x12*
     #    txs+x2z*tx-1./2.*x2z-txs)
      gz10q= gz10q+rwwgz(12,13)*xx*vvq*gstm2*yc*(-1./4.
     #    *o*x2z*txs+1./4.*o*tx*x2zs-1./4.*x12*x2z*txs+1./2.*x2z*
     #    txs-1./4.*tx*x2zs)
      gz10q= gz10q+rwwgz(12,13)*bxpi*vvq*gstm2*yc*(1./4.*
     #    o*x2z*tx-1./2.*o*txs+1./4.*x12*x2z*tx-1./2.*x12*txs-1.
     #    /4.*x2z*tx+1./2.*txs)
      gz10q= gz10q+rwwgz(12,13)*vvq*gstm2*yc*(-1./4.*o
     #    *x12*x2z+1./2.*o*x12*tx-1./4.*o*x2z*tx+1./4.*o*x2z-1./
     #    4.*o*tx+1./2.*o*txs-1./4.*os*x2z+1./4.*os*tx-1./4.*
     #    x12*x2z*tx-1./4.*x12*tx+1./2.*x12*txs+1./4.*x2z*tx+1./
     #    4.*tx*x12s-1./2.*txs)
      gz10q= gz10q+rwwgz(12,14)*xx*vvq*gstm2*yc*(1./4.*o
     #    *x2z*txs-1./4.*o*tx*x2zs+1./4.*x12*x2z*txs-1./4.*tx*
     #    x2zs)
      gz10q= gz10q+rwwgz(12,14)*bxpi*vvq*gstm2*yc*(1./4.*
     #    o*txs+1./4.*x12*x2z*tx+1./4.*x12*txs-1./2.*x2z*tx)
      gz10q= gz10q+rwwgz(12,14)*vvq*gstm2*yc*bxp*(1./8.*o
     #    *x2z+1./8.*o-1./8.*os+1./8.*x12*x2z-1./8.*x12-1./8.
     #    *x2z+1./8.*x12s)
      gz10q= gz10q+rwwgz(12,14)*vvq*gstm2*yc*(1./8.*o*
     #    x12*x2z-1./4.*o*x12*tx+1./8.*o*x2z*tx-1./8.*o*x2z-1./
     #    4.*o*tx-1./8.*o*x2zs-1./4.*o*txs+1./8.*os*x2z-1./8.*
     #    os*tx-1./8.*x12*x2z*tx+1./8.*x12*x2z-1./4.*x12*tx-1./
     #    4.*x12*txs+1./4.*x2z*tx-1./8.*tx*x12s+1./4.*tx+1./8.*
     #    x2zs)
      gz10q= gz10q+rwwgz(13,1)*xx*vvq*gstm2*yc*(-o*x2z
     #    *txs-x12*x2z*txs+x2z*txs)
      gz10q= gz10q+rwwgz(13,1)*bxpi*vvq*gstm2*yc*(-1./2.
     #    *o*x2z*tx-3./2.*o*txs-3./2.*x12*txs+1./2.*x2z*tx+txs
     #    )
      gz10q= gz10q+rwwgz(13,1)*vvq*gstm2*yc*bxp*(-3./4.
     #    *o*x12-1./4.*o*x2z-3./4.*o*tx+1./2.*o-1./2.*os-1./4.
     #    *x12*x2z-3./4.*x12*tx+1./4.*x12+1./4.*x2z+3./4.*tx-
     #    1./4.*x12s)
      gz10q= gz10q+rwwgz(13,1)*vvq*gstm2*yc*(1./4.*o*x12
     #    *x2z+5./4.*o*x12*tx+o*x2z*tx+1./4.*o*x2zs+5./4.*o*txs
     #    +1./2.*os*tx+3./4.*x12*x2z*tx-1./4.*x12*x2z+5./4.*x12
     #    *txs-3./4.*x2z*tx+3./4.*tx*x12s-1./2.*tx-1./4.*x2zs
     #    -txs)
      gz10q= gz10q+rwwgz(13,4)*xx*vvq*gstm2*yc*(1./8.*o*
     #    x12*tx*x2zs-1./8.*o*tx*x2zc-1./8.*o*tx*x2zs+1./4.*o*
     #    x2zc+1./8.*o*x2zs*txs+1./8.*os*tx*x2zs-1./8.*os*x2zc+
     #    1./8.*x12*tx*x2zs+1./8.*x12*x2zs*txs+1./8.*tx*x2zc-1./8.
     #    *x2zc-1./4.*x2zs*txs)
      gz10q= gz10q+rwwgz(13,4)*bxpi*vvq*gstm2*yc*(1./8.*o
     #    *x12*x2z*tx-1./4.*o*x12*x2zs-1./4.*o*x2z*tx+3./8.*o*x2z
     #    *txs-1./4.*o*tx*x2zs+3./4.*o*x2zs+1./4.*os*x2z*tx-3./
     #    8.*os*x2zs+1./4.*x12*x2z*tx+3./8.*x12*x2z*txs-1./8.*x12
     #    *tx*x2zs+1./4.*x12*x2zs-1./8.*x2z*tx*x12s-1./2.*x2z*txs
     #    +1./4.*tx*x2zs-3./8.*x2zs)
      gz10q= gz10q+rwwgz(13,4)*vvq*gstm2*bxps*yc*(1./8.
     #    +1./4.*o*x12-1./4.*o+1./8.*os-1./4.*x12+1./8.*x12s
     #    )
      gz10q= gz10q+rwwgz(13,4)*vvq*gstm2*yc*bxp*(-1./8.
     #    -9./16.*o*x12*x2z+1./8.*o*x12*tx-5./16.*o*x12-3./16.*
     #    o*x2z*tx+13./16.*o*x2z-3./16.*o*tx+1./16.*o*x12s+3./8.
     #    *o*txs+1./4.*o-7./16.*os*x2z+3./16.*os*tx-1./16.*os
     #    -1./16.*oc-3./16.*x12*x2z*tx+1./2.*x12*x2z+1./16.*x12
     #    *tx+3./8.*x12*txs+1./4.*x12+3./16.*x2z*tx-1./8.*x2z*
     #    x12s-3./8.*x2z-1./16.*tx*x12s-1./8.*x12s-3./8.*txs)
      gz10q= gz10q+rwwgz(13,4)*vvq*gstm2*yc*(-1./8.*o*
     #    x12*x2z*tx+9./16.*o*x12*x2z+1./4.*o*x12*x2zs-1./8.*o*
     #    x12*txs+7./16.*o*x2z*tx-7./16.*o*x2z*txs-3./4.*o*x2z-
     #    1./16.*o*tx*x12s+5./16.*o*tx*x2zs+1./8.*o*tx-13./16.*o*
     #    x2zs-1./4.*o*txs+1./16.*os*x12*x2z-1./8.*os*x12*tx-1./
     #    4.*os*x2z*tx+5./16.*os*x2z-1./8.*os*tx+7./16.*os*x2zs
     #    -1./16.*os*txs+1./16.*oc*x2z-1./16.*oc*tx-1./16.*x12*
     #    x2z*tx-7./16.*x12*x2z*txs-1./2.*x12*x2z+1./8.*x12*tx*
     #    x2zs-1./8.*x12*tx-1./4.*x12*x2zs-1./4.*x12*txs+1./8.*
     #    x2z*tx*x12s-1./8.*x2z*tx+1./8.*x2z*x12s+5./8.*x2z*txs
     #    +3./8.*x2z+1./8.*tx*x12s-5./16.*tx*x2zs-1./16.*x12s*
     #    txs+3./8.*x2zs+1./4.*txs)
      gz10q= gz10q+rwwgz(13,7)*xx*vvq*gstm2*yc*(-1./8.
     #    *o*x12*x2z*txs+1./8.*o*x2zc-1./8.*o*x2zs*txs-1./16.*os*
     #    x2z*txs-1./16.*os*x2zc+1./8.*x12*tx*x2zs-1./8.*x12*x2zs
     #    *txs-1./16.*x2z*x12s*txs-1./16.*x2zc+1./8.*x2zs*txs)
      gz10q= gz10q+rwwgz(13,7)*bxpi*vvq*gstm2*yc*(-1./8.
     #    *o*x12*x2z*tx-1./8.*o*x12*x2zs-1./8.*o*x2z*txs+1./4.*o*
     #    x2zs-1./8.*os*x2zs+1./8.*x12*x2z*tx-1./8.*x12*x2z*txs
     #    +1./8.*x12*x2zs-1./8.*x2z*tx*x12s+1./8.*x2z*txs-1./8.
     #    *x2zs)
      gz10q= gz10q+rwwgz(13,7)*vvq*gstm2*yc*bxp*(-1./8.
     #    *o*x12*x2z+1./8.*o*x2z-1./16.*os*x2z+1./8.*x12*x2z-1./
     #    16.*x2z*x12s-1./16.*x2z)
      gz10q= gz10q+rwwgz(13,7)*vvq*gstm2*yc*(1./8.*o*x12
     #    *x2z*tx+1./8.*o*x12*x2z+1./8.*o*x12*x2zs+1./8.*o*x2z*
     #    txs-1./8.*o*x2z-1./4.*o*x2zs+1./16.*os*x2z+1./8.*os*
     #    x2zs-1./8.*x12*x2z*tx+1./8.*x12*x2z*txs-1./8.*x12*x2z
     #    -1./8.*x12*x2zs+1./8.*x2z*tx*x12s+1./16.*x2z*x12s-1./
     #    8.*x2z*txs+1./16.*x2z+1./8.*x2zs)
      gz10q= gz10q+rwwgz(13,8)*bxpi*vvq*gstm2*yc*(-1./8.
     #    *o*x12*x2z*tx+1./8.*o*x2z*tx-1./8.*o*x2z*txs+1./8.*o*tx
     #    *x2zs-1./4.*o*x2zs-1./8.*os*x2z*tx+1./8.*os*x2zs-1./8.
     #    *x12*x2z*tx-1./8.*x12*x2z*txs+1./4.*x2z*txs-1./8.*tx*
     #    x2zs+1./8.*x2zs)
      gz10q= gz10q+rwwgz(13,8)*vvq*gstm2*bxps*yc*(-1./8.
     #    -1./4.*o*x12+1./4.*o-1./8.*os+1./4.*x12-1./8.*x12s
     #    )
      gz10q= gz10q+rwwgz(13,8)*vvq*gstm2*yc*bxp*(1./8.+
     #    5./16.*o*x12*x2z-1./8.*o*x12*tx+5./16.*o*x12+3./16.*o*
     #    x2z*tx-9./16.*o*x2z+3./16.*o*tx-1./16.*o*x12s-3./8.*o
     #    *txs-1./4.*o+5./16.*os*x2z-3./16.*os*tx+1./16.*os+1.
     #    /16.*oc+3./16.*x12*x2z*tx-1./4.*x12*x2z-1./16.*x12*tx
     #    -3./8.*x12*txs-1./4.*x12-3./16.*x2z*tx+1./4.*x2z+1./
     #    16.*tx*x12s+1./8.*x12s+3./8.*txs)
      gz10q= gz10q+rwwgz(13,8)*vvq*gstm2*yc*(1./8.*o*x12
     #    *x2z*tx-5./16.*o*x12*x2z+1./8.*o*x12*txs-5./16.*o*x2z*
     #    tx+3./16.*o*x2z*txs+1./2.*o*x2z+1./16.*o*tx*x12s-3./
     #    16.*o*tx*x2zs-1./8.*o*tx+5./16.*o*x2zs+1./4.*o*txs-1./
     #    16.*os*x12*x2z+1./8.*os*x12*tx+1./8.*os*x2z*tx-3./16.*
     #    os*x2z+1./8.*os*tx-3./16.*os*x2zs+1./16.*os*txs-1./16.
     #    *oc*x2z+1./16.*oc*tx-1./16.*x12*x2z*tx+3./16.*x12*x2z*
     #    txs+1./4.*x12*x2z+1./8.*x12*tx+1./4.*x12*txs+1./8.*
     #    x2z*tx-3./8.*x2z*txs-1./4.*x2z-1./8.*tx*x12s+3./16.*
     #    tx*x2zs+1./16.*x12s*txs-1./8.*x2zs-1./4.*txs)
      gz10q= gz10q+rwwgz(13,9)*bxpi*vvq*gstm2*yc*(1./4.*o
     #    *x2z*tx+1./4.*o*txs+1./4.*x12*txs-1./4.*x2z*tx)
      gz10q= gz10q+rwwgz(13,9)*vvq*gstm2*yc*bxp*(1./8.*o*
     #    x12+3./8.*o*tx-1./8.*o+1./8.*os+3./8.*x12*tx-3./8.*
     #    tx)
      gz10q= gz10q+rwwgz(13,9)*vvq*gstm2*yc*(-1./8.*o*
     #    x12*tx-3./8.*o*x2z*tx+1./8.*o*x2z-1./4.*o*tx-3./8.*o*
     #    txs-1./8.*os*x2z-1./8.*os*tx-1./4.*x12*tx-3./8.*x12*
     #    txs+3./8.*x2z*tx+1./4.*tx)
      gz10q= gz10q+rwwgz(13,10)*xx*vvq*gstm2*yc*(1./8.*o
     #    *x12*x2z*txs-1./8.*o*x2zc+1./8.*o*x2zs*txs+1./16.*os*
     #    x2z*txs+1./16.*os*x2zc-1./8.*x12*tx*x2zs+1./8.*x12*x2zs
     #    *txs+1./16.*x2z*x12s*txs+1./16.*x2zc-1./8.*x2zs*txs)
      gz10q= gz10q+rwwgz(13,10)*bxpi*vvq*gstm2*yc*(1./8.*
     #    o*x12*x2z*tx+1./8.*o*x12*x2zs+1./8.*o*x12*txs+1./4.*o*
     #    x2z*txs-3./8.*o*x2zs+3./16.*os*x2zs+1./16.*os*txs-1./
     #    4.*x12*x2z*tx+1./4.*x12*x2z*txs-1./8.*x12*x2zs+1./8.*
     #    x2z*tx*x12s-1./4.*x2z*txs+1./16.*x12s*txs+3./16.*x2zs)
      gz10q= gz10q+rwwgz(13,10)*vvq*gstm2*bxps*yc*(-1./
     #    8.-1./4.*o*x12+1./4.*o-1./8.*os+1./4.*x12-1./8.*
     #    x12s)
      gz10q= gz10q+rwwgz(13,10)*vvq*gstm2*yc*bxp*(1./16.
     #    +3./8.*o*x12*x2z+1./4.*o*x12*tx+1./8.*o*x12-5./8.*o*
     #    x2z+3./16.*o*txs-1./8.*o+1./16.*os*x12+5./16.*os*x2z
     #    +1./16.*oc-3./8.*x12*x2z-1./4.*x12*tx+3./16.*x12*txs
     #    -1./8.*x12+1./16.*x2z*x12s+5./16.*x2z+1./4.*tx*x12s
     #    +1./16.*x12s-3./16.*txs)
      gz10q= gz10q+rwwgz(13,10)*vvq*gstm2*yc*(-1./8.*o
     #    *x12*x2z*tx-1./4.*o*x12*x2z-1./8.*o*x12*tx-1./8.*o*x12*
     #    x2zs-1./4.*o*x12*txs-5./16.*o*x2z*txs+3./8.*o*x2z+1./
     #    2.*o*x2zs-1./8.*o*txs-1./16.*os*x12*x2z-1./8.*os*x2z-
     #    1./4.*os*x2zs-1./8.*os*txs-1./16.*oc*x2z+3./8.*x12*x2z*
     #    tx-5./16.*x12*x2z*txs+1./4.*x12*x2z+1./8.*x12*tx+1./8.
     #    *x12*x2zs-1./8.*x12*txs-1./8.*x2z*tx*x12s-1./16.*x2z*
     #    x12s+5./16.*x2z*txs-3./16.*x2z-1./8.*tx*x12s-1./8.*
     #    x12s*txs-1./4.*x2zs+1./8.*txs)
      gz10q= gz10q+rwwgz(13,11)*vvq*gstm2*yc*bxp*(-1./4.
     #    *o*x12-1./8.*o*x2z+1./8.*o-1./8.*os-1./8.*x12*x2z+1.
     #    /8.*x12+1./8.*x2z-1./8.*x12s)
      gz10q= gz10q+rwwgz(13,11)*vvq*gstm2*yc*(3./8.*o*
     #    x12*x2z+1./8.*o*x2z*tx-1./8.*o*x2z+1./8.*o*x2zs-1./4.
     #    *o*txs+1./8.*os*x2z-1./8.*os*tx+3./8.*x12*x2z*tx-1./8.
     #    *x12*x2z-1./4.*x12*txs+1./8.*tx*x12s-1./8.*x2zs)
      gz10q= gz10q+rwwgz(13,12)*xx*vvq*gstm2*yc*(-1./4.
     #    *o*x2z*txs+1./4.*o*tx*x2zs-1./4.*x12*x2z*txs+1./2.*x2z*
     #    txs-1./4.*tx*x2zs)
      gz10q= gz10q+rwwgz(13,12)*bxpi*vvq*gstm2*yc*(1./4.*
     #    o*x2z*tx-1./2.*o*txs+1./4.*x12*x2z*tx-1./2.*x12*txs-1.
     #    /4.*x2z*tx+1./2.*txs)
      gz10q= gz10q+rwwgz(13,12)*vvq*gstm2*yc*(-1./4.*o
     #    *x12*x2z+1./2.*o*x12*tx-1./4.*o*x2z*tx+1./4.*o*x2z-1./
     #    4.*o*tx+1./2.*o*txs-1./4.*os*x2z+1./4.*os*tx-1./4.*
     #    x12*x2z*tx-1./4.*x12*tx+1./2.*x12*txs+1./4.*x2z*tx+1./
     #    4.*tx*x12s-1./2.*txs)
      gz10q= gz10q+rwwgz(13,13)*xx*vvq*gstm2*yc*(-1./4.
     #    *o*x2z*txs-1./4.*x12*x2z*txs+1./4.*x2z*txs)
      gz10q= gz10q+rwwgz(13,13)*bxpi*vvq*gstm2*yc*(-1./
     #    4.*o*txs-1./4.*x12*txs+1./4.*txs)
      gz10q= gz10q+rwwgz(13,13)*vvq*gstm2*yc*bxp*(-1./8.
     #    -1./4.*o*x12+1./4.*o-1./8.*os+1./4.*x12-1./8.*x12s
     #    )
      gz10q= gz10q+rwwgz(13,13)*vvq*gstm2*yc*(1./4.*o*
     #    x12*x2z+1./4.*o*x12*tx-3./8.*o*x2z+1./4.*o*txs+1./4.*
     #    os*x2z-1./8.*x12*x2z-1./4.*x12*tx+1./4.*x12*txs+1./8.
     #    *x2z+1./4.*tx*x12s-1./4.*txs)
      gz10q= gz10q+rwwgz(13,14)*xx*vvq*gstm2*yc*(1./8.*o
     #    *x2z*txs+1./8.*o*tx*x2zs+1./8.*x12*x2z*txs-1./8.*tx*
     #    x2zs)
      gz10q= gz10q+rwwgz(13,14)*bxpi*vvq*gstm2*yc*(1./4.*
     #    o*x2z*tx+1./8.*o*txs+1./8.*x12*x2z*tx+1./8.*x12*txs-1.
     #    /4.*x2z*tx)
      gz10q= gz10q+rwwgz(13,14)*vvq*gstm2*yc*bxp*(3./16.*
     #    o*x12-1./16.*o*x2z+1./16.*o*tx-1./8.*o+1./8.*os-1./
     #    16.*x12*x2z+1./16.*x12*tx-1./16.*x12+1./16.*x2z-1./16.
     #    *tx+1./16.*x12s)
      gz10q= gz10q+rwwgz(13,14)*vvq*gstm2*yc*(-3./16.*
     #    o*x12*x2z-1./16.*o*x12*tx-1./8.*o*x2z*tx+1./8.*o*x2z-
     #    1./8.*o*tx+1./16.*o*x2zs-3./16.*o*txs-1./8.*os*x2z+1./
     #    16.*x12*x2z*tx+1./16.*x12*x2z-1./8.*x12*tx-3./16.*x12*
     #    txs+3./16.*x2z*tx-1./16.*tx*x12s+1./8.*tx-1./16.*x2zs
     #    )
      gz10q= gz10q+rwwgz(14,1)*xx*vvq*gstm2*yc*(1./2.*o*
     #    x2z*txs+1./2.*o*tx*x2zs+1./2.*x12*x2z*txs-1./2.*tx*x2zs
     #    )
      gz10q= gz10q+rwwgz(14,1)*bxpi*vvq*gstm2*yc*(2*o*x2z
     #    *tx+1./2.*o*txs+1./2.*x12*x2z*tx+1./2.*x12*txs-x2z*tx
     #    )
      gz10q= gz10q+rwwgz(14,1)*vvq*gstm2*yc*bxp*(1./2.*o*
     #    x12+1./4.*o*x2z+o*tx+1./4.*o-1./4.*os+1./4.*x12*x2z
     #    -1./4.*x12-1./2.*x2z*tx-1./4.*x2z+1./4.*x12s+1./2.*
     #    txs)
      gz10q= gz10q+rwwgz(14,1)*vvq*gstm2*yc*(-1./4.*o*
     #    x12*x2z-1./2.*o*x12*tx-7./4.*o*x2z*tx-1./4.*o*x2z-3./
     #    2.*o*tx-1./4.*o*x2zs-1./2.*o*txs+1./4.*os*x2z-1./4.*
     #    os*tx-1./4.*x12*x2z*tx+1./4.*x12*x2z-1./2.*x12*tx-1./
     #    2.*x12*txs+1./2.*x2z*tx-1./2.*x2z*txs-1./4.*tx*x12s+1.
     #    /2.*tx*x2zs+1./2.*tx+1./4.*x2zs)
      gz10q= gz10q+rwwgz(14,4)*xx*vvq*gstm2*yc*(-1./8.
     #    *o*x12*tx*x2zs+1./8.*o*tx*x2zc-1./8.*o*x2zc-1./8.*o*
     #    x2zs*txs-1./8.*os*tx*x2zs+1./8.*os*x2zc-1./8.*x12*x2zs*
     #    txs+1./8.*tx*x2zc)
      gz10q= gz10q+rwwgz(14,4)*bxpi*vvq*gstm2*yc*(-1./4.
     #    *o*x12*x2z*tx+1./8.*o*x12*x2zs-1./4.*o*x2z*txs+1./8.*o*
     #    tx*x2zs-3./8.*o*x2zs-1./4.*os*x2z*tx+3./8.*os*x2zs-1./
     #    4.*x12*x2z*txs-1./8.*x12*tx*x2zs+3./8.*tx*x2zs)
      gz10q= gz10q+rwwgz(14,4)*vvq*gstm2*bxps*yc*(-1./8.
     #    *o*x12+1./8.*o*tx+1./8.*o-1./8.*os+1./8.*x12*tx-1./
     #    8.*tx)
      gz10q= gz10q+rwwgz(14,4)*vvq*gstm2*yc*bxp*(1./4.*o*
     #    x12*x2z-1./8.*o*x12*tx+1./8.*o*x12-1./8.*o*x2z*tx-3./
     #    8.*o*x2z-1./8.*o*tx-1./8.*o*txs-1./8.*o+3./8.*os*x2z
     #    -1./8.*os*tx+1./8.*os-1./4.*x12*x2z*tx-1./8.*x12*tx
     #    -1./8.*x12*txs+3./8.*x2z*tx+1./8.*tx)
      gz10q= gz10q+rwwgz(14,4)*vvq*gstm2*yc*(1./4.*o*x12
     #    *x2z*tx-1./4.*o*x12*x2z+1./8.*o*x12*tx-1./8.*o*x12*x2zs
     #    +1./8.*o*x2z*tx+1./4.*o*x2z*txs+3./8.*o*x2z-1./8.*o*
     #    tx*x2zs+3./8.*o*x2zs+1./8.*o*txs+1./4.*os*x2z*tx-3./8.
     #    *os*x2z+1./8.*os*tx-3./8.*os*x2zs+1./4.*x12*x2z*tx+1./
     #    4.*x12*x2z*txs+1./8.*x12*tx*x2zs+1./8.*x12*txs-3./8.*
     #    x2z*tx-3./8.*tx*x2zs)
      gz10q= gz10q+rwwgz(14,7)*xx*vvq*gstm2*yc*(1./16.*o
     #    *x12*tx*x2zs+1./16.*o*tx*x2zc-1./16.*o*x2zc+1./16.*o*
     #    x2zs*txs+1./16.*os*tx*x2zs+1./16.*os*x2zc+1./16.*x12*
     #    x2zs*txs-1./16.*tx*x2zc)
      gz10q= gz10q+rwwgz(14,7)*bxpi*vvq*gstm2*yc*(1./16.*
     #    o*x12*x2z*tx+1./16.*o*x12*x2zs+1./16.*o*x2z*txs+1./8.*o
     #    *tx*x2zs-1./8.*o*x2zs+1./16.*os*x2z*tx+1./8.*os*x2zs+
     #    1./16.*x12*x2z*txs+1./16.*x12*tx*x2zs-1./8.*tx*x2zs)
      gz10q= gz10q+rwwgz(14,7)*vvq*gstm2*bxps*yc*(1./16.
     #    +1./8.*o*x12-1./8.*o+1./16.*os-1./8.*x12+1./16.*
     #    x12s)
      gz10q= gz10q+rwwgz(14,7)*vvq*gstm2*yc*bxp*(-1./16.
     #    *o*x12*x2z-1./8.*o*x12*tx+1./16.*o*x2z*tx+3./16.*o*x2z
     #    -1./16.*o*txs-1./16.*os*x12-1./16.*os*x2z+1./16.*os
     #    -1./16.*oc+1./16.*x12*x2z*tx+1./8.*x12*x2z+1./8.*x12*
     #    tx-1./16.*x12*txs-1./16.*x2z*tx-1./8.*x2z-1./8.*tx*
     #    x12s+1./16.*txs)
      gz10q= gz10q+rwwgz(14,7)*vvq*gstm2*yc*(-1./16.*o
     #    *x12*x2z*tx-1./16.*o*x12*x2z-1./16.*o*x12*x2zs+1./8.*o*
     #    x12*txs-1./16.*o*x2z*tx+1./16.*o*x2z-1./8.*o*tx*x2zs+
     #    1./16.*os*x12*x2z-1./16.*os*x2z*tx-1./8.*os*x2z-1./16.*
     #    os*x2zs+1./16.*os*txs+1./16.*oc*x2z-3./16.*x12*x2z*tx
     #    -1./16.*x12*tx*x2zs+1./16.*x2z*tx-1./16.*x2z*txs+1./8.
     #    *tx*x2zs+1./16.*x12s*txs+1./16.*x2zs)
      gz10q= gz10q+rwwgz(14,8)*bxpi*vvq*gstm2*yc*(1./8.*o
     #    *x12*x2z*tx+1./8.*o*x2z*txs-1./8.*o*tx*x2zs+1./8.*o*
     #    x2zs+1./8.*os*x2z*tx-1./8.*os*x2zs+1./8.*x12*x2z*txs-
     #    1./8.*tx*x2zs)
      gz10q= gz10q+rwwgz(14,8)*vvq*gstm2*bxps*yc*(1./8.*o
     #    *x12-1./8.*o*tx-1./8.*o+1./8.*os-1./8.*x12*tx+1./8.
     #    *tx)
      gz10q= gz10q+rwwgz(14,8)*vvq*gstm2*yc*bxp*(-3./16.
     #    *o*x12*x2z+1./4.*o*x12*tx-3./16.*o*x12-1./16.*o*x2z*tx
     #    +5./16.*o*x2z+1./16.*o*tx+1./16.*o*x12s+1./4.*o*txs
     #    +1./8.*o-5./16.*os*x2z+3./16.*os*tx-1./16.*os-1./16.
     #    *oc+1./16.*x12*x2z*tx+1./16.*x12*tx+1./4.*x12*txs-3./
     #    16.*x2z*tx+1./16.*tx*x12s-1./8.*tx-1./8.*txs)
      gz10q= gz10q+rwwgz(14,8)*vvq*gstm2*yc*(-1./8.*o*
     #    x12*x2z*tx+3./16.*o*x12*x2z-1./8.*o*x12*tx-1./8.*o*x12*
     #    txs+1./16.*o*x2z*tx-3./16.*o*x2z*txs-1./4.*o*x2z-1./
     #    16.*o*tx*x12s+3./16.*o*tx*x2zs-3./16.*o*x2zs-1./8.*o*
     #    txs+1./16.*os*x12*x2z-1./8.*os*x12*tx-1./8.*os*x2z*tx
     #    +3./16.*os*x2z-1./8.*os*tx+3./16.*os*x2zs-1./16.*os*
     #    txs+1./16.*oc*x2z-1./16.*oc*tx-1./16.*x12*x2z*tx-3./
     #    16.*x12*x2z*txs-1./8.*x12*txs+1./4.*x2z*tx+1./8.*x2z*
     #    txs+1./16.*tx*x2zs-1./16.*x12s*txs)
      gz10q= gz10q+rwwgz(14,9)*bxpi*vvq*gstm2*yc*(-1./2.
     #    *o*x2z*tx)
      gz10q= gz10q+rwwgz(14,9)*vvq*gstm2*yc*bxp*(-1./8.
     #    *o*x12-5./8.*o*tx+1./8.*o-1./8.*os-1./8.*x12*tx+1./
     #    8.*tx)
      gz10q= gz10q+rwwgz(14,9)*vvq*gstm2*yc*(1./8.*o*x12
     #    *tx+5./8.*o*x2z*tx-1./8.*o*x2z+1./2.*o*tx+1./8.*o*txs
     #    +1./8.*os*x2z+1./8.*os*tx+1./8.*x12*txs-1./8.*x2z*tx
     #    )
      gz10q= gz10q+rwwgz(14,10)*xx*vvq*gstm2*yc*(-1./
     #    16.*o*x12*tx*x2zs-1./16.*o*tx*x2zc+1./16.*o*x2zc-1./16.
     #    *o*x2zs*txs-1./16.*os*tx*x2zs-1./16.*os*x2zc-1./16.*x12
     #    *x2zs*txs+1./16.*tx*x2zc)
      gz10q= gz10q+rwwgz(14,10)*bxpi*vvq*gstm2*yc*(-1./
     #    8.*o*x12*x2z*tx-1./16.*o*x12*x2zs-1./8.*o*x2z*txs-3./16.
     #    *o*tx*x2zs+3./16.*o*x2zs-1./8.*os*x2z*tx-3./16.*os*x2zs
     #    -1./8.*x12*x2z*txs-1./16.*x12*tx*x2zs+3./16.*tx*x2zs)
      gz10q= gz10q+rwwgz(14,10)*vvq*gstm2*bxps*yc*(1./16.
     #    *o*x12+1./16.*o*tx-1./16.*o+1./16.*os+1./16.*x12*tx
     #    -1./16.*tx)
      gz10q= gz10q+rwwgz(14,10)*vvq*gstm2*yc*bxp*(-1./8.
     #    *o*x12*x2z-1./16.*o*x12*tx-1./16.*o*x12-3./16.*o*x2z*tx
     #    +3./16.*o*x2z-1./16.*o*tx-1./16.*o*txs+1./16.*o-3./
     #    16.*os*x2z-1./16.*os*tx-1./16.*os-1./8.*x12*x2z*tx-1./
     #    16.*x12*tx-1./16.*x12*txs+3./16.*x2z*tx+1./16.*tx)
      gz10q= gz10q+rwwgz(14,10)*vvq*gstm2*yc*(1./8.*o*
     #    x12*x2z*tx+1./8.*o*x12*x2z+1./16.*o*x12*tx+1./16.*o*x12
     #    *x2zs+3./16.*o*x2z*tx+1./8.*o*x2z*txs-3./16.*o*x2z+3./
     #    16.*o*tx*x2zs-3./16.*o*x2zs+1./16.*o*txs+1./8.*os*x2z*
     #    tx+3./16.*os*x2z+1./16.*os*tx+3./16.*os*x2zs+1./8.*
     #    x12*x2z*tx+1./8.*x12*x2z*txs+1./16.*x12*tx*x2zs+1./16.*
     #    x12*txs-3./16.*x2z*tx-3./16.*tx*x2zs)
      gz10q= gz10q+rwwgz(14,11)*vvq*gstm2*yc*bxp*(1./4.*o
     #    *x12-1./4.*x2z*tx+1./4.*txs)
      gz10q= gz10q+rwwgz(14,11)*vvq*gstm2*yc*(-1./4.*o
     #    *x12*x2z-1./4.*x2z*txs+1./4.*tx*x2zs)
      gz10q= gz10q+rwwgz(14,12)*xx*vvq*gstm2*yc*(1./4.*o
     #    *x2z*txs-1./4.*o*tx*x2zs+1./4.*x12*x2z*txs-1./4.*tx*
     #    x2zs)
      gz10q= gz10q+rwwgz(14,12)*bxpi*vvq*gstm2*yc*(1./4.*
     #    o*txs+1./4.*x12*x2z*tx+1./4.*x12*txs-1./2.*x2z*tx)
      gz10q= gz10q+rwwgz(14,12)*vvq*gstm2*yc*bxp*(1./8.*o
     #    *x2z+1./8.*o-1./8.*os+1./8.*x12*x2z-1./8.*x12-1./8.
     #    *x2z+1./8.*x12s)
      gz10q= gz10q+rwwgz(14,12)*vvq*gstm2*yc*(1./8.*o*
     #    x12*x2z-1./4.*o*x12*tx+1./8.*o*x2z*tx-1./8.*o*x2z-1./
     #    4.*o*tx-1./8.*o*x2zs-1./4.*o*txs+1./8.*os*x2z-1./8.*
     #    os*tx-1./8.*x12*x2z*tx+1./8.*x12*x2z-1./4.*x12*tx-1./
     #    4.*x12*txs+1./4.*x2z*tx-1./8.*tx*x12s+1./4.*tx+1./8.*
     #    x2zs)
      gz10q= gz10q+rwwgz(14,13)*xx*vvq*gstm2*yc*(1./8.*o
     #    *x2z*txs+1./8.*o*tx*x2zs+1./8.*x12*x2z*txs-1./8.*tx*
     #    x2zs)
      gz10q= gz10q+rwwgz(14,13)*bxpi*vvq*gstm2*yc*(1./4.*
     #    o*x2z*tx+1./8.*o*txs+1./8.*x12*x2z*tx+1./8.*x12*txs-1.
     #    /4.*x2z*tx)
      gz10q= gz10q+rwwgz(14,13)*vvq*gstm2*yc*bxp*(3./16.*
     #    o*x12-1./16.*o*x2z+1./16.*o*tx-1./8.*o+1./8.*os-1./
     #    16.*x12*x2z+1./16.*x12*tx-1./16.*x12+1./16.*x2z-1./16.
     #    *tx+1./16.*x12s)
      gz10q= gz10q+rwwgz(14,13)*vvq*gstm2*yc*(-3./16.*
     #    o*x12*x2z-1./16.*o*x12*tx-1./8.*o*x2z*tx+1./8.*o*x2z-
     #    1./8.*o*tx+1./16.*o*x2zs-3./16.*o*txs-1./8.*os*x2z+1./
     #    16.*x12*x2z*tx+1./16.*x12*x2z-1./8.*x12*tx-3./16.*x12*
     #    txs+3./16.*x2z*tx-1./16.*tx*x12s+1./8.*tx-1./16.*x2zs
     #    )
      gz10q= gz10q+rwwgz(14,14)*xx*vvq*gstm2*yc*(-1./4.
     #    *o*tx*x2zs)
      gz10q= gz10q+rwwgz(14,14)*bxpi*vvq*gstm2*yc*(-1./
     #    2.*o*x2z*tx)
      gz10q= gz10q+rwwgz(14,14)*vvq*gstm2*bxps*yc*(1./8.
     #    -1./8.*o-1./8.*x12)
      gz10q= gz10q+rwwgz(14,14)*vvq*gstm2*yc*bxp*(-1./8.
     #    *o*x12+1./4.*o*x2z-1./8.*o*tx+1./8.*x12*x2z+1./8.*x12
     #    *tx-1./8.*x2z*tx-1./4.*x2z+1./8.*txs)
      gz10q= gz10q+rwwgz(14,14)*vvq*gstm2*yc*(1./8.*o*
     #    x12*x2z+3./8.*o*x2z*tx+1./4.*o*tx-1./8.*o*x2zs-1./8.*
     #    x12*x2z*tx-1./8.*x2z*txs+1./8.*tx*x2zs+1./8.*x2zs)
*
      gz20q= rwwgz(1,1)*xx*vvq*gstm2*yc*(-12*o*x2z*txs-12*
     #    x12*x2z*txs+12*x2z*txs)
      gz20q= gz20q+rwwgz(1,1)*bxpi*vvq*gstm2*yc*(-12*o*
     #    x2z*tx-24*o*txs-24*x12*txs+12*x2z*tx+12*txs)
      gz20q= gz20q+rwwgz(1,1)*vvq*gstm2*bxps*yc*(-2+2
     #    *o+2*x12)
      gz20q= gz20q+rwwgz(1,1)*vvq*gstm2*yc*bxp*(2+2*o*
     #    x12-2*o*x2z-30*o*tx-6*o+4*os-18*x12*tx-2*x12-2*
     #    x2z*tx+2*x2z+16*tx+2*txs)
      gz20q= gz20q+rwwgz(1,1)*vvq*gstm2*yc*(4*o*x12*tx
     #    +16*o*x2z*tx+4*o*x2z+24*o*tx+24*o*txs-2*os*x2z+2*
     #    os*tx+4*x12*x2z*tx+12*x12*tx+24*x12*txs-16*x2z*tx-2
     #    *x2z*txs-2*x2z+2*tx*x12s+2*tx*x2zs-12*tx-12*txs)
      gz20q= gz20q+rwwgz(1,4)*xx*vvq*gstm2*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)
      gz20q= gz20q+rwwgz(1,4)*bxpi*vvq*gstm2*yc*(3*o*x12*
     #    x2z*tx-3*o*x12*x2zs-3*o*x2z*tx+6*o*x2z*txs-9./2.*o*tx
     #    *x2zs+21./2.*o*x2zs+9./2.*os*x2z*tx-6*os*x2zs+3*x12*
     #    x2z*tx+6*x12*x2z*txs-3./2.*x12*tx*x2zs+3*x12*x2zs-3./
     #    2.*x2z*tx*x12s-6*x2z*txs+3./2.*tx*x2zs-9./2.*x2zs)
      gz20q= gz20q+rwwgz(1,4)*vvq*gstm2*bxps*yc*(2+6*o*
     #    x12-2*o*tx-6*o+4*os-2*x12*tx-4*x12+2*tx+2*x12s
     #    )
      gz20q= gz20q+rwwgz(1,4)*vvq*gstm2*yc*bxp*(-3./2.
     #    -17./2.*o*x12*x2z+2*o*x12*tx-4*o*x12-2*o*x2z*tx+29./
     #    2.*o*x2z-1./2.*o*tx-1./2.*o*x12s+11./2.*o*txs+9./2.*o
     #    -1./2.*os*x12-9*os*x2z+4*os*tx-3*os+7*x12*x2z+7./
     #    2.*x12*tx+11./2.*x12*txs+3*x12-2*x2z*tx-3./2.*x2z*
     #    x12s-11./2.*x2z-2*tx*x12s-3./2.*tx-3./2.*x12s-7./2.
     #    *txs)
      gz20q= gz20q+rwwgz(1,4)*vvq*gstm2*yc*(-7./2.*o*
     #    x12*x2z*tx+7*o*x12*x2z-3./2.*o*x12*tx+3*o*x12*x2zs+5*
     #    o*x2z*tx-13./2.*o*x2z*txs-12*o*x2z+5*o*tx*x2zs+3./2.*
     #    o*tx-23./2.*o*x2zs-9./2.*o*txs-5*os*x2z*tx+15./2.*os*
     #    x2z-3*os*tx+13./2.*os*x2zs-7./2.*x12*x2z*tx-13./2.*
     #    x12*x2z*txs-6*x12*x2z+3./2.*x12*tx*x2zs-3./2.*x12*tx-
     #    3*x12*x2zs-9./2.*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-3./2.*tx*x2zs+5*x2zs+3*txs)
      gz20q= gz20q+rwwgz(1,7)*xx*vvq*gstm2*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)
      gz20q= gz20q+rwwgz(1,7)*bxpi*vvq*gstm2*yc*(-9./4.
     #    *o*x12*x2z*tx-3./2.*o*x12*x2zs-9./4.*o*x2z*txs-3./4.*o*
     #    tx*x2zs+15./4.*o*x2zs-3./4.*os*x2z*tx-9./4.*os*x2zs+3.
     #    /2.*x12*x2z*tx-9./4.*x12*x2z*txs+3./2.*x12*x2zs-3./2.*
     #    x2z*tx*x12s+3./2.*x2z*txs+3./4.*tx*x2zs-3./2.*x2zs)
      gz20q= gz20q+rwwgz(1,7)*vvq*gstm2*yc*bxp*(-9./4.*
     #    o*x12*x2z-3./4.*o*x2z*tx+9./4.*o*x2z-1./4.*o*txs+1./4.
     #    *os*x12-3./2.*os*x2z-1./4.*os+1./4.*oc-3./4.*x12*x2z*
     #    tx+3./2.*x12*x2z-1./4.*x12*txs+3./4.*x2z*tx-3./4.*x2z
     #    *x12s-3./4.*x2z+1./4.*txs)
      gz20q= gz20q+rwwgz(1,7)*vvq*gstm2*yc*(9./4.*o*x12*
     #    x2z*tx+9./4.*o*x12*x2z+3./2.*o*x12*x2zs+3./4.*o*x2z*tx
     #    +5./2.*o*x2z*txs-9./4.*o*x2z+3./4.*o*tx*x2zs-15./4.*o
     #    *x2zs-1./4.*os*x12*x2z+3./4.*os*x2z*tx+7./4.*os*x2z+9.
     #    /4.*os*x2zs-1./4.*oc*x2z-3./4.*x12*x2z*tx+5./2.*x12*x2z
     #    *txs-3./2.*x12*x2z-3./2.*x12*x2zs+3./2.*x2z*tx*x12s-3.
     #    /4.*x2z*tx+3./4.*x2z*x12s-7./4.*x2z*txs+3./4.*x2z-3./
     #    4.*tx*x2zs+3./2.*x2zs)
      gz20q= gz20q+rwwgz(1,8)*bxpi*vvq*gstm2*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)
      gz20q= gz20q+rwwgz(1,8)*vvq*gstm2*bxps*yc*(-3./2.
     #    -5*o*x12+2*o*tx+5*o-7./2.*os+2*x12*tx+3*x12-2*
     #    tx-3./2.*x12s)
      gz20q= gz20q+rwwgz(1,8)*vvq*gstm2*yc*bxp*(3./2.+
     #    13./4.*o*x12*x2z-5./2.*o*x12*tx+17./4.*o*x12+13./4.*o*
     #    x2z*tx-33./4.*o*x2z+1./4.*o*tx+1./4.*o*x12s-5*o*txs
     #    -9./2.*o+1./2.*os*x12+21./4.*os*x2z-15./4.*os*tx+11.
     #    /4.*os+1./4.*oc+5./4.*x12*x2z*tx-3*x12*x2z-11./4.*x12
     #    *tx-5*x12*txs-3*x12+3./4.*x2z*tx+3*x2z+5./4.*tx*
     #    x12s+3./2.*tx+3./2.*x12s+3*txs)
      gz20q= gz20q+rwwgz(1,8)*vvq*gstm2*yc*(3./2.*o*x12*
     #    x2z*tx-11./4.*o*x12*x2z+3./2.*o*x12*tx+1./2.*o*x12*txs
     #    -19./4.*o*x2z*tx+7./4.*o*x2z*txs+15./2.*o*x2z+1./4.*o
     #    *tx*x12s-7./4.*o*tx*x2zs-3./2.*o*tx+13./4.*o*x2zs+9./
     #    2.*o*txs-1./4.*os*x12*x2z+1./2.*os*x12*tx+3./2.*os*x2z*
     #    tx-17./4.*os*x2z+3*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+9./2.*x12*txs-3*x2z*
     #    txs-3*x2z-3./2.*tx*x12s+5./4.*tx*x2zs+1./4.*x12s*txs
     #    -3./2.*x2zs-3*txs)
      gz20q= gz20q+rwwgz(1,9)*bxpi*vvq*gstm2*yc*(3*o*x2z*
     #    tx+3*o*txs+3*x12*txs-3*x2z*tx)
      gz20q= gz20q+rwwgz(1,9)*vvq*gstm2*yc*bxp*(11*o*tx
     #    +3*x12*tx-3*tx)
      gz20q= gz20q+rwwgz(1,9)*vvq*gstm2*yc*(-o*x12*tx
     #    -4*o*x2z*tx-9*o*tx-3*o*txs-os*tx-3*x12*tx-3*x12*
     #    txs+3*x2z*tx+3*tx)
      gz20q= gz20q+rwwgz(1,10)*xx*vvq*gstm2*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)
      gz20q= gz20q+rwwgz(1,10)*bxpi*vvq*gstm2*yc*(9./4.*o
     #    *x12*x2z*tx+3./2.*o*x12*x2zs+3./2.*o*x12*txs+15./4.*o*
     #    x2z*txs+3./4.*o*tx*x2zs-21./4.*o*x2zs+3./4.*os*x2z*tx
     #    +3*os*x2zs+3./4.*os*txs-3*x12*x2z*tx+15./4.*x12*x2z*
     #    txs-3./2.*x12*x2zs+3./2.*x2z*tx*x12s-3*x2z*txs-3./4.*
     #    tx*x2zs+3./4.*x12s*txs+9./4.*x2zs)
      gz20q= gz20q+rwwgz(1,10)*vvq*gstm2*bxps*yc*(-3./4.
     #    -5./2.*o*x12-o*tx+5./2.*o-7./4.*os-x12*tx+3./2.*
     #    x12+tx-3./4.*x12s)
      gz20q= gz20q+rwwgz(1,10)*vvq*gstm2*yc*bxp*(3./4.+
     #    31./8.*o*x12*x2z+11./4.*o*x12*tx+17./8.*o*x12+15./8.*o*
     #    x2z*tx-51./8.*o*x2z+5./8.*o*tx+1./8.*o*x12s+11./4.*o*
     #    txs-9./4.*o+33./8.*os*x2z+9./8.*os*tx+13./8.*os-1./
     #    8.*oc+7./8.*x12*x2z*tx-3*x12*x2z-7./8.*x12*tx+11./4.*
     #    x12*txs-3./2.*x12-15./8.*x2z*tx+3./4.*x2z*x12s+9./4.*
     #    x2z+13./8.*tx*x12s-3./4.*tx+3./4.*x12s-7./4.*txs)
      gz20q= gz20q+rwwgz(1,10)*vvq*gstm2*yc*(-5./2.*o*
     #    x12*x2z*tx-29./8.*o*x12*x2z-9./4.*o*x12*tx-3./2.*o*x12*
     #    x2zs-7./4.*o*x12*txs-11./8.*o*x2z*tx-33./8.*o*x2z*txs
     #    +6*o*x2z-1./8.*o*tx*x12s-7./8.*o*tx*x2zs+43./8.*o*
     #    x2zs-9./4.*o*txs+1./8.*os*x12*x2z-1./4.*os*x12*tx-os*
     #    x2z*tx-31./8.*os*x2z-3./4.*os*tx-25./8.*os*x2zs-7./8.
     #    *os*txs+1./8.*oc*x2z-1./8.*oc*tx+19./8.*x12*x2z*tx-33.
     #    /8.*x12*x2z*txs+3*x12*x2z+3./2.*x12*tx+3./2.*x12*x2zs
     #    -9./4.*x12*txs-3./2.*x2z*tx*x12s+3./2.*x2z*tx-3./4.*
     #    x2z*x12s+13./4.*x2z*txs-9./4.*x2z-3./2.*tx*x12s+7./8.
     #    *tx*x2zs-7./8.*x12s*txs-9./4.*x2zs+3./2.*txs)
      gz20q= gz20q+rwwgz(1,11)*vvq*gstm2*bxps*yc*(-1+
     #    o+x12)
      gz20q= gz20q+rwwgz(1,11)*vvq*gstm2*yc*bxp*(-3./2.
     #    *o*x12-3./2.*o*x2z+1./2.*o*tx-1./2.*x12*x2z-3./2.*x12
     #    *tx+1./2.*x12-x2z*tx+3./2.*x2z+1./2.*tx-1./2.*x12s
     #    +txs)
      gz20q= gz20q+rwwgz(1,11)*vvq*gstm2*yc*(1./2.*o*x12
     #    *x2z+1./2.*o*x12*tx+1./2.*o*x2zs-1./2.*o*txs+3./2.*
     #    x12*x2z*tx-1./2.*x12*x2z-1./2.*x12*txs-1./2.*x2z*tx-
     #    x2z*txs+1./2.*tx*x12s+tx*x2zs-1./2.*x2zs)
      gz20q= gz20q+rwwgz(1,12)*xx*vvq*gstm2*yc*(-3*o*
     #    x2z*txs+3*o*tx*x2zs-3*x12*x2z*txs+6*x2z*txs-3*tx*x2zs
     #    )
      gz20q= gz20q+rwwgz(1,12)*bxpi*vvq*gstm2*yc*(6*o*x2z
     #    *tx-9*o*txs+3*x12*x2z*tx-9*x12*txs+6*txs)
      gz20q= gz20q+rwwgz(1,12)*vvq*gstm2*yc*bxp*(1+2*o*
     #    x12+1./2.*o*x2z-4*o*tx-5./2.*o+3./2.*os+1./2.*x12*
     #    x2z-4*x12*tx-3./2.*x12-1./2.*x2z+4*tx+1./2.*x12s)
      gz20q= gz20q+rwwgz(1,12)*vvq*gstm2*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+9*o*txs-1./2.*os*x2z+1./2.*os*tx-5./2.
     #    *x12*x2z*tx+1./2.*x12*x2z+3*x12*tx+9*x12*txs-x2z*tx
     #    -x2z+1./2.*tx*x12s-3*tx+1./2.*x2zs-6*txs)
      gz20q= gz20q+rwwgz(1,13)*xx*vvq*gstm2*yc*(-3*o*
     #    x2z*txs-3*x12*x2z*txs+3*x2z*txs)
      gz20q= gz20q+rwwgz(1,13)*bxpi*vvq*gstm2*yc*(-3./2.
     #    *o*x2z*tx-9./2.*o*txs-9./2.*x12*txs+3./2.*x2z*tx+3*
     #    txs)
      gz20q= gz20q+rwwgz(1,13)*vvq*gstm2*yc*bxp*(-3./4.
     #    *o*x12-1./4.*o*x2z-7./4.*o*tx+1./2.*o-1./2.*os-1./4.
     #    *x12*x2z-7./4.*x12*tx+1./4.*x12+1./4.*x2z+7./4.*tx-
     #    1./4.*x12s)
      gz20q= gz20q+rwwgz(1,13)*vvq*gstm2*yc*(1./4.*o*x12
     #    *x2z+5./4.*o*x12*tx+2*o*x2z*tx+o*tx+1./4.*o*x2zs+17.
     #    /4.*o*txs+1./2.*os*tx+3./4.*x12*x2z*tx-1./4.*x12*x2z+
     #    x12*tx+17./4.*x12*txs-7./4.*x2z*tx+3./4.*tx*x12s-3./2.
     #    *tx-1./4.*x2zs-3*txs)
      gz20q= gz20q+rwwgz(1,14)*xx*vvq*gstm2*yc*(3./2.*o*
     #    x2z*txs+3./2.*o*tx*x2zs+3./2.*x12*x2z*txs-3./2.*tx*x2zs
     #    )
      gz20q= gz20q+rwwgz(1,14)*bxpi*vvq*gstm2*yc*(6*o*x2z
     #    *tx+3./2.*o*txs+3./2.*x12*x2z*tx+3./2.*x12*txs-3*x2z*
     #    tx)
      gz20q= gz20q+rwwgz(1,14)*vvq*gstm2*yc*bxp*(1./2.*o*
     #    x12+1./4.*o*x2z+4*o*tx+1./4.*o-1./4.*os+1./4.*x12*
     #    x2z+x12*tx-1./4.*x12-1./2.*x2z*tx-1./4.*x2z-tx+1./
     #    4.*x12s+1./2.*txs)
      gz20q= gz20q+rwwgz(1,14)*vvq*gstm2*yc*(-1./4.*o*
     #    x12*x2z-1./2.*o*x12*tx-23./4.*o*x2z*tx-1./4.*o*x2z-9./
     #    2.*o*tx-1./4.*o*x2zs-3./2.*o*txs+1./4.*os*x2z-1./4.*
     #    os*tx-5./4.*x12*x2z*tx+1./4.*x12*x2z-3./2.*x12*tx-3./
     #    2.*x12*txs+5./2.*x2z*tx-1./2.*x2z*txs-1./4.*tx*x12s+1.
     #    /2.*tx*x2zs+3./2.*tx+1./4.*x2zs)
      gz20q= gz20q+rwwgz(4,1)*xx*vvq*gstm2*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)
      gz20q= gz20q+rwwgz(4,1)*bxpi*vvq*gstm2*yc*(3*o*x12*
     #    x2z*tx-3*o*x12*x2zs-3*o*x2z*tx+6*o*x2z*txs-9./2.*o*tx
     #    *x2zs+21./2.*o*x2zs+9./2.*os*x2z*tx-6*os*x2zs+3*x12*
     #    x2z*tx+6*x12*x2z*txs-3./2.*x12*tx*x2zs+3*x12*x2zs-3./
     #    2.*x2z*tx*x12s-6*x2z*txs+3./2.*tx*x2zs-9./2.*x2zs)
      gz20q= gz20q+rwwgz(4,1)*vvq*gstm2*bxps*yc*(2+6*o*
     #    x12-2*o*tx-6*o+4*os-2*x12*tx-4*x12+2*tx+2*x12s
     #    )
      gz20q= gz20q+rwwgz(4,1)*vvq*gstm2*yc*bxp*(-3./2.
     #    -17./2.*o*x12*x2z+2*o*x12*tx-4*o*x12-2*o*x2z*tx+29./
     #    2.*o*x2z-1./2.*o*tx-1./2.*o*x12s+11./2.*o*txs+9./2.*o
     #    -1./2.*os*x12-9*os*x2z+4*os*tx-3*os+7*x12*x2z+7./
     #    2.*x12*tx+11./2.*x12*txs+3*x12-2*x2z*tx-3./2.*x2z*
     #    x12s-11./2.*x2z-2*tx*x12s-3./2.*tx-3./2.*x12s-7./2.
     #    *txs)
      gz20q= gz20q+rwwgz(4,1)*vvq*gstm2*yc*(-7./2.*o*
     #    x12*x2z*tx+7*o*x12*x2z-3./2.*o*x12*tx+3*o*x12*x2zs+5*
     #    o*x2z*tx-13./2.*o*x2z*txs-12*o*x2z+5*o*tx*x2zs+3./2.*
     #    o*tx-23./2.*o*x2zs-9./2.*o*txs-5*os*x2z*tx+15./2.*os*
     #    x2z-3*os*tx+13./2.*os*x2zs-7./2.*x12*x2z*tx-13./2.*
     #    x12*x2z*txs-6*x12*x2z+3./2.*x12*tx*x2zs-3./2.*x12*tx-
     #    3*x12*x2zs-9./2.*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-3./2.*tx*x2zs+5*x2zs+3*txs)
      gz20q= gz20q+rwwgz(4,4)*xx*vvq*gstm2*yc*(-3./4.*
     #    o*x12*x2zc+3./4.*o*tx*x2zc-3./4.*o*x2zq-3./4.*x12*tx*
     #    x2zc-3./4.*tx*x2zq+3./4.*x2zq+3./4.*x2zc*txs)
      gz20q= gz20q+rwwgz(4,4)*bxpi*vvq*gstm2*yc*(3./4.*o*
     #    x12*x2zc-9./4.*o*x12*x2zs+3./4.*o*tx*x2zc+9./4.*o*tx*
     #    x2zs+3./4.*o*x12s*x2zs-15./4.*o*x2zc-3./4.*o*x2zs*txs
     #    +3./4.*os*x12*x2zs-3./4.*os*tx*x2zs+3./4.*os*x2zc+3./
     #    4.*x12*tx*x2zc-9./4.*x12*tx*x2zs-3./2.*x12*x2zc-3./4.*
     #    x12*x2zs*txs+3./4.*tx*x12s*x2zs-9./4.*tx*x2zc+3*x2zc+
     #    9./4.*x2zs*txs)
      gz20q= gz20q+rwwgz(4,4)*vvq*gstm2*bxps*yc*bxp*(1+2
     #    *o*x12-2*o+os-2*x12+x12s)
      gz20q= gz20q+rwwgz(4,4)*vvq*gstm2*bxps*yc*(-3./4.
     #    -9./2.*o*x12*x2z-1./2.*o*x12-o*x2z*tx+13./2.*o*x2z-
     #    o*tx-o*x12s+o*txs+3./2.*o-os*x12-11./4.*os*x2z+os
     #    *tx-3./4.*os-x12*x2z*tx+11./2.*x12*x2z+x12*tx+x12*
     #    txs+3./2.*x12+x2z*tx-7./4.*x2z*x12s-15./4.*x2z-tx*
     #    x12s-3./4.*x12s-txs)
      gz20q= gz20q+rwwgz(4,4)*vvq*gstm2*yc*bxp*(o*x12*x2z
     #    +13./4.*o*x12*x2zs-3./4.*o*x12+7./2.*o*x2z*tx+7./4.*o
     #    *x2z*x12s-7./4.*o*x2z*txs-21./4.*o*x2z+7./4.*o*tx*x2zs
     #    +3./4.*o*tx+3./4.*o*x12s-31./4.*o*x2zs-3./4.*o*txs+
     #    7./4.*os*x12*x2z+3./4.*os*x12-7./4.*os*x2z*tx+9./4.*os*
     #    x2z-3./4.*os*tx+5./2.*os*x2zs-2*x12*x2z*tx-7./4.*x12*
     #    x2z*txs-9./2.*x12*x2z+7./4.*x12*tx*x2zs-3./4.*x12*tx-
     #    5*x12*x2zs-3./4.*x12*txs+7./4.*x2z*tx*x12s-3./4.*x2z*tx
     #    +3./2.*x2z*x12s+11./4.*x2z*txs+3*x2z+3./4.*tx*x12s-
     #    11./4.*tx*x2zs+3./4.*x12s*x2zs+21./4.*x2zs+3./4.*txs)
      gz20q= gz20q+rwwgz(4,4)*vvq*gstm2*yc*(9./4.*o*x12*
     #    x2z-3./4.*o*x12*x2zc-1./2.*o*x12*x2zs-9./4.*o*x2z*tx-
     #    3./2.*o*x2z*x12s+3./2.*o*x2z*txs-3./4.*o*tx*x2zc-4*o*tx
     #    *x2zs-3./4.*o*x12s*x2zs+4*o*x2zc+3./4.*o*x2zs*txs+27./
     #    4.*o*x2zs-3./2.*os*x12*x2z-3./4.*os*x12*x2zs+3./2.*os*
     #    x2z*tx+3./4.*os*tx*x2zs-3./4.*os*x2zc-9./4.*os*x2zs+9.
     #    /4.*x12*x2z*tx+3./2.*x12*x2z*txs-3./4.*x12*tx*x2zc+x12*
     #    tx*x2zs+3./2.*x12*x2zc+3./4.*x12*x2zs*txs+9./2.*x12*
     #    x2zs-3./2.*x2z*tx*x12s-9./4.*x2z*txs-3./4.*tx*x12s*x2zs
     #    +5./2.*tx*x2zc+9./4.*tx*x2zs-3./4.*x12s*x2zs-13./4.*
     #    x2zc-5./2.*x2zs*txs-9./2.*x2zs)
      gz20q= gz20q+rwwgz(4,7)*xx*vvq*gstm2*yc*(-3./16.
     #    *o*x12*x2zc+3./8.*o*x12*x2zs*txs+3./16.*o*tx*x12s*x2zs-
     #    3./16.*o*tx*x2zq-3./16.*o*tx*x2zc+3./16.*o*x2zq+3./16.*
     #    o*x2zc*txs+3./8.*os*x12*tx*x2zs-3./16.*os*x12*x2zc-3./
     #    16.*os*x2zq+3./16.*os*x2zc+3./16.*os*x2zs*txs+3./16.*oc
     #    *tx*x2zs-3./16.*oc*x2zc-3./16.*x12*tx*x2zc+3./16.*x12*
     #    x2zc*txs+3./16.*tx*x2zq+3./16.*x12s*x2zs*txs-3./8.*x2zc
     #    *txs)
      gz20q= gz20q+rwwgz(4,7)*bxpi*vvq*gstm2*yc*(3./8.*o*
     #    x12*x2z*txs+3./8.*o*x12*tx*x2zs-3./16.*o*x12*x2zc-3./8.
     #    *o*x12*x2zs+3./16.*o*x2z*tx*x12s-3./8.*o*tx*x2zc-3./8.*
     #    o*tx*x2zs+3./16.*o*x12s*x2zs+3./8.*o*x2zc+9./16.*o*x2zs
     #    *txs+3./8.*os*x12*x2z*tx-3./16.*os*x12*x2zs+3./16.*os*
     #    x2z*txs+3./16.*os*tx*x2zs-3./8.*os*x2zc+3./8.*os*x2zs
     #    +3./16.*oc*x2z*tx-3./8.*oc*x2zs-3./16.*x12*tx*x2zc-3./
     #    8.*x12*tx*x2zs+9./16.*x12*x2zs*txs+3./16.*x2z*x12s*txs+
     #    3./16.*tx*x12s*x2zs+3./8.*tx*x2zc-3./4.*x2zs*txs)
      gz20q= gz20q+rwwgz(4,7)*vvq*gstm2*yc*bxp*(1./2.*o*
     #    x12*x2z*tx-1./4.*o*x12*x2z+1./16.*o*x12*tx-7./32.*o*x12
     #    *x2zs-1./8.*o*x12*txs-1./4.*o*x2z*tx+1./4.*o*x2z*x12s
     #    +7./16.*o*x2z*txs-3./32.*o*tx*x12s-7./32.*o*tx*x2zs+1.
     #    /32.*o*x12s-1./32.*o*x12c+7./32.*o*x2zs+1./16.*o*txs+
     #    1./16.*os*x12*x2z-3./32.*os*x12*tx+1./4.*os*x2z*tx+3./
     #    16.*os*x2z+1./32.*os*tx-1./32.*os*x12s-7./32.*os*x2zs
     #    -1./16.*os*txs+1./32.*oc*x12-3./16.*oc*x2z-1./32.*oc*
     #    tx-1./32.*oc+1./32.*oq-1./4.*x12*x2z*tx+7./16.*x12*
     #    x2z*txs-7./32.*x12*tx*x2zs+1./16.*x12*txs+1./4.*x2z*tx*
     #    x12s-7./16.*x2z*txs+1./32.*tx*x12s-1./32.*tx*x12c+7./
     #    32.*tx*x2zs-1./16.*x12s*txs)
      gz20q= gz20q+rwwgz(4,7)*vvq*gstm2*yc*(-7./16.*o*
     #    x12*x2z*tx-3./8.*o*x12*x2z*txs+3./16.*o*x12*x2z-13./32.
     #    *o*x12*tx*x2zs+3./16.*o*x12*x2zc+5./8.*o*x12*x2zs-7./32.
     #    *o*x2z*tx*x12s+3./16.*o*x2z*tx-7./32.*o*x2z*x12s-7./16.
     #    *o*x2z*txs+1./32.*o*tx*x12c+13./32.*o*tx*x2zc+5./8.*o*
     #    tx*x2zs-3./16.*o*x12s*x2zs+3./32.*o*x12s*txs-13./32.*o*
     #    x2zc-19./32.*o*x2zs*txs-3./16.*o*x2zs-7./16.*os*x12*x2z
     #    *tx+3./16.*os*x12*x2zs+3./32.*os*x12*txs-7./32.*os*x2z*
     #    tx-1./32.*os*x2z*x12s-3./16.*os*x2z*txs-3./16.*os*x2z
     #    +3./32.*os*tx*x12s-7./32.*os*tx*x2zs+13./32.*os*x2zc-
     #    3./16.*os*x2zs-1./16.*oc*x12*x2z+3./32.*oc*x12*tx-7./32.
     #    *oc*x2z*tx+7./32.*oc*x2z+3./8.*oc*x2zs+1./32.*oc*txs-
     #    1./32.*oq*x2z+1./32.*oq*tx+3./16.*x12*x2z*tx-7./16.*x12
     #    *x2z*txs+3./16.*x12*tx*x2zc+5./8.*x12*tx*x2zs-19./32.*
     #    x12*x2zs*txs-7./32.*x2z*tx*x12s-3./16.*x2z*x12s*txs+3./
     #    8.*x2z*txs)
      gz20q= gz20q+rwwgz(4,7)*vvq*gstm2*yc*(-3./16.*tx
     #    *x12s*x2zs-13./32.*tx*x2zc-3./16.*tx*x2zs+1./32.*x12c*
     #    txs+13./16.*x2zs*txs)
      gz20q= gz20q+rwwgz(4,8)*bxpi*vvq*gstm2*yc*(3./4.*o*
     #    x12*x2zs-3./4.*o*tx*x2zs+3./4.*o*x2zc+3./4.*x12*tx*x2zs
     #    +3./4.*tx*x2zc-3./4.*x2zc-3./4.*x2zs*txs)
      gz20q= gz20q+rwwgz(4,8)*vvq*gstm2*bxps*yc*bxp*(-1
     #    -2*o*x12+2*o-os+2*x12-x12s)
      gz20q= gz20q+rwwgz(4,8)*vvq*gstm2*bxps*yc*(3./4.+
     #    11./4.*o*x12*x2z+o*x2z*tx-19./4.*o*x2z+o*tx+11./8.*o*
     #    x12s-o*txs-11./8.*o+11./8.*os*x12+15./8.*os*x2z-os*
     #    tx+1./2.*os+1./8.*oc+x12*x2z*tx-15./4.*x12*x2z-x12*
     #    tx-x12*txs-11./8.*x12-x2z*tx+7./8.*x2z*x12s+23./8.*
     #    x2z+tx*x12s+1./2.*x12s+1./8.*x12c+txs)
      gz20q= gz20q+rwwgz(4,8)*vvq*gstm2*yc*bxp*(-1./4.*
     #    o*x12*x2z*tx+1./4.*o*x12*x2z-7./8.*o*x12*x2zs+1./4.*o*
     #    x12*txs+3./4.*o*x12-5./2.*o*x2z*tx-o*x2z*x12s+7./8.*o
     #    *x2z*txs+7./2.*o*x2z-1./8.*o*tx*x12s-7./8.*o*tx*x2zs-
     #    3./4.*o*tx-5./8.*o*x12s-1./8.*o*x12c+29./8.*o*x2zs+5./
     #    8.*o*txs-9./8.*os*x12*x2z+1./8.*os*x12*tx-5./8.*os*x12
     #    +3./4.*os*x2z*tx-9./8.*os*x2z+5./8.*os*tx-1./4.*os*
     #    x12s-7./8.*os*x2zs+1./8.*os*txs-1./8.*oc*x12-1./8.*oc
     #    *x2z+1./8.*oc*tx+5./4.*x12*x2z*tx+7./8.*x12*x2z*txs+
     #    11./4.*x12*x2z-7./8.*x12*tx*x2zs+3./4.*x12*tx+7./4.*x12
     #    *x2zs+5./8.*x12*txs-x2z*tx*x12s+3./4.*x2z*tx-1./2.*
     #    x2z*x12s-15./8.*x2z*txs-9./4.*x2z-5./8.*tx*x12s-1./8.
     #    *tx*x12c+15./8.*tx*x2zs+1./8.*x12s*txs-11./4.*x2zs-3./
     #    4.*txs)
      gz20q= gz20q+rwwgz(4,8)*vvq*gstm2*yc*(-3./2.*o*
     #    x12*x2z-1./4.*o*x12*x2zs+3./2.*o*x2z*tx+5./8.*o*x2z*
     #    x12s-5./8.*o*x2z*txs+3./2.*o*tx*x2zs-7./8.*o*x2zc-23./
     #    8.*o*x2zs+5./8.*os*x12*x2z-5./8.*os*x2z*tx+5./8.*os*
     #    x2zs-3./2.*x12*x2z*tx-5./8.*x12*x2z*txs-1./4.*x12*tx*
     #    x2zs-11./8.*x12*x2zs+5./8.*x2z*tx*x12s+3./2.*x2z*txs-
     #    7./8.*tx*x2zc-3./2.*tx*x2zs+7./8.*x2zc+7./8.*x2zs*txs
     #    +9./4.*x2zs)
      gz20q= gz20q+rwwgz(4,9)*bxpi*vvq*gstm2*yc*(-3./4.
     #    *o*x12*x2z*tx-3./4.*o*x2z*txs+3./4.*o*tx*x2zs-3./4.*o*
     #    x2zs-3./4.*os*x2z*tx+3./4.*os*x2zs-3./4.*x12*x2z*txs+
     #    3./4.*tx*x2zs)
      gz20q= gz20q+rwwgz(4,9)*vvq*gstm2*bxps*yc*(-o*x12
     #    +o*tx+o-os+x12*tx-tx)
      gz20q= gz20q+rwwgz(4,9)*vvq*gstm2*yc*bxp*(7./8.*o*
     #    x12*x2z-5./4.*o*x12*tx+5./8.*o*x12+1./8.*o*x2z*tx-15./
     #    8.*o*x2z-5./8.*o*tx+1./8.*o*x12s-o*txs-3./4.*o+1./4.
     #    *os*x12+15./8.*os*x2z-9./8.*os*tx+5./8.*os+1./8.*oc
     #    -7./8.*x12*x2z*tx-5./8.*x12*tx-x12*txs+15./8.*x2z*tx
     #    -1./8.*tx*x12s+3./4.*tx)
      gz20q= gz20q+rwwgz(4,9)*vvq*gstm2*yc*(3./4.*o*x12*
     #    x2z*tx-5./8.*o*x12*x2z+3./4.*o*x12*tx+1./4.*o*x12*txs
     #    -1./8.*o*x2z*tx+7./8.*o*x2z*txs+3./2.*o*x2z+1./8.*o*
     #    tx*x12s-7./8.*o*tx*x2zs+7./8.*o*x2zs+3./4.*o*txs-1./8.
     #    *os*x12*x2z+1./4.*os*x12*tx+3./4.*os*x2z*tx-11./8.*os*
     #    x2z+3./4.*os*tx-7./8.*os*x2zs+1./8.*os*txs-1./8.*oc*
     #    x2z+1./8.*oc*tx+5./8.*x12*x2z*tx+7./8.*x12*x2z*txs+3./
     #    4.*x12*txs-3./2.*x2z*tx-7./8.*tx*x2zs+1./8.*x12s*txs)
      gz20q= gz20q+rwwgz(4,10)*xx*vvq*gstm2*yc*(3./16.*o
     #    *x12*x2zc-3./8.*o*x12*x2zs*txs-3./16.*o*tx*x12s*x2zs+3./
     #    16.*o*tx*x2zq+3./16.*o*tx*x2zc-3./16.*o*x2zq-3./16.*o*
     #    x2zc*txs-3./8.*os*x12*tx*x2zs+3./16.*os*x12*x2zc+3./16.
     #    *os*x2zq-3./16.*os*x2zc-3./16.*os*x2zs*txs-3./16.*oc*tx
     #    *x2zs+3./16.*oc*x2zc+3./16.*x12*tx*x2zc-3./16.*x12*x2zc
     #    *txs-3./16.*tx*x2zq-3./16.*x12s*x2zs*txs+3./8.*x2zc*txs
     #    )
      gz20q= gz20q+rwwgz(4,10)*bxpi*vvq*gstm2*yc*(-3./4.
     #    *o*x12*x2z*txs-3./8.*o*x12*tx*x2zs+3./16.*o*x12*x2zc+9./
     #    16.*o*x12*x2zs-3./8.*o*x2z*tx*x12s+9./16.*o*tx*x2zc+9./
     #    16.*o*tx*x2zs-3./16.*o*x12s*x2zs-9./16.*o*x2zc-3./4.*o*
     #    x2zs*txs-3./4.*os*x12*x2z*tx+3./8.*os*x12*x2zs-3./8.*os
     #    *x2z*txs-3./16.*os*tx*x2zs+9./16.*os*x2zc-9./16.*os*
     #    x2zs-3./8.*oc*x2z*tx+9./16.*oc*x2zs+3./16.*x12*tx*x2zc
     #    +9./16.*x12*tx*x2zs-3./4.*x12*x2zs*txs-3./8.*x2z*x12s*
     #    txs-3./16.*tx*x12s*x2zs-9./16.*tx*x2zc+9./8.*x2zs*txs)
      gz20q= gz20q+rwwgz(4,10)*vvq*gstm2*bxps*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)
      gz20q= gz20q+rwwgz(4,10)*vvq*gstm2*yc*bxp*(-7./8.
     #    *o*x12*x2z*tx+7./8.*o*x12*x2z-3./8.*o*x12*tx+7./16.*o*
     #    x12*x2zs-1./2.*o*x12*txs+3./16.*o*x12+7./8.*o*x2z*tx-
     #    7./16.*o*x2z*x12s-9./8.*o*x2z*txs-3./16.*o*x2z-1./4.*o*
     #    tx*x12s+11./16.*o*tx*x2zs+3./16.*o*tx-3./16.*o*x12s-
     #    11./16.*o*x2zs-3./8.*o*txs+1./4.*os*x12*x2z-1./2.*os*
     #    x12*tx-7./16.*os*x2z*tx-1./2.*os*x2z-3./16.*os*tx+11./
     #    16.*os*x2zs-1./4.*os*txs-3./16.*os+11./16.*oc*x2z-1./
     #    4.*oc*tx+3./16.*oc+7./8.*x12*x2z*tx-9./8.*x12*x2z*txs
     #    +7./16.*x12*tx*x2zs+3./16.*x12*tx-3./8.*x12*txs-7./16.
     #    *x2z*tx*x12s-3./16.*x2z*tx+11./8.*x2z*txs-3./16.*tx*
     #    x12s-11./16.*tx*x2zs-1./4.*x12s*txs+3./8.*txs)
      gz20q= gz20q+rwwgz(4,10)*vvq*gstm2*yc*(3./4.*o*x12
     #    *x2z*tx+7./8.*o*x12*x2z*txs-9./16.*o*x12*x2z+3./8.*o*
     #    x12*tx*x2zs-3./16.*o*x12*x2zc-o*x12*x2zs+3./8.*o*x12*
     #    txs+7./16.*o*x2z*tx*x12s-9./16.*o*x2z*tx+3./8.*o*x2z*
     #    x12s+15./16.*o*x2z*txs+3./16.*o*tx*x12s-5./8.*o*tx*x2zc
     #    -19./16.*o*tx*x2zs+3./16.*o*x12s*x2zs+5./8.*o*x2zc+13.
     #    /16.*o*x2zs*txs+9./16.*o*x2zs+7./8.*os*x12*x2z*tx-3./16.
     #    *os*x12*x2z+3./8.*os*x12*tx-7./16.*os*x12*x2zs+3./8.*os
     #    *x2z*tx+7./16.*os*x2z*txs+9./16.*os*x2z+3./16.*os*tx*
     #    x2zs-5./8.*os*x2zc+1./16.*os*x2zs+3./16.*os*txs+7./16.
     #    *oc*x2z*tx-9./16.*oc*x2z+3./16.*oc*tx-5./8.*oc*x2zs-9.
     #    /16.*x12*x2z*tx+15./16.*x12*x2z*txs-3./16.*x12*tx*x2zc-
     #    x12*tx*x2zs+13./16.*x12*x2zs*txs+3./8.*x2z*tx*x12s+7./
     #    16.*x2z*x12s*txs-9./8.*x2z*txs+3./16.*tx*x12s*x2zs+5./8.
     #    *tx*x2zc+9./16.*tx*x2zs+3./16.*x12s*txs-5./4.*x2zs*txs
     #    )
      gz20q= gz20q+rwwgz(4,12)*xx*vvq*gstm2*yc*(-3./4.
     #    *o*tx*x2zs+3./4.*o*x2zc+3./4.*x12*tx*x2zs+3./2.*tx*x2zc
     #    -3./4.*x2zc-3./2.*x2zs*txs)
      gz20q= gz20q+rwwgz(4,12)*bxpi*vvq*gstm2*yc*(-3./4.
     #    *o*x12*x2zs-3./2.*o*x2z*tx+3./2.*o*x2z*txs-3./2.*o*tx*
     #    x2zs+3*o*x2zs+3./4.*os*x2z*tx-3./4.*os*x2zs+3./2.*x12
     #    *x2z*tx+3./2.*x12*x2z*txs-3./2.*x12*tx*x2zs+3./2.*x12*
     #    x2zs-3./4.*x2z*tx*x12s-3*x2z*txs+3*tx*x2zs-9./4.*x2zs
     #    )
      gz20q= gz20q+rwwgz(4,12)*vvq*gstm2*bxps*yc*(1+2*o
     #    *x12-2*o+os-2*x12+x12s)
      gz20q= gz20q+rwwgz(4,12)*vvq*gstm2*yc*bxp*(-3./4.
     #    -5./2.*o*x12*x2z-5./4.*o*x12-7./4.*o*x2z*tx+9./2.*o*
     #    x2z-o*tx-1./4.*o*x12s+7./4.*o*txs+3./2.*o-1./4.*os*
     #    x12-7./4.*os*x2z+os*tx-3./4.*os-7./4.*x12*x2z*tx+7./
     #    2.*x12*x2z+x12*tx+7./4.*x12*txs+3./2.*x12+7./4.*x2z*
     #    tx-3./4.*x2z*x12s-11./4.*x2z-tx*x12s-3./4.*x12s-7./
     #    4.*txs)
      gz20q= gz20q+rwwgz(4,12)*vvq*gstm2*yc*(2*o*x12*x2z
     #    +3./4.*o*x12*x2zs+13./4.*o*x2z*tx-3./2.*o*x2z*txs-15./
     #    4.*o*x2z+3./2.*o*tx*x2zs+3./4.*o*tx-13./4.*o*x2zs-3./
     #    2.*o*txs-3./4.*os*x2z*tx+3./2.*os*x2z-3./4.*os*tx+3./
     #    4.*os*x2zs-1./4.*x12*x2z*tx-3./2.*x12*x2z*txs-3*x12*x2z
     #    +3./2.*x12*tx*x2zs-3./4.*x12*tx-3./2.*x12*x2zs-3./2.*
     #    x12*txs+3./4.*x2z*tx*x12s-3./2.*x2z*tx+3./4.*x2z*x12s
     #    +13./4.*x2z*txs+9./4.*x2z+3./4.*tx*x12s-13./4.*tx*
     #    x2zs+5./2.*x2zs+3./2.*txs)
      gz20q= gz20q+rwwgz(4,13)*xx*vvq*gstm2*yc*(3./8.*o*
     #    x12*tx*x2zs-3./8.*o*tx*x2zc-3./8.*o*tx*x2zs+3./4.*o*
     #    x2zc+3./8.*o*x2zs*txs+3./8.*os*tx*x2zs-3./8.*os*x2zc+
     #    3./8.*x12*tx*x2zs+3./8.*x12*x2zs*txs+3./8.*tx*x2zc-3./8.
     #    *x2zc-3./4.*x2zs*txs)
      gz20q= gz20q+rwwgz(4,13)*bxpi*vvq*gstm2*yc*(3./8.*o
     #    *x12*x2z*tx-3./4.*o*x12*x2zs-3./4.*o*x2z*tx+9./8.*o*x2z
     #    *txs-3./4.*o*tx*x2zs+9./4.*o*x2zs+3./4.*os*x2z*tx-9./
     #    8.*os*x2zs+3./4.*x12*x2z*tx+9./8.*x12*x2z*txs-3./8.*x12
     #    *tx*x2zs+3./4.*x12*x2zs-3./8.*x2z*tx*x12s-3./2.*x2z*txs
     #    +3./4.*tx*x2zs-9./8.*x2zs)
      gz20q= gz20q+rwwgz(4,13)*vvq*gstm2*bxps*yc*(3./8.
     #    +3./4.*o*x12-3./4.*o+3./8.*os-3./4.*x12+3./8.*x12s
     #    )
      gz20q= gz20q+rwwgz(4,13)*vvq*gstm2*yc*bxp*(-3./8.
     #    -25./16.*o*x12*x2z+1./8.*o*x12*tx-13./16.*o*x12-7./16.
     #    *o*x2z*tx+37./16.*o*x2z-7./16.*o*tx+1./16.*o*x12s+7./
     #    8.*o*txs+3./4.*o-19./16.*os*x2z+7./16.*os*tx-5./16.*
     #    os-1./16.*oc-7./16.*x12*x2z*tx+3./2.*x12*x2z+5./16.*
     #    x12*tx+7./8.*x12*txs+3./4.*x12+7./16.*x2z*tx-3./8.*
     #    x2z*x12s-9./8.*x2z-5./16.*tx*x12s-3./8.*x12s-7./8.*
     #    txs)
      gz20q= gz20q+rwwgz(4,13)*vvq*gstm2*yc*(-3./8.*o*
     #    x12*x2z*tx+25./16.*o*x12*x2z+3./4.*o*x12*x2zs-1./8.*o*
     #    x12*txs+19./16.*o*x2z*tx-19./16.*o*x2z*txs-9./4.*o*x2z
     #    -1./16.*o*tx*x12s+13./16.*o*tx*x2zs+3./8.*o*tx-37./16.
     #    *o*x2zs-3./4.*o*txs+1./16.*os*x12*x2z-1./8.*os*x12*tx
     #    -3./4.*os*x2z*tx+17./16.*os*x2z-3./8.*os*tx+19./16.*
     #    os*x2zs-1./16.*os*txs+1./16.*oc*x2z-1./16.*oc*tx-5./
     #    16.*x12*x2z*tx-19./16.*x12*x2z*txs-3./2.*x12*x2z+3./8.*
     #    x12*tx*x2zs-3./8.*x12*tx-3./4.*x12*x2zs-3./4.*x12*txs
     #    +3./8.*x2z*tx*x12s-3./8.*x2z*tx+3./8.*x2z*x12s+13./8.
     #    *x2z*txs+9./8.*x2z+3./8.*tx*x12s-13./16.*tx*x2zs-1./
     #    16.*x12s*txs+9./8.*x2zs+3./4.*txs)
      gz20q= gz20q+rwwgz(4,14)*xx*vvq*gstm2*yc*(-3./8.
     #    *o*x12*tx*x2zs+3./8.*o*tx*x2zc-3./8.*o*x2zc-3./8.*o*
     #    x2zs*txs-3./8.*os*tx*x2zs+3./8.*os*x2zc-3./8.*x12*x2zs*
     #    txs+3./8.*tx*x2zc)
      gz20q= gz20q+rwwgz(4,14)*bxpi*vvq*gstm2*yc*(-3./4.
     #    *o*x12*x2z*tx+3./8.*o*x12*x2zs-3./4.*o*x2z*txs+3./8.*o*
     #    tx*x2zs-9./8.*o*x2zs-3./4.*os*x2z*tx+9./8.*os*x2zs-3./
     #    4.*x12*x2z*txs-3./8.*x12*tx*x2zs+9./8.*tx*x2zs)
      gz20q= gz20q+rwwgz(4,14)*vvq*gstm2*bxps*yc*(-3./8.
     #    *o*x12+3./8.*o*tx+3./8.*o-3./8.*os+3./8.*x12*tx-3./
     #    8.*tx)
      gz20q= gz20q+rwwgz(4,14)*vvq*gstm2*yc*bxp*(3./4.*o*
     #    x12*x2z-3./8.*o*x12*tx+3./8.*o*x12-3./8.*o*x2z*tx-9./
     #    8.*o*x2z-3./8.*o*tx-3./8.*o*txs-3./8.*o+9./8.*os*x2z
     #    -3./8.*os*tx+3./8.*os-3./4.*x12*x2z*tx-3./8.*x12*tx
     #    -3./8.*x12*txs+9./8.*x2z*tx+3./8.*tx)
      gz20q= gz20q+rwwgz(4,14)*vvq*gstm2*yc*(3./4.*o*x12
     #    *x2z*tx-3./4.*o*x12*x2z+3./8.*o*x12*tx-3./8.*o*x12*x2zs
     #    +3./8.*o*x2z*tx+3./4.*o*x2z*txs+9./8.*o*x2z-3./8.*o*
     #    tx*x2zs+9./8.*o*x2zs+3./8.*o*txs+3./4.*os*x2z*tx-9./8.
     #    *os*x2z+3./8.*os*tx-9./8.*os*x2zs+3./4.*x12*x2z*tx+3./
     #    4.*x12*x2z*txs+3./8.*x12*tx*x2zs+3./8.*x12*txs-9./8.*
     #    x2z*tx-9./8.*tx*x2zs)
      gz20q= gz20q+rwwgz(7,1)*xx*vvq*gstm2*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)
      gz20q= gz20q+rwwgz(7,1)*bxpi*vvq*gstm2*yc*(-9./4.
     #    *o*x12*x2z*tx-3./2.*o*x12*x2zs-9./4.*o*x2z*txs-3./4.*o*
     #    tx*x2zs+15./4.*o*x2zs-3./4.*os*x2z*tx-9./4.*os*x2zs+3.
     #    /2.*x12*x2z*tx-9./4.*x12*x2z*txs+3./2.*x12*x2zs-3./2.*
     #    x2z*tx*x12s+3./2.*x2z*txs+3./4.*tx*x2zs-3./2.*x2zs)
      gz20q= gz20q+rwwgz(7,1)*vvq*gstm2*yc*bxp*(-9./4.*
     #    o*x12*x2z-3./4.*o*x2z*tx+9./4.*o*x2z-1./4.*o*txs+1./4.
     #    *os*x12-3./2.*os*x2z-1./4.*os+1./4.*oc-3./4.*x12*x2z*
     #    tx+3./2.*x12*x2z-1./4.*x12*txs+3./4.*x2z*tx-3./4.*x2z
     #    *x12s-3./4.*x2z+1./4.*txs)
      gz20q= gz20q+rwwgz(7,1)*vvq*gstm2*yc*(9./4.*o*x12*
     #    x2z*tx+9./4.*o*x12*x2z+3./2.*o*x12*x2zs+3./4.*o*x2z*tx
     #    +5./2.*o*x2z*txs-9./4.*o*x2z+3./4.*o*tx*x2zs-15./4.*o
     #    *x2zs-1./4.*os*x12*x2z+3./4.*os*x2z*tx+7./4.*os*x2z+9.
     #    /4.*os*x2zs-1./4.*oc*x2z-3./4.*x12*x2z*tx+5./2.*x12*x2z
     #    *txs-3./2.*x12*x2z-3./2.*x12*x2zs+3./2.*x2z*tx*x12s-3.
     #    /4.*x2z*tx+3./4.*x2z*x12s-7./4.*x2z*txs+3./4.*x2z-3./
     #    4.*tx*x2zs+3./2.*x2zs)
      gz20q= gz20q+rwwgz(7,4)*xx*vvq*gstm2*yc*(-3./16.
     #    *o*x12*x2zc+3./8.*o*x12*x2zs*txs+3./16.*o*tx*x12s*x2zs-
     #    3./16.*o*tx*x2zq-3./16.*o*tx*x2zc+3./16.*o*x2zq+3./16.*
     #    o*x2zc*txs+3./8.*os*x12*tx*x2zs-3./16.*os*x12*x2zc-3./
     #    16.*os*x2zq+3./16.*os*x2zc+3./16.*os*x2zs*txs+3./16.*oc
     #    *tx*x2zs-3./16.*oc*x2zc-3./16.*x12*tx*x2zc+3./16.*x12*
     #    x2zc*txs+3./16.*tx*x2zq+3./16.*x12s*x2zs*txs-3./8.*x2zc
     #    *txs)
      gz20q= gz20q+rwwgz(7,4)*bxpi*vvq*gstm2*yc*(3./8.*o*
     #    x12*x2z*txs+3./8.*o*x12*tx*x2zs-3./16.*o*x12*x2zc-3./8.
     #    *o*x12*x2zs+3./16.*o*x2z*tx*x12s-3./8.*o*tx*x2zc-3./8.*
     #    o*tx*x2zs+3./16.*o*x12s*x2zs+3./8.*o*x2zc+9./16.*o*x2zs
     #    *txs+3./8.*os*x12*x2z*tx-3./16.*os*x12*x2zs+3./16.*os*
     #    x2z*txs+3./16.*os*tx*x2zs-3./8.*os*x2zc+3./8.*os*x2zs
     #    +3./16.*oc*x2z*tx-3./8.*oc*x2zs-3./16.*x12*tx*x2zc-3./
     #    8.*x12*tx*x2zs+9./16.*x12*x2zs*txs+3./16.*x2z*x12s*txs+
     #    3./16.*tx*x12s*x2zs+3./8.*tx*x2zc-3./4.*x2zs*txs)
      gz20q= gz20q+rwwgz(7,4)*vvq*gstm2*yc*bxp*(1./2.*o*
     #    x12*x2z*tx-1./4.*o*x12*x2z+1./16.*o*x12*tx-7./32.*o*x12
     #    *x2zs-1./8.*o*x12*txs-1./4.*o*x2z*tx+1./4.*o*x2z*x12s
     #    +7./16.*o*x2z*txs-3./32.*o*tx*x12s-7./32.*o*tx*x2zs+1.
     #    /32.*o*x12s-1./32.*o*x12c+7./32.*o*x2zs+1./16.*o*txs+
     #    1./16.*os*x12*x2z-3./32.*os*x12*tx+1./4.*os*x2z*tx+3./
     #    16.*os*x2z+1./32.*os*tx-1./32.*os*x12s-7./32.*os*x2zs
     #    -1./16.*os*txs+1./32.*oc*x12-3./16.*oc*x2z-1./32.*oc*
     #    tx-1./32.*oc+1./32.*oq-1./4.*x12*x2z*tx+7./16.*x12*
     #    x2z*txs-7./32.*x12*tx*x2zs+1./16.*x12*txs+1./4.*x2z*tx*
     #    x12s-7./16.*x2z*txs+1./32.*tx*x12s-1./32.*tx*x12c+7./
     #    32.*tx*x2zs-1./16.*x12s*txs)
      gz20q= gz20q+rwwgz(7,4)*vvq*gstm2*yc*(-7./16.*o*
     #    x12*x2z*tx-3./8.*o*x12*x2z*txs+3./16.*o*x12*x2z-13./32.
     #    *o*x12*tx*x2zs+3./16.*o*x12*x2zc+5./8.*o*x12*x2zs-7./32.
     #    *o*x2z*tx*x12s+3./16.*o*x2z*tx-7./32.*o*x2z*x12s-7./16.
     #    *o*x2z*txs+1./32.*o*tx*x12c+13./32.*o*tx*x2zc+5./8.*o*
     #    tx*x2zs-3./16.*o*x12s*x2zs+3./32.*o*x12s*txs-13./32.*o*
     #    x2zc-19./32.*o*x2zs*txs-3./16.*o*x2zs-7./16.*os*x12*x2z
     #    *tx+3./16.*os*x12*x2zs+3./32.*os*x12*txs-7./32.*os*x2z*
     #    tx-1./32.*os*x2z*x12s-3./16.*os*x2z*txs-3./16.*os*x2z
     #    +3./32.*os*tx*x12s-7./32.*os*tx*x2zs+13./32.*os*x2zc-
     #    3./16.*os*x2zs-1./16.*oc*x12*x2z+3./32.*oc*x12*tx-7./32.
     #    *oc*x2z*tx+7./32.*oc*x2z+3./8.*oc*x2zs+1./32.*oc*txs-
     #    1./32.*oq*x2z+1./32.*oq*tx+3./16.*x12*x2z*tx-7./16.*x12
     #    *x2z*txs+3./16.*x12*tx*x2zc+5./8.*x12*tx*x2zs-19./32.*
     #    x12*x2zs*txs-7./32.*x2z*tx*x12s-3./16.*x2z*x12s*txs+3./
     #    8.*x2z*txs)
      gz20q= gz20q+rwwgz(7,4)*vvq*gstm2*yc*(-3./16.*tx
     #    *x12s*x2zs-13./32.*tx*x2zc-3./16.*tx*x2zs+1./32.*x12c*
     #    txs+13./16.*x2zs*txs)
      gz20q= gz20q+rwwgz(7,7)*xx*vvq*gstm2*yc*(-3./8.*
     #    o*x12*x2zs*txs+3./8.*o*x2zq-3./16.*o*x2zc*txs-3./16.*os
     #    *x12*x2zc-3./16.*os*x2zq+3./16.*os*x2zc-3./16.*os*x2zs*
     #    txs-3./16.*oc*x2zc+3./8.*x12*tx*x2zc-3./16.*x12*x2zc*
     #    txs-3./16.*x12s*x2zs*txs-3./16.*x2zq+3./16.*x2zc*txs)
      gz20q= gz20q+rwwgz(7,7)*bxpi*vvq*gstm2*yc*(-3./8.
     #    *o*x12*tx*x2zs-3./8.*o*x12*x2zc+3./4.*o*x2zc-3./16.*o*
     #    x2zs*txs-3./16.*os*x12*x2zs-3./8.*os*x2zc+3./16.*os*
     #    x2zs-3./16.*oc*x2zs+3./8.*x12*tx*x2zs+3./8.*x12*x2zc-
     #    3./16.*x12*x2zs*txs-3./8.*tx*x12s*x2zs-3./8.*x2zc+3./16.
     #    *x2zs*txs)
      gz20q= gz20q+rwwgz(7,7)*vvq*gstm2*bxps*yc*(1./16.
     #    +3./8.*o*x12-3./16.*o*x12s-3./16.*o-3./16.*os*x12+3.
     #    /16.*os-1./16.*oc-3./16.*x12+3./16.*x12s-1./16.*x12c
     #    )
      gz20q= gz20q+rwwgz(7,7)*vvq*gstm2*yc*bxp*(-1./2.*
     #    o*x12*x2z-1./4.*o*x12*tx-3./8.*o*x12*x2zs+1./8.*o*x12*
     #    txs+1./8.*o*x2z*x12s+3./8.*o*x2z+1./4.*o*tx*x12s+3./8.
     #    *o*x2zs-1./8.*o*txs+1./4.*os*x12*x2z+1./8.*os*x12*tx-
     #    1./8.*os*x12-3./8.*os*x2z+1./16.*os*x12s-3./16.*os*x2zs
     #    +1./16.*os*txs+1./16.*os+1./8.*oc*x12+1./8.*oc*x2z-
     #    1./8.*oc+1./16.*oq+1./4.*x12*x2z+1./8.*x12*tx+3./8.*
     #    x12*x2zs-1./8.*x12*txs-1./8.*x2z*x12s-1./8.*x2z-1./4.
     #    *tx*x12s+1./8.*tx*x12c-3./16.*x12s*x2zs+1./16.*x12s*txs
     #    -3./16.*x2zs+1./16.*txs)
      gz20q= gz20q+rwwgz(7,7)*vvq*gstm2*yc*(1./8.*o*x12*
     #    x2z*tx-1./8.*o*x12*x2z*txs+3./8.*o*x12*tx*x2zs+3./8.*o*
     #    x12*x2zc+1./2.*o*x12*x2zs+1./8.*o*x12*txs+1./8.*o*x2z*
     #    txs-3./16.*o*x12s*txs-3./4.*o*x2zc+3./16.*o*x2zs*txs-
     #    9./16.*o*x2zs+1./8.*os*x12*x2z+1./8.*os*x12*x2zs-3./16.
     #    *os*x12*txs-1./16.*os*x2z*x12s-1./16.*os*x2z*txs-1./16.
     #    *os*x2z+3./8.*os*x2zc+3./16.*os*x2zs+1./16.*os*txs-1./
     #    8.*oc*x12*x2z+1./8.*oc*x2z+1./8.*oc*x2zs-1./16.*oc*txs
     #    -1./16.*oq*x2z-1./8.*x12*x2z*tx+1./8.*x12*x2z*txs-3./
     #    8.*x12*tx*x2zs-3./8.*x12*x2zc+3./16.*x12*x2zs*txs-7./16.
     #    *x12*x2zs+1./8.*x2z*tx*x12s-1./16.*x2z*x12s*txs-1./16.*
     #    x2z*txs+3./8.*tx*x12s*x2zs+3./16.*x12s*x2zs+1./16.*x12s
     #    *txs-1./16.*x12c*txs+3./8.*x2zc-3./16.*x2zs*txs+1./4.
     #    *x2zs)
      gz20q= gz20q+rwwgz(7,8)*bxpi*vvq*gstm2*yc*(-3./8.
     #    *o*x12*x2z*txs+3./16.*o*x12*x2zs-3./16.*o*x2z*tx*x12s+3.
     #    /16.*o*tx*x2zc+3./16.*o*tx*x2zs-3./16.*o*x2zc-3./16.*o*
     #    x2zs*txs-3./8.*os*x12*x2z*tx+3./16.*os*x12*x2zs-3./16.*
     #    os*x2z*txs+3./16.*os*x2zc-3./16.*os*x2zs-3./16.*oc*x2z*
     #    tx+3./16.*oc*x2zs+3./16.*x12*tx*x2zs-3./16.*x12*x2zs*
     #    txs-3./16.*x2z*x12s*txs-3./16.*tx*x2zc+3./8.*x2zs*txs)
      gz20q= gz20q+rwwgz(7,8)*vvq*gstm2*yc*bxp*(-3./8.*
     #    o*x12*x2z*tx+1./8.*o*x12*x2z+3./16.*o*x12*tx+7./32.*o*
     #    x12*x2zs-1./8.*o*x12*txs-1./16.*o*x12+1./8.*o*x2z*tx-
     #    3./16.*o*x2z*x12s-7./16.*o*x2z*txs+1./16.*o*x2z-3./32.*
     #    o*tx*x12s+7./32.*o*tx*x2zs-1./16.*o*tx+3./32.*o*x12s-
     #    1./32.*o*x12c-7./32.*o*x2zs+3./16.*o*txs+1./16.*os*x12*
     #    x2z-3./32.*os*x12*tx-3./16.*os*x2z*tx-5./16.*os*x2z+3.
     #    /32.*os*tx-1./32.*os*x12s+7./32.*os*x2zs-1./16.*os*txs
     #    +1./16.*os+1./32.*oc*x12+1./4.*oc*x2z-1./32.*oc*tx-
     #    3./32.*oc+1./32.*oq+1./8.*x12*x2z*tx-7./16.*x12*x2z*txs
     #    +7./32.*x12*tx*x2zs-1./16.*x12*tx+3./16.*x12*txs-3./
     #    16.*x2z*tx*x12s+1./16.*x2z*tx+7./16.*x2z*txs+3./32.*tx*
     #    x12s-1./32.*tx*x12c-7./32.*tx*x2zs-1./16.*x12s*txs-1./
     #    8.*txs)
      gz20q= gz20q+rwwgz(7,8)*vvq*gstm2*yc*(5./16.*o*x12
     #    *x2z*tx+1./2.*o*x12*x2z*txs-1./8.*o*x12*x2z-1./32.*o*
     #    x12*tx*x2zs-3./8.*o*x12*x2zs-1./8.*o*x12*txs+7./32.*o*
     #    x2z*tx*x12s-1./8.*o*x2z*tx+5./32.*o*x2z*x12s+1./4.*o*
     #    x2z*txs-1./16.*o*tx*x12s+1./32.*o*tx*x12c-7./32.*o*tx*
     #    x2zc-5./16.*o*tx*x2zs+3./32.*o*x12s*txs+7./32.*o*x2zc
     #    +7./32.*o*x2zs*txs+1./8.*o*x2zs+7./16.*os*x12*x2z*tx+
     #    1./16.*os*x12*x2z-1./8.*os*x12*tx-1./4.*os*x12*x2zs+3./
     #    32.*os*x12*txs+5./32.*os*x2z*tx-1./32.*os*x2z*x12s+1./4.
     #    *os*x2z*txs+1./8.*os*x2z+3./32.*os*tx*x12s-1./32.*os*tx
     #    *x2zs-7./32.*os*x2zc+1./8.*os*x2zs-1./16.*os*txs-1./
     #    16.*oc*x12*x2z+3./32.*oc*x12*tx+7./32.*oc*x2z*tx-3./32.
     #    *oc*x2z-1./16.*oc*tx-1./4.*oc*x2zs+1./32.*oc*txs-1./
     #    32.*oq*x2z+1./32.*oq*tx-1./8.*x12*x2z*tx+1./4.*x12*x2z*
     #    txs-3./8.*x12*tx*x2zs+7./32.*x12*x2zs*txs+5./32.*x2z*tx
     #    *x12s)
      gz20q= gz20q+rwwgz(7,8)*vvq*gstm2*yc*(1./4.*x2z*
     #    x12s*txs-1./4.*x2z*txs+7./32.*tx*x2zc+1./8.*tx*x2zs-1.
     #    /16.*x12s*txs+1./32.*x12c*txs-7./16.*x2zs*txs)
      gz20q= gz20q+rwwgz(7,9)*bxpi*vvq*gstm2*yc*(3./8.*o*
     #    x12*x2z*tx+3./8.*o*x2z*txs+3./8.*o*tx*x2zs-3./8.*o*x2zs
     #    +3./8.*os*x2z*tx+3./8.*os*x2zs+3./8.*x12*x2z*txs-3./8.
     #    *tx*x2zs)
      gz20q= gz20q+rwwgz(7,9)*vvq*gstm2*yc*bxp*(7./16.*o*
     #    x12*x2z+1./8.*o*x12*tx-3./16.*o*x12+7./16.*o*x2z*tx-7.
     #    /16.*o*x2z-3./16.*o*tx+1./16.*o*x12s+1./8.*o+1./8.*os
     #    *x12+7./16.*os*x2z+1./16.*os*tx-3./16.*os+1./16.*oc
     #    +7./16.*x12*x2z*tx-3./16.*x12*tx-7./16.*x2z*tx+1./16.
     #    *tx*x12s+1./8.*tx)
      gz20q= gz20q+rwwgz(7,9)*vvq*gstm2*yc*(-1./2.*o*
     #    x12*x2z*tx-5./16.*o*x12*x2z+1./8.*o*x12*tx-1./8.*o*x12*
     #    txs-3./16.*o*x2z*tx-7./16.*o*x2z*txs+1./4.*o*x2z-1./
     #    16.*o*tx*x12s-7./16.*o*tx*x2zs+7./16.*o*x2zs+1./8.*o*
     #    txs-1./16.*os*x12*x2z-1./8.*os*x12*tx-1./2.*os*x2z*tx
     #    -3./16.*os*x2z+1./8.*os*tx-7./16.*os*x2zs-1./16.*os*
     #    txs-1./16.*oc*x2z-1./16.*oc*tx-5./16.*x12*x2z*tx-7./
     #    16.*x12*x2z*txs+1./8.*x12*txs+1./4.*x2z*tx+7./16.*tx*
     #    x2zs-1./16.*x12s*txs)
      gz20q= gz20q+rwwgz(7,10)*xx*vvq*gstm2*yc*(3./8.*o*
     #    x12*x2zs*txs-3./8.*o*x2zq+3./16.*o*x2zc*txs+3./16.*os*
     #    x12*x2zc+3./16.*os*x2zq-3./16.*os*x2zc+3./16.*os*x2zs*
     #    txs+3./16.*oc*x2zc-3./8.*x12*tx*x2zc+3./16.*x12*x2zc*
     #    txs+3./16.*x12s*x2zs*txs+3./16.*x2zq-3./16.*x2zc*txs)
      gz20q= gz20q+rwwgz(7,10)*bxpi*vvq*gstm2*yc*(3./8.*o
     #    *x12*x2z*txs+3./8.*o*x12*tx*x2zs+3./8.*o*x12*x2zc-9./8.
     #    *o*x2zc+3./8.*o*x2zs*txs+3./8.*os*x12*x2zs+3./16.*os*
     #    x2z*txs+9./16.*os*x2zc-3./8.*os*x2zs+3./8.*oc*x2zs-3./
     #    4.*x12*tx*x2zs-3./8.*x12*x2zc+3./8.*x12*x2zs*txs+3./16.
     #    *x2z*x12s*txs+3./8.*tx*x12s*x2zs+9./16.*x2zc-3./8.*x2zs
     #    *txs)
      gz20q= gz20q+rwwgz(7,10)*vvq*gstm2*bxps*yc*(-7./
     #    16.*o*x12*x2z-1./8.*o*x12+7./16.*o*x2z+3./32.*o*x12s+
     #    1./32.*o+3./32.*os*x12-7./32.*os*x2z-1./16.*os+1./32.
     #    *oc+7./16.*x12*x2z+1./32.*x12-7./32.*x2z*x12s-7./32.*
     #    x2z-1./16.*x12s+1./32.*x12c)
      gz20q= gz20q+rwwgz(7,10)*vvq*gstm2*yc*bxp*(7./16.*o
     #    *x12*x2z*tx+9./16.*o*x12*x2z+1./16.*o*x12*tx+13./16.*o*
     #    x12*x2zs-1./16.*o*x12*txs-1./16.*o*x2z*x12s+7./32.*o*
     #    x2z*txs-7./16.*o*x2z-1./8.*o*tx*x12s-5./4.*o*x2zs+1./
     #    32.*o*txs+3./32.*os*x12*x2z-1./16.*os*x12*tx+1./32.*os*
     #    x12+3./32.*os*x2z-1./32.*os*x12s+5./8.*os*x2zs-1./32.
     #    *os*txs-1./16.*oc*x12+5./32.*oc*x2z+1./32.*oc-1./32.*
     #    oq-7./16.*x12*x2z*tx+7./32.*x12*x2z*txs-7./16.*x12*x2z
     #    -13./16.*x12*x2zs+1./32.*x12*txs+7./16.*x2z*tx*x12s+1.
     #    /4.*x2z*x12s-7./32.*x2z*txs+3./16.*x2z+1./16.*tx*x12s
     #    -1./16.*tx*x12c+3./16.*x12s*x2zs-1./32.*x12s*txs+5./8.
     #    *x2zs)
      gz20q= gz20q+rwwgz(7,10)*vvq*gstm2*yc*(-7./16.*o
     #    *x12*x2z*tx-3./8.*o*x12*x2z*txs-3./8.*o*x12*tx*x2zs-3./
     #    8.*o*x12*x2zc-13./16.*o*x12*x2zs-7./32.*o*x2z*txs+3./32.
     #    *o*x12s*txs+19./16.*o*x2zc-13./32.*o*x2zs*txs+37./32.*o
     #    *x2zs-7./32.*os*x12*x2z-3./8.*os*x12*x2zs+3./32.*os*x12
     #    *txs+1./32.*os*x2z*x12s-3./16.*os*x2z*txs+3./16.*os*x2z
     #    -19./32.*os*x2zc-7./32.*os*x2zs+1./16.*oc*x12*x2z-7./
     #    32.*oc*x2z-3./8.*oc*x2zs+1./32.*oc*txs+1./32.*oq*x2z+
     #    3./8.*x12*x2z*tx-7./32.*x12*x2z*txs+13./16.*x12*tx*x2zs
     #    +3./8.*x12*x2zc-13./32.*x12*x2zs*txs+25./32.*x12*x2zs
     #    -7./16.*x2z*tx*x12s-3./16.*x2z*x12s*txs+3./16.*x2z*txs
     #    -3./8.*tx*x12s*x2zs-3./16.*x12s*x2zs+1./32.*x12c*txs-
     #    19./32.*x2zc+13./32.*x2zs*txs-9./16.*x2zs)
      gz20q= gz20q+rwwgz(7,11)*vvq*gstm2*yc*bxp*(1./16.*o
     #    *x12*x2z-1./8.*o*x12*tx+1./16.*o*x12+1./16.*o*x2z*tx-
     #    1./16.*o*x2z+1./16.*o*tx-1./16.*o*x12s-1./8.*o*txs+1./
     #    16.*os*x2z-1./16.*os*tx-1./16.*os+1./16.*oc+1./16.*
     #    x12*x2z*tx+1./16.*x12*tx-1./8.*x12*txs-1./16.*x2z*tx-
     #    1./16.*tx*x12s+1./8.*txs)
      gz20q= gz20q+rwwgz(7,11)*vvq*gstm2*yc*(-1./16.*o
     #    *x12*x2z+1./8.*o*x12*txs-1./16.*o*x2z*tx+1./16.*o*x2z*
     #    txs+1./16.*o*tx*x12s-1./16.*o*tx*x2zs+1./16.*o*x2zs-1.
     #    /16.*os*x12*x2z+1./8.*os*x12*tx+1./16.*os*x2z-1./16.*os
     #    *x2zs+1./16.*os*txs-1./16.*oc*x2z+1./16.*oc*tx-1./16.
     #    *x12*x2z*tx+1./16.*x12*x2z*txs-1./8.*x2z*txs+1./16.*tx*
     #    x2zs+1./16.*x12s*txs)
      gz20q= gz20q+rwwgz(7,12)*xx*vvq*gstm2*yc*(-3./4.
     #    *o*x12*x2z*txs+3./8.*o*x12*tx*x2zs+3./8.*o*tx*x2zc+3./8.
     #    *o*x2zc-3./8.*o*x2zs*txs-3./8.*os*x2z*txs+3./8.*os*tx*
     #    x2zs+3./4.*x12*tx*x2zs-3./8.*x12*x2zs*txs-3./8.*x2z*
     #    x12s*txs-3./8.*tx*x2zc-3./8.*x2zc+3./4.*x2zs*txs)
      gz20q= gz20q+rwwgz(7,12)*bxpi*vvq*gstm2*yc*(-3./4.
     #    *o*x12*x2z*tx-3./8.*o*x12*x2zs-3./4.*o*x2z*txs+3./8.*o*
     #    tx*x2zs+9./8.*o*x2zs-3./8.*os*x2zs+3./4.*x12*x2z*tx-3.
     #    /4.*x12*x2z*txs+3./8.*x12*tx*x2zs+3./4.*x12*x2zs-3./4.*
     #    x2z*tx*x12s+3./4.*x2z*txs-3./8.*tx*x2zs-3./4.*x2zs)
      gz20q= gz20q+rwwgz(7,12)*vvq*gstm2*yc*bxp*(-3./4.
     #    *o*x12*x2z+3./4.*o*x2z-3./8.*os*x2z+3./4.*x12*x2z-3./
     #    8.*x2z*x12s-3./8.*x2z)
      gz20q= gz20q+rwwgz(7,12)*vvq*gstm2*yc*(3./4.*o*x12
     #    *x2z*tx+3./4.*o*x12*x2z+3./8.*o*x12*x2zs+3./4.*o*x2z*
     #    txs-3./4.*o*x2z-3./8.*o*tx*x2zs-9./8.*o*x2zs+3./8.*os
     #    *x2z+3./8.*os*x2zs-3./4.*x12*x2z*tx+3./4.*x12*x2z*txs
     #    -3./4.*x12*x2z-3./8.*x12*tx*x2zs-3./4.*x12*x2zs+3./4.
     #    *x2z*tx*x12s+3./8.*x2z*x12s-3./4.*x2z*txs+3./8.*x2z+3.
     #    /8.*tx*x2zs+3./4.*x2zs)
      gz20q= gz20q+rwwgz(7,13)*xx*vvq*gstm2*yc*(-3./8.
     #    *o*x12*x2z*txs+3./8.*o*x2zc-3./8.*o*x2zs*txs-3./16.*os*
     #    x2z*txs-3./16.*os*x2zc+3./8.*x12*tx*x2zs-3./8.*x12*x2zs
     #    *txs-3./16.*x2z*x12s*txs-3./16.*x2zc+3./8.*x2zs*txs)
      gz20q= gz20q+rwwgz(7,13)*bxpi*vvq*gstm2*yc*(-3./8.
     #    *o*x12*x2z*tx-3./8.*o*x12*x2zs-3./8.*o*x2z*txs+3./4.*o*
     #    x2zs-3./8.*os*x2zs+3./8.*x12*x2z*tx-3./8.*x12*x2z*txs
     #    +3./8.*x12*x2zs-3./8.*x2z*tx*x12s+3./8.*x2z*txs-3./8.
     #    *x2zs)
      gz20q= gz20q+rwwgz(7,13)*vvq*gstm2*yc*bxp*(-3./8.
     #    *o*x12*x2z+3./8.*o*x2z-3./16.*os*x2z+3./8.*x12*x2z-3./
     #    16.*x2z*x12s-3./16.*x2z)
      gz20q= gz20q+rwwgz(7,13)*vvq*gstm2*yc*(3./8.*o*x12
     #    *x2z*tx+3./8.*o*x12*x2z+3./8.*o*x12*x2zs+3./8.*o*x2z*
     #    txs-3./8.*o*x2z-3./4.*o*x2zs+3./16.*os*x2z+3./8.*os*
     #    x2zs-3./8.*x12*x2z*tx+3./8.*x12*x2z*txs-3./8.*x12*x2z
     #    -3./8.*x12*x2zs+3./8.*x2z*tx*x12s+3./16.*x2z*x12s-3./
     #    8.*x2z*txs+3./16.*x2z+3./8.*x2zs)
      gz20q= gz20q+rwwgz(7,14)*xx*vvq*gstm2*yc*(3./16.*o
     #    *x12*tx*x2zs+3./16.*o*tx*x2zc-3./16.*o*x2zc+3./16.*o*
     #    x2zs*txs+3./16.*os*tx*x2zs+3./16.*os*x2zc+3./16.*x12*
     #    x2zs*txs-3./16.*tx*x2zc)
      gz20q= gz20q+rwwgz(7,14)*bxpi*vvq*gstm2*yc*(3./16.*
     #    o*x12*x2z*tx+3./16.*o*x12*x2zs+3./16.*o*x2z*txs+3./8.*o
     #    *tx*x2zs-3./8.*o*x2zs+3./16.*os*x2z*tx+3./8.*os*x2zs+
     #    3./16.*x12*x2z*txs+3./16.*x12*tx*x2zs-3./8.*tx*x2zs)
      gz20q= gz20q+rwwgz(7,14)*vvq*gstm2*bxps*yc*(1./16.
     #    +1./8.*o*x12-1./8.*o+1./16.*os-1./8.*x12+1./16.*
     #    x12s)
      gz20q= gz20q+rwwgz(7,14)*vvq*gstm2*yc*bxp*(1./16.*o
     #    *x12*x2z-1./8.*o*x12*tx+3./16.*o*x2z*tx+1./16.*o*x2z-
     #    1./16.*o*txs-1./16.*os*x12+1./16.*os*x2z+1./16.*os-1./
     #    16.*oc+3./16.*x12*x2z*tx+1./8.*x12*x2z+1./8.*x12*tx-1.
     #    /16.*x12*txs-3./16.*x2z*tx-1./8.*x2z-1./8.*tx*x12s+1./
     #    16.*txs)
      gz20q= gz20q+rwwgz(7,14)*vvq*gstm2*yc*(-3./16.*o
     #    *x12*x2z*tx-3./16.*o*x12*x2z-3./16.*o*x12*x2zs+1./8.*o*
     #    x12*txs-3./16.*o*x2z*tx-1./8.*o*x2z*txs+3./16.*o*x2z-
     #    3./8.*o*tx*x2zs+1./4.*o*x2zs+1./16.*os*x12*x2z-3./16.*
     #    os*x2z*tx-1./4.*os*x2z-5./16.*os*x2zs+1./16.*os*txs+1.
     #    /16.*oc*x2z-5./16.*x12*x2z*tx-1./8.*x12*x2z*txs-3./16.*
     #    x12*tx*x2zs+3./16.*x2z*tx-1./16.*x2z*txs+3./8.*tx*x2zs
     #    +1./16.*x12s*txs+1./16.*x2zs)
      gz20q= gz20q+rwwgz(8,1)*bxpi*vvq*gstm2*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)
      gz20q= gz20q+rwwgz(8,1)*vvq*gstm2*bxps*yc*(-3./2.
     #    -5*o*x12+2*o*tx+5*o-7./2.*os+2*x12*tx+3*x12-2*
     #    tx-3./2.*x12s)
      gz20q= gz20q+rwwgz(8,1)*vvq*gstm2*yc*bxp*(3./2.+
     #    13./4.*o*x12*x2z-5./2.*o*x12*tx+17./4.*o*x12+13./4.*o*
     #    x2z*tx-33./4.*o*x2z+1./4.*o*tx+1./4.*o*x12s-5*o*txs
     #    -9./2.*o+1./2.*os*x12+21./4.*os*x2z-15./4.*os*tx+11.
     #    /4.*os+1./4.*oc+5./4.*x12*x2z*tx-3*x12*x2z-11./4.*x12
     #    *tx-5*x12*txs-3*x12+3./4.*x2z*tx+3*x2z+5./4.*tx*
     #    x12s+3./2.*tx+3./2.*x12s+3*txs)
      gz20q= gz20q+rwwgz(8,1)*vvq*gstm2*yc*(3./2.*o*x12*
     #    x2z*tx-11./4.*o*x12*x2z+3./2.*o*x12*tx+1./2.*o*x12*txs
     #    -19./4.*o*x2z*tx+7./4.*o*x2z*txs+15./2.*o*x2z+1./4.*o
     #    *tx*x12s-7./4.*o*tx*x2zs-3./2.*o*tx+13./4.*o*x2zs+9./
     #    2.*o*txs-1./4.*os*x12*x2z+1./2.*os*x12*tx+3./2.*os*x2z*
     #    tx-17./4.*os*x2z+3*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+9./2.*x12*txs-3*x2z*
     #    txs-3*x2z-3./2.*tx*x12s+5./4.*tx*x2zs+1./4.*x12s*txs
     #    -3./2.*x2zs-3*txs)
      gz20q= gz20q+rwwgz(8,4)*bxpi*vvq*gstm2*yc*(3./4.*o*
     #    x12*x2zs-3./4.*o*tx*x2zs+3./4.*o*x2zc+3./4.*x12*tx*x2zs
     #    +3./4.*tx*x2zc-3./4.*x2zc-3./4.*x2zs*txs)
      gz20q= gz20q+rwwgz(8,4)*vvq*gstm2*bxps*yc*bxp*(-1
     #    -2*o*x12+2*o-os+2*x12-x12s)
      gz20q= gz20q+rwwgz(8,4)*vvq*gstm2*bxps*yc*(3./4.+
     #    11./4.*o*x12*x2z+o*x2z*tx-19./4.*o*x2z+o*tx+11./8.*o*
     #    x12s-o*txs-11./8.*o+11./8.*os*x12+15./8.*os*x2z-os*
     #    tx+1./2.*os+1./8.*oc+x12*x2z*tx-15./4.*x12*x2z-x12*
     #    tx-x12*txs-11./8.*x12-x2z*tx+7./8.*x2z*x12s+23./8.*
     #    x2z+tx*x12s+1./2.*x12s+1./8.*x12c+txs)
      gz20q= gz20q+rwwgz(8,4)*vvq*gstm2*yc*bxp*(-1./4.*
     #    o*x12*x2z*tx+1./4.*o*x12*x2z-7./8.*o*x12*x2zs+1./4.*o*
     #    x12*txs+3./4.*o*x12-5./2.*o*x2z*tx-o*x2z*x12s+7./8.*o
     #    *x2z*txs+7./2.*o*x2z-1./8.*o*tx*x12s-7./8.*o*tx*x2zs-
     #    3./4.*o*tx-5./8.*o*x12s-1./8.*o*x12c+29./8.*o*x2zs+5./
     #    8.*o*txs-9./8.*os*x12*x2z+1./8.*os*x12*tx-5./8.*os*x12
     #    +3./4.*os*x2z*tx-9./8.*os*x2z+5./8.*os*tx-1./4.*os*
     #    x12s-7./8.*os*x2zs+1./8.*os*txs-1./8.*oc*x12-1./8.*oc
     #    *x2z+1./8.*oc*tx+5./4.*x12*x2z*tx+7./8.*x12*x2z*txs+
     #    11./4.*x12*x2z-7./8.*x12*tx*x2zs+3./4.*x12*tx+7./4.*x12
     #    *x2zs+5./8.*x12*txs-x2z*tx*x12s+3./4.*x2z*tx-1./2.*
     #    x2z*x12s-15./8.*x2z*txs-9./4.*x2z-5./8.*tx*x12s-1./8.
     #    *tx*x12c+15./8.*tx*x2zs+1./8.*x12s*txs-11./4.*x2zs-3./
     #    4.*txs)
      gz20q= gz20q+rwwgz(8,4)*vvq*gstm2*yc*(-3./2.*o*
     #    x12*x2z-1./4.*o*x12*x2zs+3./2.*o*x2z*tx+5./8.*o*x2z*
     #    x12s-5./8.*o*x2z*txs+3./2.*o*tx*x2zs-7./8.*o*x2zc-23./
     #    8.*o*x2zs+5./8.*os*x12*x2z-5./8.*os*x2z*tx+5./8.*os*
     #    x2zs-3./2.*x12*x2z*tx-5./8.*x12*x2z*txs-1./4.*x12*tx*
     #    x2zs-11./8.*x12*x2zs+5./8.*x2z*tx*x12s+3./2.*x2z*txs-
     #    7./8.*tx*x2zc-3./2.*tx*x2zs+7./8.*x2zc+7./8.*x2zs*txs
     #    +9./4.*x2zs)
      gz20q= gz20q+rwwgz(8,7)*bxpi*vvq*gstm2*yc*(-3./8.
     #    *o*x12*x2z*txs+3./16.*o*x12*x2zs-3./16.*o*x2z*tx*x12s+3.
     #    /16.*o*tx*x2zc+3./16.*o*tx*x2zs-3./16.*o*x2zc-3./16.*o*
     #    x2zs*txs-3./8.*os*x12*x2z*tx+3./16.*os*x12*x2zs-3./16.*
     #    os*x2z*txs+3./16.*os*x2zc-3./16.*os*x2zs-3./16.*oc*x2z*
     #    tx+3./16.*oc*x2zs+3./16.*x12*tx*x2zs-3./16.*x12*x2zs*
     #    txs-3./16.*x2z*x12s*txs-3./16.*tx*x2zc+3./8.*x2zs*txs)
      gz20q= gz20q+rwwgz(8,7)*vvq*gstm2*yc*bxp*(-3./8.*
     #    o*x12*x2z*tx+1./8.*o*x12*x2z+3./16.*o*x12*tx+7./32.*o*
     #    x12*x2zs-1./8.*o*x12*txs-1./16.*o*x12+1./8.*o*x2z*tx-
     #    3./16.*o*x2z*x12s-7./16.*o*x2z*txs+1./16.*o*x2z-3./32.*
     #    o*tx*x12s+7./32.*o*tx*x2zs-1./16.*o*tx+3./32.*o*x12s-
     #    1./32.*o*x12c-7./32.*o*x2zs+3./16.*o*txs+1./16.*os*x12*
     #    x2z-3./32.*os*x12*tx-3./16.*os*x2z*tx-5./16.*os*x2z+3.
     #    /32.*os*tx-1./32.*os*x12s+7./32.*os*x2zs-1./16.*os*txs
     #    +1./16.*os+1./32.*oc*x12+1./4.*oc*x2z-1./32.*oc*tx-
     #    3./32.*oc+1./32.*oq+1./8.*x12*x2z*tx-7./16.*x12*x2z*txs
     #    +7./32.*x12*tx*x2zs-1./16.*x12*tx+3./16.*x12*txs-3./
     #    16.*x2z*tx*x12s+1./16.*x2z*tx+7./16.*x2z*txs+3./32.*tx*
     #    x12s-1./32.*tx*x12c-7./32.*tx*x2zs-1./16.*x12s*txs-1./
     #    8.*txs)
      gz20q= gz20q+rwwgz(8,7)*vvq*gstm2*yc*(5./16.*o*x12
     #    *x2z*tx+1./2.*o*x12*x2z*txs-1./8.*o*x12*x2z-1./32.*o*
     #    x12*tx*x2zs-3./8.*o*x12*x2zs-1./8.*o*x12*txs+7./32.*o*
     #    x2z*tx*x12s-1./8.*o*x2z*tx+5./32.*o*x2z*x12s+1./4.*o*
     #    x2z*txs-1./16.*o*tx*x12s+1./32.*o*tx*x12c-7./32.*o*tx*
     #    x2zc-5./16.*o*tx*x2zs+3./32.*o*x12s*txs+7./32.*o*x2zc
     #    +7./32.*o*x2zs*txs+1./8.*o*x2zs+7./16.*os*x12*x2z*tx+
     #    1./16.*os*x12*x2z-1./8.*os*x12*tx-1./4.*os*x12*x2zs+3./
     #    32.*os*x12*txs+5./32.*os*x2z*tx-1./32.*os*x2z*x12s+1./4.
     #    *os*x2z*txs+1./8.*os*x2z+3./32.*os*tx*x12s-1./32.*os*tx
     #    *x2zs-7./32.*os*x2zc+1./8.*os*x2zs-1./16.*os*txs-1./
     #    16.*oc*x12*x2z+3./32.*oc*x12*tx+7./32.*oc*x2z*tx-3./32.
     #    *oc*x2z-1./16.*oc*tx-1./4.*oc*x2zs+1./32.*oc*txs-1./
     #    32.*oq*x2z+1./32.*oq*tx-1./8.*x12*x2z*tx+1./4.*x12*x2z*
     #    txs-3./8.*x12*tx*x2zs+7./32.*x12*x2zs*txs+5./32.*x2z*tx
     #    *x12s)
      gz20q= gz20q+rwwgz(8,7)*vvq*gstm2*yc*(1./4.*x2z*
     #    x12s*txs-1./4.*x2z*txs+7./32.*tx*x2zc+1./8.*tx*x2zs-1.
     #    /16.*x12s*txs+1./32.*x12c*txs-7./16.*x2zs*txs)
      gz20q= gz20q+rwwgz(8,8)*vvq*gstm2*bxps*yc*bxp*(1+2
     #    *o*x12-2*o+os-2*x12+x12s)
      gz20q= gz20q+rwwgz(8,8)*vvq*gstm2*bxps*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)
      gz20q= gz20q+rwwgz(8,8)*vvq*gstm2*yc*bxp*(-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)
      gz20q= gz20q+rwwgz(8,8)*vvq*gstm2*yc*(o*x12*x2z-
     #    o*x2z*tx+o*x2zs+x12*x2z*tx-x2z*txs+tx*x2zs-x2zs)
      gz20q= gz20q+rwwgz(8,9)*vvq*gstm2*bxps*yc*(o*x12-
     #    o*tx-o+os-x12*tx+tx)
      gz20q= gz20q+rwwgz(8,9)*vvq*gstm2*yc*bxp*(o*x12*tx
     #    -o*x12-o*x2z*tx+o*x2z+o*tx+o*txs+o-os*x2z+os*
     #    tx-os+x12*tx+x12*txs-x2z*tx-tx)
      gz20q= gz20q+rwwgz(8,9)*vvq*gstm2*yc*(-o*x12*tx
     #    +o*x2z*tx-o*x2z-o*txs+os*x2z-os*tx-x12*txs+x2z*
     #    tx)
      gz20q= gz20q+rwwgz(8,10)*bxpi*vvq*gstm2*yc*(3./8.*o
     #    *x12*x2z*txs-3./16.*o*x12*x2zs+3./16.*o*x2z*tx*x12s-3./
     #    16.*o*tx*x2zc-3./16.*o*tx*x2zs+3./16.*o*x2zc+3./16.*o*
     #    x2zs*txs+3./8.*os*x12*x2z*tx-3./16.*os*x12*x2zs+3./16.*
     #    os*x2z*txs-3./16.*os*x2zc+3./16.*os*x2zs+3./16.*oc*x2z*
     #    tx-3./16.*oc*x2zs-3./16.*x12*tx*x2zs+3./16.*x12*x2zs*
     #    txs+3./16.*x2z*x12s*txs+3./16.*tx*x2zc-3./8.*x2zs*txs)
      gz20q= gz20q+rwwgz(8,10)*vvq*gstm2*bxps*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)
      gz20q= gz20q+rwwgz(8,10)*vvq*gstm2*yc*bxp*(3./8.*o*
     #    x12*x2z*tx-5./8.*o*x12*x2z+5./16.*o*x12*tx-7./32.*o*x12
     #    *x2zs+5./8.*o*x12*txs-3./16.*o*x12-5./8.*o*x2z*tx+3./
     #    16.*o*x2z*x12s+11./16.*o*x2z*txs+3./16.*o*x2z+11./32.*o
     #    *tx*x12s-15./32.*o*tx*x2zs-3./16.*o*tx+5./32.*o*x12s+
     #    1./32.*o*x12c+15./32.*o*x2zs+5./16.*o*txs-5./16.*os*x12
     #    *x2z+19./32.*os*x12*tx+3./16.*os*x2z*tx+5./16.*os*x2z
     #    +5./32.*os*tx+1./32.*os*x12s-15./32.*os*x2zs+5./16.*
     #    os*txs+3./16.*os-1./32.*oc*x12-1./2.*oc*x2z+9./32.*oc
     #    *tx-5./32.*oc-1./32.*oq-5./8.*x12*x2z*tx+11./16.*x12*
     #    x2z*txs-7./32.*x12*tx*x2zs-3./16.*x12*tx+5./16.*x12*txs
     #    +3./16.*x2z*tx*x12s+3./16.*x2z*tx-15./16.*x2z*txs+5./
     #    32.*tx*x12s+1./32.*tx*x12c+15./32.*tx*x2zs+5./16.*x12s*
     #    txs-3./8.*txs)
      gz20q= gz20q+rwwgz(8,10)*vvq*gstm2*yc*(-5./16.*o
     #    *x12*x2z*tx-1./2.*o*x12*x2z*txs+3./8.*o*x12*x2z+1./32.*
     #    o*x12*tx*x2zs+3./8.*o*x12*x2zs-3./8.*o*x12*txs-7./32.*o
     #    *x2z*tx*x12s+3./8.*o*x2z*tx-5./32.*o*x2z*x12s-1./2.*o*
     #    x2z*txs-3./16.*o*tx*x12s-1./32.*o*tx*x12c+7./32.*o*tx*
     #    x2zc+9./16.*o*tx*x2zs-3./32.*o*x12s*txs-7./32.*o*x2zc
     #    -7./32.*o*x2zs*txs-3./8.*o*x2zs-7./16.*os*x12*x2z*tx+
     #    3./16.*os*x12*x2z-3./8.*os*x12*tx+1./4.*os*x12*x2zs-3./
     #    32.*os*x12*txs-5./32.*os*x2z*tx+1./32.*os*x2z*x12s-1./4.
     #    *os*x2z*txs-3./8.*os*x2z-3./32.*os*tx*x12s+1./32.*os*tx
     #    *x2zs+7./32.*os*x2zc+1./8.*os*x2zs-3./16.*os*txs+1./
     #    16.*oc*x12*x2z-3./32.*oc*x12*tx-7./32.*oc*x2z*tx+11./32.
     #    *oc*x2z-3./16.*oc*tx+1./4.*oc*x2zs-1./32.*oc*txs+1./
     #    32.*oq*x2z-1./32.*oq*tx+3./8.*x12*x2z*tx-1./2.*x12*x2z*
     #    txs+3./8.*x12*tx*x2zs-7./32.*x12*x2zs*txs-5./32.*x2z*tx
     #    *x12s)
      gz20q= gz20q+rwwgz(8,10)*vvq*gstm2*yc*(-1./4.*
     #    x2z*x12s*txs+3./4.*x2z*txs-7./32.*tx*x2zc-3./8.*tx*x2zs
     #    -3./16.*x12s*txs-1./32.*x12c*txs+7./16.*x2zs*txs)
      gz20q= gz20q+rwwgz(8,11)*vvq*gstm2*bxps*yc*(1./4.
     #    +1./2.*o*x12-1./2.*o+1./4.*os-1./2.*x12+1./4.*x12s
     #    )
      gz20q= gz20q+rwwgz(8,11)*vvq*gstm2*yc*bxp*(-1./4.
     #    *o*x12*x2z+1./4.*o*x12-1./4.*o*x2z*tx+3./4.*o*x2z-1./
     #    4.*o*tx-1./4.*o*x12s+1./4.*o*txs-1./4.*os*x12-1./4.*
     #    os*x2z+1./4.*os*tx-1./4.*x12*x2z*tx+1./2.*x12*x2z+1./
     #    4.*x12*tx+1./4.*x12*txs+1./4.*x2z*tx-1./2.*x2z-1./4.*
     #    tx*x12s-1./4.*txs)
      gz20q= gz20q+rwwgz(8,11)*vvq*gstm2*yc*(-1./4.*o*
     #    x12*x2z+1./4.*o*x2z*tx-1./4.*o*x2zs-1./4.*x12*x2z*tx+
     #    1./4.*x2z*txs-1./4.*tx*x2zs+1./4.*x2zs)
      gz20q= gz20q+rwwgz(8,12)*bxpi*vvq*gstm2*yc*(3./4.*o
     #    *x2z*tx-3./4.*o*x2zs-3./4.*x12*x2z*tx+3./2.*x2z*txs-3.
     #    /2.*tx*x2zs+3./4.*x2zs)
      gz20q= gz20q+rwwgz(8,12)*vvq*gstm2*bxps*yc*(-1-
     #    2*o*x12+2*o-os+2*x12-x12s)
      gz20q= gz20q+rwwgz(8,12)*vvq*gstm2*yc*bxp*(3./4.+
     #    o*x12*x2z+5./4.*o*x12+7./4.*o*x2z*tx-3*o*x2z+o*tx+1.
     #    /4.*o*x12s-7./4.*o*txs-3./2.*o+1./4.*os*x12+os*x2z-
     #    os*tx+3./4.*os+7./4.*x12*x2z*tx-2*x12*x2z-x12*tx-7./
     #    4.*x12*txs-3./2.*x12-7./4.*x2z*tx+2*x2z+tx*x12s+3./
     #    4.*x12s+7./4.*txs)
      gz20q= gz20q+rwwgz(8,12)*vvq*gstm2*yc*(-1./2.*o*
     #    x12*x2z-5./2.*o*x2z*tx+9./4.*o*x2z-3./4.*o*tx+o*x2zs
     #    +3./2.*o*txs-3./4.*os*x2z+3./4.*os*tx-1./2.*x12*x2z*
     #    tx+3./2.*x12*x2z+3./4.*x12*tx+3./2.*x12*txs+3./2.*x2z
     #    *tx-7./4.*x2z*txs-3./2.*x2z-3./4.*tx*x12s+7./4.*tx*
     #    x2zs-x2zs-3./2.*txs)
      gz20q= gz20q+rwwgz(8,13)*bxpi*vvq*gstm2*yc*(-3./8.
     #    *o*x12*x2z*tx+3./8.*o*x2z*tx-3./8.*o*x2z*txs+3./8.*o*tx
     #    *x2zs-3./4.*o*x2zs-3./8.*os*x2z*tx+3./8.*os*x2zs-3./8.
     #    *x12*x2z*tx-3./8.*x12*x2z*txs+3./4.*x2z*txs-3./8.*tx*
     #    x2zs+3./8.*x2zs)
      gz20q= gz20q+rwwgz(8,13)*vvq*gstm2*bxps*yc*(-3./8.
     #    -3./4.*o*x12+3./4.*o-3./8.*os+3./4.*x12-3./8.*x12s
     #    )
      gz20q= gz20q+rwwgz(8,13)*vvq*gstm2*yc*bxp*(3./8.+
     #    13./16.*o*x12*x2z-1./8.*o*x12*tx+13./16.*o*x12+7./16.*o
     #    *x2z*tx-25./16.*o*x2z+7./16.*o*tx-1./16.*o*x12s-7./8.
     #    *o*txs-3./4.*o+13./16.*os*x2z-7./16.*os*tx+5./16.*os
     #    +1./16.*oc+7./16.*x12*x2z*tx-3./4.*x12*x2z-5./16.*x12
     #    *tx-7./8.*x12*txs-3./4.*x12-7./16.*x2z*tx+3./4.*x2z
     #    +5./16.*tx*x12s+3./8.*x12s+7./8.*txs)
      gz20q= gz20q+rwwgz(8,13)*vvq*gstm2*yc*(3./8.*o*x12
     #    *x2z*tx-13./16.*o*x12*x2z+1./8.*o*x12*txs-13./16.*o*x2z
     #    *tx+7./16.*o*x2z*txs+3./2.*o*x2z+1./16.*o*tx*x12s-7./
     #    16.*o*tx*x2zs-3./8.*o*tx+13./16.*o*x2zs+3./4.*o*txs-1.
     #    /16.*os*x12*x2z+1./8.*os*x12*tx+3./8.*os*x2z*tx-11./16.
     #    *os*x2z+3./8.*os*tx-7./16.*os*x2zs+1./16.*os*txs-1./
     #    16.*oc*x2z+1./16.*oc*tx-1./16.*x12*x2z*tx+7./16.*x12*
     #    x2z*txs+3./4.*x12*x2z+3./8.*x12*tx+3./4.*x12*txs+3./8.
     #    *x2z*tx-7./8.*x2z*txs-3./4.*x2z-3./8.*tx*x12s+7./16.*
     #    tx*x2zs+1./16.*x12s*txs-3./8.*x2zs-3./4.*txs)
      gz20q= gz20q+rwwgz(8,14)*bxpi*vvq*gstm2*yc*(3./8.*o
     #    *x12*x2z*tx+3./8.*o*x2z*txs-3./8.*o*tx*x2zs+3./8.*o*
     #    x2zs+3./8.*os*x2z*tx-3./8.*os*x2zs+3./8.*x12*x2z*txs-
     #    3./8.*tx*x2zs)
      gz20q= gz20q+rwwgz(8,14)*vvq*gstm2*bxps*yc*(3./8.*o
     #    *x12-3./8.*o*tx-3./8.*o+3./8.*os-3./8.*x12*tx+3./8.
     #    *tx)
      gz20q= gz20q+rwwgz(8,14)*vvq*gstm2*yc*bxp*(-7./16.
     #    *o*x12*x2z+1./2.*o*x12*tx-7./16.*o*x12-1./16.*o*x2z*tx
     #    +13./16.*o*x2z+5./16.*o*tx+1./16.*o*x12s+1./2.*o*txs
     #    +3./8.*o-13./16.*os*x2z+7./16.*os*tx-5./16.*os-1./
     #    16.*oc+5./16.*x12*x2z*tx+5./16.*x12*tx+1./2.*x12*txs-
     #    11./16.*x2z*tx+1./16.*tx*x12s-3./8.*tx-1./8.*txs)
      gz20q= gz20q+rwwgz(8,14)*vvq*gstm2*yc*(-3./8.*o*
     #    x12*x2z*tx+7./16.*o*x12*x2z-3./8.*o*x12*tx-1./8.*o*x12*
     #    txs+1./16.*o*x2z*tx-7./16.*o*x2z*txs-3./4.*o*x2z-1./
     #    16.*o*tx*x12s+7./16.*o*tx*x2zs-7./16.*o*x2zs-3./8.*o*
     #    txs+1./16.*os*x12*x2z-1./8.*os*x12*tx-3./8.*os*x2z*tx
     #    +11./16.*os*x2z-3./8.*os*tx+7./16.*os*x2zs-1./16.*os*
     #    txs+1./16.*oc*x2z-1./16.*oc*tx-5./16.*x12*x2z*tx-7./
     #    16.*x12*x2z*txs-3./8.*x12*txs+3./4.*x2z*tx+1./8.*x2z*
     #    txs+5./16.*tx*x2zs-1./16.*x12s*txs)
      gz20q= gz20q+rwwgz(9,1)*bxpi*vvq*gstm2*yc*(3*o*x2z*
     #    tx+3*o*txs+3*x12*txs-3*x2z*tx)
      gz20q= gz20q+rwwgz(9,1)*vvq*gstm2*yc*bxp*(11*o*tx
     #    +3*x12*tx-3*tx)
      gz20q= gz20q+rwwgz(9,1)*vvq*gstm2*yc*(-o*x12*tx
     #    -4*o*x2z*tx-9*o*tx-3*o*txs-os*tx-3*x12*tx-3*x12*
     #    txs+3*x2z*tx+3*tx)
      gz20q= gz20q+rwwgz(9,4)*bxpi*vvq*gstm2*yc*(-3./4.
     #    *o*x12*x2z*tx-3./4.*o*x2z*txs+3./4.*o*tx*x2zs-3./4.*o*
     #    x2zs-3./4.*os*x2z*tx+3./4.*os*x2zs-3./4.*x12*x2z*txs+
     #    3./4.*tx*x2zs)
      gz20q= gz20q+rwwgz(9,4)*vvq*gstm2*bxps*yc*(-o*x12
     #    +o*tx+o-os+x12*tx-tx)
      gz20q= gz20q+rwwgz(9,4)*vvq*gstm2*yc*bxp*(7./8.*o*
     #    x12*x2z-5./4.*o*x12*tx+5./8.*o*x12+1./8.*o*x2z*tx-15./
     #    8.*o*x2z-5./8.*o*tx+1./8.*o*x12s-o*txs-3./4.*o+1./4.
     #    *os*x12+15./8.*os*x2z-9./8.*os*tx+5./8.*os+1./8.*oc
     #    -7./8.*x12*x2z*tx-5./8.*x12*tx-x12*txs+15./8.*x2z*tx
     #    -1./8.*tx*x12s+3./4.*tx)
      gz20q= gz20q+rwwgz(9,4)*vvq*gstm2*yc*(3./4.*o*x12*
     #    x2z*tx-5./8.*o*x12*x2z+3./4.*o*x12*tx+1./4.*o*x12*txs
     #    -1./8.*o*x2z*tx+7./8.*o*x2z*txs+3./2.*o*x2z+1./8.*o*
     #    tx*x12s-7./8.*o*tx*x2zs+7./8.*o*x2zs+3./4.*o*txs-1./8.
     #    *os*x12*x2z+1./4.*os*x12*tx+3./4.*os*x2z*tx-11./8.*os*
     #    x2z+3./4.*os*tx-7./8.*os*x2zs+1./8.*os*txs-1./8.*oc*
     #    x2z+1./8.*oc*tx+5./8.*x12*x2z*tx+7./8.*x12*x2z*txs+3./
     #    4.*x12*txs-3./2.*x2z*tx-7./8.*tx*x2zs+1./8.*x12s*txs)
      gz20q= gz20q+rwwgz(9,7)*bxpi*vvq*gstm2*yc*(3./8.*o*
     #    x12*x2z*tx+3./8.*o*x2z*txs+3./8.*o*tx*x2zs-3./8.*o*x2zs
     #    +3./8.*os*x2z*tx+3./8.*os*x2zs+3./8.*x12*x2z*txs-3./8.
     #    *tx*x2zs)
      gz20q= gz20q+rwwgz(9,7)*vvq*gstm2*yc*bxp*(7./16.*o*
     #    x12*x2z+1./8.*o*x12*tx-3./16.*o*x12+7./16.*o*x2z*tx-7.
     #    /16.*o*x2z-3./16.*o*tx+1./16.*o*x12s+1./8.*o+1./8.*os
     #    *x12+7./16.*os*x2z+1./16.*os*tx-3./16.*os+1./16.*oc
     #    +7./16.*x12*x2z*tx-3./16.*x12*tx-7./16.*x2z*tx+1./16.
     #    *tx*x12s+1./8.*tx)
      gz20q= gz20q+rwwgz(9,7)*vvq*gstm2*yc*(-1./2.*o*
     #    x12*x2z*tx-5./16.*o*x12*x2z+1./8.*o*x12*tx-1./8.*o*x12*
     #    txs-3./16.*o*x2z*tx-7./16.*o*x2z*txs+1./4.*o*x2z-1./
     #    16.*o*tx*x12s-7./16.*o*tx*x2zs+7./16.*o*x2zs+1./8.*o*
     #    txs-1./16.*os*x12*x2z-1./8.*os*x12*tx-1./2.*os*x2z*tx
     #    -3./16.*os*x2z+1./8.*os*tx-7./16.*os*x2zs-1./16.*os*
     #    txs-1./16.*oc*x2z-1./16.*oc*tx-5./16.*x12*x2z*tx-7./
     #    16.*x12*x2z*txs+1./8.*x12*txs+1./4.*x2z*tx+7./16.*tx*
     #    x2zs-1./16.*x12s*txs)
      gz20q= gz20q+rwwgz(9,8)*vvq*gstm2*bxps*yc*(o*x12-
     #    o*tx-o+os-x12*tx+tx)
      gz20q= gz20q+rwwgz(9,8)*vvq*gstm2*yc*bxp*(o*x12*tx
     #    -o*x12-o*x2z*tx+o*x2z+o*tx+o*txs+o-os*x2z+os*
     #    tx-os+x12*tx+x12*txs-x2z*tx-tx)
      gz20q= gz20q+rwwgz(9,8)*vvq*gstm2*yc*(-o*x12*tx
     #    +o*x2z*tx-o*x2z-o*txs+os*x2z-os*tx-x12*txs+x2z*
     #    tx)
      gz20q= gz20q+rwwgz(9,9)*vvq*gstm2*yc*bxp*(-4*o*tx
     #    )
      gz20q= gz20q+rwwgz(9,9)*vvq*gstm2*yc*(4*o*tx)
      gz20q= gz20q+rwwgz(9,10)*bxpi*vvq*gstm2*yc*(-3./8.
     #    *o*x12*x2z*tx-3./8.*o*x2z*txs-3./8.*o*tx*x2zs+3./8.*o*
     #    x2zs-3./8.*os*x2z*tx-3./8.*os*x2zs-3./8.*x12*x2z*txs+
     #    3./8.*tx*x2zs)
      gz20q= gz20q+rwwgz(9,10)*vvq*gstm2*bxps*yc*(1./2.*o
     #    *x12+1./2.*o*tx-1./2.*o+1./2.*os+1./2.*x12*tx-1./2.
     #    *tx)
      gz20q= gz20q+rwwgz(9,10)*vvq*gstm2*yc*bxp*(-7./16.
     #    *o*x12*x2z-5./8.*o*x12*tx-5./16.*o*x12-15./16.*o*x2z*tx
     #    +15./16.*o*x2z-5./16.*o*tx-1./16.*o*x12s-1./2.*o*txs
     #    +3./8.*o-1./8.*os*x12-15./16.*os*x2z-9./16.*os*tx-5.
     #    /16.*os-1./16.*oc-7./16.*x12*x2z*tx-5./16.*x12*tx-1./
     #    2.*x12*txs+15./16.*x2z*tx-1./16.*tx*x12s+3./8.*tx)
      gz20q= gz20q+rwwgz(9,10)*vvq*gstm2*yc*(1./2.*o*x12
     #    *x2z*tx+5./16.*o*x12*x2z+3./8.*o*x12*tx+1./8.*o*x12*txs
     #    +11./16.*o*x2z*tx+7./16.*o*x2z*txs-3./4.*o*x2z+1./16.
     #    *o*tx*x12s+7./16.*o*tx*x2zs-7./16.*o*x2zs+3./8.*o*txs
     #    +1./16.*os*x12*x2z+1./8.*os*x12*tx+1./2.*os*x2z*tx+11.
     #    /16.*os*x2z+3./8.*os*tx+7./16.*os*x2zs+1./16.*os*txs+
     #    1./16.*oc*x2z+1./16.*oc*tx+5./16.*x12*x2z*tx+7./16.*x12
     #    *x2z*txs+3./8.*x12*txs-3./4.*x2z*tx-7./16.*tx*x2zs+1./
     #    16.*x12s*txs)
      gz20q= gz20q+rwwgz(9,11)*vvq*gstm2*yc*bxp*(1./4.*o*
     #    x12-1./4.*o*tx-1./4.*o+1./4.*os-1./4.*x12*tx+1./4.*
     #    tx)
      gz20q= gz20q+rwwgz(9,11)*vvq*gstm2*yc*(1./4.*o*x12
     #    *tx-1./4.*o*x2z*tx+1./4.*o*x2z+1./4.*o*txs-1./4.*os*
     #    x2z+1./4.*os*tx+1./4.*x12*txs-1./4.*x2z*tx)
      gz20q= gz20q+rwwgz(9,12)*bxpi*vvq*gstm2*yc*(-3./2.
     #    *o*x2z*tx+3./2.*o*txs+3./2.*x12*txs-3./2.*x2z*tx)
      gz20q= gz20q+rwwgz(9,12)*vvq*gstm2*yc*bxp*(-1./4.
     #    *o*x12+7./4.*o*tx+1./4.*o-1./4.*os+7./4.*x12*tx-7./
     #    4.*tx)
      gz20q= gz20q+rwwgz(9,12)*vvq*gstm2*yc*(-1./4.*o*
     #    x12*tx+7./4.*o*x2z*tx-1./4.*o*x2z-3./2.*o*tx-7./4.*o*
     #    txs+1./4.*os*x2z-1./4.*os*tx-3./2.*x12*tx-7./4.*x12*
     #    txs+7./4.*x2z*tx+3./2.*tx)
      gz20q= gz20q+rwwgz(9,13)*bxpi*vvq*gstm2*yc*(3./4.*o
     #    *x2z*tx+3./4.*o*txs+3./4.*x12*txs-3./4.*x2z*tx)
      gz20q= gz20q+rwwgz(9,13)*vvq*gstm2*yc*bxp*(1./8.*o*
     #    x12+7./8.*o*tx-1./8.*o+1./8.*os+7./8.*x12*tx-7./8.*
     #    tx)
      gz20q= gz20q+rwwgz(9,13)*vvq*gstm2*yc*(-1./8.*o*
     #    x12*tx-7./8.*o*x2z*tx+1./8.*o*x2z-3./4.*o*tx-7./8.*o*
     #    txs-1./8.*os*x2z-1./8.*os*tx-3./4.*x12*tx-7./8.*x12*
     #    txs+7./8.*x2z*tx+3./4.*tx)
      gz20q= gz20q+rwwgz(9,14)*bxpi*vvq*gstm2*yc*(-3./2.
     #    *o*x2z*tx)
      gz20q= gz20q+rwwgz(9,14)*vvq*gstm2*yc*bxp*(-1./8.
     #    *o*x12-13./8.*o*tx+1./8.*o-1./8.*os-1./8.*x12*tx+1./
     #    8.*tx)
      gz20q= gz20q+rwwgz(9,14)*vvq*gstm2*yc*(1./8.*o*x12
     #    *tx+13./8.*o*x2z*tx-1./8.*o*x2z+3./2.*o*tx+1./8.*o*
     #    txs+1./8.*os*x2z+1./8.*os*tx+1./8.*x12*txs-1./8.*x2z*
     #    tx)
      gz20q= gz20q+rwwgz(10,1)*xx*vvq*gstm2*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)
      gz20q= gz20q+rwwgz(10,1)*bxpi*vvq*gstm2*yc*(9./4.*o
     #    *x12*x2z*tx+3./2.*o*x12*x2zs+3./2.*o*x12*txs+15./4.*o*
     #    x2z*txs+3./4.*o*tx*x2zs-21./4.*o*x2zs+3./4.*os*x2z*tx
     #    +3*os*x2zs+3./4.*os*txs-3*x12*x2z*tx+15./4.*x12*x2z*
     #    txs-3./2.*x12*x2zs+3./2.*x2z*tx*x12s-3*x2z*txs-3./4.*
     #    tx*x2zs+3./4.*x12s*txs+9./4.*x2zs)
      gz20q= gz20q+rwwgz(10,1)*vvq*gstm2*bxps*yc*(-3./4.
     #    -5./2.*o*x12-o*tx+5./2.*o-7./4.*os-x12*tx+3./2.*
     #    x12+tx-3./4.*x12s)
      gz20q= gz20q+rwwgz(10,1)*vvq*gstm2*yc*bxp*(3./4.+
     #    31./8.*o*x12*x2z+11./4.*o*x12*tx+17./8.*o*x12+15./8.*o*
     #    x2z*tx-51./8.*o*x2z+5./8.*o*tx+1./8.*o*x12s+11./4.*o*
     #    txs-9./4.*o+33./8.*os*x2z+9./8.*os*tx+13./8.*os-1./
     #    8.*oc+7./8.*x12*x2z*tx-3*x12*x2z-7./8.*x12*tx+11./4.*
     #    x12*txs-3./2.*x12-15./8.*x2z*tx+3./4.*x2z*x12s+9./4.*
     #    x2z+13./8.*tx*x12s-3./4.*tx+3./4.*x12s-7./4.*txs)
      gz20q= gz20q+rwwgz(10,1)*vvq*gstm2*yc*(-5./2.*o*
     #    x12*x2z*tx-29./8.*o*x12*x2z-9./4.*o*x12*tx-3./2.*o*x12*
     #    x2zs-7./4.*o*x12*txs-11./8.*o*x2z*tx-33./8.*o*x2z*txs
     #    +6*o*x2z-1./8.*o*tx*x12s-7./8.*o*tx*x2zs+43./8.*o*
     #    x2zs-9./4.*o*txs+1./8.*os*x12*x2z-1./4.*os*x12*tx-os*
     #    x2z*tx-31./8.*os*x2z-3./4.*os*tx-25./8.*os*x2zs-7./8.
     #    *os*txs+1./8.*oc*x2z-1./8.*oc*tx+19./8.*x12*x2z*tx-33.
     #    /8.*x12*x2z*txs+3*x12*x2z+3./2.*x12*tx+3./2.*x12*x2zs
     #    -9./4.*x12*txs-3./2.*x2z*tx*x12s+3./2.*x2z*tx-3./4.*
     #    x2z*x12s+13./4.*x2z*txs-9./4.*x2z-3./2.*tx*x12s+7./8.
     #    *tx*x2zs-7./8.*x12s*txs-9./4.*x2zs+3./2.*txs)
      gz20q= gz20q+rwwgz(10,4)*xx*vvq*gstm2*yc*(3./16.*o
     #    *x12*x2zc-3./8.*o*x12*x2zs*txs-3./16.*o*tx*x12s*x2zs+3./
     #    16.*o*tx*x2zq+3./16.*o*tx*x2zc-3./16.*o*x2zq-3./16.*o*
     #    x2zc*txs-3./8.*os*x12*tx*x2zs+3./16.*os*x12*x2zc+3./16.
     #    *os*x2zq-3./16.*os*x2zc-3./16.*os*x2zs*txs-3./16.*oc*tx
     #    *x2zs+3./16.*oc*x2zc+3./16.*x12*tx*x2zc-3./16.*x12*x2zc
     #    *txs-3./16.*tx*x2zq-3./16.*x12s*x2zs*txs+3./8.*x2zc*txs
     #    )
      gz20q= gz20q+rwwgz(10,4)*bxpi*vvq*gstm2*yc*(-3./4.
     #    *o*x12*x2z*txs-3./8.*o*x12*tx*x2zs+3./16.*o*x12*x2zc+9./
     #    16.*o*x12*x2zs-3./8.*o*x2z*tx*x12s+9./16.*o*tx*x2zc+9./
     #    16.*o*tx*x2zs-3./16.*o*x12s*x2zs-9./16.*o*x2zc-3./4.*o*
     #    x2zs*txs-3./4.*os*x12*x2z*tx+3./8.*os*x12*x2zs-3./8.*os
     #    *x2z*txs-3./16.*os*tx*x2zs+9./16.*os*x2zc-9./16.*os*
     #    x2zs-3./8.*oc*x2z*tx+9./16.*oc*x2zs+3./16.*x12*tx*x2zc
     #    +9./16.*x12*tx*x2zs-3./4.*x12*x2zs*txs-3./8.*x2z*x12s*
     #    txs-3./16.*tx*x12s*x2zs-9./16.*tx*x2zc+9./8.*x2zs*txs)
      gz20q= gz20q+rwwgz(10,4)*vvq*gstm2*bxps*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)
      gz20q= gz20q+rwwgz(10,4)*vvq*gstm2*yc*bxp*(-7./8.
     #    *o*x12*x2z*tx+7./8.*o*x12*x2z-3./8.*o*x12*tx+7./16.*o*
     #    x12*x2zs-1./2.*o*x12*txs+3./16.*o*x12+7./8.*o*x2z*tx-
     #    7./16.*o*x2z*x12s-9./8.*o*x2z*txs-3./16.*o*x2z-1./4.*o*
     #    tx*x12s+11./16.*o*tx*x2zs+3./16.*o*tx-3./16.*o*x12s-
     #    11./16.*o*x2zs-3./8.*o*txs+1./4.*os*x12*x2z-1./2.*os*
     #    x12*tx-7./16.*os*x2z*tx-1./2.*os*x2z-3./16.*os*tx+11./
     #    16.*os*x2zs-1./4.*os*txs-3./16.*os+11./16.*oc*x2z-1./
     #    4.*oc*tx+3./16.*oc+7./8.*x12*x2z*tx-9./8.*x12*x2z*txs
     #    +7./16.*x12*tx*x2zs+3./16.*x12*tx-3./8.*x12*txs-7./16.
     #    *x2z*tx*x12s-3./16.*x2z*tx+11./8.*x2z*txs-3./16.*tx*
     #    x12s-11./16.*tx*x2zs-1./4.*x12s*txs+3./8.*txs)
      gz20q= gz20q+rwwgz(10,4)*vvq*gstm2*yc*(3./4.*o*x12
     #    *x2z*tx+7./8.*o*x12*x2z*txs-9./16.*o*x12*x2z+3./8.*o*
     #    x12*tx*x2zs-3./16.*o*x12*x2zc-o*x12*x2zs+3./8.*o*x12*
     #    txs+7./16.*o*x2z*tx*x12s-9./16.*o*x2z*tx+3./8.*o*x2z*
     #    x12s+15./16.*o*x2z*txs+3./16.*o*tx*x12s-5./8.*o*tx*x2zc
     #    -19./16.*o*tx*x2zs+3./16.*o*x12s*x2zs+5./8.*o*x2zc+13.
     #    /16.*o*x2zs*txs+9./16.*o*x2zs+7./8.*os*x12*x2z*tx-3./16.
     #    *os*x12*x2z+3./8.*os*x12*tx-7./16.*os*x12*x2zs+3./8.*os
     #    *x2z*tx+7./16.*os*x2z*txs+9./16.*os*x2z+3./16.*os*tx*
     #    x2zs-5./8.*os*x2zc+1./16.*os*x2zs+3./16.*os*txs+7./16.
     #    *oc*x2z*tx-9./16.*oc*x2z+3./16.*oc*tx-5./8.*oc*x2zs-9.
     #    /16.*x12*x2z*tx+15./16.*x12*x2z*txs-3./16.*x12*tx*x2zc-
     #    x12*tx*x2zs+13./16.*x12*x2zs*txs+3./8.*x2z*tx*x12s+7./
     #    16.*x2z*x12s*txs-9./8.*x2z*txs+3./16.*tx*x12s*x2zs+5./8.
     #    *tx*x2zc+9./16.*tx*x2zs+3./16.*x12s*txs-5./4.*x2zs*txs
     #    )
      gz20q= gz20q+rwwgz(10,7)*xx*vvq*gstm2*yc*(3./8.*o*
     #    x12*x2zs*txs-3./8.*o*x2zq+3./16.*o*x2zc*txs+3./16.*os*
     #    x12*x2zc+3./16.*os*x2zq-3./16.*os*x2zc+3./16.*os*x2zs*
     #    txs+3./16.*oc*x2zc-3./8.*x12*tx*x2zc+3./16.*x12*x2zc*
     #    txs+3./16.*x12s*x2zs*txs+3./16.*x2zq-3./16.*x2zc*txs)
      gz20q= gz20q+rwwgz(10,7)*bxpi*vvq*gstm2*yc*(3./8.*o
     #    *x12*x2z*txs+3./8.*o*x12*tx*x2zs+3./8.*o*x12*x2zc-9./8.
     #    *o*x2zc+3./8.*o*x2zs*txs+3./8.*os*x12*x2zs+3./16.*os*
     #    x2z*txs+9./16.*os*x2zc-3./8.*os*x2zs+3./8.*oc*x2zs-3./
     #    4.*x12*tx*x2zs-3./8.*x12*x2zc+3./8.*x12*x2zs*txs+3./16.
     #    *x2z*x12s*txs+3./8.*tx*x12s*x2zs+9./16.*x2zc-3./8.*x2zs
     #    *txs)
      gz20q= gz20q+rwwgz(10,7)*vvq*gstm2*bxps*yc*(-7./
     #    16.*o*x12*x2z-1./8.*o*x12+7./16.*o*x2z+3./32.*o*x12s+
     #    1./32.*o+3./32.*os*x12-7./32.*os*x2z-1./16.*os+1./32.
     #    *oc+7./16.*x12*x2z+1./32.*x12-7./32.*x2z*x12s-7./32.*
     #    x2z-1./16.*x12s+1./32.*x12c)
      gz20q= gz20q+rwwgz(10,7)*vvq*gstm2*yc*bxp*(7./16.*o
     #    *x12*x2z*tx+9./16.*o*x12*x2z+1./16.*o*x12*tx+13./16.*o*
     #    x12*x2zs-1./16.*o*x12*txs-1./16.*o*x2z*x12s+7./32.*o*
     #    x2z*txs-7./16.*o*x2z-1./8.*o*tx*x12s-5./4.*o*x2zs+1./
     #    32.*o*txs+3./32.*os*x12*x2z-1./16.*os*x12*tx+1./32.*os*
     #    x12+3./32.*os*x2z-1./32.*os*x12s+5./8.*os*x2zs-1./32.
     #    *os*txs-1./16.*oc*x12+5./32.*oc*x2z+1./32.*oc-1./32.*
     #    oq-7./16.*x12*x2z*tx+7./32.*x12*x2z*txs-7./16.*x12*x2z
     #    -13./16.*x12*x2zs+1./32.*x12*txs+7./16.*x2z*tx*x12s+1.
     #    /4.*x2z*x12s-7./32.*x2z*txs+3./16.*x2z+1./16.*tx*x12s
     #    -1./16.*tx*x12c+3./16.*x12s*x2zs-1./32.*x12s*txs+5./8.
     #    *x2zs)
      gz20q= gz20q+rwwgz(10,7)*vvq*gstm2*yc*(-7./16.*o
     #    *x12*x2z*tx-3./8.*o*x12*x2z*txs-3./8.*o*x12*tx*x2zs-3./
     #    8.*o*x12*x2zc-13./16.*o*x12*x2zs-7./32.*o*x2z*txs+3./32.
     #    *o*x12s*txs+19./16.*o*x2zc-13./32.*o*x2zs*txs+37./32.*o
     #    *x2zs-7./32.*os*x12*x2z-3./8.*os*x12*x2zs+3./32.*os*x12
     #    *txs+1./32.*os*x2z*x12s-3./16.*os*x2z*txs+3./16.*os*x2z
     #    -19./32.*os*x2zc-7./32.*os*x2zs+1./16.*oc*x12*x2z-7./
     #    32.*oc*x2z-3./8.*oc*x2zs+1./32.*oc*txs+1./32.*oq*x2z+
     #    3./8.*x12*x2z*tx-7./32.*x12*x2z*txs+13./16.*x12*tx*x2zs
     #    +3./8.*x12*x2zc-13./32.*x12*x2zs*txs+25./32.*x12*x2zs
     #    -7./16.*x2z*tx*x12s-3./16.*x2z*x12s*txs+3./16.*x2z*txs
     #    -3./8.*tx*x12s*x2zs-3./16.*x12s*x2zs+1./32.*x12c*txs-
     #    19./32.*x2zc+13./32.*x2zs*txs-9./16.*x2zs)
      gz20q= gz20q+rwwgz(10,8)*bxpi*vvq*gstm2*yc*(3./8.*o
     #    *x12*x2z*txs-3./16.*o*x12*x2zs+3./16.*o*x2z*tx*x12s-3./
     #    16.*o*tx*x2zc-3./16.*o*tx*x2zs+3./16.*o*x2zc+3./16.*o*
     #    x2zs*txs+3./8.*os*x12*x2z*tx-3./16.*os*x12*x2zs+3./16.*
     #    os*x2z*txs-3./16.*os*x2zc+3./16.*os*x2zs+3./16.*oc*x2z*
     #    tx-3./16.*oc*x2zs-3./16.*x12*tx*x2zs+3./16.*x12*x2zs*
     #    txs+3./16.*x2z*x12s*txs+3./16.*tx*x2zc-3./8.*x2zs*txs)
      gz20q= gz20q+rwwgz(10,8)*vvq*gstm2*bxps*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)
      gz20q= gz20q+rwwgz(10,8)*vvq*gstm2*yc*bxp*(3./8.*o*
     #    x12*x2z*tx-5./8.*o*x12*x2z+5./16.*o*x12*tx-7./32.*o*x12
     #    *x2zs+5./8.*o*x12*txs-3./16.*o*x12-5./8.*o*x2z*tx+3./
     #    16.*o*x2z*x12s+11./16.*o*x2z*txs+3./16.*o*x2z+11./32.*o
     #    *tx*x12s-15./32.*o*tx*x2zs-3./16.*o*tx+5./32.*o*x12s+
     #    1./32.*o*x12c+15./32.*o*x2zs+5./16.*o*txs-5./16.*os*x12
     #    *x2z+19./32.*os*x12*tx+3./16.*os*x2z*tx+5./16.*os*x2z
     #    +5./32.*os*tx+1./32.*os*x12s-15./32.*os*x2zs+5./16.*
     #    os*txs+3./16.*os-1./32.*oc*x12-1./2.*oc*x2z+9./32.*oc
     #    *tx-5./32.*oc-1./32.*oq-5./8.*x12*x2z*tx+11./16.*x12*
     #    x2z*txs-7./32.*x12*tx*x2zs-3./16.*x12*tx+5./16.*x12*txs
     #    +3./16.*x2z*tx*x12s+3./16.*x2z*tx-15./16.*x2z*txs+5./
     #    32.*tx*x12s+1./32.*tx*x12c+15./32.*tx*x2zs+5./16.*x12s*
     #    txs-3./8.*txs)
      gz20q= gz20q+rwwgz(10,8)*vvq*gstm2*yc*(-5./16.*o
     #    *x12*x2z*tx-1./2.*o*x12*x2z*txs+3./8.*o*x12*x2z+1./32.*
     #    o*x12*tx*x2zs+3./8.*o*x12*x2zs-3./8.*o*x12*txs-7./32.*o
     #    *x2z*tx*x12s+3./8.*o*x2z*tx-5./32.*o*x2z*x12s-1./2.*o*
     #    x2z*txs-3./16.*o*tx*x12s-1./32.*o*tx*x12c+7./32.*o*tx*
     #    x2zc+9./16.*o*tx*x2zs-3./32.*o*x12s*txs-7./32.*o*x2zc
     #    -7./32.*o*x2zs*txs-3./8.*o*x2zs-7./16.*os*x12*x2z*tx+
     #    3./16.*os*x12*x2z-3./8.*os*x12*tx+1./4.*os*x12*x2zs-3./
     #    32.*os*x12*txs-5./32.*os*x2z*tx+1./32.*os*x2z*x12s-1./4.
     #    *os*x2z*txs-3./8.*os*x2z-3./32.*os*tx*x12s+1./32.*os*tx
     #    *x2zs+7./32.*os*x2zc+1./8.*os*x2zs-3./16.*os*txs+1./
     #    16.*oc*x12*x2z-3./32.*oc*x12*tx-7./32.*oc*x2z*tx+11./32.
     #    *oc*x2z-3./16.*oc*tx+1./4.*oc*x2zs-1./32.*oc*txs+1./
     #    32.*oq*x2z-1./32.*oq*tx+3./8.*x12*x2z*tx-1./2.*x12*x2z*
     #    txs+3./8.*x12*tx*x2zs-7./32.*x12*x2zs*txs-5./32.*x2z*tx
     #    *x12s)
      gz20q= gz20q+rwwgz(10,8)*vvq*gstm2*yc*(-1./4.*
     #    x2z*x12s*txs+3./4.*x2z*txs-7./32.*tx*x2zc-3./8.*tx*x2zs
     #    -3./16.*x12s*txs-1./32.*x12c*txs+7./16.*x2zs*txs)
      gz20q= gz20q+rwwgz(10,9)*bxpi*vvq*gstm2*yc*(-3./8.
     #    *o*x12*x2z*tx-3./8.*o*x2z*txs-3./8.*o*tx*x2zs+3./8.*o*
     #    x2zs-3./8.*os*x2z*tx-3./8.*os*x2zs-3./8.*x12*x2z*txs+
     #    3./8.*tx*x2zs)
      gz20q= gz20q+rwwgz(10,9)*vvq*gstm2*bxps*yc*(1./2.*o
     #    *x12+1./2.*o*tx-1./2.*o+1./2.*os+1./2.*x12*tx-1./2.
     #    *tx)
      gz20q= gz20q+rwwgz(10,9)*vvq*gstm2*yc*bxp*(-7./16.
     #    *o*x12*x2z-5./8.*o*x12*tx-5./16.*o*x12-15./16.*o*x2z*tx
     #    +15./16.*o*x2z-5./16.*o*tx-1./16.*o*x12s-1./2.*o*txs
     #    +3./8.*o-1./8.*os*x12-15./16.*os*x2z-9./16.*os*tx-5.
     #    /16.*os-1./16.*oc-7./16.*x12*x2z*tx-5./16.*x12*tx-1./
     #    2.*x12*txs+15./16.*x2z*tx-1./16.*tx*x12s+3./8.*tx)
      gz20q= gz20q+rwwgz(10,9)*vvq*gstm2*yc*(1./2.*o*x12
     #    *x2z*tx+5./16.*o*x12*x2z+3./8.*o*x12*tx+1./8.*o*x12*txs
     #    +11./16.*o*x2z*tx+7./16.*o*x2z*txs-3./4.*o*x2z+1./16.
     #    *o*tx*x12s+7./16.*o*tx*x2zs-7./16.*o*x2zs+3./8.*o*txs
     #    +1./16.*os*x12*x2z+1./8.*os*x12*tx+1./2.*os*x2z*tx+11.
     #    /16.*os*x2z+3./8.*os*tx+7./16.*os*x2zs+1./16.*os*txs+
     #    1./16.*oc*x2z+1./16.*oc*tx+5./16.*x12*x2z*tx+7./16.*x12
     #    *x2z*txs+3./8.*x12*txs-3./4.*x2z*tx-7./16.*tx*x2zs+1./
     #    16.*x12s*txs)
      gz20q= gz20q+rwwgz(10,10)*xx*vvq*gstm2*yc*(-3./8.
     #    *o*x12*x2zs*txs+3./8.*o*x2zq-3./16.*o*x2zc*txs-3./16.*
     #    os*x12*x2zc-3./16.*os*x2zq+3./16.*os*x2zc-3./16.*os*
     #    x2zs*txs-3./16.*oc*x2zc+3./8.*x12*tx*x2zc-3./16.*x12*
     #    x2zc*txs-3./16.*x12s*x2zs*txs-3./16.*x2zq+3./16.*x2zc*
     #    txs)
      gz20q= gz20q+rwwgz(10,10)*bxpi*vvq*gstm2*yc*(-3./
     #    4.*o*x12*x2z*txs-3./8.*o*x12*tx*x2zs-3./8.*o*x12*x2zc+3.
     #    /2.*o*x2zc-9./16.*o*x2zs*txs-9./16.*os*x12*x2zs-3./8.*
     #    os*x2z*txs-3./4.*os*x2zc+9./16.*os*x2zs-9./16.*oc*x2zs
     #    +9./8.*x12*tx*x2zs+3./8.*x12*x2zc-9./16.*x12*x2zs*txs
     #    -3./8.*x2z*x12s*txs-3./8.*tx*x12s*x2zs-3./4.*x2zc+9./
     #    16.*x2zs*txs)
      gz20q= gz20q+rwwgz(10,10)*vvq*gstm2*bxps*yc*bxp*(-
     #    1./4.-1./2.*o*x12+1./2.*o-1./4.*os+1./2.*x12-1./4.*
     #    x12s)
      gz20q= gz20q+rwwgz(10,10)*vvq*gstm2*bxps*yc*(3./16.
     #    +11./8.*o*x12*x2z+1./2.*o*x12*tx+3./8.*o*x12-15./8.*o
     #    *x2z+1./4.*o*txs-3./8.*o+1./4.*os*x12+15./16.*os*x2z
     #    -1./16.*os+1./4.*oc-11./8.*x12*x2z-1./2.*x12*tx+1./
     #    4.*x12*txs-3./8.*x12+7./16.*x2z*x12s+15./16.*x2z+1./2.
     #    *tx*x12s+3./16.*x12s-1./4.*txs)
      gz20q= gz20q+rwwgz(10,10)*vvq*gstm2*yc*bxp*(-7./8.
     #    *o*x12*x2z*tx-9./8.*o*x12*x2z-3./8.*o*x12*tx-5./4.*o*
     #    x12*x2zs-1./2.*o*x12*txs-11./16.*o*x2z*txs+3./2.*o*x2z
     #    +21./8.*o*x2zs-3./16.*o*txs-11./16.*os*x12*x2z-3./16.
     #    *os*x12-1./16.*os*x2z-21./16.*os*x2zs-1./4.*os*txs+3./
     #    16.*os-11./16.*oc*x2z-3./16.*oc+11./8.*x12*x2z*tx-11./
     #    16.*x12*x2z*txs+9./8.*x12*x2z+3./8.*x12*tx+5./4.*x12*
     #    x2zs-3./16.*x12*txs-7./8.*x2z*tx*x12s-3./8.*x2z*x12s+
     #    11./16.*x2z*txs-3./4.*x2z-3./8.*tx*x12s-3./16.*x12s*
     #    x2zs-1./4.*x12s*txs-21./16.*x2zs+3./16.*txs)
      gz20q= gz20q+rwwgz(10,10)*vvq*gstm2*yc*(3./4.*o*
     #    x12*x2z*tx+7./8.*o*x12*x2z*txs+3./8.*o*x12*tx*x2zs+3./8.
     #    *o*x12*x2zc+9./8.*o*x12*x2zs+3./8.*o*x12*txs+9./16.*o*
     #    x2z*txs-13./8.*o*x2zc+5./8.*o*x2zs*txs-9./4.*o*x2zs+9.
     #    /16.*os*x12*x2z+5./8.*os*x12*x2zs+7./16.*os*x2z*txs-9./
     #    16.*os*x2z+13./16.*os*x2zc+1./2.*os*x2zs+3./16.*os*txs
     #    +9./16.*oc*x2z+5./8.*oc*x2zs-9./8.*x12*x2z*tx+9./16.*
     #    x12*x2z*txs-5./4.*x12*tx*x2zs-3./8.*x12*x2zc+5./8.*x12*
     #    x2zs*txs-9./8.*x12*x2zs+3./4.*x2z*tx*x12s+7./16.*x2z*
     #    x12s*txs-9./16.*x2z*txs+3./8.*tx*x12s*x2zs+3./16.*x12s*
     #    x2zs+3./16.*x12s*txs+13./16.*x2zc-5./8.*x2zs*txs+9./8.
     #    *x2zs)
      gz20q= gz20q+rwwgz(10,12)*xx*vvq*gstm2*yc*(3./4.*o
     #    *x12*x2z*txs-3./8.*o*x12*tx*x2zs-3./8.*o*tx*x2zc-3./8.*
     #    o*x2zc+3./8.*o*x2zs*txs+3./8.*os*x2z*txs-3./8.*os*tx*
     #    x2zs-3./4.*x12*tx*x2zs+3./8.*x12*x2zs*txs+3./8.*x2z*
     #    x12s*txs+3./8.*tx*x2zc+3./8.*x2zc-3./4.*x2zs*txs)
      gz20q= gz20q+rwwgz(10,12)*bxpi*vvq*gstm2*yc*(3./8.*
     #    o*x12*x2z*tx+3./8.*o*x12*x2zs+3./4.*o*x12*txs+9./8.*o*
     #    x2z*txs-3./4.*o*tx*x2zs-3./2.*o*x2zs-3./8.*os*x2z*tx+
     #    3./8.*os*x2zs+3./8.*os*txs-3./2.*x12*x2z*tx+9./8.*x12*
     #    x2z*txs-3./8.*x12*tx*x2zs-3./4.*x12*x2zs+3./4.*x2z*tx*
     #    x12s-3./2.*x2z*txs+3./4.*tx*x2zs+3./8.*x12s*txs+9./8.
     #    *x2zs)
      gz20q= gz20q+rwwgz(10,12)*vvq*gstm2*bxps*yc*(-3./
     #    8.-3./4.*o*x12+3./4.*o-3./8.*os+3./4.*x12-3./8.*
     #    x12s)
      gz20q= gz20q+rwwgz(10,12)*vvq*gstm2*yc*bxp*(3./8.
     #    +17./16.*o*x12*x2z+7./8.*o*x12*tx+11./16.*o*x12-7./16.
     #    *o*x2z*tx-29./16.*o*x2z-1./16.*o*tx+1./16.*o*x12s+7./
     #    8.*o*txs-3./4.*o+11./16.*os*x2z+1./16.*os*tx+7./16.*
     #    os-1./16.*oc-7./16.*x12*x2z*tx-3./2.*x12*x2z-13./16.*
     #    x12*tx+7./8.*x12*txs-3./4.*x12+7./16.*x2z*tx+3./8.*
     #    x2z*x12s+9./8.*x2z+13./16.*tx*x12s+3./8.*x12s-7./8.*
     #    txs)
      gz20q= gz20q+rwwgz(10,12)*vvq*gstm2*yc*(-3./8.*o
     #    *x12*x2z*tx-17./16.*o*x12*x2z-3./4.*o*x12*tx-3./8.*o*
     #    x12*x2zs-7./8.*o*x12*txs+7./16.*o*x2z*tx-19./16.*o*x2z*
     #    txs+15./8.*o*x2z-1./16.*o*tx*x12s+13./16.*o*tx*x2zs+
     #    23./16.*o*x2zs-3./4.*o*txs+1./16.*os*x12*x2z-1./8.*os*
     #    x12*tx+3./8.*os*x2z*tx-13./16.*os*x2z-5./16.*os*x2zs-
     #    7./16.*os*txs+1./16.*oc*x2z-1./16.*oc*tx+31./16.*x12*
     #    x2z*tx-19./16.*x12*x2z*txs+3./2.*x12*x2z+3./8.*x12*tx*
     #    x2zs+3./4.*x12*tx+3./4.*x12*x2zs-3./4.*x12*txs-3./4.*
     #    x2z*tx*x12s-3./8.*x2z*tx-3./8.*x2z*x12s+13./8.*x2z*txs
     #    -9./8.*x2z-3./4.*tx*x12s-13./16.*tx*x2zs-7./16.*x12s*
     #    txs-9./8.*x2zs+3./4.*txs)
      gz20q= gz20q+rwwgz(10,13)*xx*vvq*gstm2*yc*(3./8.*o
     #    *x12*x2z*txs-3./8.*o*x2zc+3./8.*o*x2zs*txs+3./16.*os*
     #    x2z*txs+3./16.*os*x2zc-3./8.*x12*tx*x2zs+3./8.*x12*x2zs
     #    *txs+3./16.*x2z*x12s*txs+3./16.*x2zc-3./8.*x2zs*txs)
      gz20q= gz20q+rwwgz(10,13)*bxpi*vvq*gstm2*yc*(3./8.*
     #    o*x12*x2z*tx+3./8.*o*x12*x2zs+3./8.*o*x12*txs+3./4.*o*
     #    x2z*txs-9./8.*o*x2zs+9./16.*os*x2zs+3./16.*os*txs-3./
     #    4.*x12*x2z*tx+3./4.*x12*x2z*txs-3./8.*x12*x2zs+3./8.*
     #    x2z*tx*x12s-3./4.*x2z*txs+3./16.*x12s*txs+9./16.*x2zs)
      gz20q= gz20q+rwwgz(10,13)*vvq*gstm2*bxps*yc*(-1./
     #    4.-1./2.*o*x12+1./2.*o-1./4.*os+1./2.*x12-1./4.*
     #    x12s)
      gz20q= gz20q+rwwgz(10,13)*vvq*gstm2*yc*bxp*(3./16.
     #    +7./8.*o*x12*x2z+1./2.*o*x12*tx+3./8.*o*x12-11./8.*o*
     #    x2z+7./16.*o*txs-3./8.*o+1./16.*os*x12+11./16.*os*x2z
     #    +1./8.*os+1./16.*oc-7./8.*x12*x2z-1./2.*x12*tx+7./
     #    16.*x12*txs-3./8.*x12+3./16.*x2z*x12s+11./16.*x2z+1./
     #    2.*tx*x12s+3./16.*x12s-7./16.*txs)
      gz20q= gz20q+rwwgz(10,13)*vvq*gstm2*yc*(-3./8.*o
     #    *x12*x2z*tx-3./4.*o*x12*x2z-3./8.*o*x12*tx-3./8.*o*x12*
     #    x2zs-1./2.*o*x12*txs-13./16.*o*x2z*txs+9./8.*o*x2z+5./
     #    4.*o*x2zs-3./8.*o*txs-1./16.*os*x12*x2z-1./2.*os*x2z-
     #    5./8.*os*x2zs-1./4.*os*txs-1./16.*oc*x2z+7./8.*x12*x2z*
     #    tx-13./16.*x12*x2z*txs+3./4.*x12*x2z+3./8.*x12*tx+3./
     #    8.*x12*x2zs-3./8.*x12*txs-3./8.*x2z*tx*x12s-3./16.*x2z*
     #    x12s+13./16.*x2z*txs-9./16.*x2z-3./8.*tx*x12s-1./4.*
     #    x12s*txs-5./8.*x2zs+3./8.*txs)
      gz20q= gz20q+rwwgz(10,14)*xx*vvq*gstm2*yc*(-3./
     #    16.*o*x12*tx*x2zs-3./16.*o*tx*x2zc+3./16.*o*x2zc-3./16.
     #    *o*x2zs*txs-3./16.*os*tx*x2zs-3./16.*os*x2zc-3./16.*x12
     #    *x2zs*txs+3./16.*tx*x2zc)
      gz20q= gz20q+rwwgz(10,14)*bxpi*vvq*gstm2*yc*(-3./
     #    8.*o*x12*x2z*tx-3./16.*o*x12*x2zs-3./8.*o*x2z*txs-9./16.
     #    *o*tx*x2zs+9./16.*o*x2zs-3./8.*os*x2z*tx-9./16.*os*x2zs
     #    -3./8.*x12*x2z*txs-3./16.*x12*tx*x2zs+9./16.*tx*x2zs)
      gz20q= gz20q+rwwgz(10,14)*vvq*gstm2*bxps*yc*(3./16.
     #    *o*x12+3./16.*o*tx-3./16.*o+3./16.*os+3./16.*x12*tx
     #    -3./16.*tx)
      gz20q= gz20q+rwwgz(10,14)*vvq*gstm2*yc*bxp*(-3./8.
     #    *o*x12*x2z-3./16.*o*x12*tx-3./16.*o*x12-9./16.*o*x2z*tx
     #    +9./16.*o*x2z-3./16.*o*tx-3./16.*o*txs+3./16.*o-9./
     #    16.*os*x2z-3./16.*os*tx-3./16.*os-3./8.*x12*x2z*tx-3./
     #    16.*x12*tx-3./16.*x12*txs+9./16.*x2z*tx+3./16.*tx)
      gz20q= gz20q+rwwgz(10,14)*vvq*gstm2*yc*(3./8.*o*
     #    x12*x2z*tx+3./8.*o*x12*x2z+3./16.*o*x12*tx+3./16.*o*x12
     #    *x2zs+9./16.*o*x2z*tx+3./8.*o*x2z*txs-9./16.*o*x2z+9./
     #    16.*o*tx*x2zs-9./16.*o*x2zs+3./16.*o*txs+3./8.*os*x2z*
     #    tx+9./16.*os*x2z+3./16.*os*tx+9./16.*os*x2zs+3./8.*
     #    x12*x2z*tx+3./8.*x12*x2z*txs+3./16.*x12*tx*x2zs+3./16.*
     #    x12*txs-9./16.*x2z*tx-9./16.*tx*x2zs)
      gz20q= gz20q+rwwgz(11,1)*vvq*gstm2*bxps*yc*(-1+
     #    o+x12)
      gz20q= gz20q+rwwgz(11,1)*vvq*gstm2*yc*bxp*(-3./2.
     #    *o*x12-3./2.*o*x2z+1./2.*o*tx-1./2.*x12*x2z-3./2.*x12
     #    *tx+1./2.*x12-x2z*tx+3./2.*x2z+1./2.*tx-1./2.*x12s
     #    +txs)
      gz20q= gz20q+rwwgz(11,1)*vvq*gstm2*yc*(1./2.*o*x12
     #    *x2z+1./2.*o*x12*tx+1./2.*o*x2zs-1./2.*o*txs+3./2.*
     #    x12*x2z*tx-1./2.*x12*x2z-1./2.*x12*txs-1./2.*x2z*tx-
     #    x2z*txs+1./2.*tx*x12s+tx*x2zs-1./2.*x2zs)
      gz20q= gz20q+rwwgz(11,7)*vvq*gstm2*yc*bxp*(1./16.*o
     #    *x12*x2z-1./8.*o*x12*tx+1./16.*o*x12+1./16.*o*x2z*tx-
     #    1./16.*o*x2z+1./16.*o*tx-1./16.*o*x12s-1./8.*o*txs+1./
     #    16.*os*x2z-1./16.*os*tx-1./16.*os+1./16.*oc+1./16.*
     #    x12*x2z*tx+1./16.*x12*tx-1./8.*x12*txs-1./16.*x2z*tx-
     #    1./16.*tx*x12s+1./8.*txs)
      gz20q= gz20q+rwwgz(11,7)*vvq*gstm2*yc*(-1./16.*o
     #    *x12*x2z+1./8.*o*x12*txs-1./16.*o*x2z*tx+1./16.*o*x2z*
     #    txs+1./16.*o*tx*x12s-1./16.*o*tx*x2zs+1./16.*o*x2zs-1.
     #    /16.*os*x12*x2z+1./8.*os*x12*tx+1./16.*os*x2z-1./16.*os
     #    *x2zs+1./16.*os*txs-1./16.*oc*x2z+1./16.*oc*tx-1./16.
     #    *x12*x2z*tx+1./16.*x12*x2z*txs-1./8.*x2z*txs+1./16.*tx*
     #    x2zs+1./16.*x12s*txs)
      gz20q= gz20q+rwwgz(11,8)*vvq*gstm2*bxps*yc*(1./4.
     #    +1./2.*o*x12-1./2.*o+1./4.*os-1./2.*x12+1./4.*x12s
     #    )
      gz20q= gz20q+rwwgz(11,8)*vvq*gstm2*yc*bxp*(-1./4.
     #    *o*x12*x2z+1./4.*o*x12-1./4.*o*x2z*tx+3./4.*o*x2z-1./
     #    4.*o*tx-1./4.*o*x12s+1./4.*o*txs-1./4.*os*x12-1./4.*
     #    os*x2z+1./4.*os*tx-1./4.*x12*x2z*tx+1./2.*x12*x2z+1./
     #    4.*x12*tx+1./4.*x12*txs+1./4.*x2z*tx-1./2.*x2z-1./4.*
     #    tx*x12s-1./4.*txs)
      gz20q= gz20q+rwwgz(11,8)*vvq*gstm2*yc*(-1./4.*o*
     #    x12*x2z+1./4.*o*x2z*tx-1./4.*o*x2zs-1./4.*x12*x2z*tx+
     #    1./4.*x2z*txs-1./4.*tx*x2zs+1./4.*x2zs)
      gz20q= gz20q+rwwgz(11,9)*vvq*gstm2*yc*bxp*(1./4.*o*
     #    x12-1./4.*o*tx-1./4.*o+1./4.*os-1./4.*x12*tx+1./4.*
     #    tx)
      gz20q= gz20q+rwwgz(11,9)*vvq*gstm2*yc*(1./4.*o*x12
     #    *tx-1./4.*o*x2z*tx+1./4.*o*x2z+1./4.*o*txs-1./4.*os*
     #    x2z+1./4.*os*tx+1./4.*x12*txs-1./4.*x2z*tx)
      gz20q= gz20q+rwwgz(11,11)*vvq*gstm2*bxps*yc*(-1./
     #    2.+1./2.*o+1./2.*x12)
      gz20q= gz20q+rwwgz(11,11)*vvq*gstm2*yc*bxp*(-1./2.
     #    *o*x12-o*x2z+1./2.*o*tx-1./2.*x12*x2z-1./2.*x12*tx-
     #    1./2.*x2z*tx+x2z+1./2.*txs)
      gz20q= gz20q+rwwgz(11,11)*vvq*gstm2*yc*(1./2.*o*
     #    x12*x2z-1./2.*o*x2z*tx+1./2.*o*x2zs+1./2.*x12*x2z*tx-
     #    1./2.*x2z*txs+1./2.*tx*x2zs-1./2.*x2zs)
      gz20q= gz20q+rwwgz(11,12)*vvq*gstm2*yc*bxp*(-1./4.
     #    *o*x12+1./4.*o*x2z-1./4.*o*tx+1./4.*x12*x2z-1./4.*x12
     #    *tx+1./4.*x12-1./4.*x2z+1./4.*tx-1./4.*x12s)
      gz20q= gz20q+rwwgz(11,12)*vvq*gstm2*yc*(-1./4.*o
     #    *x12*x2z+1./4.*o*x12*tx+1./2.*o*x2z*tx-1./4.*o*x2zs-1.
     #    /4.*o*txs+1./4.*x12*x2z*tx-1./4.*x12*x2z-1./4.*x12*txs
     #    -1./4.*x2z*tx+1./4.*tx*x12s+1./4.*x2zs)
      gz20q= gz20q+rwwgz(11,13)*vvq*gstm2*yc*bxp*(-1./4.
     #    *o*x12-1./8.*o*x2z+1./8.*o-1./8.*os-1./8.*x12*x2z+1.
     #    /8.*x12+1./8.*x2z-1./8.*x12s)
      gz20q= gz20q+rwwgz(11,13)*vvq*gstm2*yc*(3./8.*o*
     #    x12*x2z+1./8.*o*x2z*tx-1./8.*o*x2z+1./8.*o*x2zs-1./4.
     #    *o*txs+1./8.*os*x2z-1./8.*os*tx+3./8.*x12*x2z*tx-1./8.
     #    *x12*x2z-1./4.*x12*txs+1./8.*tx*x12s-1./8.*x2zs)
      gz20q= gz20q+rwwgz(11,14)*vvq*gstm2*yc*bxp*(1./4.*o
     #    *x12-1./4.*x2z*tx+1./4.*txs)
      gz20q= gz20q+rwwgz(11,14)*vvq*gstm2*yc*(-1./4.*o
     #    *x12*x2z-1./4.*x2z*txs+1./4.*tx*x2zs)
      gz20q= gz20q+rwwgz(12,1)*xx*vvq*gstm2*yc*(-3*o*
     #    x2z*txs+3*o*tx*x2zs-3*x12*x2z*txs+6*x2z*txs-3*tx*x2zs
     #    )
      gz20q= gz20q+rwwgz(12,1)*bxpi*vvq*gstm2*yc*(6*o*x2z
     #    *tx-9*o*txs+3*x12*x2z*tx-9*x12*txs+6*txs)
      gz20q= gz20q+rwwgz(12,1)*vvq*gstm2*yc*bxp*(1+2*o*
     #    x12+1./2.*o*x2z-4*o*tx-5./2.*o+3./2.*os+1./2.*x12*
     #    x2z-4*x12*tx-3./2.*x12-1./2.*x2z+4*tx+1./2.*x12s)
      gz20q= gz20q+rwwgz(12,1)*vvq*gstm2*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+9*o*txs-1./2.*os*x2z+1./2.*os*tx-5./2.
     #    *x12*x2z*tx+1./2.*x12*x2z+3*x12*tx+9*x12*txs-x2z*tx
     #    -x2z+1./2.*tx*x12s-3*tx+1./2.*x2zs-6*txs)
      gz20q= gz20q+rwwgz(12,4)*xx*vvq*gstm2*yc*(-3./4.
     #    *o*tx*x2zs+3./4.*o*x2zc+3./4.*x12*tx*x2zs+3./2.*tx*x2zc
     #    -3./4.*x2zc-3./2.*x2zs*txs)
      gz20q= gz20q+rwwgz(12,4)*bxpi*vvq*gstm2*yc*(-3./4.
     #    *o*x12*x2zs-3./2.*o*x2z*tx+3./2.*o*x2z*txs-3./2.*o*tx*
     #    x2zs+3*o*x2zs+3./4.*os*x2z*tx-3./4.*os*x2zs+3./2.*x12
     #    *x2z*tx+3./2.*x12*x2z*txs-3./2.*x12*tx*x2zs+3./2.*x12*
     #    x2zs-3./4.*x2z*tx*x12s-3*x2z*txs+3*tx*x2zs-9./4.*x2zs
     #    )
      gz20q= gz20q+rwwgz(12,4)*vvq*gstm2*bxps*yc*(1+2*o
     #    *x12-2*o+os-2*x12+x12s)
      gz20q= gz20q+rwwgz(12,4)*vvq*gstm2*yc*bxp*(-3./4.
     #    -5./2.*o*x12*x2z-5./4.*o*x12-7./4.*o*x2z*tx+9./2.*o*
     #    x2z-o*tx-1./4.*o*x12s+7./4.*o*txs+3./2.*o-1./4.*os*
     #    x12-7./4.*os*x2z+os*tx-3./4.*os-7./4.*x12*x2z*tx+7./
     #    2.*x12*x2z+x12*tx+7./4.*x12*txs+3./2.*x12+7./4.*x2z*
     #    tx-3./4.*x2z*x12s-11./4.*x2z-tx*x12s-3./4.*x12s-7./
     #    4.*txs)
      gz20q= gz20q+rwwgz(12,4)*vvq*gstm2*yc*(2*o*x12*x2z
     #    +3./4.*o*x12*x2zs+13./4.*o*x2z*tx-3./2.*o*x2z*txs-15./
     #    4.*o*x2z+3./2.*o*tx*x2zs+3./4.*o*tx-13./4.*o*x2zs-3./
     #    2.*o*txs-3./4.*os*x2z*tx+3./2.*os*x2z-3./4.*os*tx+3./
     #    4.*os*x2zs-1./4.*x12*x2z*tx-3./2.*x12*x2z*txs-3*x12*x2z
     #    +3./2.*x12*tx*x2zs-3./4.*x12*tx-3./2.*x12*x2zs-3./2.*
     #    x12*txs+3./4.*x2z*tx*x12s-3./2.*x2z*tx+3./4.*x2z*x12s
     #    +13./4.*x2z*txs+9./4.*x2z+3./4.*tx*x12s-13./4.*tx*
     #    x2zs+5./2.*x2zs+3./2.*txs)
      gz20q= gz20q+rwwgz(12,7)*xx*vvq*gstm2*yc*(-3./4.
     #    *o*x12*x2z*txs+3./8.*o*x12*tx*x2zs+3./8.*o*tx*x2zc+3./8.
     #    *o*x2zc-3./8.*o*x2zs*txs-3./8.*os*x2z*txs+3./8.*os*tx*
     #    x2zs+3./4.*x12*tx*x2zs-3./8.*x12*x2zs*txs-3./8.*x2z*
     #    x12s*txs-3./8.*tx*x2zc-3./8.*x2zc+3./4.*x2zs*txs)
      gz20q= gz20q+rwwgz(12,7)*bxpi*vvq*gstm2*yc*(-3./4.
     #    *o*x12*x2z*tx-3./8.*o*x12*x2zs-3./4.*o*x2z*txs+3./8.*o*
     #    tx*x2zs+9./8.*o*x2zs-3./8.*os*x2zs+3./4.*x12*x2z*tx-3.
     #    /4.*x12*x2z*txs+3./8.*x12*tx*x2zs+3./4.*x12*x2zs-3./4.*
     #    x2z*tx*x12s+3./4.*x2z*txs-3./8.*tx*x2zs-3./4.*x2zs)
      gz20q= gz20q+rwwgz(12,7)*vvq*gstm2*yc*bxp*(-3./4.
     #    *o*x12*x2z+3./4.*o*x2z-3./8.*os*x2z+3./4.*x12*x2z-3./
     #    8.*x2z*x12s-3./8.*x2z)
      gz20q= gz20q+rwwgz(12,7)*vvq*gstm2*yc*(3./4.*o*x12
     #    *x2z*tx+3./4.*o*x12*x2z+3./8.*o*x12*x2zs+3./4.*o*x2z*
     #    txs-3./4.*o*x2z-3./8.*o*tx*x2zs-9./8.*o*x2zs+3./8.*os
     #    *x2z+3./8.*os*x2zs-3./4.*x12*x2z*tx+3./4.*x12*x2z*txs
     #    -3./4.*x12*x2z-3./8.*x12*tx*x2zs-3./4.*x12*x2zs+3./4.
     #    *x2z*tx*x12s+3./8.*x2z*x12s-3./4.*x2z*txs+3./8.*x2z+3.
     #    /8.*tx*x2zs+3./4.*x2zs)
      gz20q= gz20q+rwwgz(12,8)*bxpi*vvq*gstm2*yc*(3./4.*o
     #    *x2z*tx-3./4.*o*x2zs-3./4.*x12*x2z*tx+3./2.*x2z*txs-3.
     #    /2.*tx*x2zs+3./4.*x2zs)
      gz20q= gz20q+rwwgz(12,8)*vvq*gstm2*bxps*yc*(-1-
     #    2*o*x12+2*o-os+2*x12-x12s)
      gz20q= gz20q+rwwgz(12,8)*vvq*gstm2*yc*bxp*(3./4.+
     #    o*x12*x2z+5./4.*o*x12+7./4.*o*x2z*tx-3*o*x2z+o*tx+1.
     #    /4.*o*x12s-7./4.*o*txs-3./2.*o+1./4.*os*x12+os*x2z-
     #    os*tx+3./4.*os+7./4.*x12*x2z*tx-2*x12*x2z-x12*tx-7./
     #    4.*x12*txs-3./2.*x12-7./4.*x2z*tx+2*x2z+tx*x12s+3./
     #    4.*x12s+7./4.*txs)
      gz20q= gz20q+rwwgz(12,8)*vvq*gstm2*yc*(-1./2.*o*
     #    x12*x2z-5./2.*o*x2z*tx+9./4.*o*x2z-3./4.*o*tx+o*x2zs
     #    +3./2.*o*txs-3./4.*os*x2z+3./4.*os*tx-1./2.*x12*x2z*
     #    tx+3./2.*x12*x2z+3./4.*x12*tx+3./2.*x12*txs+3./2.*x2z
     #    *tx-7./4.*x2z*txs-3./2.*x2z-3./4.*tx*x12s+7./4.*tx*
     #    x2zs-x2zs-3./2.*txs)
      gz20q= gz20q+rwwgz(12,9)*bxpi*vvq*gstm2*yc*(-3./2.
     #    *o*x2z*tx+3./2.*o*txs+3./2.*x12*txs-3./2.*x2z*tx)
      gz20q= gz20q+rwwgz(12,9)*vvq*gstm2*yc*bxp*(-1./4.
     #    *o*x12+7./4.*o*tx+1./4.*o-1./4.*os+7./4.*x12*tx-7./
     #    4.*tx)
      gz20q= gz20q+rwwgz(12,9)*vvq*gstm2*yc*(-1./4.*o*
     #    x12*tx+7./4.*o*x2z*tx-1./4.*o*x2z-3./2.*o*tx-7./4.*o*
     #    txs+1./4.*os*x2z-1./4.*os*tx-3./2.*x12*tx-7./4.*x12*
     #    txs+7./4.*x2z*tx+3./2.*tx)
      gz20q= gz20q+rwwgz(12,10)*xx*vvq*gstm2*yc*(3./4.*o
     #    *x12*x2z*txs-3./8.*o*x12*tx*x2zs-3./8.*o*tx*x2zc-3./8.*
     #    o*x2zc+3./8.*o*x2zs*txs+3./8.*os*x2z*txs-3./8.*os*tx*
     #    x2zs-3./4.*x12*tx*x2zs+3./8.*x12*x2zs*txs+3./8.*x2z*
     #    x12s*txs+3./8.*tx*x2zc+3./8.*x2zc-3./4.*x2zs*txs)
      gz20q= gz20q+rwwgz(12,10)*bxpi*vvq*gstm2*yc*(3./8.*
     #    o*x12*x2z*tx+3./8.*o*x12*x2zs+3./4.*o*x12*txs+9./8.*o*
     #    x2z*txs-3./4.*o*tx*x2zs-3./2.*o*x2zs-3./8.*os*x2z*tx+
     #    3./8.*os*x2zs+3./8.*os*txs-3./2.*x12*x2z*tx+9./8.*x12*
     #    x2z*txs-3./8.*x12*tx*x2zs-3./4.*x12*x2zs+3./4.*x2z*tx*
     #    x12s-3./2.*x2z*txs+3./4.*tx*x2zs+3./8.*x12s*txs+9./8.
     #    *x2zs)
      gz20q= gz20q+rwwgz(12,10)*vvq*gstm2*bxps*yc*(-3./
     #    8.-3./4.*o*x12+3./4.*o-3./8.*os+3./4.*x12-3./8.*
     #    x12s)
      gz20q= gz20q+rwwgz(12,10)*vvq*gstm2*yc*bxp*(3./8.
     #    +17./16.*o*x12*x2z+7./8.*o*x12*tx+11./16.*o*x12-7./16.
     #    *o*x2z*tx-29./16.*o*x2z-1./16.*o*tx+1./16.*o*x12s+7./
     #    8.*o*txs-3./4.*o+11./16.*os*x2z+1./16.*os*tx+7./16.*
     #    os-1./16.*oc-7./16.*x12*x2z*tx-3./2.*x12*x2z-13./16.*
     #    x12*tx+7./8.*x12*txs-3./4.*x12+7./16.*x2z*tx+3./8.*
     #    x2z*x12s+9./8.*x2z+13./16.*tx*x12s+3./8.*x12s-7./8.*
     #    txs)
      gz20q= gz20q+rwwgz(12,10)*vvq*gstm2*yc*(-3./8.*o
     #    *x12*x2z*tx-17./16.*o*x12*x2z-3./4.*o*x12*tx-3./8.*o*
     #    x12*x2zs-7./8.*o*x12*txs+7./16.*o*x2z*tx-19./16.*o*x2z*
     #    txs+15./8.*o*x2z-1./16.*o*tx*x12s+13./16.*o*tx*x2zs+
     #    23./16.*o*x2zs-3./4.*o*txs+1./16.*os*x12*x2z-1./8.*os*
     #    x12*tx+3./8.*os*x2z*tx-13./16.*os*x2z-5./16.*os*x2zs-
     #    7./16.*os*txs+1./16.*oc*x2z-1./16.*oc*tx+31./16.*x12*
     #    x2z*tx-19./16.*x12*x2z*txs+3./2.*x12*x2z+3./8.*x12*tx*
     #    x2zs+3./4.*x12*tx+3./4.*x12*x2zs-3./4.*x12*txs-3./4.*
     #    x2z*tx*x12s-3./8.*x2z*tx-3./8.*x2z*x12s+13./8.*x2z*txs
     #    -9./8.*x2z-3./4.*tx*x12s-13./16.*tx*x2zs-7./16.*x12s*
     #    txs-9./8.*x2zs+3./4.*txs)
      gz20q= gz20q+rwwgz(12,11)*vvq*gstm2*yc*bxp*(-1./4.
     #    *o*x12+1./4.*o*x2z-1./4.*o*tx+1./4.*x12*x2z-1./4.*x12
     #    *tx+1./4.*x12-1./4.*x2z+1./4.*tx-1./4.*x12s)
      gz20q= gz20q+rwwgz(12,11)*vvq*gstm2*yc*(-1./4.*o
     #    *x12*x2z+1./4.*o*x12*tx+1./2.*o*x2z*tx-1./4.*o*x2zs-1.
     #    /4.*o*txs+1./4.*x12*x2z*tx-1./4.*x12*x2z-1./4.*x12*txs
     #    -1./4.*x2z*tx+1./4.*tx*x12s+1./4.*x2zs)
      gz20q= gz20q+rwwgz(12,12)*xx*vvq*gstm2*yc*(3*x2z*
     #    txs-3*tx*x2zs)
      gz20q= gz20q+rwwgz(12,12)*bxpi*vvq*gstm2*yc*(3*o*
     #    x2z*tx-3*o*txs+3*x12*x2z*tx-3*x12*txs-3*x2z*tx+3*
     #    txs)
      gz20q= gz20q+rwwgz(12,12)*vvq*gstm2*yc*bxp*(1./2.
     #    +o*x12-o+1./2.*os-x12+1./2.*x12s)
      gz20q= gz20q+rwwgz(12,12)*vvq*gstm2*yc*(-3*o*x2z
     #    *tx+1./2.*o*x2z+3*o*txs-3*x12*x2z*tx+1./2.*x12*x2z+
     #    3*x12*txs+3*x2z*tx-1./2.*x2z-3*txs)
      gz20q= gz20q+rwwgz(12,13)*xx*vvq*gstm2*yc*(-3./4.
     #    *o*x2z*txs+3./4.*o*tx*x2zs-3./4.*x12*x2z*txs+3./2.*x2z*
     #    txs-3./4.*tx*x2zs)
      gz20q= gz20q+rwwgz(12,13)*bxpi*vvq*gstm2*yc*(3./4.*
     #    o*x2z*tx-3./2.*o*txs+3./4.*x12*x2z*tx-3./2.*x12*txs-3.
     #    /4.*x2z*tx+3./2.*txs)
      gz20q= gz20q+rwwgz(12,13)*vvq*gstm2*yc*(-1./4.*o
     #    *x12*x2z+1./2.*o*x12*tx-3./4.*o*x2z*tx+1./4.*o*x2z-1./
     #    4.*o*tx+3./2.*o*txs-1./4.*os*x2z+1./4.*os*tx-3./4.*
     #    x12*x2z*tx-1./4.*x12*tx+3./2.*x12*txs+3./4.*x2z*tx+1./
     #    4.*tx*x12s-3./2.*txs)
      gz20q= gz20q+rwwgz(12,14)*xx*vvq*gstm2*yc*(3./4.*o
     #    *x2z*txs-3./4.*o*tx*x2zs+3./4.*x12*x2z*txs-3./4.*tx*
     #    x2zs)
      gz20q= gz20q+rwwgz(12,14)*bxpi*vvq*gstm2*yc*(3./4.*
     #    o*txs+3./4.*x12*x2z*tx+3./4.*x12*txs-3./2.*x2z*tx)
      gz20q= gz20q+rwwgz(12,14)*vvq*gstm2*yc*bxp*(1./8.*o
     #    *x2z+1./2.*o*tx+1./8.*o-1./8.*os+1./8.*x12*x2z+1./2.
     #    *x12*tx-1./8.*x12-1./8.*x2z-1./2.*tx+1./8.*x12s)
      gz20q= gz20q+rwwgz(12,14)*vvq*gstm2*yc*(1./8.*o*
     #    x12*x2z-1./4.*o*x12*tx+1./8.*o*x2z*tx-1./8.*o*x2z-3./
     #    4.*o*tx-1./8.*o*x2zs-3./4.*o*txs+1./8.*os*x2z-1./8.*
     #    os*tx-5./8.*x12*x2z*tx+1./8.*x12*x2z-3./4.*x12*tx-3./
     #    4.*x12*txs+5./4.*x2z*tx-1./8.*tx*x12s+3./4.*tx+1./8.*
     #    x2zs)
      gz20q= gz20q+rwwgz(13,1)*xx*vvq*gstm2*yc*(-3*o*
     #    x2z*txs-3*x12*x2z*txs+3*x2z*txs)
      gz20q= gz20q+rwwgz(13,1)*bxpi*vvq*gstm2*yc*(-3./2.
     #    *o*x2z*tx-9./2.*o*txs-9./2.*x12*txs+3./2.*x2z*tx+3*
     #    txs)
      gz20q= gz20q+rwwgz(13,1)*vvq*gstm2*yc*bxp*(-3./4.
     #    *o*x12-1./4.*o*x2z-7./4.*o*tx+1./2.*o-1./2.*os-1./4.
     #    *x12*x2z-7./4.*x12*tx+1./4.*x12+1./4.*x2z+7./4.*tx-
     #    1./4.*x12s)
      gz20q= gz20q+rwwgz(13,1)*vvq*gstm2*yc*(1./4.*o*x12
     #    *x2z+5./4.*o*x12*tx+2*o*x2z*tx+o*tx+1./4.*o*x2zs+17.
     #    /4.*o*txs+1./2.*os*tx+3./4.*x12*x2z*tx-1./4.*x12*x2z+
     #    x12*tx+17./4.*x12*txs-7./4.*x2z*tx+3./4.*tx*x12s-3./2.
     #    *tx-1./4.*x2zs-3*txs)
      gz20q= gz20q+rwwgz(13,4)*xx*vvq*gstm2*yc*(3./8.*o*
     #    x12*tx*x2zs-3./8.*o*tx*x2zc-3./8.*o*tx*x2zs+3./4.*o*
     #    x2zc+3./8.*o*x2zs*txs+3./8.*os*tx*x2zs-3./8.*os*x2zc+
     #    3./8.*x12*tx*x2zs+3./8.*x12*x2zs*txs+3./8.*tx*x2zc-3./8.
     #    *x2zc-3./4.*x2zs*txs)
      gz20q= gz20q+rwwgz(13,4)*bxpi*vvq*gstm2*yc*(3./8.*o
     #    *x12*x2z*tx-3./4.*o*x12*x2zs-3./4.*o*x2z*tx+9./8.*o*x2z
     #    *txs-3./4.*o*tx*x2zs+9./4.*o*x2zs+3./4.*os*x2z*tx-9./
     #    8.*os*x2zs+3./4.*x12*x2z*tx+9./8.*x12*x2z*txs-3./8.*x12
     #    *tx*x2zs+3./4.*x12*x2zs-3./8.*x2z*tx*x12s-3./2.*x2z*txs
     #    +3./4.*tx*x2zs-9./8.*x2zs)
      gz20q= gz20q+rwwgz(13,4)*vvq*gstm2*bxps*yc*(3./8.
     #    +3./4.*o*x12-3./4.*o+3./8.*os-3./4.*x12+3./8.*x12s
     #    )
      gz20q= gz20q+rwwgz(13,4)*vvq*gstm2*yc*bxp*(-3./8.
     #    -25./16.*o*x12*x2z+1./8.*o*x12*tx-13./16.*o*x12-7./16.
     #    *o*x2z*tx+37./16.*o*x2z-7./16.*o*tx+1./16.*o*x12s+7./
     #    8.*o*txs+3./4.*o-19./16.*os*x2z+7./16.*os*tx-5./16.*
     #    os-1./16.*oc-7./16.*x12*x2z*tx+3./2.*x12*x2z+5./16.*
     #    x12*tx+7./8.*x12*txs+3./4.*x12+7./16.*x2z*tx-3./8.*
     #    x2z*x12s-9./8.*x2z-5./16.*tx*x12s-3./8.*x12s-7./8.*
     #    txs)
      gz20q= gz20q+rwwgz(13,4)*vvq*gstm2*yc*(-3./8.*o*
     #    x12*x2z*tx+25./16.*o*x12*x2z+3./4.*o*x12*x2zs-1./8.*o*
     #    x12*txs+19./16.*o*x2z*tx-19./16.*o*x2z*txs-9./4.*o*x2z
     #    -1./16.*o*tx*x12s+13./16.*o*tx*x2zs+3./8.*o*tx-37./16.
     #    *o*x2zs-3./4.*o*txs+1./16.*os*x12*x2z-1./8.*os*x12*tx
     #    -3./4.*os*x2z*tx+17./16.*os*x2z-3./8.*os*tx+19./16.*
     #    os*x2zs-1./16.*os*txs+1./16.*oc*x2z-1./16.*oc*tx-5./
     #    16.*x12*x2z*tx-19./16.*x12*x2z*txs-3./2.*x12*x2z+3./8.*
     #    x12*tx*x2zs-3./8.*x12*tx-3./4.*x12*x2zs-3./4.*x12*txs
     #    +3./8.*x2z*tx*x12s-3./8.*x2z*tx+3./8.*x2z*x12s+13./8.
     #    *x2z*txs+9./8.*x2z+3./8.*tx*x12s-13./16.*tx*x2zs-1./
     #    16.*x12s*txs+9./8.*x2zs+3./4.*txs)
      gz20q= gz20q+rwwgz(13,7)*xx*vvq*gstm2*yc*(-3./8.
     #    *o*x12*x2z*txs+3./8.*o*x2zc-3./8.*o*x2zs*txs-3./16.*os*
     #    x2z*txs-3./16.*os*x2zc+3./8.*x12*tx*x2zs-3./8.*x12*x2zs
     #    *txs-3./16.*x2z*x12s*txs-3./16.*x2zc+3./8.*x2zs*txs)
      gz20q= gz20q+rwwgz(13,7)*bxpi*vvq*gstm2*yc*(-3./8.
     #    *o*x12*x2z*tx-3./8.*o*x12*x2zs-3./8.*o*x2z*txs+3./4.*o*
     #    x2zs-3./8.*os*x2zs+3./8.*x12*x2z*tx-3./8.*x12*x2z*txs
     #    +3./8.*x12*x2zs-3./8.*x2z*tx*x12s+3./8.*x2z*txs-3./8.
     #    *x2zs)
      gz20q= gz20q+rwwgz(13,7)*vvq*gstm2*yc*bxp*(-3./8.
     #    *o*x12*x2z+3./8.*o*x2z-3./16.*os*x2z+3./8.*x12*x2z-3./
     #    16.*x2z*x12s-3./16.*x2z)
      gz20q= gz20q+rwwgz(13,7)*vvq*gstm2*yc*(3./8.*o*x12
     #    *x2z*tx+3./8.*o*x12*x2z+3./8.*o*x12*x2zs+3./8.*o*x2z*
     #    txs-3./8.*o*x2z-3./4.*o*x2zs+3./16.*os*x2z+3./8.*os*
     #    x2zs-3./8.*x12*x2z*tx+3./8.*x12*x2z*txs-3./8.*x12*x2z
     #    -3./8.*x12*x2zs+3./8.*x2z*tx*x12s+3./16.*x2z*x12s-3./
     #    8.*x2z*txs+3./16.*x2z+3./8.*x2zs)
      gz20q= gz20q+rwwgz(13,8)*bxpi*vvq*gstm2*yc*(-3./8.
     #    *o*x12*x2z*tx+3./8.*o*x2z*tx-3./8.*o*x2z*txs+3./8.*o*tx
     #    *x2zs-3./4.*o*x2zs-3./8.*os*x2z*tx+3./8.*os*x2zs-3./8.
     #    *x12*x2z*tx-3./8.*x12*x2z*txs+3./4.*x2z*txs-3./8.*tx*
     #    x2zs+3./8.*x2zs)
      gz20q= gz20q+rwwgz(13,8)*vvq*gstm2*bxps*yc*(-3./8.
     #    -3./4.*o*x12+3./4.*o-3./8.*os+3./4.*x12-3./8.*x12s
     #    )
      gz20q= gz20q+rwwgz(13,8)*vvq*gstm2*yc*bxp*(3./8.+
     #    13./16.*o*x12*x2z-1./8.*o*x12*tx+13./16.*o*x12+7./16.*o
     #    *x2z*tx-25./16.*o*x2z+7./16.*o*tx-1./16.*o*x12s-7./8.
     #    *o*txs-3./4.*o+13./16.*os*x2z-7./16.*os*tx+5./16.*os
     #    +1./16.*oc+7./16.*x12*x2z*tx-3./4.*x12*x2z-5./16.*x12
     #    *tx-7./8.*x12*txs-3./4.*x12-7./16.*x2z*tx+3./4.*x2z
     #    +5./16.*tx*x12s+3./8.*x12s+7./8.*txs)
      gz20q= gz20q+rwwgz(13,8)*vvq*gstm2*yc*(3./8.*o*x12
     #    *x2z*tx-13./16.*o*x12*x2z+1./8.*o*x12*txs-13./16.*o*x2z
     #    *tx+7./16.*o*x2z*txs+3./2.*o*x2z+1./16.*o*tx*x12s-7./
     #    16.*o*tx*x2zs-3./8.*o*tx+13./16.*o*x2zs+3./4.*o*txs-1.
     #    /16.*os*x12*x2z+1./8.*os*x12*tx+3./8.*os*x2z*tx-11./16.
     #    *os*x2z+3./8.*os*tx-7./16.*os*x2zs+1./16.*os*txs-1./
     #    16.*oc*x2z+1./16.*oc*tx-1./16.*x12*x2z*tx+7./16.*x12*
     #    x2z*txs+3./4.*x12*x2z+3./8.*x12*tx+3./4.*x12*txs+3./8.
     #    *x2z*tx-7./8.*x2z*txs-3./4.*x2z-3./8.*tx*x12s+7./16.*
     #    tx*x2zs+1./16.*x12s*txs-3./8.*x2zs-3./4.*txs)
      gz20q= gz20q+rwwgz(13,9)*bxpi*vvq*gstm2*yc*(3./4.*o
     #    *x2z*tx+3./4.*o*txs+3./4.*x12*txs-3./4.*x2z*tx)
      gz20q= gz20q+rwwgz(13,9)*vvq*gstm2*yc*bxp*(1./8.*o*
     #    x12+7./8.*o*tx-1./8.*o+1./8.*os+7./8.*x12*tx-7./8.*
     #    tx)
      gz20q= gz20q+rwwgz(13,9)*vvq*gstm2*yc*(-1./8.*o*
     #    x12*tx-7./8.*o*x2z*tx+1./8.*o*x2z-3./4.*o*tx-7./8.*o*
     #    txs-1./8.*os*x2z-1./8.*os*tx-3./4.*x12*tx-7./8.*x12*
     #    txs+7./8.*x2z*tx+3./4.*tx)
      gz20q= gz20q+rwwgz(13,10)*xx*vvq*gstm2*yc*(3./8.*o
     #    *x12*x2z*txs-3./8.*o*x2zc+3./8.*o*x2zs*txs+3./16.*os*
     #    x2z*txs+3./16.*os*x2zc-3./8.*x12*tx*x2zs+3./8.*x12*x2zs
     #    *txs+3./16.*x2z*x12s*txs+3./16.*x2zc-3./8.*x2zs*txs)
      gz20q= gz20q+rwwgz(13,10)*bxpi*vvq*gstm2*yc*(3./8.*
     #    o*x12*x2z*tx+3./8.*o*x12*x2zs+3./8.*o*x12*txs+3./4.*o*
     #    x2z*txs-9./8.*o*x2zs+9./16.*os*x2zs+3./16.*os*txs-3./
     #    4.*x12*x2z*tx+3./4.*x12*x2z*txs-3./8.*x12*x2zs+3./8.*
     #    x2z*tx*x12s-3./4.*x2z*txs+3./16.*x12s*txs+9./16.*x2zs)
      gz20q= gz20q+rwwgz(13,10)*vvq*gstm2*bxps*yc*(-1./
     #    4.-1./2.*o*x12+1./2.*o-1./4.*os+1./2.*x12-1./4.*
     #    x12s)
      gz20q= gz20q+rwwgz(13,10)*vvq*gstm2*yc*bxp*(3./16.
     #    +7./8.*o*x12*x2z+1./2.*o*x12*tx+3./8.*o*x12-11./8.*o*
     #    x2z+7./16.*o*txs-3./8.*o+1./16.*os*x12+11./16.*os*x2z
     #    +1./8.*os+1./16.*oc-7./8.*x12*x2z-1./2.*x12*tx+7./
     #    16.*x12*txs-3./8.*x12+3./16.*x2z*x12s+11./16.*x2z+1./
     #    2.*tx*x12s+3./16.*x12s-7./16.*txs)
      gz20q= gz20q+rwwgz(13,10)*vvq*gstm2*yc*(-3./8.*o
     #    *x12*x2z*tx-3./4.*o*x12*x2z-3./8.*o*x12*tx-3./8.*o*x12*
     #    x2zs-1./2.*o*x12*txs-13./16.*o*x2z*txs+9./8.*o*x2z+5./
     #    4.*o*x2zs-3./8.*o*txs-1./16.*os*x12*x2z-1./2.*os*x2z-
     #    5./8.*os*x2zs-1./4.*os*txs-1./16.*oc*x2z+7./8.*x12*x2z*
     #    tx-13./16.*x12*x2z*txs+3./4.*x12*x2z+3./8.*x12*tx+3./
     #    8.*x12*x2zs-3./8.*x12*txs-3./8.*x2z*tx*x12s-3./16.*x2z*
     #    x12s+13./16.*x2z*txs-9./16.*x2z-3./8.*tx*x12s-1./4.*
     #    x12s*txs-5./8.*x2zs+3./8.*txs)
      gz20q= gz20q+rwwgz(13,11)*vvq*gstm2*yc*bxp*(-1./4.
     #    *o*x12-1./8.*o*x2z+1./8.*o-1./8.*os-1./8.*x12*x2z+1.
     #    /8.*x12+1./8.*x2z-1./8.*x12s)
      gz20q= gz20q+rwwgz(13,11)*vvq*gstm2*yc*(3./8.*o*
     #    x12*x2z+1./8.*o*x2z*tx-1./8.*o*x2z+1./8.*o*x2zs-1./4.
     #    *o*txs+1./8.*os*x2z-1./8.*os*tx+3./8.*x12*x2z*tx-1./8.
     #    *x12*x2z-1./4.*x12*txs+1./8.*tx*x12s-1./8.*x2zs)
      gz20q= gz20q+rwwgz(13,12)*xx*vvq*gstm2*yc*(-3./4.
     #    *o*x2z*txs+3./4.*o*tx*x2zs-3./4.*x12*x2z*txs+3./2.*x2z*
     #    txs-3./4.*tx*x2zs)
      gz20q= gz20q+rwwgz(13,12)*bxpi*vvq*gstm2*yc*(3./4.*
     #    o*x2z*tx-3./2.*o*txs+3./4.*x12*x2z*tx-3./2.*x12*txs-3.
     #    /4.*x2z*tx+3./2.*txs)
      gz20q= gz20q+rwwgz(13,12)*vvq*gstm2*yc*(-1./4.*o
     #    *x12*x2z+1./2.*o*x12*tx-3./4.*o*x2z*tx+1./4.*o*x2z-1./
     #    4.*o*tx+3./2.*o*txs-1./4.*os*x2z+1./4.*os*tx-3./4.*
     #    x12*x2z*tx-1./4.*x12*tx+3./2.*x12*txs+3./4.*x2z*tx+1./
     #    4.*tx*x12s-3./2.*txs)
      gz20q= gz20q+rwwgz(13,13)*xx*vvq*gstm2*yc*(-3./4.
     #    *o*x2z*txs-3./4.*x12*x2z*txs+3./4.*x2z*txs)
      gz20q= gz20q+rwwgz(13,13)*bxpi*vvq*gstm2*yc*(-3./
     #    4.*o*txs-3./4.*x12*txs+3./4.*txs)
      gz20q= gz20q+rwwgz(13,13)*vvq*gstm2*yc*bxp*(-1./8.
     #    -1./4.*o*x12+1./4.*o-1./8.*os+1./4.*x12-1./8.*x12s
     #    )
      gz20q= gz20q+rwwgz(13,13)*vvq*gstm2*yc*(1./4.*o*
     #    x12*x2z+1./4.*o*x12*tx-3./8.*o*x2z+3./4.*o*txs+1./4.*
     #    os*x2z-1./8.*x12*x2z-1./4.*x12*tx+3./4.*x12*txs+1./8.
     #    *x2z+1./4.*tx*x12s-3./4.*txs)
      gz20q= gz20q+rwwgz(13,14)*xx*vvq*gstm2*yc*(3./8.*o
     #    *x2z*txs+3./8.*o*tx*x2zs+3./8.*x12*x2z*txs-3./8.*tx*
     #    x2zs)
      gz20q= gz20q+rwwgz(13,14)*bxpi*vvq*gstm2*yc*(3./4.*
     #    o*x2z*tx+3./8.*o*txs+3./8.*x12*x2z*tx+3./8.*x12*txs-3.
     #    /4.*x2z*tx)
      gz20q= gz20q+rwwgz(13,14)*vvq*gstm2*yc*bxp*(3./16.*
     #    o*x12-1./16.*o*x2z+5./16.*o*tx-1./8.*o+1./8.*os-1./
     #    16.*x12*x2z+5./16.*x12*tx-1./16.*x12+1./16.*x2z-5./16.
     #    *tx+1./16.*x12s)
      gz20q= gz20q+rwwgz(13,14)*vvq*gstm2*yc*(-3./16.*
     #    o*x12*x2z-1./16.*o*x12*tx-5./8.*o*x2z*tx+1./8.*o*x2z-
     #    3./8.*o*tx+1./16.*o*x2zs-7./16.*o*txs-1./8.*os*x2z-3./
     #    16.*x12*x2z*tx+1./16.*x12*x2z-3./8.*x12*tx-7./16.*x12*
     #    txs+11./16.*x2z*tx-1./16.*tx*x12s+3./8.*tx-1./16.*
     #    x2zs)
      gz20q= gz20q+rwwgz(14,1)*xx*vvq*gstm2*yc*(3./2.*o*
     #    x2z*txs+3./2.*o*tx*x2zs+3./2.*x12*x2z*txs-3./2.*tx*x2zs
     #    )
      gz20q= gz20q+rwwgz(14,1)*bxpi*vvq*gstm2*yc*(6*o*x2z
     #    *tx+3./2.*o*txs+3./2.*x12*x2z*tx+3./2.*x12*txs-3*x2z*
     #    tx)
      gz20q= gz20q+rwwgz(14,1)*vvq*gstm2*yc*bxp*(1./2.*o*
     #    x12+1./4.*o*x2z+4*o*tx+1./4.*o-1./4.*os+1./4.*x12*
     #    x2z+x12*tx-1./4.*x12-1./2.*x2z*tx-1./4.*x2z-tx+1./
     #    4.*x12s+1./2.*txs)
      gz20q= gz20q+rwwgz(14,1)*vvq*gstm2*yc*(-1./4.*o*
     #    x12*x2z-1./2.*o*x12*tx-23./4.*o*x2z*tx-1./4.*o*x2z-9./
     #    2.*o*tx-1./4.*o*x2zs-3./2.*o*txs+1./4.*os*x2z-1./4.*
     #    os*tx-5./4.*x12*x2z*tx+1./4.*x12*x2z-3./2.*x12*tx-3./
     #    2.*x12*txs+5./2.*x2z*tx-1./2.*x2z*txs-1./4.*tx*x12s+1.
     #    /2.*tx*x2zs+3./2.*tx+1./4.*x2zs)
      gz20q= gz20q+rwwgz(14,4)*xx*vvq*gstm2*yc*(-3./8.
     #    *o*x12*tx*x2zs+3./8.*o*tx*x2zc-3./8.*o*x2zc-3./8.*o*
     #    x2zs*txs-3./8.*os*tx*x2zs+3./8.*os*x2zc-3./8.*x12*x2zs*
     #    txs+3./8.*tx*x2zc)
      gz20q= gz20q+rwwgz(14,4)*bxpi*vvq*gstm2*yc*(-3./4.
     #    *o*x12*x2z*tx+3./8.*o*x12*x2zs-3./4.*o*x2z*txs+3./8.*o*
     #    tx*x2zs-9./8.*o*x2zs-3./4.*os*x2z*tx+9./8.*os*x2zs-3./
     #    4.*x12*x2z*txs-3./8.*x12*tx*x2zs+9./8.*tx*x2zs)
      gz20q= gz20q+rwwgz(14,4)*vvq*gstm2*bxps*yc*(-3./8.
     #    *o*x12+3./8.*o*tx+3./8.*o-3./8.*os+3./8.*x12*tx-3./
     #    8.*tx)
      gz20q= gz20q+rwwgz(14,4)*vvq*gstm2*yc*bxp*(3./4.*o*
     #    x12*x2z-3./8.*o*x12*tx+3./8.*o*x12-3./8.*o*x2z*tx-9./
     #    8.*o*x2z-3./8.*o*tx-3./8.*o*txs-3./8.*o+9./8.*os*x2z
     #    -3./8.*os*tx+3./8.*os-3./4.*x12*x2z*tx-3./8.*x12*tx
     #    -3./8.*x12*txs+9./8.*x2z*tx+3./8.*tx)
      gz20q= gz20q+rwwgz(14,4)*vvq*gstm2*yc*(3./4.*o*x12
     #    *x2z*tx-3./4.*o*x12*x2z+3./8.*o*x12*tx-3./8.*o*x12*x2zs
     #    +3./8.*o*x2z*tx+3./4.*o*x2z*txs+9./8.*o*x2z-3./8.*o*
     #    tx*x2zs+9./8.*o*x2zs+3./8.*o*txs+3./4.*os*x2z*tx-9./8.
     #    *os*x2z+3./8.*os*tx-9./8.*os*x2zs+3./4.*x12*x2z*tx+3./
     #    4.*x12*x2z*txs+3./8.*x12*tx*x2zs+3./8.*x12*txs-9./8.*
     #    x2z*tx-9./8.*tx*x2zs)
      gz20q= gz20q+rwwgz(14,7)*xx*vvq*gstm2*yc*(3./16.*o
     #    *x12*tx*x2zs+3./16.*o*tx*x2zc-3./16.*o*x2zc+3./16.*o*
     #    x2zs*txs+3./16.*os*tx*x2zs+3./16.*os*x2zc+3./16.*x12*
     #    x2zs*txs-3./16.*tx*x2zc)
      gz20q= gz20q+rwwgz(14,7)*bxpi*vvq*gstm2*yc*(3./16.*
     #    o*x12*x2z*tx+3./16.*o*x12*x2zs+3./16.*o*x2z*txs+3./8.*o
     #    *tx*x2zs-3./8.*o*x2zs+3./16.*os*x2z*tx+3./8.*os*x2zs+
     #    3./16.*x12*x2z*txs+3./16.*x12*tx*x2zs-3./8.*tx*x2zs)
      gz20q= gz20q+rwwgz(14,7)*vvq*gstm2*bxps*yc*(1./16.
     #    +1./8.*o*x12-1./8.*o+1./16.*os-1./8.*x12+1./16.*
     #    x12s)
      gz20q= gz20q+rwwgz(14,7)*vvq*gstm2*yc*bxp*(1./16.*o
     #    *x12*x2z-1./8.*o*x12*tx+3./16.*o*x2z*tx+1./16.*o*x2z-
     #    1./16.*o*txs-1./16.*os*x12+1./16.*os*x2z+1./16.*os-1./
     #    16.*oc+3./16.*x12*x2z*tx+1./8.*x12*x2z+1./8.*x12*tx-1.
     #    /16.*x12*txs-3./16.*x2z*tx-1./8.*x2z-1./8.*tx*x12s+1./
     #    16.*txs)
      gz20q= gz20q+rwwgz(14,7)*vvq*gstm2*yc*(-3./16.*o
     #    *x12*x2z*tx-3./16.*o*x12*x2z-3./16.*o*x12*x2zs+1./8.*o*
     #    x12*txs-3./16.*o*x2z*tx-1./8.*o*x2z*txs+3./16.*o*x2z-
     #    3./8.*o*tx*x2zs+1./4.*o*x2zs+1./16.*os*x12*x2z-3./16.*
     #    os*x2z*tx-1./4.*os*x2z-5./16.*os*x2zs+1./16.*os*txs+1.
     #    /16.*oc*x2z-5./16.*x12*x2z*tx-1./8.*x12*x2z*txs-3./16.*
     #    x12*tx*x2zs+3./16.*x2z*tx-1./16.*x2z*txs+3./8.*tx*x2zs
     #    +1./16.*x12s*txs+1./16.*x2zs)
      gz20q= gz20q+rwwgz(14,8)*bxpi*vvq*gstm2*yc*(3./8.*o
     #    *x12*x2z*tx+3./8.*o*x2z*txs-3./8.*o*tx*x2zs+3./8.*o*
     #    x2zs+3./8.*os*x2z*tx-3./8.*os*x2zs+3./8.*x12*x2z*txs-
     #    3./8.*tx*x2zs)
      gz20q= gz20q+rwwgz(14,8)*vvq*gstm2*bxps*yc*(3./8.*o
     #    *x12-3./8.*o*tx-3./8.*o+3./8.*os-3./8.*x12*tx+3./8.
     #    *tx)
      gz20q= gz20q+rwwgz(14,8)*vvq*gstm2*yc*bxp*(-7./16.
     #    *o*x12*x2z+1./2.*o*x12*tx-7./16.*o*x12-1./16.*o*x2z*tx
     #    +13./16.*o*x2z+5./16.*o*tx+1./16.*o*x12s+1./2.*o*txs
     #    +3./8.*o-13./16.*os*x2z+7./16.*os*tx-5./16.*os-1./
     #    16.*oc+5./16.*x12*x2z*tx+5./16.*x12*tx+1./2.*x12*txs-
     #    11./16.*x2z*tx+1./16.*tx*x12s-3./8.*tx-1./8.*txs)
      gz20q= gz20q+rwwgz(14,8)*vvq*gstm2*yc*(-3./8.*o*
     #    x12*x2z*tx+7./16.*o*x12*x2z-3./8.*o*x12*tx-1./8.*o*x12*
     #    txs+1./16.*o*x2z*tx-7./16.*o*x2z*txs-3./4.*o*x2z-1./
     #    16.*o*tx*x12s+7./16.*o*tx*x2zs-7./16.*o*x2zs-3./8.*o*
     #    txs+1./16.*os*x12*x2z-1./8.*os*x12*tx-3./8.*os*x2z*tx
     #    +11./16.*os*x2z-3./8.*os*tx+7./16.*os*x2zs-1./16.*os*
     #    txs+1./16.*oc*x2z-1./16.*oc*tx-5./16.*x12*x2z*tx-7./
     #    16.*x12*x2z*txs-3./8.*x12*txs+3./4.*x2z*tx+1./8.*x2z*
     #    txs+5./16.*tx*x2zs-1./16.*x12s*txs)
      gz20q= gz20q+rwwgz(14,9)*bxpi*vvq*gstm2*yc*(-3./2.
     #    *o*x2z*tx)
      gz20q= gz20q+rwwgz(14,9)*vvq*gstm2*yc*bxp*(-1./8.
     #    *o*x12-13./8.*o*tx+1./8.*o-1./8.*os-1./8.*x12*tx+1./
     #    8.*tx)
      gz20q= gz20q+rwwgz(14,9)*vvq*gstm2*yc*(1./8.*o*x12
     #    *tx+13./8.*o*x2z*tx-1./8.*o*x2z+3./2.*o*tx+1./8.*o*
     #    txs+1./8.*os*x2z+1./8.*os*tx+1./8.*x12*txs-1./8.*x2z*
     #    tx)
      gz20q= gz20q+rwwgz(14,10)*xx*vvq*gstm2*yc*(-3./
     #    16.*o*x12*tx*x2zs-3./16.*o*tx*x2zc+3./16.*o*x2zc-3./16.
     #    *o*x2zs*txs-3./16.*os*tx*x2zs-3./16.*os*x2zc-3./16.*x12
     #    *x2zs*txs+3./16.*tx*x2zc)
      gz20q= gz20q+rwwgz(14,10)*bxpi*vvq*gstm2*yc*(-3./
     #    8.*o*x12*x2z*tx-3./16.*o*x12*x2zs-3./8.*o*x2z*txs-9./16.
     #    *o*tx*x2zs+9./16.*o*x2zs-3./8.*os*x2z*tx-9./16.*os*x2zs
     #    -3./8.*x12*x2z*txs-3./16.*x12*tx*x2zs+9./16.*tx*x2zs)
      gz20q= gz20q+rwwgz(14,10)*vvq*gstm2*bxps*yc*(3./16.
     #    *o*x12+3./16.*o*tx-3./16.*o+3./16.*os+3./16.*x12*tx
     #    -3./16.*tx)
      gz20q= gz20q+rwwgz(14,10)*vvq*gstm2*yc*bxp*(-3./8.
     #    *o*x12*x2z-3./16.*o*x12*tx-3./16.*o*x12-9./16.*o*x2z*tx
     #    +9./16.*o*x2z-3./16.*o*tx-3./16.*o*txs+3./16.*o-9./
     #    16.*os*x2z-3./16.*os*tx-3./16.*os-3./8.*x12*x2z*tx-3./
     #    16.*x12*tx-3./16.*x12*txs+9./16.*x2z*tx+3./16.*tx)
      gz20q= gz20q+rwwgz(14,10)*vvq*gstm2*yc*(3./8.*o*
     #    x12*x2z*tx+3./8.*o*x12*x2z+3./16.*o*x12*tx+3./16.*o*x12
     #    *x2zs+9./16.*o*x2z*tx+3./8.*o*x2z*txs-9./16.*o*x2z+9./
     #    16.*o*tx*x2zs-9./16.*o*x2zs+3./16.*o*txs+3./8.*os*x2z*
     #    tx+9./16.*os*x2z+3./16.*os*tx+9./16.*os*x2zs+3./8.*
     #    x12*x2z*tx+3./8.*x12*x2z*txs+3./16.*x12*tx*x2zs+3./16.*
     #    x12*txs-9./16.*x2z*tx-9./16.*tx*x2zs)
      gz20q= gz20q+rwwgz(14,11)*vvq*gstm2*yc*bxp*(1./4.*o
     #    *x12-1./4.*x2z*tx+1./4.*txs)
      gz20q= gz20q+rwwgz(14,11)*vvq*gstm2*yc*(-1./4.*o
     #    *x12*x2z-1./4.*x2z*txs+1./4.*tx*x2zs)
      gz20q= gz20q+rwwgz(14,12)*xx*vvq*gstm2*yc*(3./4.*o
     #    *x2z*txs-3./4.*o*tx*x2zs+3./4.*x12*x2z*txs-3./4.*tx*
     #    x2zs)
      gz20q= gz20q+rwwgz(14,12)*bxpi*vvq*gstm2*yc*(3./4.*
     #    o*txs+3./4.*x12*x2z*tx+3./4.*x12*txs-3./2.*x2z*tx)
      gz20q= gz20q+rwwgz(14,12)*vvq*gstm2*yc*bxp*(1./8.*o
     #    *x2z+1./2.*o*tx+1./8.*o-1./8.*os+1./8.*x12*x2z+1./2.
     #    *x12*tx-1./8.*x12-1./8.*x2z-1./2.*tx+1./8.*x12s)
      gz20q= gz20q+rwwgz(14,12)*vvq*gstm2*yc*(1./8.*o*
     #    x12*x2z-1./4.*o*x12*tx+1./8.*o*x2z*tx-1./8.*o*x2z-3./
     #    4.*o*tx-1./8.*o*x2zs-3./4.*o*txs+1./8.*os*x2z-1./8.*
     #    os*tx-5./8.*x12*x2z*tx+1./8.*x12*x2z-3./4.*x12*tx-3./
     #    4.*x12*txs+5./4.*x2z*tx-1./8.*tx*x12s+3./4.*tx+1./8.*
     #    x2zs)
      gz20q= gz20q+rwwgz(14,13)*xx*vvq*gstm2*yc*(3./8.*o
     #    *x2z*txs+3./8.*o*tx*x2zs+3./8.*x12*x2z*txs-3./8.*tx*
     #    x2zs)
      gz20q= gz20q+rwwgz(14,13)*bxpi*vvq*gstm2*yc*(3./4.*
     #    o*x2z*tx+3./8.*o*txs+3./8.*x12*x2z*tx+3./8.*x12*txs-3.
     #    /4.*x2z*tx)
      gz20q= gz20q+rwwgz(14,13)*vvq*gstm2*yc*bxp*(3./16.*
     #    o*x12-1./16.*o*x2z+5./16.*o*tx-1./8.*o+1./8.*os-1./
     #    16.*x12*x2z+5./16.*x12*tx-1./16.*x12+1./16.*x2z-5./16.
     #    *tx+1./16.*x12s)
      gz20q= gz20q+rwwgz(14,13)*vvq*gstm2*yc*(-3./16.*
     #    o*x12*x2z-1./16.*o*x12*tx-5./8.*o*x2z*tx+1./8.*o*x2z-
     #    3./8.*o*tx+1./16.*o*x2zs-7./16.*o*txs-1./8.*os*x2z-3./
     #    16.*x12*x2z*tx+1./16.*x12*x2z-3./8.*x12*tx-7./16.*x12*
     #    txs+11./16.*x2z*tx-1./16.*tx*x12s+3./8.*tx-1./16.*
     #    x2zs)
      gz20q= gz20q+rwwgz(14,14)*xx*vvq*gstm2*yc*(-3./4.
     #    *o*tx*x2zs)
      gz20q= gz20q+rwwgz(14,14)*bxpi*vvq*gstm2*yc*(-3./
     #    2.*o*x2z*tx)
      gz20q= gz20q+rwwgz(14,14)*vvq*gstm2*bxps*yc*(1./8.
     #    -1./8.*o-1./8.*x12)
      gz20q= gz20q+rwwgz(14,14)*vvq*gstm2*yc*bxp*(-1./8.
     #    *o*x12+1./4.*o*x2z-5./8.*o*tx+1./8.*x12*x2z+1./8.*x12
     #    *tx-1./8.*x2z*tx-1./4.*x2z+1./8.*txs)
      gz20q= gz20q+rwwgz(14,14)*vvq*gstm2*yc*(1./8.*o*
     #    x12*x2z+11./8.*o*x2z*tx+3./4.*o*tx-1./8.*o*x2zs-1./8.
     #    *x12*x2z*tx-1./8.*x2z*txs+1./8.*tx*x2zs+1./8.*x2zs)
*
      gz30q= rwwgz(1,1)*bxpi*vvq*gstm2*yc*(-4*o*x2zs-4*x12*
     #    x2z*tx-4*x12*x2zs+4*x2z*tx+4*x2z*txs+4*x2zs)
      gz30q= gz30q+rwwgz(1,1)*vvq*gstm2*bxps*yc*(-4+4
     #    *o+4*x12)
      gz30q= gz30q+rwwgz(1,1)*vvq*gstm2*yc*bxp*(6+10*o*
     #    x12-6*o*x2z-2*o*tx-12*o+6*os-2*x12*x2z-6*x12*tx
     #    -12*x12-2*x2z*tx+6*x2z+6*tx+6*x12s+2*txs)
      gz30q= gz30q+rwwgz(1,1)*vvq*gstm2*yc*(-8*o*x12*
     #    x2z-2*o*x12*tx+14*o*x2z+4*o*tx+2*o*x2zs+2*o*txs-4
     #    *os*x2z+2*x12*x2z*tx+14*x12*x2z+8*x12*tx+2*x12*txs-
     #    6*x2z*tx-4*x2z*x12s-2*x2z*txs-10*x2z-2*tx*x12s+2*tx
     #    *x2zs-4*tx-2*x2zs-4*txs)
      gz30q= gz30q+rwwgz(1,4)*bxpi*vvq*gstm2*yc*(1./2.*o*
     #    x12*x2zs-1./2.*o*tx*x2zs+1./2.*o*x2zc+1./2.*x12*tx*x2zs
     #    +1./2.*tx*x2zc-1./2.*tx*x2zs-1./2.*x2zc-1./2.*x2zs*
     #    txs)
      gz30q= gz30q+rwwgz(1,4)*vvq*gstm2*bxps*yc*(3./4.+
     #    3./2.*o*x12-3./2.*o+3./4.*os-3./2.*x12+3./4.*x12s)
      gz30q= gz30q+rwwgz(1,4)*vvq*gstm2*yc*bxp*(-7./4.*
     #    o*x12*x2z-1./2.*o*x12*tx+1./2.*o*x12-1./2.*o*x2z*tx+
     #    13./4.*o*x2z+1./4.*o*tx-1./2.*o*x12s+1./2.*o*txs-1./2.
     #    *os*x12-5./4.*os*x2z+1./4.*os*tx-1./2.*x12*x2z*tx+5./
     #    2.*x12*x2z+5./4.*x12*tx+1./2.*x12*txs+1./2.*x2z*tx-1./
     #    2.*x2z*x12s-2*x2z-3./4.*tx*x12s-1./2.*tx-1./2.*txs)
      gz30q= gz30q+rwwgz(1,4)*vvq*gstm2*yc*(-o*x12*x2z
     #    +1./2.*o*x12*x2zs+1./4.*o*x2z*tx+1./2.*o*x2z*x12s-1./
     #    2.*o*x2z*txs+1./2.*o*tx*x2zs-9./4.*o*x2zs+1./2.*os*x12*
     #    x2z-1./2.*os*x2z*tx+1./2.*os*x2zs-7./4.*x12*x2z*tx-1./
     #    2.*x12*x2z*txs+1./2.*x12*tx*x2zs-x12*x2zs+1./2.*x2z*tx*
     #    x12s+x2z*tx+x2z*txs-tx*x2zs+7./4.*x2zs)
      gz30q= gz30q+rwwgz(1,7)*bxpi*vvq*gstm2*yc*(-1./4.
     #    *o*x12*x2zs+1./4.*o*x2zs-1./4.*os*x2zs-1./4.*x12*tx*
     #    x2zs+1./4.*tx*x2zs+1./4.*x2zs*txs)
      gz30q= gz30q+rwwgz(1,7)*vvq*gstm2*bxps*yc*(1./8.*o*
     #    x12+1./8.*o*tx-1./8.*o+1./8.*os+1./8.*x12*tx-1./8.*
     #    tx)
      gz30q= gz30q+rwwgz(1,7)*vvq*gstm2*yc*bxp*(-1./8.*
     #    o*x12*x2z+3./8.*o*x12*tx-1./2.*o*x12-1./4.*o*x2z*tx+1.
     #    /4.*o*x2z-1./4.*o*tx+1./4.*o*x12s-1./8.*o*txs+1./4.*o
     #    +1./2.*os*x12-1./4.*os*x2z+1./8.*os*tx-1./2.*os+1./
     #    4.*oc-1./8.*x12*x2z*tx-1./2.*x12*tx-1./8.*x12*txs+1./
     #    4.*x2z*tx+1./4.*tx*x12s+1./4.*tx+1./4.*txs)
      gz30q= gz30q+rwwgz(1,7)*vvq*gstm2*yc*(-3./8.*o*
     #    x12*x2z*tx+3./4.*o*x12*x2z+1./4.*o*x2z*tx-1./4.*o*x2z*
     #    x12s+1./8.*o*x2z*txs-1./2.*o*x2z+1./8.*o*tx*x2zs-1./8.
     #    *o*x2zs-1./2.*os*x12*x2z-1./8.*os*x2z*tx+3./4.*os*x2z
     #    +1./8.*os*x2zs-1./4.*oc*x2z+3./4.*x12*x2z*tx+1./8.*
     #    x12*x2z*txs-1./4.*x2z*tx*x12s-1./2.*x2z*tx-1./2.*x2z*
     #    txs-1./8.*tx*x2zs)
      gz30q= gz30q+rwwgz(1,10)*bxpi*vvq*gstm2*yc*(1./4.*o
     #    *x12*x2zs-1./4.*o*x2zs+1./4.*os*x2zs+1./4.*x12*tx*x2zs
     #    -1./4.*tx*x2zs-1./4.*x2zs*txs)
      gz30q= gz30q+rwwgz(1,10)*vvq*gstm2*bxps*yc*(-1./8.
     #    *o*x12-1./8.*o*tx+1./8.*o-1./8.*os-1./8.*x12*tx+1./
     #    8.*tx)
      gz30q= gz30q+rwwgz(1,10)*vvq*gstm2*yc*bxp*(1./8.*o*
     #    x12*x2z-3./8.*o*x12*tx+1./2.*o*x12+1./4.*o*x2z*tx-1./
     #    4.*o*x2z+1./4.*o*tx-1./4.*o*x12s+1./8.*o*txs-1./4.*o
     #    -1./2.*os*x12+1./4.*os*x2z-1./8.*os*tx+1./2.*os-1./
     #    4.*oc+1./8.*x12*x2z*tx+1./2.*x12*tx+1./8.*x12*txs-1./
     #    4.*x2z*tx-1./4.*tx*x12s-1./4.*tx-1./4.*txs)
      gz30q= gz30q+rwwgz(1,10)*vvq*gstm2*yc*(3./8.*o*x12
     #    *x2z*tx-3./4.*o*x12*x2z-1./4.*o*x2z*tx+1./4.*o*x2z*x12s
     #    -1./8.*o*x2z*txs+1./2.*o*x2z-1./8.*o*tx*x2zs+1./8.*o*
     #    x2zs+1./2.*os*x12*x2z+1./8.*os*x2z*tx-3./4.*os*x2z-1./
     #    8.*os*x2zs+1./4.*oc*x2z-3./4.*x12*x2z*tx-1./8.*x12*x2z*
     #    txs+1./4.*x2z*tx*x12s+1./2.*x2z*tx+1./2.*x2z*txs+1./8.
     #    *tx*x2zs)
      gz30q= gz30q+rwwgz(1,11)*bxpi*vvq*gstm2*yc*(1./2.*o
     #    *x2z*tx-1./2.*o*x2zs-1./2.*x12*x2z*tx-1./2.*x12*x2zs+
     #    x2z*txs+1./2.*x2zs)
      gz30q= gz30q+rwwgz(1,11)*vvq*gstm2*bxps*yc*(-3./2.
     #    +3./2.*o+3./2.*x12)
      gz30q= gz30q+rwwgz(1,11)*vvq*gstm2*yc*bxp*(1./2.-
     #    5./2.*o*x2z-3./4.*o+1./4.*os-x12*x2z-2*x12*tx-5./4.
     #    *x12-x2z*tx+5./2.*x2z+3./2.*tx+3./4.*x12s+txs)
      gz30q= gz30q+rwwgz(1,11)*vvq*gstm2*yc*(-1./4.*o*
     #    x12*x2z-1./2.*o*x2z*tx+5./4.*o*x2z-1./2.*o*tx+o*x2zs
     #    +1./2.*o*txs-1./4.*os*x2z+1./4.*os*tx+x12*x2z*tx+7./
     #    4.*x12*x2z+1./2.*x12*tx+1./2.*x12*txs-3./2.*x2z*tx-1./
     #    2.*x2z*x12s-x2z*txs-x2z-1./4.*tx*x12s+tx*x2zs-x2zs
     #    -txs)
      gz30q= gz30q+rwwgz(1,12)*bxpi*vvq*gstm2*yc*(-o*
     #    x2zs-x12*x2z*tx-1./2.*x12*x2zs+2*x2z*tx+x2z*txs-tx*
     #    x2zs+x2zs)
      gz30q= gz30q+rwwgz(1,12)*vvq*gstm2*bxps*yc*(-1./4.
     #    +1./4.*o+1./4.*x12)
      gz30q= gz30q+rwwgz(1,12)*vvq*gstm2*yc*bxp*(2+3*o*
     #    x12-1./4.*o*tx-4*o+2*os+1./4.*x12*x2z-1./4.*x12*tx
     #    -3*x12+1./2.*tx+x12s)
      gz30q= gz30q+rwwgz(1,12)*vvq*gstm2*yc*(-2*o*x12*
     #    x2z-1./2.*o*x12*tx-1./4.*o*x2z*tx+4*o*x2z+2*o*tx-1./
     #    4.*o*x2zs+1./2.*o*txs-os*x2z-3./4.*x12*x2z*tx+5./2.*
     #    x12*x2z+3*x12*tx+1./2.*x12*txs+1./2.*x2z*tx-1./2.*x2z
     #    *x12s-3*x2z-1./2.*tx*x12s-2*tx+1./4.*x2zs-txs)
      gz30q= gz30q+rwwgz(1,13)*bxpi*vvq*gstm2*yc*(-1./4.
     #    *o*x2z*tx-1./4.*o*x2zs+1./2.*o*txs-5./4.*x12*x2z*tx+1.
     #    /2.*x12*txs+1./2.*x2z*tx+1./2.*x2z*txs+1./4.*x2zs)
      gz30q= gz30q+rwwgz(1,13)*vvq*gstm2*bxps*yc*(1./8.
     #    -1./8.*o-1./8.*x12)
      gz30q= gz30q+rwwgz(1,13)*vvq*gstm2*yc*bxp*(-3./8.
     #    *o*tx+5./8.*o-5./8.*os-1./8.*x12*x2z+1./8.*x12*tx-1.
     #    /8.*x12+1./4.*tx+1./8.*x12s)
      gz30q= gz30q+rwwgz(1,13)*vvq*gstm2*yc*(-3./8.*o*
     #    x12*x2z-3./4.*o*x12*tx+5./8.*o*x2z*tx+1./8.*o*x2z+1./
     #    8.*o*x2zs-1./4.*o*txs+1./8.*os*x2z-1./8.*os*tx+3./8.*
     #    x12*x2z*tx+3./8.*x12*x2z+x12*tx-1./4.*x12*txs-1./4.*
     #    x2z*tx-1./4.*x2z-5./8.*tx*x12s-1./2.*tx-1./8.*x2zs-
     #    1./2.*txs)
      gz30q= gz30q+rwwgz(1,14)*bxpi*vvq*gstm2*yc*(1./4.*o
     #    *x2z*tx+1./4.*o*x2zs+1./4.*x12*x2z*tx+1./2.*x2z*txs-1.
     #    /2.*tx*x2zs-1./4.*x2zs)
      gz30q= gz30q+rwwgz(1,14)*vvq*gstm2*bxps*yc*(-1./8.
     #    +1./8.*o+1./8.*x12)
      gz30q= gz30q+rwwgz(1,14)*vvq*gstm2*yc*bxp*(-1./4.
     #    -1./2.*o*x12-3./8.*o*tx+5./8.*o-3./8.*os+1./8.*x12*
     #    x2z-3./8.*x12*tx+3./8.*x12-1./2.*x2z*tx+1./2.*tx-1./
     #    8.*x12s+1./2.*txs)
      gz30q= gz30q+rwwgz(1,14)*vvq*gstm2*yc*(3./8.*o*x12
     #    *x2z+1./4.*o*x12*tx+1./8.*o*x2z*tx-7./8.*o*x2z-1./4.*
     #    o*tx-1./8.*o*x2zs+3./8.*os*x2z+1./8.*os*tx+1./8.*x12*
     #    x2z*tx-3./8.*x12*x2z-1./4.*x12*tx-1./2.*x2z*txs+1./2.
     #    *x2z+1./8.*tx*x12s+1./2.*tx*x2zs+1./8.*x2zs-1./2.*txs
     #    )
      gz30q= gz30q+rwwgz(4,1)*bxpi*vvq*gstm2*yc*(1./2.*o*
     #    x12*x2zs-1./2.*o*tx*x2zs+1./2.*o*x2zc+1./2.*x12*tx*x2zs
     #    +1./2.*tx*x2zc-1./2.*tx*x2zs-1./2.*x2zc-1./2.*x2zs*
     #    txs)
      gz30q= gz30q+rwwgz(4,1)*vvq*gstm2*bxps*yc*(3./4.+
     #    3./2.*o*x12-3./2.*o+3./4.*os-3./2.*x12+3./4.*x12s)
      gz30q= gz30q+rwwgz(4,1)*vvq*gstm2*yc*bxp*(-7./4.*
     #    o*x12*x2z-1./2.*o*x12*tx+1./2.*o*x12-1./2.*o*x2z*tx+
     #    13./4.*o*x2z+1./4.*o*tx-1./2.*o*x12s+1./2.*o*txs-1./2.
     #    *os*x12-5./4.*os*x2z+1./4.*os*tx-1./2.*x12*x2z*tx+5./
     #    2.*x12*x2z+5./4.*x12*tx+1./2.*x12*txs+1./2.*x2z*tx-1./
     #    2.*x2z*x12s-2*x2z-3./4.*tx*x12s-1./2.*tx-1./2.*txs)
      gz30q= gz30q+rwwgz(4,1)*vvq*gstm2*yc*(-o*x12*x2z
     #    +1./2.*o*x12*x2zs+1./4.*o*x2z*tx+1./2.*o*x2z*x12s-1./
     #    2.*o*x2z*txs+1./2.*o*tx*x2zs-9./4.*o*x2zs+1./2.*os*x12*
     #    x2z-1./2.*os*x2z*tx+1./2.*os*x2zs-7./4.*x12*x2z*tx-1./
     #    2.*x12*x2z*txs+1./2.*x12*tx*x2zs-x12*x2zs+1./2.*x2z*tx*
     #    x12s+x2z*tx+x2z*txs-tx*x2zs+7./4.*x2zs)
      gz30q= gz30q+rwwgz(4,11)*bxpi*vvq*gstm2*yc*(1./4.*o
     #    *x12*x2zs-1./4.*o*tx*x2zs+1./4.*o*x2zc+1./4.*x12*tx*
     #    x2zs+1./4.*tx*x2zc-1./4.*x2zc-1./4.*x2zs*txs)
      gz30q= gz30q+rwwgz(4,11)*vvq*gstm2*bxps*yc*(1./4.
     #    +1./2.*o*x12-1./2.*o+1./4.*os-1./2.*x12+1./4.*x12s
     #    )
      gz30q= gz30q+rwwgz(4,11)*vvq*gstm2*yc*bxp*(-3./4.
     #    *o*x12*x2z+1./4.*o*x12-1./4.*o*x2z*tx+5./4.*o*x2z-1./
     #    4.*o*tx-1./4.*o*x12s+1./4.*o*txs-1./4.*os*x12-1./2.*
     #    os*x2z+1./4.*os*tx-1./4.*x12*x2z*tx+x12*x2z+1./4.*x12
     #    *tx+1./4.*x12*txs+1./4.*x2z*tx-1./4.*x2z*x12s-3./4.*
     #    x2z-1./4.*tx*x12s-1./4.*txs)
      gz30q= gz30q+rwwgz(4,11)*vvq*gstm2*yc*(-1./2.*o*
     #    x12*x2z+1./4.*o*x12*x2zs+1./2.*o*x2z*tx+1./4.*o*x2z*
     #    x12s-1./4.*o*x2z*txs+1./4.*o*tx*x2zs-o*x2zs+1./4.*os*
     #    x12*x2z-1./4.*os*x2z*tx+1./4.*os*x2zs-1./2.*x12*x2z*tx
     #    -1./4.*x12*x2z*txs+1./4.*x12*tx*x2zs-1./2.*x12*x2zs+1.
     #    /4.*x2z*tx*x12s+1./2.*x2z*txs-1./2.*tx*x2zs+3./4.*x2zs
     #    )
      gz30q= gz30q+rwwgz(4,12)*bxpi*vvq*gstm2*yc*(-1./4.
     #    *tx*x2zs)
      gz30q= gz30q+rwwgz(4,12)*vvq*gstm2*bxps*yc*(1./8.
     #    +1./4.*o*x12-1./4.*o+1./8.*os-1./4.*x12+1./8.*x12s
     #    )
      gz30q= gz30q+rwwgz(4,12)*vvq*gstm2*yc*bxp*(-1./8.
     #    *o*x12*x2z-1./4.*o*x12*tx+3./8.*o*x2z+3./8.*o*tx-1./8.
     #    *os*x2z-1./8.*os*tx+1./4.*x12*x2z+3./8.*x12*tx-1./4.*
     #    x2z-1./8.*tx*x12s-1./4.*tx)
      gz30q= gz30q+rwwgz(4,12)*vvq*gstm2*yc*(-3./8.*o*
     #    x2z*tx-1./8.*o*x2zs-3./8.*x12*x2z*tx+1./2.*x2z*tx+1./
     #    8.*x2zs)
      gz30q= gz30q+rwwgz(4,13)*bxpi*vvq*gstm2*yc*(-1./8.
     #    *o*x12*x2z*tx+1./8.*o*x12*x2zs-1./8.*o*x2z*txs+1./8.*o*
     #    tx*x2zs-1./8.*o*x2zs-1./8.*os*x2z*tx+1./8.*os*x2zs-1./
     #    8.*x12*x2z*txs+1./8.*x12*tx*x2zs)
      gz30q= gz30q+rwwgz(4,13)*vvq*gstm2*bxps*yc*(-1./
     #    16.-1./8.*o*x12+1./8.*o-1./16.*os+1./8.*x12-1./16.*
     #    x12s)
      gz30q= gz30q+rwwgz(4,13)*vvq*gstm2*yc*bxp*(1./16.*o
     #    *x12*x2z+3./16.*o*x12-3./16.*o*x2z-1./16.*o*x12s-1./8.
     #    *o-1./8.*os*x12+1./16.*os*x2z+3./16.*os-1./16.*oc-1.
     #    /8.*x12*x2z+1./8.*x2z)
      gz30q= gz30q+rwwgz(4,13)*vvq*gstm2*yc*(3./16.*o*
     #    x12*x2z*tx-5./16.*o*x12*x2z+1./8.*o*x12*tx-1./8.*o*x12*
     #    txs-1./8.*o*x2z*tx+1./8.*o*x2z*x12s+1./4.*o*x2z-1./16.
     #    *o*tx*x12s+1./16.*o*x2zs+1./8.*o*txs+3./16.*os*x12*x2z
     #    -1./8.*os*x12*tx+1./16.*os*x2z*tx-5./16.*os*x2z+1./8.
     #    *os*tx-1./16.*os*txs+1./16.*oc*x2z-1./16.*oc*tx-1./8.
     #    *x12*x2z*tx+1./8.*x12*txs+1./8.*x2z*tx*x12s-1./16.*x12s
     #    *txs-1./16.*x2zs)
      gz30q= gz30q+rwwgz(4,14)*bxpi*vvq*gstm2*yc*(-1./8.
     #    *o*tx*x2zs+1./8.*o*x2zc+1./8.*tx*x2zc-1./8.*x2zc-1./8.
     #    *x2zs*txs)
      gz30q= gz30q+rwwgz(4,14)*vvq*gstm2*bxps*yc*(1./8.
     #    +3./16.*o*x12-1./16.*o*tx-3./16.*o+1./16.*os-1./16.
     #    *x12*tx-1./4.*x12+1./16.*tx+1./8.*x12s)
      gz30q= gz30q+rwwgz(4,14)*vvq*gstm2*yc*bxp*(-5./16.
     #    *o*x12*x2z+1./16.*o*x12*tx+1./2.*o*x2z-1./8.*o*tx+1./
     #    16.*o*txs-1./8.*os*x2z+1./16.*os*tx-1./16.*x12*x2z*tx
     #    +1./2.*x12*x2z+1./16.*x12*txs-1./8.*x2z*x12s-3./8.*
     #    x2z-1./8.*txs)
      gz30q= gz30q+rwwgz(4,14)*vvq*gstm2*yc*(-1./16.*o
     #    *x12*x2z*tx+1./8.*o*x12*x2zs+1./4.*o*x2z*tx-1./16.*o*
     #    x2z*txs+1./16.*o*tx*x2zs-7./16.*o*x2zs-1./16.*os*x2z*tx
     #    +1./16.*os*x2zs-1./16.*x12*x2z*txs+1./8.*x12*tx*x2zs-
     #    1./4.*x12*x2zs+1./4.*x2z*txs-3./16.*tx*x2zs+3./8.*x2zs
     #    )
      gz30q= gz30q+rwwgz(7,1)*bxpi*vvq*gstm2*yc*(-1./4.
     #    *o*x12*x2zs+1./4.*o*x2zs-1./4.*os*x2zs-1./4.*x12*tx*
     #    x2zs+1./4.*tx*x2zs+1./4.*x2zs*txs)
      gz30q= gz30q+rwwgz(7,1)*vvq*gstm2*bxps*yc*(1./8.*o*
     #    x12+1./8.*o*tx-1./8.*o+1./8.*os+1./8.*x12*tx-1./8.*
     #    tx)
      gz30q= gz30q+rwwgz(7,1)*vvq*gstm2*yc*bxp*(-1./8.*
     #    o*x12*x2z+3./8.*o*x12*tx-1./2.*o*x12-1./4.*o*x2z*tx+1.
     #    /4.*o*x2z-1./4.*o*tx+1./4.*o*x12s-1./8.*o*txs+1./4.*o
     #    +1./2.*os*x12-1./4.*os*x2z+1./8.*os*tx-1./2.*os+1./
     #    4.*oc-1./8.*x12*x2z*tx-1./2.*x12*tx-1./8.*x12*txs+1./
     #    4.*x2z*tx+1./4.*tx*x12s+1./4.*tx+1./4.*txs)
      gz30q= gz30q+rwwgz(7,1)*vvq*gstm2*yc*(-3./8.*o*
     #    x12*x2z*tx+3./4.*o*x12*x2z+1./4.*o*x2z*tx-1./4.*o*x2z*
     #    x12s+1./8.*o*x2z*txs-1./2.*o*x2z+1./8.*o*tx*x2zs-1./8.
     #    *o*x2zs-1./2.*os*x12*x2z-1./8.*os*x2z*tx+3./4.*os*x2z
     #    +1./8.*os*x2zs-1./4.*oc*x2z+3./4.*x12*x2z*tx+1./8.*
     #    x12*x2z*txs-1./4.*x2z*tx*x12s-1./2.*x2z*tx-1./2.*x2z*
     #    txs-1./8.*tx*x2zs)
      gz30q= gz30q+rwwgz(7,11)*bxpi*vvq*gstm2*yc*(1./8.*o
     #    *tx*x2zs+1./8.*x2zs*txs)
      gz30q= gz30q+rwwgz(7,11)*vvq*gstm2*bxps*yc*(1./16.*
     #    o*x12+1./16.*o*tx-1./16.*o+1./16.*os+1./16.*x12*tx-
     #    1./16.*tx)
      gz30q= gz30q+rwwgz(7,11)*vvq*gstm2*yc*bxp*(-1./16.
     #    *o*x12*x2z-1./16.*o*x12*tx-1./8.*o*x2z*tx+1./8.*o*x2z
     #    +1./8.*o*tx-1./16.*o*txs-1./8.*os*x2z-1./16.*os*tx-
     #    1./16.*x12*x2z*tx-1./16.*x12*txs+1./8.*x2z*tx+1./8.*txs
     #    )
      gz30q= gz30q+rwwgz(7,11)*vvq*gstm2*yc*(1./16.*o*
     #    x12*x2z*tx-1./4.*o*x2z*tx+1./16.*o*x2z*txs+1./16.*o*tx*
     #    x2zs-1./16.*o*x2zs+1./16.*os*x2z*tx+1./16.*os*x2zs+1./
     #    16.*x12*x2z*txs-1./4.*x2z*txs-1./16.*tx*x2zs)
      gz30q= gz30q+rwwgz(7,12)*bxpi*vvq*gstm2*yc*(-1./8.
     #    *o*x12*x2zs-1./8.*o*tx*x2zs+1./8.*o*x2zs-1./8.*os*x2zs
     #    -1./8.*x12*tx*x2zs+1./8.*tx*x2zs)
      gz30q= gz30q+rwwgz(7,12)*vvq*gstm2*yc*bxp*(1./4.*o*
     #    x12*tx-1./4.*o*x12-1./4.*o*tx+1./8.*o*x12s+1./8.*o+
     #    1./4.*os*x12+1./8.*os*tx-1./4.*os+1./8.*oc-1./4.*x12*
     #    tx+1./8.*tx*x12s+1./8.*tx)
      gz30q= gz30q+rwwgz(7,12)*vvq*gstm2*yc*(-1./4.*o*
     #    x12*x2z*tx+3./8.*o*x12*x2z+3./8.*o*x2z*tx-1./8.*o*x2z*
     #    x12s-1./4.*o*x2z-1./4.*os*x12*x2z-1./8.*os*x2z*tx+3./
     #    8.*os*x2z-1./8.*oc*x2z+3./8.*x12*x2z*tx-1./8.*x2z*tx*
     #    x12s-1./4.*x2z*tx)
      gz30q= gz30q+rwwgz(7,13)*bxpi*vvq*gstm2*yc*(1./16.*
     #    o*x12*x2zs+1./16.*o*x2z*txs-1./16.*o*x2zs+1./16.*os*
     #    x2zs+1./16.*x12*x2z*txs-1./16.*x12*tx*x2zs)
      gz30q= gz30q+rwwgz(7,13)*vvq*gstm2*bxps*yc*(1./32.
     #    +1./16.*o*x12-1./16.*o+1./32.*os-1./16.*x12+1./32.*
     #    x12s)
      gz30q= gz30q+rwwgz(7,13)*vvq*gstm2*yc*bxp*(-1./16.
     #    *o*x12*x2z+1./8.*o*x12+1./8.*o*x2z-1./16.*o*x12s-1./
     #    16.*o-1./8.*os*x12-1./16.*os*x2z+1./8.*os-1./16.*oc
     #    +1./16.*x12*x2z-1./16.*x2z)
      gz30q= gz30q+rwwgz(7,13)*vvq*gstm2*yc*(-1./16.*o
     #    *x12*x2z*tx-3./16.*o*x12*x2z+1./16.*o*x12*txs+1./16.*o*
     #    x2z*x12s+1./8.*o*x2z-1./16.*o*x2zs-1./16.*o*txs+1./8.
     #    *os*x12*x2z-3./16.*os*x2z+1./32.*os*x2zs+1./32.*os*txs
     #    +1./16.*oc*x2z+1./16.*x12*x2z*tx-1./16.*x12*txs-1./16.
     #    *x2z*tx*x12s+1./32.*x12s*txs+1./32.*x2zs)
      gz30q= gz30q+rwwgz(7,14)*bxpi*vvq*gstm2*yc*(1./16.*
     #    o*x2zc+1./16.*x12*tx*x2zs-1./16.*x2zc+1./16.*x2zs*txs)
      gz30q= gz30q+rwwgz(7,14)*vvq*gstm2*bxps*yc*(1./16.
     #    +3./32.*o*x12+1./32.*o*tx-3./32.*o+1./32.*os+1./32.
     #    *x12*tx-1./8.*x12-1./32.*tx+1./16.*x12s)
      gz30q= gz30q+rwwgz(7,14)*vvq*gstm2*yc*bxp*(-5./32.
     #    *o*x12*x2z-3./32.*o*x12*tx-1./16.*o*x2z*tx+1./4.*o*x2z
     #    -1./32.*o*txs-1./16.*os*x2z-1./32.*os*tx-1./32.*x12*
     #    x2z*tx+1./4.*x12*x2z+1./16.*x12*tx-1./32.*x12*txs+1./
     #    16.*x2z*tx-1./16.*x2z*x12s-3./16.*x2z-1./16.*tx*x12s+
     #    1./16.*txs)
      gz30q= gz30q+rwwgz(7,14)*vvq*gstm2*yc*(3./32.*o*
     #    x12*x2z*tx+1./16.*o*x12*x2zs+1./32.*o*x2z*txs+1./32.*o*
     #    tx*x2zs-7./32.*o*x2zs+1./32.*os*x2z*tx+1./32.*os*x2zs
     #    -1./8.*x12*x2z*tx+1./32.*x12*x2z*txs-1./8.*x12*x2zs+1.
     #    /16.*x2z*tx*x12s-1./8.*x2z*txs-1./32.*tx*x2zs+3./16.*
     #    x2zs)
      gz30q= gz30q+rwwgz(10,1)*bxpi*vvq*gstm2*yc*(1./4.*o
     #    *x12*x2zs-1./4.*o*x2zs+1./4.*os*x2zs+1./4.*x12*tx*x2zs
     #    -1./4.*tx*x2zs-1./4.*x2zs*txs)
      gz30q= gz30q+rwwgz(10,1)*vvq*gstm2*bxps*yc*(-1./8.
     #    *o*x12-1./8.*o*tx+1./8.*o-1./8.*os-1./8.*x12*tx+1./
     #    8.*tx)
      gz30q= gz30q+rwwgz(10,1)*vvq*gstm2*yc*bxp*(1./8.*o*
     #    x12*x2z-3./8.*o*x12*tx+1./2.*o*x12+1./4.*o*x2z*tx-1./
     #    4.*o*x2z+1./4.*o*tx-1./4.*o*x12s+1./8.*o*txs-1./4.*o
     #    -1./2.*os*x12+1./4.*os*x2z-1./8.*os*tx+1./2.*os-1./
     #    4.*oc+1./8.*x12*x2z*tx+1./2.*x12*tx+1./8.*x12*txs-1./
     #    4.*x2z*tx-1./4.*tx*x12s-1./4.*tx-1./4.*txs)
      gz30q= gz30q+rwwgz(10,1)*vvq*gstm2*yc*(3./8.*o*x12
     #    *x2z*tx-3./4.*o*x12*x2z-1./4.*o*x2z*tx+1./4.*o*x2z*x12s
     #    -1./8.*o*x2z*txs+1./2.*o*x2z-1./8.*o*tx*x2zs+1./8.*o*
     #    x2zs+1./2.*os*x12*x2z+1./8.*os*x2z*tx-3./4.*os*x2z-1./
     #    8.*os*x2zs+1./4.*oc*x2z-3./4.*x12*x2z*tx-1./8.*x12*x2z*
     #    txs+1./4.*x2z*tx*x12s+1./2.*x2z*tx+1./2.*x2z*txs+1./8.
     #    *tx*x2zs)
      gz30q= gz30q+rwwgz(10,11)*bxpi*vvq*gstm2*yc*(-1./
     #    8.*o*tx*x2zs-1./8.*x2zs*txs)
      gz30q= gz30q+rwwgz(10,11)*vvq*gstm2*bxps*yc*(-1./
     #    16.*o*x12-1./16.*o*tx+1./16.*o-1./16.*os-1./16.*x12*
     #    tx+1./16.*tx)
      gz30q= gz30q+rwwgz(10,11)*vvq*gstm2*yc*bxp*(1./16.*
     #    o*x12*x2z+1./16.*o*x12*tx+1./8.*o*x2z*tx-1./8.*o*x2z-
     #    1./8.*o*tx+1./16.*o*txs+1./8.*os*x2z+1./16.*os*tx+1./
     #    16.*x12*x2z*tx+1./16.*x12*txs-1./8.*x2z*tx-1./8.*txs)
      gz30q= gz30q+rwwgz(10,11)*vvq*gstm2*yc*(-1./16.*
     #    o*x12*x2z*tx+1./4.*o*x2z*tx-1./16.*o*x2z*txs-1./16.*o*
     #    tx*x2zs+1./16.*o*x2zs-1./16.*os*x2z*tx-1./16.*os*x2zs
     #    -1./16.*x12*x2z*txs+1./4.*x2z*txs+1./16.*tx*x2zs)
      gz30q= gz30q+rwwgz(10,12)*bxpi*vvq*gstm2*yc*(1./8.*
     #    o*x12*x2zs+1./8.*o*tx*x2zs-1./8.*o*x2zs+1./8.*os*x2zs
     #    +1./8.*x12*tx*x2zs-1./8.*tx*x2zs)
      gz30q= gz30q+rwwgz(10,12)*vvq*gstm2*yc*bxp*(-1./4.
     #    *o*x12*tx+1./4.*o*x12+1./4.*o*tx-1./8.*o*x12s-1./8.*o
     #    -1./4.*os*x12-1./8.*os*tx+1./4.*os-1./8.*oc+1./4.*
     #    x12*tx-1./8.*tx*x12s-1./8.*tx)
      gz30q= gz30q+rwwgz(10,12)*vvq*gstm2*yc*(1./4.*o*
     #    x12*x2z*tx-3./8.*o*x12*x2z-3./8.*o*x2z*tx+1./8.*o*x2z*
     #    x12s+1./4.*o*x2z+1./4.*os*x12*x2z+1./8.*os*x2z*tx-3./
     #    8.*os*x2z+1./8.*oc*x2z-3./8.*x12*x2z*tx+1./8.*x2z*tx*
     #    x12s+1./4.*x2z*tx)
      gz30q= gz30q+rwwgz(10,13)*bxpi*vvq*gstm2*yc*(-1./
     #    16.*o*x12*x2zs-1./16.*o*x2z*txs+1./16.*o*x2zs-1./16.*os
     #    *x2zs-1./16.*x12*x2z*txs+1./16.*x12*tx*x2zs)
      gz30q= gz30q+rwwgz(10,13)*vvq*gstm2*bxps*yc*(-1./
     #    32.-1./16.*o*x12+1./16.*o-1./32.*os+1./16.*x12-1./
     #    32.*x12s)
      gz30q= gz30q+rwwgz(10,13)*vvq*gstm2*yc*bxp*(1./16.*
     #    o*x12*x2z-1./8.*o*x12-1./8.*o*x2z+1./16.*o*x12s+1./16.
     #    *o+1./8.*os*x12+1./16.*os*x2z-1./8.*os+1./16.*oc-1./
     #    16.*x12*x2z+1./16.*x2z)
      gz30q= gz30q+rwwgz(10,13)*vvq*gstm2*yc*(1./16.*o*
     #    x12*x2z*tx+3./16.*o*x12*x2z-1./16.*o*x12*txs-1./16.*o*
     #    x2z*x12s-1./8.*o*x2z+1./16.*o*x2zs+1./16.*o*txs-1./8.
     #    *os*x12*x2z+3./16.*os*x2z-1./32.*os*x2zs-1./32.*os*txs
     #    -1./16.*oc*x2z-1./16.*x12*x2z*tx+1./16.*x12*txs+1./16.
     #    *x2z*tx*x12s-1./32.*x12s*txs-1./32.*x2zs)
      gz30q= gz30q+rwwgz(10,14)*bxpi*vvq*gstm2*yc*(-1./
     #    16.*o*x2zc-1./16.*x12*tx*x2zs+1./16.*x2zc-1./16.*x2zs*
     #    txs)
      gz30q= gz30q+rwwgz(10,14)*vvq*gstm2*bxps*yc*(-1./
     #    16.-3./32.*o*x12-1./32.*o*tx+3./32.*o-1./32.*os-1./
     #    32.*x12*tx+1./8.*x12+1./32.*tx-1./16.*x12s)
      gz30q= gz30q+rwwgz(10,14)*vvq*gstm2*yc*bxp*(5./32.*
     #    o*x12*x2z+3./32.*o*x12*tx+1./16.*o*x2z*tx-1./4.*o*x2z
     #    +1./32.*o*txs+1./16.*os*x2z+1./32.*os*tx+1./32.*x12*
     #    x2z*tx-1./4.*x12*x2z-1./16.*x12*tx+1./32.*x12*txs-1./
     #    16.*x2z*tx+1./16.*x2z*x12s+3./16.*x2z+1./16.*tx*x12s-
     #    1./16.*txs)
      gz30q= gz30q+rwwgz(10,14)*vvq*gstm2*yc*(-3./32.*
     #    o*x12*x2z*tx-1./16.*o*x12*x2zs-1./32.*o*x2z*txs-1./32.*
     #    o*tx*x2zs+7./32.*o*x2zs-1./32.*os*x2z*tx-1./32.*os*x2zs
     #    +1./8.*x12*x2z*tx-1./32.*x12*x2z*txs+1./8.*x12*x2zs-1.
     #    /16.*x2z*tx*x12s+1./8.*x2z*txs+1./32.*tx*x2zs-3./16.*
     #    x2zs)
      gz30q= gz30q+rwwgz(11,1)*bxpi*vvq*gstm2*yc*(1./2.*o
     #    *x2z*tx-1./2.*o*x2zs-1./2.*x12*x2z*tx-1./2.*x12*x2zs+
     #    x2z*txs+1./2.*x2zs)
      gz30q= gz30q+rwwgz(11,1)*vvq*gstm2*bxps*yc*(-3./2.
     #    +3./2.*o+3./2.*x12)
      gz30q= gz30q+rwwgz(11,1)*vvq*gstm2*yc*bxp*(1./2.-
     #    5./2.*o*x2z-3./4.*o+1./4.*os-x12*x2z-2*x12*tx-5./4.
     #    *x12-x2z*tx+5./2.*x2z+3./2.*tx+3./4.*x12s+txs)
      gz30q= gz30q+rwwgz(11,1)*vvq*gstm2*yc*(-1./4.*o*
     #    x12*x2z-1./2.*o*x2z*tx+5./4.*o*x2z-1./2.*o*tx+o*x2zs
     #    +1./2.*o*txs-1./4.*os*x2z+1./4.*os*tx+x12*x2z*tx+7./
     #    4.*x12*x2z+1./2.*x12*tx+1./2.*x12*txs-3./2.*x2z*tx-1./
     #    2.*x2z*x12s-x2z*txs-x2z-1./4.*tx*x12s+tx*x2zs-x2zs
     #    -txs)
      gz30q= gz30q+rwwgz(11,4)*bxpi*vvq*gstm2*yc*(1./4.*o
     #    *x12*x2zs-1./4.*o*tx*x2zs+1./4.*o*x2zc+1./4.*x12*tx*
     #    x2zs+1./4.*tx*x2zc-1./4.*x2zc-1./4.*x2zs*txs)
      gz30q= gz30q+rwwgz(11,4)*vvq*gstm2*bxps*yc*(1./4.
     #    +1./2.*o*x12-1./2.*o+1./4.*os-1./2.*x12+1./4.*x12s
     #    )
      gz30q= gz30q+rwwgz(11,4)*vvq*gstm2*yc*bxp*(-3./4.
     #    *o*x12*x2z+1./4.*o*x12-1./4.*o*x2z*tx+5./4.*o*x2z-1./
     #    4.*o*tx-1./4.*o*x12s+1./4.*o*txs-1./4.*os*x12-1./2.*
     #    os*x2z+1./4.*os*tx-1./4.*x12*x2z*tx+x12*x2z+1./4.*x12
     #    *tx+1./4.*x12*txs+1./4.*x2z*tx-1./4.*x2z*x12s-3./4.*
     #    x2z-1./4.*tx*x12s-1./4.*txs)
      gz30q= gz30q+rwwgz(11,4)*vvq*gstm2*yc*(-1./2.*o*
     #    x12*x2z+1./4.*o*x12*x2zs+1./2.*o*x2z*tx+1./4.*o*x2z*
     #    x12s-1./4.*o*x2z*txs+1./4.*o*tx*x2zs-o*x2zs+1./4.*os*
     #    x12*x2z-1./4.*os*x2z*tx+1./4.*os*x2zs-1./2.*x12*x2z*tx
     #    -1./4.*x12*x2z*txs+1./4.*x12*tx*x2zs-1./2.*x12*x2zs+1.
     #    /4.*x2z*tx*x12s+1./2.*x2z*txs-1./2.*tx*x2zs+3./4.*x2zs
     #    )
      gz30q= gz30q+rwwgz(11,7)*bxpi*vvq*gstm2*yc*(1./8.*o
     #    *tx*x2zs+1./8.*x2zs*txs)
      gz30q= gz30q+rwwgz(11,7)*vvq*gstm2*bxps*yc*(1./16.*
     #    o*x12+1./16.*o*tx-1./16.*o+1./16.*os+1./16.*x12*tx-
     #    1./16.*tx)
      gz30q= gz30q+rwwgz(11,7)*vvq*gstm2*yc*bxp*(-1./16.
     #    *o*x12*x2z-1./16.*o*x12*tx-1./8.*o*x2z*tx+1./8.*o*x2z
     #    +1./8.*o*tx-1./16.*o*txs-1./8.*os*x2z-1./16.*os*tx-
     #    1./16.*x12*x2z*tx-1./16.*x12*txs+1./8.*x2z*tx+1./8.*txs
     #    )
      gz30q= gz30q+rwwgz(11,7)*vvq*gstm2*yc*(1./16.*o*
     #    x12*x2z*tx-1./4.*o*x2z*tx+1./16.*o*x2z*txs+1./16.*o*tx*
     #    x2zs-1./16.*o*x2zs+1./16.*os*x2z*tx+1./16.*os*x2zs+1./
     #    16.*x12*x2z*txs-1./4.*x2z*txs-1./16.*tx*x2zs)
      gz30q= gz30q+rwwgz(11,10)*bxpi*vvq*gstm2*yc*(-1./
     #    8.*o*tx*x2zs-1./8.*x2zs*txs)
      gz30q= gz30q+rwwgz(11,10)*vvq*gstm2*bxps*yc*(-1./
     #    16.*o*x12-1./16.*o*tx+1./16.*o-1./16.*os-1./16.*x12*
     #    tx+1./16.*tx)
      gz30q= gz30q+rwwgz(11,10)*vvq*gstm2*yc*bxp*(1./16.*
     #    o*x12*x2z+1./16.*o*x12*tx+1./8.*o*x2z*tx-1./8.*o*x2z-
     #    1./8.*o*tx+1./16.*o*txs+1./8.*os*x2z+1./16.*os*tx+1./
     #    16.*x12*x2z*tx+1./16.*x12*txs-1./8.*x2z*tx-1./8.*txs)
      gz30q= gz30q+rwwgz(11,10)*vvq*gstm2*yc*(-1./16.*
     #    o*x12*x2z*tx+1./4.*o*x2z*tx-1./16.*o*x2z*txs-1./16.*o*
     #    tx*x2zs+1./16.*o*x2zs-1./16.*os*x2z*tx-1./16.*os*x2zs
     #    -1./16.*x12*x2z*txs+1./4.*x2z*txs+1./16.*tx*x2zs)
      gz30q= gz30q+rwwgz(11,11)*vvq*gstm2*bxps*yc*(-1./
     #    2.+1./2.*o+1./2.*x12)
      gz30q= gz30q+rwwgz(11,11)*vvq*gstm2*yc*bxp*(-1./2.
     #    *o*x12-o*x2z+1./2.*o*tx-1./2.*x12*x2z-1./2.*x12*tx-
     #    1./2.*x2z*tx+x2z+1./2.*txs)
      gz30q= gz30q+rwwgz(11,11)*vvq*gstm2*yc*(1./2.*o*
     #    x12*x2z-1./2.*o*x2z*tx+1./2.*o*x2zs+1./2.*x12*x2z*tx-
     #    1./2.*x2z*txs+1./2.*tx*x2zs-1./2.*x2zs)
      gz30q= gz30q+rwwgz(11,12)*bxpi*vvq*gstm2*yc*(1./4.*
     #    o*x2z*tx-1./4.*o*x2zs-1./4.*x12*x2z*tx+1./2.*x2z*txs-
     #    1./2.*tx*x2zs+1./4.*x2zs)
      gz30q= gz30q+rwwgz(11,12)*vvq*gstm2*bxps*yc*(-1./
     #    8.+1./8.*o+1./8.*x12)
      gz30q= gz30q+rwwgz(11,12)*vvq*gstm2*yc*bxp*(1./4.
     #    +1./4.*o*x12-1./8.*o*tx-3./8.*o+1./8.*os+1./8.*x12*
     #    x2z-1./8.*x12*tx-3./8.*x12+1./4.*tx+1./8.*x12s)
      gz30q= gz30q+rwwgz(11,12)*vvq*gstm2*yc*(-3./8.*o
     #    *x12*x2z-1./8.*o*x2z*tx+5./8.*o*x2z-1./4.*o*tx-1./8.*
     #    o*x2zs+1./4.*o*txs-1./8.*os*x2z+1./8.*os*tx-3./8.*x12
     #    *x2z*tx+3./8.*x12*x2z+1./4.*x12*tx+1./4.*x12*txs+1./4.
     #    *x2z*tx-1./2.*x2z-1./8.*tx*x12s+1./8.*x2zs-1./2.*txs
     #    )
      gz30q= gz30q+rwwgz(11,13)*bxpi*vvq*gstm2*yc*(1./8.*
     #    o*x2z*tx-1./8.*o*x2zs-1./8.*x12*x2z*tx+1./4.*x2z*txs+
     #    1./8.*x2zs)
      gz30q= gz30q+rwwgz(11,13)*vvq*gstm2*bxps*yc*(1./16.
     #    -1./16.*o-1./16.*x12)
      gz30q= gz30q+rwwgz(11,13)*vvq*gstm2*yc*bxp*(1./8.
     #    +1./8.*o*x12-3./16.*o*tx+1./16.*o-3./16.*os-1./16.*
     #    x12*x2z+1./16.*x12*tx-3./16.*x12+1./8.*tx+1./16.*x12s
     #    )
      gz30q= gz30q+rwwgz(11,13)*vvq*gstm2*yc*(1./16.*o*
     #    x12*x2z-1./4.*o*x12*tx+5./16.*o*x2z*tx+1./16.*o*x2z-1.
     #    /8.*o*tx+1./16.*o*x2zs-1./8.*o*txs+3./16.*os*x2z-3./
     #    16.*os*tx+3./16.*x12*x2z*tx+3./16.*x12*x2z+1./8.*x12*tx
     #    -1./8.*x12*txs-1./8.*x2z*tx-1./4.*x2z-1./16.*tx*x12s
     #    -1./16.*x2zs-1./4.*txs)
      gz30q= gz30q+rwwgz(11,14)*bxpi*vvq*gstm2*yc*(-1./
     #    4.*tx*x2zs)
      gz30q= gz30q+rwwgz(11,14)*vvq*gstm2*bxps*yc*(-1./
     #    8.+1./8.*o+1./8.*x12)
      gz30q= gz30q+rwwgz(11,14)*vvq*gstm2*yc*bxp*(-1./4.
     #    *o*x2z+3./8.*o*tx-1./8.*x12*x2z+1./8.*x12*tx-1./4.*
     #    x2z*tx+1./4.*x2z-1./4.*tx+1./4.*txs)
      gz30q= gz30q+rwwgz(11,14)*vvq*gstm2*yc*(-3./8.*o
     #    *x2z*tx+1./8.*o*x2zs-1./8.*x12*x2z*tx+1./2.*x2z*tx-1./
     #    4.*x2z*txs+1./4.*tx*x2zs-1./8.*x2zs)
      gz30q= gz30q+rwwgz(12,1)*bxpi*vvq*gstm2*yc*(-o*
     #    x2zs-x12*x2z*tx-1./2.*x12*x2zs+2*x2z*tx+x2z*txs-tx*
     #    x2zs+x2zs)
      gz30q= gz30q+rwwgz(12,1)*vvq*gstm2*bxps*yc*(-1./4.
     #    +1./4.*o+1./4.*x12)
      gz30q= gz30q+rwwgz(12,1)*vvq*gstm2*yc*bxp*(2+3*o*
     #    x12-1./4.*o*tx-4*o+2*os+1./4.*x12*x2z-1./4.*x12*tx
     #    -3*x12+1./2.*tx+x12s)
      gz30q= gz30q+rwwgz(12,1)*vvq*gstm2*yc*(-2*o*x12*
     #    x2z-1./2.*o*x12*tx-1./4.*o*x2z*tx+4*o*x2z+2*o*tx-1./
     #    4.*o*x2zs+1./2.*o*txs-os*x2z-3./4.*x12*x2z*tx+5./2.*
     #    x12*x2z+3*x12*tx+1./2.*x12*txs+1./2.*x2z*tx-1./2.*x2z
     #    *x12s-3*x2z-1./2.*tx*x12s-2*tx+1./4.*x2zs-txs)
      gz30q= gz30q+rwwgz(12,4)*bxpi*vvq*gstm2*yc*(-1./4.
     #    *tx*x2zs)
      gz30q= gz30q+rwwgz(12,4)*vvq*gstm2*bxps*yc*(1./8.
     #    +1./4.*o*x12-1./4.*o+1./8.*os-1./4.*x12+1./8.*x12s
     #    )
      gz30q= gz30q+rwwgz(12,4)*vvq*gstm2*yc*bxp*(-1./8.
     #    *o*x12*x2z-1./4.*o*x12*tx+3./8.*o*x2z+3./8.*o*tx-1./8.
     #    *os*x2z-1./8.*os*tx+1./4.*x12*x2z+3./8.*x12*tx-1./4.*
     #    x2z-1./8.*tx*x12s-1./4.*tx)
      gz30q= gz30q+rwwgz(12,4)*vvq*gstm2*yc*(-3./8.*o*
     #    x2z*tx-1./8.*o*x2zs-3./8.*x12*x2z*tx+1./2.*x2z*tx+1./
     #    8.*x2zs)
      gz30q= gz30q+rwwgz(12,7)*bxpi*vvq*gstm2*yc*(-1./8.
     #    *o*x12*x2zs-1./8.*o*tx*x2zs+1./8.*o*x2zs-1./8.*os*x2zs
     #    -1./8.*x12*tx*x2zs+1./8.*tx*x2zs)
      gz30q= gz30q+rwwgz(12,7)*vvq*gstm2*yc*bxp*(1./4.*o*
     #    x12*tx-1./4.*o*x12-1./4.*o*tx+1./8.*o*x12s+1./8.*o+
     #    1./4.*os*x12+1./8.*os*tx-1./4.*os+1./8.*oc-1./4.*x12*
     #    tx+1./8.*tx*x12s+1./8.*tx)
      gz30q= gz30q+rwwgz(12,7)*vvq*gstm2*yc*(-1./4.*o*
     #    x12*x2z*tx+3./8.*o*x12*x2z+3./8.*o*x2z*tx-1./8.*o*x2z*
     #    x12s-1./4.*o*x2z-1./4.*os*x12*x2z-1./8.*os*x2z*tx+3./
     #    8.*os*x2z-1./8.*oc*x2z+3./8.*x12*x2z*tx-1./8.*x2z*tx*
     #    x12s-1./4.*x2z*tx)
      gz30q= gz30q+rwwgz(12,10)*bxpi*vvq*gstm2*yc*(1./8.*
     #    o*x12*x2zs+1./8.*o*tx*x2zs-1./8.*o*x2zs+1./8.*os*x2zs
     #    +1./8.*x12*tx*x2zs-1./8.*tx*x2zs)
      gz30q= gz30q+rwwgz(12,10)*vvq*gstm2*yc*bxp*(-1./4.
     #    *o*x12*tx+1./4.*o*x12+1./4.*o*tx-1./8.*o*x12s-1./8.*o
     #    -1./4.*os*x12-1./8.*os*tx+1./4.*os-1./8.*oc+1./4.*
     #    x12*tx-1./8.*tx*x12s-1./8.*tx)
      gz30q= gz30q+rwwgz(12,10)*vvq*gstm2*yc*(1./4.*o*
     #    x12*x2z*tx-3./8.*o*x12*x2z-3./8.*o*x2z*tx+1./8.*o*x2z*
     #    x12s+1./4.*o*x2z+1./4.*os*x12*x2z+1./8.*os*x2z*tx-3./
     #    8.*os*x2z+1./8.*oc*x2z-3./8.*x12*x2z*tx+1./8.*x2z*tx*
     #    x12s+1./4.*x2z*tx)
      gz30q= gz30q+rwwgz(12,11)*bxpi*vvq*gstm2*yc*(1./4.*
     #    o*x2z*tx-1./4.*o*x2zs-1./4.*x12*x2z*tx+1./2.*x2z*txs-
     #    1./2.*tx*x2zs+1./4.*x2zs)
      gz30q= gz30q+rwwgz(12,11)*vvq*gstm2*bxps*yc*(-1./
     #    8.+1./8.*o+1./8.*x12)
      gz30q= gz30q+rwwgz(12,11)*vvq*gstm2*yc*bxp*(1./4.
     #    +1./4.*o*x12-1./8.*o*tx-3./8.*o+1./8.*os+1./8.*x12*
     #    x2z-1./8.*x12*tx-3./8.*x12+1./4.*tx+1./8.*x12s)
      gz30q= gz30q+rwwgz(12,11)*vvq*gstm2*yc*(-3./8.*o
     #    *x12*x2z-1./8.*o*x2z*tx+5./8.*o*x2z-1./4.*o*tx-1./8.*
     #    o*x2zs+1./4.*o*txs-1./8.*os*x2z+1./8.*os*tx-3./8.*x12
     #    *x2z*tx+3./8.*x12*x2z+1./4.*x12*tx+1./4.*x12*txs+1./4.
     #    *x2z*tx-1./2.*x2z-1./8.*tx*x12s+1./8.*x2zs-1./2.*txs
     #    )
      gz30q= gz30q+rwwgz(12,12)*bxpi*vvq*gstm2*yc*(x2z*tx
     #    )
      gz30q= gz30q+rwwgz(12,12)*vvq*gstm2*yc*bxp*(1./2.
     #    +1./2.*o*x12-o+1./2.*os-1./2.*x12)
      gz30q= gz30q+rwwgz(12,12)*vvq*gstm2*yc*(1./2.*o*
     #    x2z+o*tx+x12*tx-1./2.*x2z-tx)
      gz30q= gz30q+rwwgz(12,13)*bxpi*vvq*gstm2*yc*(-1./
     #    2.*o*x2z*tx+1./4.*o*txs-1./2.*x12*x2z*tx+1./4.*x12*txs
     #    +1./4.*x2z*tx)
      gz30q= gz30q+rwwgz(12,13)*vvq*gstm2*yc*bxp*(-1./8.
     #    +1./8.*o+1./8.*x12)
      gz30q= gz30q+rwwgz(12,13)*vvq*gstm2*yc*(-1./4.*o
     #    *x12*x2z-1./4.*o*x12*tx+1./8.*o*x2z+3./8.*o*tx-1./4.*
     #    os*x2z+3./8.*x12*tx+1./8.*x2z-1./4.*tx*x12s-1./4.*tx
     #    )
      gz30q= gz30q+rwwgz(12,14)*bxpi*vvq*gstm2*yc*(1./8.*
     #    o*x2z*tx+1./8.*o*x2zs+1./8.*x12*x2z*tx+1./4.*x2z*txs-
     #    1./4.*tx*x2zs-1./8.*x2zs)
      gz30q= gz30q+rwwgz(12,14)*vvq*gstm2*bxps*yc*(1./16.
     #    -1./16.*o-1./16.*x12)
      gz30q= gz30q+rwwgz(12,14)*vvq*gstm2*yc*bxp*(-1./8.
     #    -1./4.*o*x12+1./4.*o*x2z-5./16.*o*tx+5./16.*o-3./16.
     #    *os+3./16.*x12*x2z-1./16.*x12*tx+3./16.*x12-1./4.*x2z
     #    +1./4.*tx-1./16.*x12s)
      gz30q= gz30q+rwwgz(12,14)*vvq*gstm2*yc*(3./16.*o*
     #    x12*x2z+1./8.*o*x12*tx+3./16.*o*x2z*tx-7./16.*o*x2z-1.
     #    /8.*o*tx-3./16.*o*x2zs+3./16.*os*x2z+1./16.*os*tx-1./
     #    16.*x12*x2z*tx-3./16.*x12*x2z-1./8.*x12*tx+1./4.*x2z+
     #    1./16.*tx*x12s+3./16.*x2zs-1./4.*txs)
      gz30q= gz30q+rwwgz(13,1)*bxpi*vvq*gstm2*yc*(-1./4.
     #    *o*x2z*tx-1./4.*o*x2zs+1./2.*o*txs-5./4.*x12*x2z*tx+1.
     #    /2.*x12*txs+1./2.*x2z*tx+1./2.*x2z*txs+1./4.*x2zs)
      gz30q= gz30q+rwwgz(13,1)*vvq*gstm2*bxps*yc*(1./8.
     #    -1./8.*o-1./8.*x12)
      gz30q= gz30q+rwwgz(13,1)*vvq*gstm2*yc*bxp*(-3./8.
     #    *o*tx+5./8.*o-5./8.*os-1./8.*x12*x2z+1./8.*x12*tx-1.
     #    /8.*x12+1./4.*tx+1./8.*x12s)
      gz30q= gz30q+rwwgz(13,1)*vvq*gstm2*yc*(-3./8.*o*
     #    x12*x2z-3./4.*o*x12*tx+5./8.*o*x2z*tx+1./8.*o*x2z+1./
     #    8.*o*x2zs-1./4.*o*txs+1./8.*os*x2z-1./8.*os*tx+3./8.*
     #    x12*x2z*tx+3./8.*x12*x2z+x12*tx-1./4.*x12*txs-1./4.*
     #    x2z*tx-1./4.*x2z-5./8.*tx*x12s-1./2.*tx-1./8.*x2zs-
     #    1./2.*txs)
      gz30q= gz30q+rwwgz(13,4)*bxpi*vvq*gstm2*yc*(-1./8.
     #    *o*x12*x2z*tx+1./8.*o*x12*x2zs-1./8.*o*x2z*txs+1./8.*o*
     #    tx*x2zs-1./8.*o*x2zs-1./8.*os*x2z*tx+1./8.*os*x2zs-1./
     #    8.*x12*x2z*txs+1./8.*x12*tx*x2zs)
      gz30q= gz30q+rwwgz(13,4)*vvq*gstm2*bxps*yc*(-1./
     #    16.-1./8.*o*x12+1./8.*o-1./16.*os+1./8.*x12-1./16.*
     #    x12s)
      gz30q= gz30q+rwwgz(13,4)*vvq*gstm2*yc*bxp*(1./16.*o
     #    *x12*x2z+3./16.*o*x12-3./16.*o*x2z-1./16.*o*x12s-1./8.
     #    *o-1./8.*os*x12+1./16.*os*x2z+3./16.*os-1./16.*oc-1.
     #    /8.*x12*x2z+1./8.*x2z)
      gz30q= gz30q+rwwgz(13,4)*vvq*gstm2*yc*(3./16.*o*
     #    x12*x2z*tx-5./16.*o*x12*x2z+1./8.*o*x12*tx-1./8.*o*x12*
     #    txs-1./8.*o*x2z*tx+1./8.*o*x2z*x12s+1./4.*o*x2z-1./16.
     #    *o*tx*x12s+1./16.*o*x2zs+1./8.*o*txs+3./16.*os*x12*x2z
     #    -1./8.*os*x12*tx+1./16.*os*x2z*tx-5./16.*os*x2z+1./8.
     #    *os*tx-1./16.*os*txs+1./16.*oc*x2z-1./16.*oc*tx-1./8.
     #    *x12*x2z*tx+1./8.*x12*txs+1./8.*x2z*tx*x12s-1./16.*x12s
     #    *txs-1./16.*x2zs)
      gz30q= gz30q+rwwgz(13,7)*bxpi*vvq*gstm2*yc*(1./16.*
     #    o*x12*x2zs+1./16.*o*x2z*txs-1./16.*o*x2zs+1./16.*os*
     #    x2zs+1./16.*x12*x2z*txs-1./16.*x12*tx*x2zs)
      gz30q= gz30q+rwwgz(13,7)*vvq*gstm2*bxps*yc*(1./32.
     #    +1./16.*o*x12-1./16.*o+1./32.*os-1./16.*x12+1./32.*
     #    x12s)
      gz30q= gz30q+rwwgz(13,7)*vvq*gstm2*yc*bxp*(-1./16.
     #    *o*x12*x2z+1./8.*o*x12+1./8.*o*x2z-1./16.*o*x12s-1./
     #    16.*o-1./8.*os*x12-1./16.*os*x2z+1./8.*os-1./16.*oc
     #    +1./16.*x12*x2z-1./16.*x2z)
      gz30q= gz30q+rwwgz(13,7)*vvq*gstm2*yc*(-1./16.*o
     #    *x12*x2z*tx-3./16.*o*x12*x2z+1./16.*o*x12*txs+1./16.*o*
     #    x2z*x12s+1./8.*o*x2z-1./16.*o*x2zs-1./16.*o*txs+1./8.
     #    *os*x12*x2z-3./16.*os*x2z+1./32.*os*x2zs+1./32.*os*txs
     #    +1./16.*oc*x2z+1./16.*x12*x2z*tx-1./16.*x12*txs-1./16.
     #    *x2z*tx*x12s+1./32.*x12s*txs+1./32.*x2zs)
      gz30q= gz30q+rwwgz(13,10)*bxpi*vvq*gstm2*yc*(-1./
     #    16.*o*x12*x2zs-1./16.*o*x2z*txs+1./16.*o*x2zs-1./16.*os
     #    *x2zs-1./16.*x12*x2z*txs+1./16.*x12*tx*x2zs)
      gz30q= gz30q+rwwgz(13,10)*vvq*gstm2*bxps*yc*(-1./
     #    32.-1./16.*o*x12+1./16.*o-1./32.*os+1./16.*x12-1./
     #    32.*x12s)
      gz30q= gz30q+rwwgz(13,10)*vvq*gstm2*yc*bxp*(1./16.*
     #    o*x12*x2z-1./8.*o*x12-1./8.*o*x2z+1./16.*o*x12s+1./16.
     #    *o+1./8.*os*x12+1./16.*os*x2z-1./8.*os+1./16.*oc-1./
     #    16.*x12*x2z+1./16.*x2z)
      gz30q= gz30q+rwwgz(13,10)*vvq*gstm2*yc*(1./16.*o*
     #    x12*x2z*tx+3./16.*o*x12*x2z-1./16.*o*x12*txs-1./16.*o*
     #    x2z*x12s-1./8.*o*x2z+1./16.*o*x2zs+1./16.*o*txs-1./8.
     #    *os*x12*x2z+3./16.*os*x2z-1./32.*os*x2zs-1./32.*os*txs
     #    -1./16.*oc*x2z-1./16.*x12*x2z*tx+1./16.*x12*txs+1./16.
     #    *x2z*tx*x12s-1./32.*x12s*txs-1./32.*x2zs)
      gz30q= gz30q+rwwgz(13,11)*bxpi*vvq*gstm2*yc*(1./8.*
     #    o*x2z*tx-1./8.*o*x2zs-1./8.*x12*x2z*tx+1./4.*x2z*txs+
     #    1./8.*x2zs)
      gz30q= gz30q+rwwgz(13,11)*vvq*gstm2*bxps*yc*(1./16.
     #    -1./16.*o-1./16.*x12)
      gz30q= gz30q+rwwgz(13,11)*vvq*gstm2*yc*bxp*(1./8.
     #    +1./8.*o*x12-3./16.*o*tx+1./16.*o-3./16.*os-1./16.*
     #    x12*x2z+1./16.*x12*tx-3./16.*x12+1./8.*tx+1./16.*x12s
     #    )
      gz30q= gz30q+rwwgz(13,11)*vvq*gstm2*yc*(1./16.*o*
     #    x12*x2z-1./4.*o*x12*tx+5./16.*o*x2z*tx+1./16.*o*x2z-1.
     #    /8.*o*tx+1./16.*o*x2zs-1./8.*o*txs+3./16.*os*x2z-3./
     #    16.*os*tx+3./16.*x12*x2z*tx+3./16.*x12*x2z+1./8.*x12*tx
     #    -1./8.*x12*txs-1./8.*x2z*tx-1./4.*x2z-1./16.*tx*x12s
     #    -1./16.*x2zs-1./4.*txs)
      gz30q= gz30q+rwwgz(13,12)*bxpi*vvq*gstm2*yc*(-1./
     #    2.*o*x2z*tx+1./4.*o*txs-1./2.*x12*x2z*tx+1./4.*x12*txs
     #    +1./4.*x2z*tx)
      gz30q= gz30q+rwwgz(13,12)*vvq*gstm2*yc*bxp*(-1./8.
     #    +1./8.*o+1./8.*x12)
      gz30q= gz30q+rwwgz(13,12)*vvq*gstm2*yc*(-1./4.*o
     #    *x12*x2z-1./4.*o*x12*tx+1./8.*o*x2z+3./8.*o*tx-1./4.*
     #    os*x2z+3./8.*x12*tx+1./8.*x2z-1./4.*tx*x12s-1./4.*tx
     #    )
      gz30q= gz30q+rwwgz(13,13)*bxpi*vvq*gstm2*yc*(1./4.*
     #    o*txs-1./2.*x12*x2z*tx+1./4.*x12*txs)
      gz30q= gz30q+rwwgz(13,13)*vvq*gstm2*bxps*yc*(-1./
     #    8.+1./8.*o+1./8.*x12)
      gz30q= gz30q+rwwgz(13,13)*vvq*gstm2*yc*bxp*(-1./8.
     #    -1./4.*o*x2z+1./8.*o*tx+3./8.*o-1./4.*os-1./8.*x12*
     #    x2z-1./8.*x12+1./4.*x2z+1./8.*x12s)
      gz30q= gz30q+rwwgz(13,13)*vvq*gstm2*yc*(1./8.*o*
     #    x12*x2z-3./8.*o*x12*tx-1./8.*o*x2z*tx-1./2.*o*x2z+1./
     #    8.*o*x2zs+3./8.*os*x2z-1./8.*os*tx+1./4.*x12*x2z+1./4.
     #    *x12*tx+1./8.*x2z-1./4.*tx*x12s-1./8.*x2zs)
      gz30q= gz30q+rwwgz(13,14)*bxpi*vvq*gstm2*yc*(-3./
     #    16.*o*x2z*tx+1./16.*o*x2zs+1./16.*x12*x2z*tx+1./8.*x12*
     #    x2zs+1./8.*x2z*txs-1./16.*x2zs)
      gz30q= gz30q+rwwgz(13,14)*vvq*gstm2*bxps*yc*(3./32.
     #    -3./32.*o-3./32.*x12)
      gz30q= gz30q+rwwgz(13,14)*vvq*gstm2*yc*bxp*(-1./
     #    16.-1./16.*o*x12+1./8.*o*x2z-5./32.*o*tx-3./32.*o+5.
     #    /32.*os+3./32.*x12*x2z-1./32.*x12*tx+7./32.*x12-1./8.
     #    *x2z+1./16.*tx-3./32.*x12s)
      gz30q= gz30q+rwwgz(13,14)*vvq*gstm2*yc*(1./32.*o*
     #    x12*x2z+1./16.*o*x12*tx+7./32.*o*x2z*tx+1./32.*o*x2z+
     #    3./16.*o*tx-1./32.*o*x2zs-1./16.*o*txs-5./32.*os*x2z+
     #    1./32.*os*tx+5./32.*x12*x2z*tx-11./32.*x12*x2z-1./16.*
     #    x12*tx-1./16.*x12*x2zs-1./16.*x12*txs-1./16.*x2z*tx+1.
     #    /16.*x2z*x12s+1./8.*x2z+1./32.*tx*x12s+1./32.*x2zs-1./
     #    8.*txs)
      gz30q= gz30q+rwwgz(14,1)*bxpi*vvq*gstm2*yc*(1./4.*o
     #    *x2z*tx+1./4.*o*x2zs+1./4.*x12*x2z*tx+1./2.*x2z*txs-1.
     #    /2.*tx*x2zs-1./4.*x2zs)
      gz30q= gz30q+rwwgz(14,1)*vvq*gstm2*bxps*yc*(-1./8.
     #    +1./8.*o+1./8.*x12)
      gz30q= gz30q+rwwgz(14,1)*vvq*gstm2*yc*bxp*(-1./4.
     #    -1./2.*o*x12-3./8.*o*tx+5./8.*o-3./8.*os+1./8.*x12*
     #    x2z-3./8.*x12*tx+3./8.*x12-1./2.*x2z*tx+1./2.*tx-1./
     #    8.*x12s+1./2.*txs)
      gz30q= gz30q+rwwgz(14,1)*vvq*gstm2*yc*(3./8.*o*x12
     #    *x2z+1./4.*o*x12*tx+1./8.*o*x2z*tx-7./8.*o*x2z-1./4.*
     #    o*tx-1./8.*o*x2zs+3./8.*os*x2z+1./8.*os*tx+1./8.*x12*
     #    x2z*tx-3./8.*x12*x2z-1./4.*x12*tx-1./2.*x2z*txs+1./2.
     #    *x2z+1./8.*tx*x12s+1./2.*tx*x2zs+1./8.*x2zs-1./2.*txs
     #    )
      gz30q= gz30q+rwwgz(14,4)*bxpi*vvq*gstm2*yc*(-1./8.
     #    *o*tx*x2zs+1./8.*o*x2zc+1./8.*tx*x2zc-1./8.*x2zc-1./8.
     #    *x2zs*txs)
      gz30q= gz30q+rwwgz(14,4)*vvq*gstm2*bxps*yc*(1./8.
     #    +3./16.*o*x12-1./16.*o*tx-3./16.*o+1./16.*os-1./16.
     #    *x12*tx-1./4.*x12+1./16.*tx+1./8.*x12s)
      gz30q= gz30q+rwwgz(14,4)*vvq*gstm2*yc*bxp*(-5./16.
     #    *o*x12*x2z+1./16.*o*x12*tx+1./2.*o*x2z-1./8.*o*tx+1./
     #    16.*o*txs-1./8.*os*x2z+1./16.*os*tx-1./16.*x12*x2z*tx
     #    +1./2.*x12*x2z+1./16.*x12*txs-1./8.*x2z*x12s-3./8.*
     #    x2z-1./8.*txs)
      gz30q= gz30q+rwwgz(14,4)*vvq*gstm2*yc*(-1./16.*o
     #    *x12*x2z*tx+1./8.*o*x12*x2zs+1./4.*o*x2z*tx-1./16.*o*
     #    x2z*txs+1./16.*o*tx*x2zs-7./16.*o*x2zs-1./16.*os*x2z*tx
     #    +1./16.*os*x2zs-1./16.*x12*x2z*txs+1./8.*x12*tx*x2zs-
     #    1./4.*x12*x2zs+1./4.*x2z*txs-3./16.*tx*x2zs+3./8.*x2zs
     #    )
      gz30q= gz30q+rwwgz(14,7)*bxpi*vvq*gstm2*yc*(1./16.*
     #    o*x2zc+1./16.*x12*tx*x2zs-1./16.*x2zc+1./16.*x2zs*txs)
      gz30q= gz30q+rwwgz(14,7)*vvq*gstm2*bxps*yc*(1./16.
     #    +3./32.*o*x12+1./32.*o*tx-3./32.*o+1./32.*os+1./32.
     #    *x12*tx-1./8.*x12-1./32.*tx+1./16.*x12s)
      gz30q= gz30q+rwwgz(14,7)*vvq*gstm2*yc*bxp*(-5./32.
     #    *o*x12*x2z-3./32.*o*x12*tx-1./16.*o*x2z*tx+1./4.*o*x2z
     #    -1./32.*o*txs-1./16.*os*x2z-1./32.*os*tx-1./32.*x12*
     #    x2z*tx+1./4.*x12*x2z+1./16.*x12*tx-1./32.*x12*txs+1./
     #    16.*x2z*tx-1./16.*x2z*x12s-3./16.*x2z-1./16.*tx*x12s+
     #    1./16.*txs)
      gz30q= gz30q+rwwgz(14,7)*vvq*gstm2*yc*(3./32.*o*
     #    x12*x2z*tx+1./16.*o*x12*x2zs+1./32.*o*x2z*txs+1./32.*o*
     #    tx*x2zs-7./32.*o*x2zs+1./32.*os*x2z*tx+1./32.*os*x2zs
     #    -1./8.*x12*x2z*tx+1./32.*x12*x2z*txs-1./8.*x12*x2zs+1.
     #    /16.*x2z*tx*x12s-1./8.*x2z*txs-1./32.*tx*x2zs+3./16.*
     #    x2zs)
      gz30q= gz30q+rwwgz(14,10)*bxpi*vvq*gstm2*yc*(-1./
     #    16.*o*x2zc-1./16.*x12*tx*x2zs+1./16.*x2zc-1./16.*x2zs*
     #    txs)
      gz30q= gz30q+rwwgz(14,10)*vvq*gstm2*bxps*yc*(-1./
     #    16.-3./32.*o*x12-1./32.*o*tx+3./32.*o-1./32.*os-1./
     #    32.*x12*tx+1./8.*x12+1./32.*tx-1./16.*x12s)
      gz30q= gz30q+rwwgz(14,10)*vvq*gstm2*yc*bxp*(5./32.*
     #    o*x12*x2z+3./32.*o*x12*tx+1./16.*o*x2z*tx-1./4.*o*x2z
     #    +1./32.*o*txs+1./16.*os*x2z+1./32.*os*tx+1./32.*x12*
     #    x2z*tx-1./4.*x12*x2z-1./16.*x12*tx+1./32.*x12*txs-1./
     #    16.*x2z*tx+1./16.*x2z*x12s+3./16.*x2z+1./16.*tx*x12s-
     #    1./16.*txs)
      gz30q= gz30q+rwwgz(14,10)*vvq*gstm2*yc*(-3./32.*
     #    o*x12*x2z*tx-1./16.*o*x12*x2zs-1./32.*o*x2z*txs-1./32.*
     #    o*tx*x2zs+7./32.*o*x2zs-1./32.*os*x2z*tx-1./32.*os*x2zs
     #    +1./8.*x12*x2z*tx-1./32.*x12*x2z*txs+1./8.*x12*x2zs-1.
     #    /16.*x2z*tx*x12s+1./8.*x2z*txs+1./32.*tx*x2zs-3./16.*
     #    x2zs)
      gz30q= gz30q+rwwgz(14,11)*bxpi*vvq*gstm2*yc*(-1./
     #    4.*tx*x2zs)
      gz30q= gz30q+rwwgz(14,11)*vvq*gstm2*bxps*yc*(-1./
     #    8.+1./8.*o+1./8.*x12)
      gz30q= gz30q+rwwgz(14,11)*vvq*gstm2*yc*bxp*(-1./4.
     #    *o*x2z+3./8.*o*tx-1./8.*x12*x2z+1./8.*x12*tx-1./4.*
     #    x2z*tx+1./4.*x2z-1./4.*tx+1./4.*txs)
      gz30q= gz30q+rwwgz(14,11)*vvq*gstm2*yc*(-3./8.*o
     #    *x2z*tx+1./8.*o*x2zs-1./8.*x12*x2z*tx+1./2.*x2z*tx-1./
     #    4.*x2z*txs+1./4.*tx*x2zs-1./8.*x2zs)
      gz30q= gz30q+rwwgz(14,12)*bxpi*vvq*gstm2*yc*(1./8.*
     #    o*x2z*tx+1./8.*o*x2zs+1./8.*x12*x2z*tx+1./4.*x2z*txs-
     #    1./4.*tx*x2zs-1./8.*x2zs)
      gz30q= gz30q+rwwgz(14,12)*vvq*gstm2*bxps*yc*(1./16.
     #    -1./16.*o-1./16.*x12)
      gz30q= gz30q+rwwgz(14,12)*vvq*gstm2*yc*bxp*(-1./8.
     #    -1./4.*o*x12+1./4.*o*x2z-5./16.*o*tx+5./16.*o-3./16.
     #    *os+3./16.*x12*x2z-1./16.*x12*tx+3./16.*x12-1./4.*x2z
     #    +1./4.*tx-1./16.*x12s)
      gz30q= gz30q+rwwgz(14,12)*vvq*gstm2*yc*(3./16.*o*
     #    x12*x2z+1./8.*o*x12*tx+3./16.*o*x2z*tx-7./16.*o*x2z-1.
     #    /8.*o*tx-3./16.*o*x2zs+3./16.*os*x2z+1./16.*os*tx-1./
     #    16.*x12*x2z*tx-3./16.*x12*x2z-1./8.*x12*tx+1./4.*x2z+
     #    1./16.*tx*x12s+3./16.*x2zs-1./4.*txs)
      gz30q= gz30q+rwwgz(14,13)*bxpi*vvq*gstm2*yc*(-3./
     #    16.*o*x2z*tx+1./16.*o*x2zs+1./16.*x12*x2z*tx+1./8.*x12*
     #    x2zs+1./8.*x2z*txs-1./16.*x2zs)
      gz30q= gz30q+rwwgz(14,13)*vvq*gstm2*bxps*yc*(3./32.
     #    -3./32.*o-3./32.*x12)
      gz30q= gz30q+rwwgz(14,13)*vvq*gstm2*yc*bxp*(-1./
     #    16.-1./16.*o*x12+1./8.*o*x2z-5./32.*o*tx-3./32.*o+5.
     #    /32.*os+3./32.*x12*x2z-1./32.*x12*tx+7./32.*x12-1./8.
     #    *x2z+1./16.*tx-3./32.*x12s)
      gz30q= gz30q+rwwgz(14,13)*vvq*gstm2*yc*(1./32.*o*
     #    x12*x2z+1./16.*o*x12*tx+7./32.*o*x2z*tx+1./32.*o*x2z+
     #    3./16.*o*tx-1./32.*o*x2zs-1./16.*o*txs-5./32.*os*x2z+
     #    1./32.*os*tx+5./32.*x12*x2z*tx-11./32.*x12*x2z-1./16.*
     #    x12*tx-1./16.*x12*x2zs-1./16.*x12*txs-1./16.*x2z*tx+1.
     #    /16.*x2z*x12s+1./8.*x2z+1./32.*tx*x12s+1./32.*x2zs-1./
     #    8.*txs)
      gz30q= gz30q+rwwgz(14,14)*bxpi*vvq*gstm2*yc*(-1./
     #    4.*x12*x2zs-1./4.*tx*x2zs)
      gz30q= gz30q+rwwgz(14,14)*vvq*gstm2*bxps*yc*(1./8.
     #    -1./8.*o)
      gz30q= gz30q+rwwgz(14,14)*vvq*gstm2*yc*bxp*(1./8.*o
     #    *x12+1./4.*o*x2z+1./8.*o*tx-1./8.*x12*x2z+1./4.*x12*
     #    tx-1./4.*x12-1./8.*x2z*tx-1./4.*x2z-1./4.*tx+1./8.*
     #    x12s+1./8.*txs)
      gz30q= gz30q+rwwgz(14,14)*vvq*gstm2*yc*(-1./8.*o
     #    *x12*x2z-1./8.*o*x2z*tx-1./8.*o*x2zs-1./4.*x12*x2z*tx
     #    +1./2.*x12*x2z+1./8.*x12*x2zs+1./2.*x2z*tx-1./8.*x2z*
     #    x12s-1./8.*x2z*txs+1./8.*tx*x2zs+1./8.*x2zs)
*
*----------------------------------------------------------------------
*
       else if(jj.eq.2) then
*
*----------------------------------------------------------------------
*
      gz11s= xx*rl1*vvs*y*csti*(-2./3.*zi*os*x12+2./3.
     #    *zi*os+4./3.*zi*oc*x12-4./3.*zi*oc+4./3.*zi*oq-2./3.*
     #    os+2./3.*oc)
      gz11s= gz11s+xx*rl3*vvc*gtm2*ys*csti*(1./24.*
     #    os*x2z+1./24.*oc*x12-1./24.*oc*x2z+1./24.*oq)
      gz11s= gz11s+xx*rl3*vvc*gtm2*ys*(1./6.*os*x2z+1./
     #    6.*oc*x12-1./6.*oc*x2z+1./6.*oq)
      gz11s= gz11s+xx*vvs*gtm2*pwsm2*y*zxi*csti*(1./
     #    24.*os*x12-1./12.*oc*x12+1./24.*oc)
      gz11s= gz11s+xx*vvs*gtm2*pwsm2*y*csti*(1./24.
     #    *os-5./24.*oc)
      gz11s= gz11s+xx*vvs*gtm2*pwsm2*y*(2./3.*oc)
      gz11s= gz11s+bxpi*rl1*vvs*y*csti*(-2./3.*zi*
     #    o*x12+2./3.*zi*o+4./3.*zi*os*x12-2./3.*zi*os+4./3.*zi
     #    *oc-2./3.*o+2./3.*os)
      gz11s= gz11s+bxpi*rl3*vvc*gtm2*ys*csti*(1./24.
     #    *o*x2z+1./24.*os*x12-1./24.*os*x2z+1./24.*os)
      gz11s= gz11s+bxpi*rl3*vvc*gtm2*ys*(1./6.*o*x2z+1./
     #    6.*os*x12-1./6.*os*x2z+1./6.*os)
      gz11s= gz11s+bxpi*vvs*gtm2*pwsm2*y*zxi*csti*(1.
     #    /24.*o*x12-1./12.*os*x12+1./12.*os)
      gz11s= gz11s+bxpi*vvs*gtm2*pwsm2*y*csti*(1./24.
     #    *o-11./72.*os)
      gz11s= gz11s+bxpi*vvs*gtm2*pwsm2*y*(4./9.*os)
      gz11s= gz11s+rl1*vvs*y*bxp*csti*(2./3.*zi*o*
     #    x12-2./3.*zi*o+4./3.*zi*os+1./3.*zi)
      gz11s= gz11s+rl1*vvs*y*csti*(1./3.-2./3.*zi
     #    *o*x12-2./3.*zi*os*x12-2./3.*zi*os-4./3.*zi*oc+1./3.*
     #    zi*x12-1./3.*zi-1./3.*o+1./24.*os-1./24.*oc)
      gz11s= gz11s+rl3*vvc*gtm2*ys*bxp*csti*(1./48.
     #    +1./24.*o*x12-1./24.*o+1./24.*os)
      gz11s= gz11s+rl3*vvc*gtm2*ys*bxp*(1./12.+1./6.*o*
     #    x12-1./6.*o+1./6.*os)
      gz11s= gz11s+rl3*vvc*gtm2*ys*csti*(-1./48.*
     #    o*x12+1./48.*o*x2z-1./24.*o-1./24.*os*x12-1./48.*os
     #    -1./48.*x2z)
      gz11s= gz11s+rl3*vvc*gtm2*ys*(-1./12.*o*x12+1./
     #    12.*o*x2z-1./6.*o-1./6.*os*x12-1./12.*os-1./12.*x2z)
      gz11s= gz11s+vvs*gtm2*pwsm2*y*bxp*zxi*csti*(1./
     #    48.-1./24.*o*x12+1./24.*os)
      gz11s= gz11s+vvs*gtm2*pwsm2*y*zxi*csti*(1./24.
     #    *o*x12-1./16.*o+1./24.*os*x12-1./24.*os-1./24.*oc-1.
     #    /48.*x12)
      gz11s= gz11s+vvs*gtm2*pwsm2*y*csti*(-1./48.
     #    +7./144.*o+1./9.*os)
      gz11s= gz11s+vvs*gtm2*pwsm2*y*(-1./9.*o-4./9.*
     #    os)
*
      gz21s= xx*rl1*vvs*y*csti*(-2*zi*os*x12+2*zi*os
     #    +4*zi*oc*x12-4*zi*oc+4*zi*oq-2*os+2*oc)
      gz21s= gz21s+xx*rl3*vvc*gtm2*ys*csti*(1./8.*
     #    os*x2z+1./8.*oc*x12-1./8.*oc*x2z+1./8.*oq)
      gz21s= gz21s+xx*rl3*vvc*gtm2*ys*(1./2.*os*x2z+1./
     #    2.*oc*x12-1./2.*oc*x2z+1./2.*oq)
      gz21s= gz21s+xx*vvs*gtm2*pwsm2*y*zxi*csti*(1./
     #    8.*os*x12-1./4.*oc*x12+1./8.*oc)
      gz21s= gz21s+xx*vvs*gtm2*pwsm2*y*csti*(1./8.*
     #    os-5./8.*oc)
      gz21s= gz21s+xx*vvs*gtm2*pwsm2*y*(2*oc)
      gz21s= gz21s+bxpi*rl1*vvs*y*csti*(-2*zi*o*
     #    x12+2*zi*o+4*zi*os*x12-2*zi*os+4*zi*oc-2*o+2*os)
      gz21s= gz21s+bxpi*rl3*vvc*gtm2*ys*csti*(1./8.*
     #    o*x2z+1./8.*os*x12-1./8.*os*x2z+1./8.*os)
      gz21s= gz21s+bxpi*rl3*vvc*gtm2*ys*(1./2.*o*x2z+1./
     #    2.*os*x12-1./2.*os*x2z+1./2.*os)
      gz21s= gz21s+bxpi*vvs*gtm2*pwsm2*y*zxi*csti*(1.
     #    /8.*o*x12-1./4.*os*x12+1./4.*os)
      gz21s= gz21s+bxpi*vvs*gtm2*pwsm2*y*csti*(1./8.
     #    *o-11./24.*os)
      gz21s= gz21s+bxpi*vvs*gtm2*pwsm2*y*(4./3.*os)
      gz21s= gz21s+rl1*vvs*y*bxp*csti*(2./3.*zi*o*
     #    x12+2./3.*zi*o+4./3.*zi*os+1./3.*zi)
      gz21s= gz21s+rl1*vvs*y*csti*(1./3.+2./3.*zi
     #    *o*x12-8./3.*zi*o-10./3.*zi*os*x12+2./3.*zi*os-4*zi*
     #    oc+1./3.*zi*x12-1./3.*zi+o-31./24.*os-1./24.*oc)
      gz21s= gz21s+rl3*vvc*gtm2*ys*bxp*csti*(1./48.
     #    +1./24.*o*x12+1./24.*o-1./24.*os)
      gz21s= gz21s+rl3*vvc*gtm2*ys*bxp*(1./12.+1./6.*o*
     #    x12+1./6.*o-1./6.*os)
      gz21s= gz21s+rl3*vvc*gtm2*ys*csti*(-1./48.*
     #    o*x12-1./16.*o*x2z-1./8.*o-1./8.*os*x12+1./12.*os*x2z
     #    -1./48.*os-1./48.*x2z)
      gz21s= gz21s+rl3*vvc*gtm2*ys*(-1./12.*o*x12-1./
     #    4.*o*x2z-1./2.*o-1./2.*os*x12+1./3.*os*x2z-1./12.*os
     #    -1./12.*x2z)
      gz21s= gz21s+vvs*gtm2*pwsm2*y*bxp*zxi*csti*(1./
     #    48.-1./24.*o*x12+1./12.*o+1./24.*os)
      gz21s= gz21s+vvs*gtm2*pwsm2*y*zxi*csti*(-1./
     #    24.*o*x12-7./48.*o+5./24.*os*x12-5./24.*os-1./24.*oc
     #    -1./48.*x12)
      gz21s= gz21s+vvs*gtm2*pwsm2*y*csti*(-1./48.
     #    -5./144.*o+5./12.*os)
      gz21s= gz21s+vvs*gtm2*pwsm2*y*(-1./9.*o-4./3.*
     #    os)
*
      gz31s= bxpi*rl1*vvs*y*csti*(5./6.*zi*o*x12+1./2.*
     #    zi*o*x12s-4./3.*zi*o-5./6.*zi*os*x12+10./3.*zi*os-4./
     #    3.*zi*oc+1./2.*o*x12+4./3.*o-2*os+1./24.*oc)
      gz31s= gz31s+bxpi*rl2*vvs*pwsc*y*csti*(1./2.*
     #    zi*o*x12-5./6.*zi*o*x12s+1./3.*zi*o-5./6.*zi*os*x12-2.
     #    /3.*zi*os-5./6.*o*x12-1./3.*o+1./3.*os)
      gz31s= gz31s+bxpi*rl3*vvc*gtm2*ys*csti*(1./96.
     #    *o*x12*x2z-1./24.*o*x2z-1./96.*os*x12+1./12.*os*x2z-1.
     #    /24.*oc)
      gz31s= gz31s+bxpi*rl3*vvc*gtm2*ys*(1./24.*o*x12*x2z
     #    -1./6.*o*x2z-1./24.*os*x12+1./3.*os*x2z-1./6.*oc)
      gz31s= gz31s+bxpi*vvs*gs*gtc*pws*pwt*y*csti*(1.
     #    /4.*zi*o*x12-5./12.*zi*o*x12s+1./6.*zi*o-5./12.*zi*os*
     #    x12-1./3.*zi*os-5./12.*o*x12-1./6.*o+1./6.*os)
      gz31s= gz31s+bxpi*vvs*gtm2*pwsm2*y*zxi*csti*(
     #    -1./12.*o*x12+1./32.*o*x12s+1./12.*os*x12-1./16.*os
     #    +1./24.*oc-1./48.*x12s+1./48.*x12c)
      gz31s= gz31s+bxpi*vvs*gtm2*pwsm2*y*csti*(1./96.
     #    *o*x12-1./48.*o*x2z-1./16.*o+7./36.*os-1./48.*x12*x2z
     #    -1./48.*x12+1./48.*x2z+1./48.*x12s)
      gz31s= gz31s+bxpi*vvs*gtm2*pwsm2*y*(-4./9.*os)
      gz31s= gz31s+rl1*vvs*bxps*y*csti*(-3./2.*zi*
     #    o-1./3.*zi*x12+3./4.*zi)
      gz31s= gz31s+rl1*vvs*y*bxp*csti*(3./4.+zi*o*
     #    x12+7./4.*zi*o+13./6.*zi*os+1./2.*zi*x12+1./3.*zi*
     #    x12s-17./12.*zi-3./4.*o+1./6.*x12)
      gz31s= gz31s+rl1*vvs*y*csti*(-2./3.-17./
     #    12.*zi*o*x12-1./2.*zi*o*x12s+13./12.*zi*o+5./6.*zi*os*
     #    x12-11./2.*zi*os+4./3.*zi*oc-1./4.*zi*x12-5./12.*zi*
     #    x12s+2./3.*zi-1./4.*o*x12-5./12.*o+7./4.*os-1./24.*
     #    oc-5./12.*x12)
      gz31s= gz31s+rl2*vvs*pwsc*bxps*y*csti*(5./6.*
     #    zi*o+1./6.*zi*x12-5./12.*zi)
      gz31s= gz31s+rl2*vvs*pwsc*y*bxp*csti*(-5./12.
     #    -zi*o*x12+1./12.*zi*o-7./6.*zi*os+5./6.*zi*x12-2./3.
     #    *zi*x12s+1./4.*zi+5./12.*o-1./3.*x12)
      gz31s= gz31s+rl2*vvs*pwsc*y*csti*(-1./6.+
     #    7./12.*zi*o*x12+5./6.*zi*o*x12s-5./4.*zi*o+5./6.*zi*os*
     #    x12+11./6.*zi*os-13./12.*zi*x12+11./12.*zi*x12s+1./6.
     #    *zi+5./12.*o*x12+3./4.*o-7./12.*os+11./12.*x12)
      gz31s= gz31s+rl3*vvc*gtm2*bxps*ys*csti*(1./48.
     #    -1./24.*o-1./192.*x12)
      gz31s= gz31s+rl3*vvc*gtm2*bxps*ys*(1./12.-1./6.*o
     #    -1./48.*x12)
      gz31s= gz31s+rl3*vvc*gtm2*ys*bxp*csti*(-1./
     #    32.+5./192.*o*x12+3./64.*o+5./96.*os-1./64.*x12*x2z
     #    +1./96.*x12-1./96.*x2z+1./192.*x12s)
      gz31s= gz31s+rl3*vvc*gtm2*ys*bxp*(-1./8.+5./48.
     #    *o*x12+3./16.*o+5./24.*os-1./16.*x12*x2z+1./24.*x12
     #    -1./24.*x2z+1./48.*x12s)
      gz31s= gz31s+rl3*vvc*gtm2*ys*csti*(1./192.*o*
     #    x12*x2z-1./24.*o*x12-1./64.*o*x2z+1./192.*o*x12s+1./
     #    96.*o*x2zs+1./24.*o+1./24.*os*x12-3./64.*os*x2z-11./
     #    96.*os+13./192.*oc+1./192.*x12*x2z+1./32.*x2z-1./96.*
     #    x2zs)
      gz31s= gz31s+rl3*vvc*gtm2*ys*(1./48.*o*x12*x2z-1.
     #    /6.*o*x12-1./16.*o*x2z+1./48.*o*x12s+1./24.*o*x2zs+1./
     #    6.*o+1./6.*os*x12-3./16.*os*x2z-11./24.*os+13./48.*oc
     #    +1./48.*x12*x2z+1./8.*x2z-1./24.*x2zs)
      gz31s= gz31s+vvs*gs*gtc*pws*pwt*bxps*y*csti*(5.
     #    /12.*zi*o+1./12.*zi*x12-5./24.*zi)
      gz31s= gz31s+vvs*gs*gtc*pws*pwt*y*bxp*csti*(
     #    -5./24.-1./2.*zi*o*x12+1./24.*zi*o-7./12.*zi*os+5./
     #    12.*zi*x12-1./3.*zi*x12s+1./8.*zi+5./24.*o-1./6.*x12
     #    )
      gz31s= gz31s+vvs*gs*gtc*pws*pwt*y*csti*(-1./
     #    12.+7./24.*zi*o*x12+5./12.*zi*o*x12s-5./8.*zi*o+5./12.
     #    *zi*os*x12+11./12.*zi*os-13./24.*zi*x12+11./24.*zi*x12s
     #    +1./12.*zi+5./24.*o*x12+3./8.*o-7./24.*os+11./24.*
     #    x12)
      gz31s= gz31s+vvs*gtm2*pwsm2*bxps*y*zxi*csti*(5.
     #    /192.+1./48.*x12)
      gz31s= gz31s+vvs*gtm2*pwsm2*y*bxp*zxi*csti*(
     #    -5./96.-1./96.*o*x12-1./24.*o+1./24.*os-1./16.*x12
     #    +1./48.*x12s)
      gz31s= gz31s+vvs*gtm2*pwsm2*y*bxp*csti*(-1./
     #    64.+1./192.*o)
      gz31s= gz31s+vvs*gtm2*pwsm2*y*zxi*csti*(1./24.
     #    *o*x12-1./32.*o*x12s+11./96.*o-1./12.*os*x12-5./192.*
     #    os-1./24.*oc+7./96.*x12-1./192.*x12s-1./48.*x12c)
      gz31s= gz31s+vvs*gtm2*pwsm2*y*csti*(1./32.-
     #    1./64.*o*x12+1./96.*o*x2z-13./576.*o-59./576.*os+7./
     #    192.*x12-1./96.*x2z-1./48.*x12s)
      gz31s= gz31s+vvs*gtm2*pwsm2*y*(1./9.*o+2./9.*os
     #    )
      gz31s= gz31s+re(gs*gtc*pws*pwt)*bxpi*vvs*y*csti
     # *(-1./2.*zi*o*x12+5./6.*zi*o*x12s-1./3.*zi*o+5./6.*zi
     #    *os*x12+2./3.*zi*os+5./6.*o*x12+1./3.*o-1./3.*os)
      gz31s= gz31s+re(gs*gtc*pws*pwt)*vvs*bxps*y*csti
     # *(-5./6.*zi*o-1./6.*zi*x12+5./12.*zi)
      gz31s= gz31s+re(gs*gtc*pws*pwt)*vvs*y*bxp*csti
     # *(5./12.+zi*o*x12-1./12.*zi*o+7./6.*zi*os-5./6.*zi*
     #    x12+2./3.*zi*x12s-1./4.*zi-5./12.*o+1./3.*x12)
      gz31s= gz31s+re(gs*gtc*pws*pwt)*vvs*y*csti*(1.
     #    /6.-7./12.*zi*o*x12-5./6.*zi*o*x12s+5./4.*zi*o-5./6.*
     #    zi*os*x12-11./6.*zi*os+13./12.*zi*x12-11./12.*zi*x12s
     #    -1./6.*zi-5./12.*o*x12-3./4.*o+7./12.*os-11./12.*
     #    x12)
*
      gz11c= rs1wg(1)*xx*vvc*gtm2*ys*csti*(1./12.*os*x2z
     #    +1./12.*oc*x12-1./12.*oc*x2z+1./12.*oq)
      gz11c= gz11c+rs1wg(1)*xx*vvc*gtm2*ys*(-1./3.*os*
     #    x2z-1./3.*oc*x12+1./3.*oc*x2z-1./3.*oq)
      gz11c= gz11c+rs1wg(1)*bxpi*vvc*gtm2*ys*csti*(1.
     #    /12.*o*x2z+1./12.*os*x12-1./12.*os*x2z+1./12.*os-1./
     #    12.*oc)
      gz11c= gz11c+rs1wg(1)*bxpi*vvc*gtm2*ys*(-1./3.*o*
     #    x2z-1./3.*os*x12+1./3.*os*x2z-1./3.*os+1./3.*oc)
      gz11c= gz11c+rs1wg(1)*vvc*gtm2*ys*bxp*csti*(1./
     #    24.+1./12.*o*x12-1./12.*o)
      gz11c= gz11c+rs1wg(1)*vvc*gtm2*ys*bxp*(-1./6.-1.
     #    /3.*o*x12+1./3.*o)
      gz11c= gz11c+rs1wg(1)*vvc*gtm2*ys*csti*(-1./
     #    24.*o*x12+1./24.*o*x2z-1./12.*o-1./12.*os*x12+1./24.*
     #    os+1./12.*oc-1./24.*x2z)
      gz11c= gz11c+rs1wg(1)*vvc*gtm2*ys*(1./6.*o*x12-1.
     #    /6.*o*x2z+1./3.*o+1./3.*os*x12-1./6.*os-1./3.*oc+1./
     #    6.*x2z)
      gz11c= gz11c+rs1wg(4)*xx*vvc*gtm2*ys*csti*(
     #    -1./24.*os*x2zs)
      gz11c= gz11c+rs1wg(4)*xx*vvc*gtm2*ys*(1./6.*os*
     #    x2zs)
      gz11c= gz11c+rs1wg(4)*bxpi*vvc*gtm2*ys*csti*(
     #    -1./48.*o*x2zs+1./48.*os*x12*x2z-1./12.*os*x2z-1./48.
     #    *os*x2zs+1./48.*oc*x2z)
      gz11c= gz11c+rs1wg(4)*bxpi*vvc*gtm2*ys*(1./12.*o*
     #    x2zs-1./12.*os*x12*x2z+1./3.*os*x2z+1./12.*os*x2zs-1./
     #    12.*oc*x2z)
      gz11c= gz11c+rs1wg(4)*vvc*gtm2*bxps*ys*csti*(1.
     #    /96.+1./48.*o*x12+1./48.*os)
      gz11c= gz11c+rs1wg(4)*vvc*gtm2*bxps*ys*(-1./24.
     #    -1./12.*o*x12-1./12.*os)
      gz11c= gz11c+rs1wg(4)*vvc*gtm2*ys*bxp*csti*(
     #    -1./48.*o*x12*x2z-1./96.*o*x12-1./96.*o*x2z-1./48.*o
     #    +1./48.*os*x12-1./24.*os*x2z-5./96.*os+1./48.*oc-1./
     #    48.*x2z)
      gz11c= gz11c+rs1wg(4)*vvc*gtm2*ys*bxp*(1./12.*o*x12
     #    *x2z+1./24.*o*x12+1./24.*o*x2z+1./12.*o-1./12.*os*x12
     #    +1./6.*os*x2z+5./24.*os-1./12.*oc+1./12.*x2z)
      gz11c= gz11c+rs1wg(4)*vvc*gtm2*ys*csti*(1./96.
     #    *o*x12*x2z+1./24.*o*x2z+1./96.*o*x2zs-1./48.*os*x12*x2z
     #    -1./48.*os*x12+11./96.*os*x2z+1./48.*os*x2zs+1./24.*
     #    os-1./48.*oc*x2z-1./48.*oc+1./96.*x2zs)
      gz11c= gz11c+rs1wg(4)*vvc*gtm2*ys*(-1./24.*o*x12
     #    *x2z-1./6.*o*x2z-1./24.*o*x2zs+1./12.*os*x12*x2z+1./
     #    12.*os*x12-11./24.*os*x2z-1./12.*os*x2zs-1./6.*os+1./
     #    12.*oc*x2z+1./12.*oc-1./24.*x2zs)
      gz11c= gz11c+rs1wg(7)*bxpi*vvc*gtm2*ys*csti*(1.
     #    /96.*o*x2zs+1./96.*os*x12*x2z-1./96.*os*x2zs+1./96.*oc*
     #    x2z)
      gz11c= gz11c+rs1wg(7)*bxpi*vvc*gtm2*ys*(-1./24.*o
     #    *x2zs-1./24.*os*x12*x2z+1./24.*os*x2zs-1./24.*oc*x2z)
      gz11c= gz11c+rs1wg(7)*vvc*gtm2*bxps*ys*csti*(
     #    -1./192.-1./96.*o*x12+1./96.*o-1./96.*os)
      gz11c= gz11c+rs1wg(7)*vvc*gtm2*bxps*ys*(1./48.+1./
     #    24.*o*x12-1./24.*o+1./24.*os)
      gz11c= gz11c+rs1wg(7)*vvc*gtm2*ys*bxp*csti*(1./
     #    96.*o*x12*x2z+1./96.*o*x12-1./96.*o*x2z+1./48.*os*x12
     #    +1./96.*os*x2z-1./96.*os+1./48.*oc+1./96.*x2z)
      gz11c= gz11c+rs1wg(7)*vvc*gtm2*ys*bxp*(-1./24.*o*
     #    x12*x2z-1./24.*o*x12+1./24.*o*x2z-1./12.*os*x12-1./24.
     #    *os*x2z+1./24.*os-1./12.*oc-1./24.*x2z)
      gz11c= gz11c+rs1wg(7)*vvc*gtm2*ys*csti*(-1./
     #    96.*o*x12*x2z-1./96.*o*x2z-1./48.*os*x12*x2z+1./96.*os*
     #    x2z-1./192.*os*x12s+1./192.*os*x2zs-1./96.*oc*x12-1./
     #    48.*oc*x2z-1./192.*oq-1./192.*x2zs)
      gz11c= gz11c+rs1wg(7)*vvc*gtm2*ys*(1./24.*o*x12*
     #    x2z+1./24.*o*x2z+1./12.*os*x12*x2z-1./24.*os*x2z+1./
     #    48.*os*x12s-1./48.*os*x2zs+1./24.*oc*x12+1./12.*oc*x2z
     #    +1./48.*oq+1./48.*x2zs)
      gz11c= gz11c+rs1wg(8)*bxpi*vvc*gtm2*ys*csti*(1.
     #    /24.*os*x2z)
      gz11c= gz11c+rs1wg(8)*bxpi*vvc*gtm2*ys*(-1./6.*os
     #    *x2z)
      gz11c= gz11c+rs1wg(8)*vvc*gtm2*bxps*ys*csti*(
     #    -1./48.*o)
      gz11c= gz11c+rs1wg(8)*vvc*gtm2*bxps*ys*(1./12.*o)
      gz11c= gz11c+rs1wg(8)*vvc*gtm2*ys*bxp*csti*(1./
     #    48.*o*x2z+1./48.*o-1./48.*os*x12+1./48.*os*x2z+1./24.
     #    *os-1./48.*oc)
      gz11c= gz11c+rs1wg(8)*vvc*gtm2*ys*bxp*(-1./12.*o*
     #    x2z-1./12.*o+1./12.*os*x12-1./12.*os*x2z-1./6.*os+1.
     #    /12.*oc)
      gz11c= gz11c+rs1wg(8)*vvc*gtm2*ys*csti*(-1./
     #    48.*o*x2z+1./48.*os*x12-1./16.*os*x2z-1./24.*os+1./48.
     #    *oc)
      gz11c= gz11c+rs1wg(8)*vvc*gtm2*ys*(1./12.*o*x2z-
     #    1./12.*os*x12+1./4.*os*x2z+1./6.*os-1./12.*oc)
      gz11c= gz11c+rs1wg(9)*bxpi*vvc*gtm2*ys*csti*(1.
     #    /12.*oc)
      gz11c= gz11c+rs1wg(9)*bxpi*vvc*gtm2*ys*(-1./3.*oc
     #    )
      gz11c= gz11c+rs1wg(9)*vvc*gtm2*ys*bxp*csti*(1./
     #    12.*os)
      gz11c= gz11c+rs1wg(9)*vvc*gtm2*ys*bxp*(-1./3.*os
     #    )
      gz11c= gz11c+rs1wg(9)*vvc*gtm2*ys*csti*(-1./
     #    12.*os-1./12.*oc)
      gz11c= gz11c+rs1wg(9)*vvc*gtm2*ys*(1./3.*os+1./3.
     #    *oc)
      gz11c= gz11c+rs1wg(10)*bxpi*vvc*gtm2*ys*csti*(
     #    -1./96.*o*x2zs-1./96.*os*x12*x2z+1./96.*os*x2zs-1./96.
     #    *oc*x2z)
      gz11c= gz11c+rs1wg(10)*bxpi*vvc*gtm2*ys*(1./24.*o*
     #    x2zs+1./24.*os*x12*x2z-1./24.*os*x2zs+1./24.*oc*x2z)
      gz11c= gz11c+rs1wg(10)*vvc*gtm2*bxps*ys*csti*(
     #    1./192.+1./96.*o*x12+1./96.*os)
      gz11c= gz11c+rs1wg(10)*vvc*gtm2*bxps*ys*(-1./48.
     #    -1./24.*o*x12-1./24.*os)
      gz11c= gz11c+rs1wg(10)*vvc*gtm2*ys*bxp*csti*(
     #    -1./96.*o*x12*x2z-1./96.*o*x12-1./96.*o-1./32.*os*x12
     #    +1./96.*os-1./32.*oc-1./96.*x2z)
      gz11c= gz11c+rs1wg(10)*vvc*gtm2*ys*bxp*(1./24.*o*
     #    x12*x2z+1./24.*o*x12+1./24.*o+1./8.*os*x12-1./24.*os
     #    +1./8.*oc+1./24.*x2z)
      gz11c= gz11c+rs1wg(10)*vvc*gtm2*ys*csti*(1./
     #    96.*o*x12*x2z+1./48.*o*x2z+1./48.*os*x12*x2z+1./96.*os*
     #    x12-1./48.*os*x2z+1./192.*os*x12s-1./192.*os*x2zs+1./
     #    96.*oc*x12+1./48.*oc*x2z+1./96.*oc+1./192.*oq+1./192.
     #    *x2zs)
      gz11c= gz11c+rs1wg(10)*vvc*gtm2*ys*(-1./24.*o*
     #    x12*x2z-1./12.*o*x2z-1./12.*os*x12*x2z-1./24.*os*x12+
     #    1./12.*os*x2z-1./48.*os*x12s+1./48.*os*x2zs-1./24.*oc*
     #    x12-1./12.*oc*x2z-1./24.*oc-1./48.*oq-1./48.*x2zs)
      gz11c= gz11c+rs1wg(11)*vvc*gtm2*ys*bxp*csti*(
     #    -1./48.*o+1./24.*os)
      gz11c= gz11c+rs1wg(11)*vvc*gtm2*ys*bxp*(1./12.*o-
     #    1./6.*os)
      gz11c= gz11c+rs1wg(11)*vvc*gtm2*ys*csti*(1./
     #    48.*o*x2z-1./48.*os*x12-1./48.*os*x2z-1./48.*oc)
      gz11c= gz11c+rs1wg(11)*vvc*gtm2*ys*(-1./12.*o*
     #    x2z+1./12.*os*x12+1./12.*os*x2z+1./12.*oc)
      gz11c= gz11c+rs1wg(12)*xx*vvc*gtm2*ys*csti*(1.
     #    /24.*os*x2z+1./24.*oc*x12+1./24.*oc*x2z+1./24.*oq)
      gz11c= gz11c+rs1wg(12)*xx*vvc*gtm2*ys*(-1./6.*os
     #    *x2z-1./6.*oc*x12-1./6.*oc*x2z-1./6.*oq)
      gz11c= gz11c+rs1wg(12)*bxpi*vvc*gtm2*ys*csti*(
     #    1./24.*o*x2z+1./24.*os*x12+1./24.*os*x2z+1./24.*os+1./
     #    24.*oc)
      gz11c= gz11c+rs1wg(12)*bxpi*vvc*gtm2*ys*(-1./6.*o
     #    *x2z-1./6.*os*x12-1./6.*os*x2z-1./6.*os-1./6.*oc)
      gz11c= gz11c+rs1wg(12)*vvc*gtm2*ys*bxp*csti*(1.
     #    /48.+1./24.*o*x12+1./24.*os)
      gz11c= gz11c+rs1wg(12)*vvc*gtm2*ys*bxp*(-1./12.
     #    -1./6.*o*x12-1./6.*os)
      gz11c= gz11c+rs1wg(12)*vvc*gtm2*ys*csti*(-1.
     #    /48.*o*x12-1./48.*o*x2z-1./24.*o-1./24.*os*x12-1./24.
     #    *os*x2z-1./16.*os-1./24.*oc-1./48.*x2z)
      gz11c= gz11c+rs1wg(12)*vvc*gtm2*ys*(1./12.*o*x12
     #    +1./12.*o*x2z+1./6.*o+1./6.*os*x12+1./6.*os*x2z+1./
     #    4.*os+1./6.*oc+1./12.*x2z)
      gz11c= gz11c+rs1wg(13)*xx*vvc*gtm2*ys*csti*(1.
     #    /48.*os*x2z+1./48.*oc*x12-1./48.*oc*x2z+1./48.*oq)
      gz11c= gz11c+rs1wg(13)*xx*vvc*gtm2*ys*(-1./12.*
     #    os*x2z-1./12.*oc*x12+1./12.*oc*x2z-1./12.*oq)
      gz11c= gz11c+rs1wg(13)*bxpi*vvc*gtm2*ys*csti*(
     #    1./48.*o*x2z+1./48.*os*x12-1./48.*os*x2z+1./48.*os+1./
     #    48.*oc)
      gz11c= gz11c+rs1wg(13)*bxpi*vvc*gtm2*ys*(-1./12.*
     #    o*x2z-1./12.*os*x12+1./12.*os*x2z-1./12.*os-1./12.*oc
     #    )
      gz11c= gz11c+rs1wg(13)*vvc*gtm2*ys*bxp*csti*(1.
     #    /96.+1./48.*o*x12-1./96.*o+1./48.*os)
      gz11c= gz11c+rs1wg(13)*vvc*gtm2*ys*bxp*(-1./24.
     #    -1./12.*o*x12+1./24.*o-1./12.*os)
      gz11c= gz11c+rs1wg(13)*vvc*gtm2*ys*csti*(-1.
     #    /96.*o*x12-1./48.*o-5./96.*os*x12+1./96.*os*x2z+1./96.
     #    *os-5./96.*oc-1./96.*x2z)
      gz11c= gz11c+rs1wg(13)*vvc*gtm2*ys*(1./24.*o*x12
     #    +1./12.*o+5./24.*os*x12-1./24.*os*x2z-1./24.*os+5./
     #    24.*oc+1./24.*x2z)
      gz11c= gz11c+rs1wg(14)*xx*vvc*gtm2*ys*csti*(1.
     #    /24.*oc*x2z)
      gz11c= gz11c+rs1wg(14)*xx*vvc*gtm2*ys*(-1./6.*oc
     #    *x2z)
      gz11c= gz11c+rs1wg(14)*bxpi*vvc*gtm2*ys*csti*(
     #    1./24.*os*x2z+1./24.*oc)
      gz11c= gz11c+rs1wg(14)*bxpi*vvc*gtm2*ys*(-1./6.*
     #    os*x2z-1./6.*oc)
      gz11c= gz11c+rs1wg(14)*vvc*gtm2*ys*bxp*csti*(1.
     #    /48.*os)
      gz11c= gz11c+rs1wg(14)*vvc*gtm2*ys*bxp*(-1./12.*
     #    os)
      gz11c= gz11c+rs1wg(14)*vvc*gtm2*ys*csti*(1./
     #    48.*os*x12-1./24.*os*x2z-1./24.*os-1./48.*oc)
      gz11c= gz11c+rs1wg(14)*vvc*gtm2*ys*(-1./12.*os*
     #    x12+1./6.*os*x2z+1./6.*os+1./12.*oc)
      gz11c= gz11c+rs1wz(1)*xx*vvc*gtm2*ys*(2./3.*os*x2z
     #    +2./3.*oc*x12-2./3.*oc*x2z+2./3.*oq)
      gz11c= gz11c+rs1wz(1)*bxpi*vvc*gtm2*ys*(2./3.*o*x2z
     #    +2./3.*os*x12-2./3.*os*x2z+2./3.*os-2./3.*oc)
      gz11c= gz11c+rs1wz(1)*vvc*gtm2*ys*bxp*(1./3.+2./3.
     #    *o*x12-2./3.*o)
      gz11c= gz11c+rs1wz(1)*vvc*gtm2*ys*(-1./3.*o*x12
     #    +1./3.*o*x2z-2./3.*o-2./3.*os*x12+1./3.*os+2./3.*oc
     #    -1./3.*x2z)
      gz11c= gz11c+rs1wz(4)*xx*vvc*gtm2*ys*(-1./3.*os*
     #    x2zs)
      gz11c= gz11c+rs1wz(4)*bxpi*vvc*gtm2*ys*(-1./6.*o*
     #    x2zs+1./6.*os*x12*x2z-2./3.*os*x2z-1./6.*os*x2zs+1./6.
     #    *oc*x2z)
      gz11c= gz11c+rs1wz(4)*vvc*gtm2*bxps*ys*(1./12.+1./
     #    6.*o*x12+1./6.*os)
      gz11c= gz11c+rs1wz(4)*vvc*gtm2*ys*bxp*(-1./6.*o*
     #    x12*x2z-1./12.*o*x12-1./12.*o*x2z-1./6.*o+1./6.*os*
     #    x12-1./3.*os*x2z-5./12.*os+1./6.*oc-1./6.*x2z)
      gz11c= gz11c+rs1wz(4)*vvc*gtm2*ys*(1./12.*o*x12*
     #    x2z+1./3.*o*x2z+1./12.*o*x2zs-1./6.*os*x12*x2z-1./6.*
     #    os*x12+11./12.*os*x2z+1./6.*os*x2zs+1./3.*os-1./6.*oc
     #    *x2z-1./6.*oc+1./12.*x2zs)
      gz11c= gz11c+rs1wz(7)*bxpi*vvc*gtm2*ys*(1./12.*o*
     #    x2zs+1./12.*os*x12*x2z-1./12.*os*x2zs+1./12.*oc*x2z)
      gz11c= gz11c+rs1wz(7)*vvc*gtm2*bxps*ys*(-1./24.
     #    -1./12.*o*x12+1./12.*o-1./12.*os)
      gz11c= gz11c+rs1wz(7)*vvc*gtm2*ys*bxp*(1./12.*o*x12
     #    *x2z+1./12.*o*x12-1./12.*o*x2z+1./6.*os*x12+1./12.*os
     #    *x2z-1./12.*os+1./6.*oc+1./12.*x2z)
      gz11c= gz11c+rs1wz(7)*vvc*gtm2*ys*(-1./12.*o*x12
     #    *x2z-1./12.*o*x2z-1./6.*os*x12*x2z+1./12.*os*x2z-1./
     #    24.*os*x12s+1./24.*os*x2zs-1./12.*oc*x12-1./6.*oc*x2z
     #    -1./24.*oq-1./24.*x2zs)
      gz11c= gz11c+rs1wz(8)*bxpi*vvc*gtm2*ys*(1./3.*os*
     #    x2z)
      gz11c= gz11c+rs1wz(8)*vvc*gtm2*bxps*ys*(-1./6.*o
     #    )
      gz11c= gz11c+rs1wz(8)*vvc*gtm2*ys*bxp*(1./6.*o*x2z
     #    +1./6.*o-1./6.*os*x12+1./6.*os*x2z+1./3.*os-1./6.*
     #    oc)
      gz11c= gz11c+rs1wz(8)*vvc*gtm2*ys*(-1./6.*o*x2z
     #    +1./6.*os*x12-1./2.*os*x2z-1./3.*os+1./6.*oc)
      gz11c= gz11c+rs1wz(9)*bxpi*vvc*gtm2*ys*(2./3.*oc)
      gz11c= gz11c+rs1wz(9)*vvc*gtm2*ys*bxp*(2./3.*os)
      gz11c= gz11c+rs1wz(9)*vvc*gtm2*ys*(-2./3.*os-2.
     #    /3.*oc)
      gz11c= gz11c+rs1wz(10)*bxpi*vvc*gtm2*ys*(-1./12.*
     #    o*x2zs-1./12.*os*x12*x2z+1./12.*os*x2zs-1./12.*oc*x2z)
      gz11c= gz11c+rs1wz(10)*vvc*gtm2*bxps*ys*(1./24.+1.
     #    /12.*o*x12+1./12.*os)
      gz11c= gz11c+rs1wz(10)*vvc*gtm2*ys*bxp*(-1./12.*o
     #    *x12*x2z-1./12.*o*x12-1./12.*o-1./4.*os*x12+1./12.*os
     #    -1./4.*oc-1./12.*x2z)
      gz11c= gz11c+rs1wz(10)*vvc*gtm2*ys*(1./12.*o*x12*
     #    x2z+1./6.*o*x2z+1./6.*os*x12*x2z+1./12.*os*x12-1./6.*
     #    os*x2z+1./24.*os*x12s-1./24.*os*x2zs+1./12.*oc*x12+1./
     #    6.*oc*x2z+1./12.*oc+1./24.*oq+1./24.*x2zs)
      gz11c= gz11c+rs1wz(11)*vvc*gtm2*ys*bxp*(-1./6.*o
     #    +1./3.*os)
      gz11c= gz11c+rs1wz(11)*vvc*gtm2*ys*(1./6.*o*x2z-
     #    1./6.*os*x12-1./6.*os*x2z-1./6.*oc)
      gz11c= gz11c+rs1wz(12)*xx*vvc*gtm2*ys*(1./3.*os*
     #    x2z+1./3.*oc*x12+1./3.*oc*x2z+1./3.*oq)
      gz11c= gz11c+rs1wz(12)*bxpi*vvc*gtm2*ys*(1./3.*o*
     #    x2z+1./3.*os*x12+1./3.*os*x2z+1./3.*os+1./3.*oc)
      gz11c= gz11c+rs1wz(12)*vvc*gtm2*ys*bxp*(1./6.+1./
     #    3.*o*x12+1./3.*os)
      gz11c= gz11c+rs1wz(12)*vvc*gtm2*ys*(-1./6.*o*x12
     #    -1./6.*o*x2z-1./3.*o-1./3.*os*x12-1./3.*os*x2z-1./2.
     #    *os-1./3.*oc-1./6.*x2z)
      gz11c= gz11c+rs1wz(13)*xx*vvc*gtm2*ys*(1./6.*os*
     #    x2z+1./6.*oc*x12-1./6.*oc*x2z+1./6.*oq)
      gz11c= gz11c+rs1wz(13)*bxpi*vvc*gtm2*ys*(1./6.*o*
     #    x2z+1./6.*os*x12-1./6.*os*x2z+1./6.*os+1./6.*oc)
      gz11c= gz11c+rs1wz(13)*vvc*gtm2*ys*bxp*(1./12.+1./
     #    6.*o*x12-1./12.*o+1./6.*os)
      gz11c= gz11c+rs1wz(13)*vvc*gtm2*ys*(-1./12.*o*
     #    x12-1./6.*o-5./12.*os*x12+1./12.*os*x2z+1./12.*os-5.
     #    /12.*oc-1./12.*x2z)
      gz11c= gz11c+rs1wz(14)*xx*vvc*gtm2*ys*(1./3.*oc*
     #    x2z)
      gz11c= gz11c+rs1wz(14)*bxpi*vvc*gtm2*ys*(1./3.*os*
     #    x2z+1./3.*oc)
      gz11c= gz11c+rs1wz(14)*vvc*gtm2*ys*bxp*(1./6.*os)
      gz11c= gz11c+rs1wz(14)*vvc*gtm2*ys*(1./6.*os*x12
     #    -1./3.*os*x2z-1./3.*os-1./6.*oc)
*
      gz21c= rs1wg(1)*xx*vvc*gtm2*ys*csti*(1./4.*os*x2z
     #    +1./4.*oc*x12-1./4.*oc*x2z+1./4.*oq)
      gz21c= gz21c+rs1wg(1)*xx*vvc*gtm2*ys*(-os*x2z-
     #    oc*x12+oc*x2z-oq)
      gz21c= gz21c+rs1wg(1)*bxpi*vvc*gtm2*ys*csti*(1.
     #    /4.*o*x2z+1./4.*os*x12-1./4.*os*x2z+1./4.*os-1./4.*oc
     #    )
      gz21c= gz21c+rs1wg(1)*bxpi*vvc*gtm2*ys*(-o*x2z-
     #    os*x12+os*x2z-os+oc)
      gz21c= gz21c+rs1wg(1)*vvc*gtm2*ys*bxp*csti*(1./
     #    24.+1./12.*o*x12+1./12.*o-1./3.*os)
      gz21c= gz21c+rs1wg(1)*vvc*gtm2*ys*bxp*(-1./6.-1.
     #    /3.*o*x12-1./3.*o+4./3.*os)
      gz21c= gz21c+rs1wg(1)*vvc*gtm2*ys*csti*(-1./
     #    24.*o*x12-1./8.*o*x2z-1./4.*o-1./4.*os*x12+1./6.*os*
     #    x2z+5./24.*os+1./4.*oc-1./24.*x2z)
      gz21c= gz21c+rs1wg(1)*vvc*gtm2*ys*(1./6.*o*x12+1.
     #    /2.*o*x2z+o+os*x12-2./3.*os*x2z-5./6.*os-oc+1./6.
     #    *x2z)
      gz21c= gz21c+rs1wg(4)*xx*vvc*gtm2*ys*csti*(
     #    -1./8.*os*x2zs)
      gz21c= gz21c+rs1wg(4)*xx*vvc*gtm2*ys*(1./2.*os*
     #    x2zs)
      gz21c= gz21c+rs1wg(4)*bxpi*vvc*gtm2*ys*csti*(
     #    -1./16.*o*x2zs+1./16.*os*x12*x2z-1./4.*os*x2z-1./16.*
     #    os*x2zs+1./16.*oc*x2z)
      gz21c= gz21c+rs1wg(4)*bxpi*vvc*gtm2*ys*(1./4.*o*
     #    x2zs-1./4.*os*x12*x2z+os*x2z+1./4.*os*x2zs-1./4.*oc*
     #    x2z)
      gz21c= gz21c+rs1wg(4)*vvc*gtm2*bxps*ys*csti*(1.
     #    /96.+1./48.*o*x12+1./24.*o+1./48.*os)
      gz21c= gz21c+rs1wg(4)*vvc*gtm2*bxps*ys*(-1./24.
     #    -1./12.*o*x12-1./6.*o-1./12.*os)
      gz21c= gz21c+rs1wg(4)*vvc*gtm2*ys*bxp*csti*(
     #    -1./48.*o*x12*x2z-1./96.*o*x12-3./32.*o*x2z-1./16.*o
     #    +1./16.*os*x12-1./12.*os*x2z-13./96.*os+1./16.*oc-1.
     #    /48.*x2z)
      gz21c= gz21c+rs1wg(4)*vvc*gtm2*ys*bxp*(1./12.*o*x12
     #    *x2z+1./24.*o*x12+3./8.*o*x2z+1./4.*o-1./4.*os*x12+
     #    1./3.*os*x2z+13./24.*os-1./4.*oc+1./12.*x2z)
      gz21c= gz21c+rs1wg(4)*vvc*gtm2*ys*csti*(1./96.
     #    *o*x12*x2z+1./8.*o*x2z+5./96.*o*x2zs-1./16.*os*x12*x2z
     #    -1./16.*os*x12+31./96.*os*x2z+1./16.*os*x2zs+1./8.*os
     #    -1./16.*oc*x2z-1./16.*oc+1./96.*x2zs)
      gz21c= gz21c+rs1wg(4)*vvc*gtm2*ys*(-1./24.*o*x12
     #    *x2z-1./2.*o*x2z-5./24.*o*x2zs+1./4.*os*x12*x2z+1./4.
     #    *os*x12-31./24.*os*x2z-1./4.*os*x2zs-1./2.*os+1./4.*
     #    oc*x2z+1./4.*oc-1./24.*x2zs)
      gz21c= gz21c+rs1wg(7)*bxpi*vvc*gtm2*ys*csti*(1.
     #    /32.*o*x2zs+1./32.*os*x12*x2z-1./32.*os*x2zs+1./32.*oc*
     #    x2z)
      gz21c= gz21c+rs1wg(7)*bxpi*vvc*gtm2*ys*(-1./8.*o*
     #    x2zs-1./8.*os*x12*x2z+1./8.*os*x2zs-1./8.*oc*x2z)
      gz21c= gz21c+rs1wg(7)*vvc*gtm2*bxps*ys*csti*(
     #    -1./192.-1./96.*o*x12+1./96.*o-1./96.*os)
      gz21c= gz21c+rs1wg(7)*vvc*gtm2*bxps*ys*(1./48.+1./
     #    24.*o*x12-1./24.*o+1./24.*os)
      gz21c= gz21c+rs1wg(7)*vvc*gtm2*ys*bxp*csti*(1./
     #    96.*o*x12*x2z+1./96.*o*x12+1./96.*o*x2z+1./48.*os*x12
     #    +1./96.*os*x2z-1./96.*os+1./48.*oc+1./96.*x2z)
      gz21c= gz21c+rs1wg(7)*vvc*gtm2*ys*bxp*(-1./24.*o*
     #    x12*x2z-1./24.*o*x12-1./24.*o*x2z-1./12.*os*x12-1./24.
     #    *os*x2z+1./24.*os-1./12.*oc-1./24.*x2z)
      gz21c= gz21c+rs1wg(7)*vvc*gtm2*ys*csti*(-1./
     #    96.*o*x12*x2z-1./32.*o*x2z-1./48.*o*x2zs-1./24.*os*x12*
     #    x2z+1./96.*os*x2z-1./192.*os*x12s+5./192.*os*x2zs-1./
     #    96.*oc*x12-1./24.*oc*x2z-1./192.*oq-1./192.*x2zs)
      gz21c= gz21c+rs1wg(7)*vvc*gtm2*ys*(1./24.*o*x12*
     #    x2z+1./8.*o*x2z+1./12.*o*x2zs+1./6.*os*x12*x2z-1./24.
     #    *os*x2z+1./48.*os*x12s-5./48.*os*x2zs+1./24.*oc*x12+1.
     #    /6.*oc*x2z+1./48.*oq+1./48.*x2zs)
      gz21c= gz21c+rs1wg(8)*bxpi*vvc*gtm2*ys*csti*(1.
     #    /8.*os*x2z)
      gz21c= gz21c+rs1wg(8)*bxpi*vvc*gtm2*ys*(-1./2.*os
     #    *x2z)
      gz21c= gz21c+rs1wg(8)*vvc*gtm2*bxps*ys*csti*(
     #    -1./16.*o)
      gz21c= gz21c+rs1wg(8)*vvc*gtm2*bxps*ys*(1./4.*o)
      gz21c= gz21c+rs1wg(8)*vvc*gtm2*ys*bxp*csti*(1./
     #    16.*o*x2z+1./16.*o-1./16.*os*x12+1./16.*os*x2z+1./8.*
     #    os-1./16.*oc)
      gz21c= gz21c+rs1wg(8)*vvc*gtm2*ys*bxp*(-1./4.*o*
     #    x2z-1./4.*o+1./4.*os*x12-1./4.*os*x2z-1./2.*os+1./4.
     #    *oc)
      gz21c= gz21c+rs1wg(8)*vvc*gtm2*ys*csti*(-1./
     #    16.*o*x2z+1./16.*os*x12-3./16.*os*x2z-1./8.*os+1./16.
     #    *oc)
      gz21c= gz21c+rs1wg(8)*vvc*gtm2*ys*(1./4.*o*x2z-1.
     #    /4.*os*x12+3./4.*os*x2z+1./2.*os-1./4.*oc)
      gz21c= gz21c+rs1wg(9)*bxpi*vvc*gtm2*ys*csti*(1.
     #    /4.*oc)
      gz21c= gz21c+rs1wg(9)*bxpi*vvc*gtm2*ys*(-oc)
      gz21c= gz21c+rs1wg(9)*vvc*gtm2*ys*bxp*csti*(1./
     #    4.*os)
      gz21c= gz21c+rs1wg(9)*vvc*gtm2*ys*bxp*(-os)
      gz21c= gz21c+rs1wg(9)*vvc*gtm2*ys*csti*(-1./
     #    4.*os-1./4.*oc)
      gz21c= gz21c+rs1wg(9)*vvc*gtm2*ys*(os+oc)
      gz21c= gz21c+rs1wg(10)*bxpi*vvc*gtm2*ys*csti*(
     #    -1./32.*o*x2zs-1./32.*os*x12*x2z+1./32.*os*x2zs-1./32.
     #    *oc*x2z)
      gz21c= gz21c+rs1wg(10)*bxpi*vvc*gtm2*ys*(1./8.*o*
     #    x2zs+1./8.*os*x12*x2z-1./8.*os*x2zs+1./8.*oc*x2z)
      gz21c= gz21c+rs1wg(10)*vvc*gtm2*bxps*ys*csti*(
     #    1./192.+1./96.*o*x12+1./48.*o+1./96.*os)
      gz21c= gz21c+rs1wg(10)*vvc*gtm2*bxps*ys*(-1./48.
     #    -1./24.*o*x12-1./12.*o-1./24.*os)
      gz21c= gz21c+rs1wg(10)*vvc*gtm2*ys*bxp*csti*(
     #    -1./96.*o*x12*x2z-1./96.*o*x12-1./24.*o*x2z-1./32.*o
     #    -5./96.*os*x12+1./48.*os*x2z+1./96.*os-5./96.*oc-1./
     #    96.*x2z)
      gz21c= gz21c+rs1wg(10)*vvc*gtm2*ys*bxp*(1./24.*o*
     #    x12*x2z+1./24.*o*x12+1./6.*o*x2z+1./8.*o+5./24.*os*
     #    x12-1./12.*os*x2z-1./24.*os+5./24.*oc+1./24.*x2z)
      gz21c= gz21c+rs1wg(10)*vvc*gtm2*ys*csti*(1./
     #    96.*o*x12*x2z+1./16.*o*x2z+1./48.*o*x2zs+1./24.*os*x12*
     #    x2z+1./32.*os*x12-1./24.*os*x2z+1./192.*os*x12s-5./
     #    192.*os*x2zs+1./96.*oc*x12+1./24.*oc*x2z+1./32.*oc+1./
     #    192.*oq+1./192.*x2zs)
      gz21c= gz21c+rs1wg(10)*vvc*gtm2*ys*(-1./24.*o*
     #    x12*x2z-1./4.*o*x2z-1./12.*o*x2zs-1./6.*os*x12*x2z-1./
     #    8.*os*x12+1./6.*os*x2z-1./48.*os*x12s+5./48.*os*x2zs-
     #    1./24.*oc*x12-1./6.*oc*x2z-1./8.*oc-1./48.*oq-1./48.*
     #    x2zs)
      gz21c= gz21c+rs1wg(11)*vvc*gtm2*ys*bxp*csti*(
     #    -1./48.*o+1./24.*os)
      gz21c= gz21c+rs1wg(11)*vvc*gtm2*ys*bxp*(1./12.*o-
     #    1./6.*os)
      gz21c= gz21c+rs1wg(11)*vvc*gtm2*ys*csti*(1./
     #    48.*o*x2z-1./48.*os*x12-1./48.*os*x2z-1./48.*oc)
      gz21c= gz21c+rs1wg(11)*vvc*gtm2*ys*(-1./12.*o*
     #    x2z+1./12.*os*x12+1./12.*os*x2z+1./12.*oc)
      gz21c= gz21c+rs1wg(12)*xx*vvc*gtm2*ys*csti*(1.
     #    /8.*os*x2z+1./8.*oc*x12+1./8.*oc*x2z+1./8.*oq)
      gz21c= gz21c+rs1wg(12)*xx*vvc*gtm2*ys*(-1./2.*os
     #    *x2z-1./2.*oc*x12-1./2.*oc*x2z-1./2.*oq)
      gz21c= gz21c+rs1wg(12)*bxpi*vvc*gtm2*ys*csti*(
     #    1./8.*o*x2z+1./8.*os*x12+1./8.*os*x2z+1./8.*os+1./8.*
     #    oc)
      gz21c= gz21c+rs1wg(12)*bxpi*vvc*gtm2*ys*(-1./2.*o
     #    *x2z-1./2.*os*x12-1./2.*os*x2z-1./2.*os-1./2.*oc)
      gz21c= gz21c+rs1wg(12)*vvc*gtm2*ys*bxp*csti*(1.
     #    /48.+1./24.*o*x12+1./12.*o+1./24.*os)
      gz21c= gz21c+rs1wg(12)*vvc*gtm2*ys*bxp*(-1./12.
     #    -1./6.*o*x12-1./3.*o-1./6.*os)
      gz21c= gz21c+rs1wg(12)*vvc*gtm2*ys*csti*(-1.
     #    /48.*o*x12-5./48.*o*x2z-1./8.*o-1./8.*os*x12-1./8.*os
     #    *x2z-7./48.*os-1./8.*oc-1./48.*x2z)
      gz21c= gz21c+rs1wg(12)*vvc*gtm2*ys*(1./12.*o*x12
     #    +5./12.*o*x2z+1./2.*o+1./2.*os*x12+1./2.*os*x2z+7./
     #    12.*os+1./2.*oc+1./12.*x2z)
      gz21c= gz21c+rs1wg(13)*xx*vvc*gtm2*ys*csti*(1.
     #    /16.*os*x2z+1./16.*oc*x12-1./16.*oc*x2z+1./16.*oq)
      gz21c= gz21c+rs1wg(13)*xx*vvc*gtm2*ys*(-1./4.*os
     #    *x2z-1./4.*oc*x12+1./4.*oc*x2z-1./4.*oq)
      gz21c= gz21c+rs1wg(13)*bxpi*vvc*gtm2*ys*csti*(
     #    1./16.*o*x2z+1./16.*os*x12-1./16.*os*x2z+1./16.*os+1./
     #    16.*oc)
      gz21c= gz21c+rs1wg(13)*bxpi*vvc*gtm2*ys*(-1./4.*o
     #    *x2z-1./4.*os*x12+1./4.*os*x2z-1./4.*os-1./4.*oc)
      gz21c= gz21c+rs1wg(13)*vvc*gtm2*ys*bxp*csti*(1.
     #    /96.+1./48.*o*x12+1./32.*o+1./48.*os)
      gz21c= gz21c+rs1wg(13)*vvc*gtm2*ys*bxp*(-1./24.
     #    -1./12.*o*x12-1./8.*o-1./12.*os)
      gz21c= gz21c+rs1wg(13)*vvc*gtm2*ys*csti*(-1.
     #    /96.*o*x12-1./24.*o*x2z-1./16.*o-3./32.*os*x12+5./96.
     #    *os*x2z-1./32.*os-3./32.*oc-1./96.*x2z)
      gz21c= gz21c+rs1wg(13)*vvc*gtm2*ys*(1./24.*o*x12
     #    +1./6.*o*x2z+1./4.*o+3./8.*os*x12-5./24.*os*x2z+1./
     #    8.*os+3./8.*oc+1./24.*x2z)
      gz21c= gz21c+rs1wg(14)*xx*vvc*gtm2*ys*csti*(1.
     #    /8.*oc*x2z)
      gz21c= gz21c+rs1wg(14)*xx*vvc*gtm2*ys*(-1./2.*oc
     #    *x2z)
      gz21c= gz21c+rs1wg(14)*bxpi*vvc*gtm2*ys*csti*(
     #    1./8.*os*x2z+1./8.*oc)
      gz21c= gz21c+rs1wg(14)*bxpi*vvc*gtm2*ys*(-1./2.*
     #    os*x2z-1./2.*oc)
      gz21c= gz21c+rs1wg(14)*vvc*gtm2*ys*bxp*csti*(5.
     #    /48.*os)
      gz21c= gz21c+rs1wg(14)*vvc*gtm2*ys*bxp*(-5./12.*
     #    os)
      gz21c= gz21c+rs1wg(14)*vvc*gtm2*ys*csti*(1./
     #    48.*os*x12-1./8.*os*x2z-1./8.*os-5./48.*oc)
      gz21c= gz21c+rs1wg(14)*vvc*gtm2*ys*(-1./12.*os*
     #    x12+1./2.*os*x2z+1./2.*os+5./12.*oc)
      gz21c= gz21c+rs1wz(1)*xx*vvc*gtm2*ys*(2*os*x2z+2
     #    *oc*x12-2*oc*x2z+2*oq)
      gz21c= gz21c+rs1wz(1)*bxpi*vvc*gtm2*ys*(2*o*x2z+2
     #    *os*x12-2*os*x2z+2*os-2*oc)
      gz21c= gz21c+rs1wz(1)*vvc*gtm2*ys*bxp*(1./3.+2./3.
     #    *o*x12+2./3.*o-8./3.*os)
      gz21c= gz21c+rs1wz(1)*vvc*gtm2*ys*(-1./3.*o*x12
     #    -o*x2z-2*o-2*os*x12+4./3.*os*x2z+5./3.*os+2*oc-
     #    1./3.*x2z)
      gz21c= gz21c+rs1wz(4)*xx*vvc*gtm2*ys*(-os*x2zs)
      gz21c= gz21c+rs1wz(4)*bxpi*vvc*gtm2*ys*(-1./2.*o*
     #    x2zs+1./2.*os*x12*x2z-2*os*x2z-1./2.*os*x2zs+1./2.*oc
     #    *x2z)
      gz21c= gz21c+rs1wz(4)*vvc*gtm2*bxps*ys*(1./12.+1./
     #    6.*o*x12+1./3.*o+1./6.*os)
      gz21c= gz21c+rs1wz(4)*vvc*gtm2*ys*bxp*(-1./6.*o*
     #    x12*x2z-1./12.*o*x12-3./4.*o*x2z-1./2.*o+1./2.*os*x12
     #    -2./3.*os*x2z-13./12.*os+1./2.*oc-1./6.*x2z)
      gz21c= gz21c+rs1wz(4)*vvc*gtm2*ys*(1./12.*o*x12*
     #    x2z+o*x2z+5./12.*o*x2zs-1./2.*os*x12*x2z-1./2.*os*x12
     #    +31./12.*os*x2z+1./2.*os*x2zs+os-1./2.*oc*x2z-1./2.
     #    *oc+1./12.*x2zs)
      gz21c= gz21c+rs1wz(7)*bxpi*vvc*gtm2*ys*(1./4.*o*
     #    x2zs+1./4.*os*x12*x2z-1./4.*os*x2zs+1./4.*oc*x2z)
      gz21c= gz21c+rs1wz(7)*vvc*gtm2*bxps*ys*(-1./24.
     #    -1./12.*o*x12+1./12.*o-1./12.*os)
      gz21c= gz21c+rs1wz(7)*vvc*gtm2*ys*bxp*(1./12.*o*x12
     #    *x2z+1./12.*o*x12+1./12.*o*x2z+1./6.*os*x12+1./12.*os
     #    *x2z-1./12.*os+1./6.*oc+1./12.*x2z)
      gz21c= gz21c+rs1wz(7)*vvc*gtm2*ys*(-1./12.*o*x12
     #    *x2z-1./4.*o*x2z-1./6.*o*x2zs-1./3.*os*x12*x2z+1./12.
     #    *os*x2z-1./24.*os*x12s+5./24.*os*x2zs-1./12.*oc*x12-1.
     #    /3.*oc*x2z-1./24.*oq-1./24.*x2zs)
      gz21c= gz21c+rs1wz(8)*bxpi*vvc*gtm2*ys*(os*x2z)
      gz21c= gz21c+rs1wz(8)*vvc*gtm2*bxps*ys*(-1./2.*o
     #    )
      gz21c= gz21c+rs1wz(8)*vvc*gtm2*ys*bxp*(1./2.*o*x2z
     #    +1./2.*o-1./2.*os*x12+1./2.*os*x2z+os-1./2.*oc)
      gz21c= gz21c+rs1wz(8)*vvc*gtm2*ys*(-1./2.*o*x2z
     #    +1./2.*os*x12-3./2.*os*x2z-os+1./2.*oc)
      gz21c= gz21c+rs1wz(9)*bxpi*vvc*gtm2*ys*(2*oc)
      gz21c= gz21c+rs1wz(9)*vvc*gtm2*ys*bxp*(2*os)
      gz21c= gz21c+rs1wz(9)*vvc*gtm2*ys*(-2*os-2*oc
     #    )
      gz21c= gz21c+rs1wz(10)*bxpi*vvc*gtm2*ys*(-1./4.*o
     #    *x2zs-1./4.*os*x12*x2z+1./4.*os*x2zs-1./4.*oc*x2z)
      gz21c= gz21c+rs1wz(10)*vvc*gtm2*bxps*ys*(1./24.+1.
     #    /12.*o*x12+1./6.*o+1./12.*os)
      gz21c= gz21c+rs1wz(10)*vvc*gtm2*ys*bxp*(-1./12.*o
     #    *x12*x2z-1./12.*o*x12-1./3.*o*x2z-1./4.*o-5./12.*os*
     #    x12+1./6.*os*x2z+1./12.*os-5./12.*oc-1./12.*x2z)
      gz21c= gz21c+rs1wz(10)*vvc*gtm2*ys*(1./12.*o*x12*
     #    x2z+1./2.*o*x2z+1./6.*o*x2zs+1./3.*os*x12*x2z+1./4.*
     #    os*x12-1./3.*os*x2z+1./24.*os*x12s-5./24.*os*x2zs+1./
     #    12.*oc*x12+1./3.*oc*x2z+1./4.*oc+1./24.*oq+1./24.*
     #    x2zs)
      gz21c= gz21c+rs1wz(11)*vvc*gtm2*ys*bxp*(-1./6.*o
     #    +1./3.*os)
      gz21c= gz21c+rs1wz(11)*vvc*gtm2*ys*(1./6.*o*x2z-
     #    1./6.*os*x12-1./6.*os*x2z-1./6.*oc)
      gz21c= gz21c+rs1wz(12)*xx*vvc*gtm2*ys*(os*x2z+oc
     #    *x12+oc*x2z+oq)
      gz21c= gz21c+rs1wz(12)*bxpi*vvc*gtm2*ys*(o*x2z+os
     #    *x12+os*x2z+os+oc)
      gz21c= gz21c+rs1wz(12)*vvc*gtm2*ys*bxp*(1./6.+1./
     #    3.*o*x12+2./3.*o+1./3.*os)
      gz21c= gz21c+rs1wz(12)*vvc*gtm2*ys*(-1./6.*o*x12
     #    -5./6.*o*x2z-o-os*x12-os*x2z-7./6.*os-oc-1./6.*
     #    x2z)
      gz21c= gz21c+rs1wz(13)*xx*vvc*gtm2*ys*(1./2.*os*
     #    x2z+1./2.*oc*x12-1./2.*oc*x2z+1./2.*oq)
      gz21c= gz21c+rs1wz(13)*bxpi*vvc*gtm2*ys*(1./2.*o*
     #    x2z+1./2.*os*x12-1./2.*os*x2z+1./2.*os+1./2.*oc)
      gz21c= gz21c+rs1wz(13)*vvc*gtm2*ys*bxp*(1./12.+1./
     #    6.*o*x12+1./4.*o+1./6.*os)
      gz21c= gz21c+rs1wz(13)*vvc*gtm2*ys*(-1./12.*o*
     #    x12-1./3.*o*x2z-1./2.*o-3./4.*os*x12+5./12.*os*x2z-
     #    1./4.*os-3./4.*oc-1./12.*x2z)
      gz21c= gz21c+rs1wz(14)*xx*vvc*gtm2*ys*(oc*x2z)
      gz21c= gz21c+rs1wz(14)*bxpi*vvc*gtm2*ys*(os*x2z+
     #    oc)
      gz21c= gz21c+rs1wz(14)*vvc*gtm2*ys*bxp*(5./6.*os)
      gz21c= gz21c+rs1wz(14)*vvc*gtm2*ys*(1./6.*os*x12
     #    -os*x2z-os-5./6.*oc)
*
      gz31c= rs1wg(1)*bxpi*vvc*gtm2*ys*csti*(1./24.*o*x12*
     #    x2z-1./12.*o*x2z+1./6.*os*x2z-1./12.*oc)
      gz31c= gz31c+rs1wg(1)*bxpi*vvc*gtm2*ys*(-1./6.*o*
     #    x12*x2z+1./3.*o*x2z-2./3.*os*x2z+1./3.*oc)
      gz31c= gz31c+rs1wg(1)*vvc*gtm2*bxps*ys*csti*(1.
     #    /48.-1./24.*o)
      gz31c= gz31c+rs1wg(1)*vvc*gtm2*bxps*ys*(-1./12.
     #    +1./6.*o)
      gz31c= gz31c+rs1wg(1)*vvc*gtm2*ys*bxp*csti*(
     #    -1./12.+1./48.*o*x12-1./16.*o*x2z+7./48.*o+1./16.*
     #    os-1./24.*x12*x2z+1./16.*x12+1./48.*x2z)
      gz31c= gz31c+rs1wg(1)*vvc*gtm2*ys*bxp*(1./3.-1./
     #    12.*o*x12+1./4.*o*x2z-7./12.*o-1./4.*os+1./6.*x12*x2z
     #    -1./4.*x12-1./12.*x2z)
      gz31c= gz31c+rs1wg(1)*vvc*gtm2*ys*csti*(1./48.
     #    *o*x12*x2z-1./8.*o*x12-1./16.*o*x2z+1./48.*o*x12s+1./
     #    24.*o*x2zs+1./12.*o+1./12.*os*x12-1./16.*os*x2z-1./4.
     #    *os+7./48.*oc-1./48.*x12*x2z+1./12.*x2z-1./24.*x2zs)
      gz31c= gz31c+rs1wg(1)*vvc*gtm2*ys*(-1./12.*o*x12
     #    *x2z+1./2.*o*x12+1./4.*o*x2z-1./12.*o*x12s-1./6.*o*
     #    x2zs-1./3.*o-1./3.*os*x12+1./4.*os*x2z+os-7./12.*oc
     #    +1./12.*x12*x2z-1./3.*x2z+1./6.*x2zs)
      gz31c= gz31c+rs1wg(4)*bxpi*vvc*gtm2*ys*csti*(1.
     #    /48.*o*x2zs)
      gz31c= gz31c+rs1wg(4)*bxpi*vvc*gtm2*ys*(-1./12.*o
     #    *x2zs)
      gz31c= gz31c+rs1wg(4)*vvc*gtm2*bxps*ys*bxp*csti
     # *(-1./192.+1./96.*o+1./96.*x12)
      gz31c= gz31c+rs1wg(4)*vvc*gtm2*bxps*ys*bxp*(1./48.
     #    -1./24.*o-1./24.*x12)
      gz31c= gz31c+rs1wg(4)*vvc*gtm2*bxps*ys*csti*(1.
     #    /192.*o*x12-1./64.*o*x2z-1./64.*o+1./192.*os-1./96.*
     #    x12*x2z-1./192.*x12+1./96.*x2z)
      gz31c= gz31c+rs1wg(4)*vvc*gtm2*bxps*ys*(-1./48.*o
     #    *x12+1./16.*o*x2z+1./16.*o-1./48.*os+1./24.*x12*x2z
     #    +1./48.*x12-1./24.*x2z)
      gz31c= gz31c+rs1wg(4)*vvc*gtm2*ys*bxp*csti*(
     #    -1./96.*o*x12*x2z-1./48.*o*x12+7./192.*o*x2z+1./192.*
     #    o*x12s+1./192.*o*x2zs+1./48.*o+1./96.*os*x12-1./96.*
     #    os*x2z-1./48.*os+1./192.*oc+1./192.*x12*x2z-1./192.*
     #    x2zs)
      gz31c= gz31c+rs1wg(4)*vvc*gtm2*ys*bxp*(1./24.*o*x12
     #    *x2z+1./12.*o*x12-7./48.*o*x2z-1./48.*o*x12s-1./48.*o
     #    *x2zs-1./12.*o-1./24.*os*x12+1./24.*os*x2z+1./12.*os
     #    -1./48.*oc-1./48.*x12*x2z+1./48.*x2zs)
      gz31c= gz31c+rs1wg(4)*vvc*gtm2*ys*csti*(1./48.
     #    *o*x12*x2z-1./24.*o*x2z-1./48.*o*x2zs+1./48.*os*x2z)
      gz31c= gz31c+rs1wg(4)*vvc*gtm2*ys*(-1./12.*o*x12
     #    *x2z+1./6.*o*x2z+1./12.*o*x2zs-1./12.*os*x2z)
      gz31c= gz31c+rs1wg(7)*bxpi*vvc*gtm2*ys*csti*(
     #    -1./192.*o*x12*x2zs-1./192.*o*x2zc+1./192.*o*x2zs-1./
     #    192.*os*x12*x2z-1./96.*os*x2zs-1./192.*oc*x2z+1./192.*
     #    x2zc)
      gz31c= gz31c+rs1wg(7)*bxpi*vvc*gtm2*ys*(1./48.*o*
     #    x12*x2zs+1./48.*o*x2zc-1./48.*o*x2zs+1./48.*os*x12*x2z
     #    +1./24.*os*x2zs+1./48.*oc*x2z-1./48.*x2zc)
      gz31c= gz31c+rs1wg(7)*vvc*gtm2*bxps*ys*csti*(
     #    -1./384.+1./96.*o+1./192.*x12)
      gz31c= gz31c+rs1wg(7)*vvc*gtm2*bxps*ys*(1./96.-1./
     #    24.*o-1./48.*x12)
      gz31c= gz31c+rs1wg(7)*vvc*gtm2*ys*bxp*csti*(1./
     #    192.*o*x12*x2z-1./64.*o*x12-5./192.*o*x2z+1./192.*o*
     #    x12s+1./192.*o+1./64.*os*x12-5./192.*os+1./96.*oc-1.
     #    /96.*x12*x2z+1./96.*x2z)
      gz31c= gz31c+rs1wg(7)*vvc*gtm2*ys*bxp*(-1./48.*o*
     #    x12*x2z+1./16.*o*x12+5./48.*o*x2z-1./48.*o*x12s-1./48.
     #    *o-1./16.*os*x12+5./48.*os-1./24.*oc+1./24.*x12*x2z
     #    -1./24.*x2z)
      gz31c= gz31c+rs1wg(7)*vvc*gtm2*ys*csti*(1./48.
     #    *o*x12*x2z-1./192.*o*x12*x2zs-1./192.*o*x2z*x12s-1./96.
     #    *o*x2z+1./48.*o*x2zs-1./96.*os*x12*x2z+1./192.*os*x12
     #    +7./192.*os*x2z-1./384.*os*x12s-1./384.*os*x2zs-1./
     #    192.*oc*x12-1./192.*oc*x2z+1./192.*oc-1./384.*oq+1./
     #    192.*x12*x2zs-5./384.*x2zs)
      gz31c= gz31c+rs1wg(7)*vvc*gtm2*ys*(-1./12.*o*x12
     #    *x2z+1./48.*o*x12*x2zs+1./48.*o*x2z*x12s+1./24.*o*x2z
     #    -1./12.*o*x2zs+1./24.*os*x12*x2z-1./48.*os*x12-7./48.
     #    *os*x2z+1./96.*os*x12s+1./96.*os*x2zs+1./48.*oc*x12+1.
     #    /48.*oc*x2z-1./48.*oc+1./96.*oq-1./48.*x12*x2zs+5./96.
     #    *x2zs)
      gz31c= gz31c+rs1wg(10)*bxpi*vvc*gtm2*ys*csti*(
     #    1./192.*o*x12*x2zs+1./192.*o*x2zc-1./192.*o*x2zs+1./192.
     #    *os*x12*x2z+1./96.*os*x2zs+1./192.*oc*x2z-1./192.*x2zc
     #    )
      gz31c= gz31c+rs1wg(10)*bxpi*vvc*gtm2*ys*(-1./48.*
     #    o*x12*x2zs-1./48.*o*x2zc+1./48.*o*x2zs-1./48.*os*x12*
     #    x2z-1./24.*os*x2zs-1./48.*oc*x2z+1./48.*x2zc)
      gz31c= gz31c+rs1wg(10)*vvc*gtm2*bxps*ys*csti*(
     #    1./384.-1./96.*o-1./192.*x12)
      gz31c= gz31c+rs1wg(10)*vvc*gtm2*bxps*ys*(-1./96.
     #    +1./24.*o+1./48.*x12)
      gz31c= gz31c+rs1wg(10)*vvc*gtm2*ys*bxp*csti*(
     #    -1./192.*o*x12*x2z+1./64.*o*x12+5./192.*o*x2z-1./192.
     #    *o*x12s-1./192.*o-1./64.*os*x12+5./192.*os-1./96.*oc
     #    +1./96.*x12*x2z-1./96.*x2z)
      gz31c= gz31c+rs1wg(10)*vvc*gtm2*ys*bxp*(1./48.*o*
     #    x12*x2z-1./16.*o*x12-5./48.*o*x2z+1./48.*o*x12s+1./48.
     #    *o+1./16.*os*x12-5./48.*os+1./24.*oc-1./24.*x12*x2z
     #    +1./24.*x2z)
      gz31c= gz31c+rs1wg(10)*vvc*gtm2*ys*csti*(-1.
     #    /48.*o*x12*x2z+1./192.*o*x12*x2zs+1./192.*o*x2z*x12s+1./
     #    96.*o*x2z-1./48.*o*x2zs+1./96.*os*x12*x2z-1./192.*os*
     #    x12-7./192.*os*x2z+1./384.*os*x12s+1./384.*os*x2zs+1./
     #    192.*oc*x12+1./192.*oc*x2z-1./192.*oc+1./384.*oq-1./
     #    192.*x12*x2zs+5./384.*x2zs)
      gz31c= gz31c+rs1wg(10)*vvc*gtm2*ys*(1./12.*o*x12*
     #    x2z-1./48.*o*x12*x2zs-1./48.*o*x2z*x12s-1./24.*o*x2z+
     #    1./12.*o*x2zs-1./24.*os*x12*x2z+1./48.*os*x12+7./48.*os
     #    *x2z-1./96.*os*x12s-1./96.*os*x2zs-1./48.*oc*x12-1./
     #    48.*oc*x2z+1./48.*oc-1./96.*oq+1./48.*x12*x2zs-5./96.
     #    *x2zs)
      gz31c= gz31c+rs1wg(11)*bxpi*vvc*gtm2*ys*csti*(
     #    1./48.*os*x12+1./24.*os*x2z)
      gz31c= gz31c+rs1wg(11)*bxpi*vvc*gtm2*ys*(-1./12.*
     #    os*x12-1./6.*os*x2z)
      gz31c= gz31c+rs1wg(11)*vvc*gtm2*bxps*ys*csti*(
     #    1./48.-1./24.*o-1./96.*x12)
      gz31c= gz31c+rs1wg(11)*vvc*gtm2*bxps*ys*(-1./12.
     #    +1./6.*o+1./24.*x12)
      gz31c= gz31c+rs1wg(11)*vvc*gtm2*ys*bxp*csti*(
     #    -1./48.+1./48.*o*x12+1./48.*o*x2z+1./24.*o+1./16.*
     #    os+1./96.*x12-1./48.*x2z)
      gz31c= gz31c+rs1wg(11)*vvc*gtm2*ys*bxp*(1./12.-1./
     #    12.*o*x12-1./12.*o*x2z-1./6.*o-1./4.*os-1./24.*x12+
     #    1./12.*x2z)
      gz31c= gz31c+rs1wg(11)*vvc*gtm2*ys*csti*(-1.
     #    /48.*o*x12-1./48.*o*x2z-1./48.*os*x12-1./24.*os*x2z-1.
     #    /16.*os+1./48.*x2z)
      gz31c= gz31c+rs1wg(11)*vvc*gtm2*ys*(1./12.*o*x12
     #    +1./12.*o*x2z+1./12.*os*x12+1./6.*os*x2z+1./4.*os-1.
     #    /12.*x2z)
      gz31c= gz31c+rs1wg(12)*bxpi*vvc*gtm2*ys*csti*(
     #    1./48.*o*x12*x2z-1./24.*o*x2z-1./48.*os*x12-1./24.*oc)
      gz31c= gz31c+rs1wg(12)*bxpi*vvc*gtm2*ys*(-1./12.*
     #    o*x12*x2z+1./6.*o*x2z+1./12.*os*x12+1./6.*oc)
      gz31c= gz31c+rs1wg(12)*vvc*gtm2*bxps*ys*csti*(
     #    -1./96.+1./48.*o+1./96.*x12)
      gz31c= gz31c+rs1wg(12)*vvc*gtm2*bxps*ys*(1./24.-1.
     #    /12.*o-1./24.*x12)
      gz31c= gz31c+rs1wg(12)*vvc*gtm2*ys*bxp*csti*(
     #    -1./48.-1./96.*o*x12-5./96.*o*x2z+1./96.*o-1./32.*
     #    os-1./48.*x12*x2z+1./48.*x12+1./32.*x2z)
      gz31c= gz31c+rs1wg(12)*vvc*gtm2*ys*bxp*(1./12.+1./
     #    24.*o*x12+5./24.*o*x2z-1./24.*o+1./8.*os+1./12.*x12*
     #    x2z-1./12.*x12-1./8.*x2z)
      gz31c= gz31c+rs1wg(12)*vvc*gtm2*ys*csti*(1./
     #    96.*o*x12*x2z-1./24.*o*x12+1./96.*o*x2z+1./96.*o*x12s
     #    +1./48.*o*x2zs+1./24.*o+1./24.*os*x12+1./32.*os*x2z
     #    -1./48.*os+5./96.*oc-1./96.*x12*x2z+1./48.*x2z-1./
     #    48.*x2zs)
      gz31c= gz31c+rs1wg(12)*vvc*gtm2*ys*(-1./24.*o*
     #    x12*x2z+1./6.*o*x12-1./24.*o*x2z-1./24.*o*x12s-1./12.
     #    *o*x2zs-1./6.*o-1./6.*os*x12-1./8.*os*x2z+1./12.*os
     #    -5./24.*oc+1./24.*x12*x2z-1./12.*x2z+1./12.*x2zs)
      gz31c= gz31c+rs1wg(13)*bxpi*vvc*gtm2*ys*csti*(
     #    1./96.*o*x12*x2z-1./96.*o*x2z-1./96.*o*x2zs-1./96.*os*
     #    x12+1./96.*oc+1./96.*x2zs)
      gz31c= gz31c+rs1wg(13)*bxpi*vvc*gtm2*ys*(-1./24.*
     #    o*x12*x2z+1./24.*o*x2z+1./24.*o*x2zs+1./24.*os*x12-1./
     #    24.*oc-1./24.*x2zs)
      gz31c= gz31c+rs1wg(13)*vvc*gtm2*ys*bxp*csti*(1.
     #    /192.-1./48.*o-1./192.*x12)
      gz31c= gz31c+rs1wg(13)*vvc*gtm2*ys*bxp*(-1./48.
     #    +1./12.*o+1./48.*x12)
      gz31c= gz31c+rs1wg(13)*vvc*gtm2*ys*csti*(-1.
     #    /64.*o*x12*x2z-1./192.*o*x12+7./192.*o*x2z+1./192.*o*
     #    x12s+1./96.*o+1./64.*os*x12-1./96.*os*x2z+1./192.*os
     #    -1./96.*oc+1./192.*x12*x2z-1./64.*x2z)
      gz31c= gz31c+rs1wg(13)*vvc*gtm2*ys*(1./16.*o*x12*
     #    x2z+1./48.*o*x12-7./48.*o*x2z-1./48.*o*x12s-1./24.*o
     #    -1./16.*os*x12+1./24.*os*x2z-1./48.*os+1./24.*oc-1./
     #    48.*x12*x2z+1./16.*x2z)
      gz31c= gz31c+rs1wg(14)*bxpi*vvc*gtm2*ys*csti*(
     #    -1./96.*o*x12*x2z+1./96.*o*x2zs+1./96.*os*x2z-1./96.*
     #    x2zs)
      gz31c= gz31c+rs1wg(14)*bxpi*vvc*gtm2*ys*(1./24.*o*
     #    x12*x2z-1./24.*o*x2zs-1./24.*os*x2z+1./24.*x2zs)
      gz31c= gz31c+rs1wg(14)*vvc*gtm2*bxps*ys*csti*(
     #    -1./192.+1./96.*o)
      gz31c= gz31c+rs1wg(14)*vvc*gtm2*bxps*ys*(1./48.-1.
     #    /24.*o)
      gz31c= gz31c+rs1wg(14)*vvc*gtm2*ys*bxp*csti*(
     #    -1./96.-1./64.*o*x12-1./192.*o*x2z+1./32.*o-5./192.
     #    *os+1./192.*x12+1./192.*x2z)
      gz31c= gz31c+rs1wg(14)*vvc*gtm2*ys*bxp*(1./24.+1./
     #    16.*o*x12+1./48.*o*x2z-1./8.*o+5./48.*os-1./48.*x12
     #    -1./48.*x2z)
      gz31c= gz31c+rs1wg(14)*vvc*gtm2*ys*csti*(1./
     #    64.*o*x12*x2z+1./96.*o*x12-1./24.*o*x2z-1./192.*o*x12s
     #    +1./192.*os*x12+1./96.*os*x2z-1./96.*os+1./96.*oc-1.
     #    /192.*x12*x2z+1./48.*x2z)
      gz31c= gz31c+rs1wg(14)*vvc*gtm2*ys*(-1./16.*o*
     #    x12*x2z-1./24.*o*x12+1./6.*o*x2z+1./48.*o*x12s-1./48.
     #    *os*x12-1./24.*os*x2z+1./24.*os-1./24.*oc+1./48.*x12*
     #    x2z-1./12.*x2z)
      gz31c= gz31c+rs1wz(1)*bxpi*vvc*gtm2*ys*(1./3.*o*x12
     #    *x2z-2./3.*o*x2z+4./3.*os*x2z-2./3.*oc)
      gz31c= gz31c+rs1wz(1)*vvc*gtm2*bxps*ys*(1./6.-1./
     #    3.*o)
      gz31c= gz31c+rs1wz(1)*vvc*gtm2*ys*bxp*(-2./3.+1.
     #    /6.*o*x12-1./2.*o*x2z+7./6.*o+1./2.*os-1./3.*x12*x2z
     #    +1./2.*x12+1./6.*x2z)
      gz31c= gz31c+rs1wz(1)*vvc*gtm2*ys*(1./6.*o*x12*x2z
     #    -o*x12-1./2.*o*x2z+1./6.*o*x12s+1./3.*o*x2zs+2./3.*
     #    o+2./3.*os*x12-1./2.*os*x2z-2*os+7./6.*oc-1./6.*x12
     #    *x2z+2./3.*x2z-1./3.*x2zs)
      gz31c= gz31c+rs1wz(4)*bxpi*vvc*gtm2*ys*(1./6.*o*
     #    x2zs)
      gz31c= gz31c+rs1wz(4)*vvc*gtm2*bxps*ys*bxp*(-1./24.
     #    +1./12.*o+1./12.*x12)
      gz31c= gz31c+rs1wz(4)*vvc*gtm2*bxps*ys*(1./24.*o*
     #    x12-1./8.*o*x2z-1./8.*o+1./24.*os-1./12.*x12*x2z-1./
     #    24.*x12+1./12.*x2z)
      gz31c= gz31c+rs1wz(4)*vvc*gtm2*ys*bxp*(-1./12.*o*
     #    x12*x2z-1./6.*o*x12+7./24.*o*x2z+1./24.*o*x12s+1./24.
     #    *o*x2zs+1./6.*o+1./12.*os*x12-1./12.*os*x2z-1./6.*os
     #    +1./24.*oc+1./24.*x12*x2z-1./24.*x2zs)
      gz31c= gz31c+rs1wz(4)*vvc*gtm2*ys*(1./6.*o*x12*x2z
     #    -1./3.*o*x2z-1./6.*o*x2zs+1./6.*os*x2z)
      gz31c= gz31c+rs1wz(7)*bxpi*vvc*gtm2*ys*(-1./24.*o
     #    *x12*x2zs-1./24.*o*x2zc+1./24.*o*x2zs-1./24.*os*x12*x2z
     #    -1./12.*os*x2zs-1./24.*oc*x2z+1./24.*x2zc)
      gz31c= gz31c+rs1wz(7)*vvc*gtm2*bxps*ys*(-1./48.
     #    +1./12.*o+1./24.*x12)
      gz31c= gz31c+rs1wz(7)*vvc*gtm2*ys*bxp*(1./24.*o*x12
     #    *x2z-1./8.*o*x12-5./24.*o*x2z+1./24.*o*x12s+1./24.*o
     #    +1./8.*os*x12-5./24.*os+1./12.*oc-1./12.*x12*x2z+1./
     #    12.*x2z)
      gz31c= gz31c+rs1wz(7)*vvc*gtm2*ys*(1./6.*o*x12*x2z
     #    -1./24.*o*x12*x2zs-1./24.*o*x2z*x12s-1./12.*o*x2z+1./
     #    6.*o*x2zs-1./12.*os*x12*x2z+1./24.*os*x12+7./24.*os*x2z
     #    -1./48.*os*x12s-1./48.*os*x2zs-1./24.*oc*x12-1./24.*
     #    oc*x2z+1./24.*oc-1./48.*oq+1./24.*x12*x2zs-5./48.*
     #    x2zs)
      gz31c= gz31c+rs1wz(10)*bxpi*vvc*gtm2*ys*(1./24.*o*
     #    x12*x2zs+1./24.*o*x2zc-1./24.*o*x2zs+1./24.*os*x12*x2z
     #    +1./12.*os*x2zs+1./24.*oc*x2z-1./24.*x2zc)
      gz31c= gz31c+rs1wz(10)*vvc*gtm2*bxps*ys*(1./48.-1.
     #    /12.*o-1./24.*x12)
      gz31c= gz31c+rs1wz(10)*vvc*gtm2*ys*bxp*(-1./24.*o
     #    *x12*x2z+1./8.*o*x12+5./24.*o*x2z-1./24.*o*x12s-1./24.
     #    *o-1./8.*os*x12+5./24.*os-1./12.*oc+1./12.*x12*x2z-
     #    1./12.*x2z)
      gz31c= gz31c+rs1wz(10)*vvc*gtm2*ys*(-1./6.*o*x12
     #    *x2z+1./24.*o*x12*x2zs+1./24.*o*x2z*x12s+1./12.*o*x2z
     #    -1./6.*o*x2zs+1./12.*os*x12*x2z-1./24.*os*x12-7./24.*
     #    os*x2z+1./48.*os*x12s+1./48.*os*x2zs+1./24.*oc*x12+1./
     #    24.*oc*x2z-1./24.*oc+1./48.*oq-1./24.*x12*x2zs+5./48.
     #    *x2zs)
      gz31c= gz31c+rs1wz(11)*bxpi*vvc*gtm2*ys*(1./6.*os*
     #    x12+1./3.*os*x2z)
      gz31c= gz31c+rs1wz(11)*vvc*gtm2*bxps*ys*(1./6.-1./
     #    3.*o-1./12.*x12)
      gz31c= gz31c+rs1wz(11)*vvc*gtm2*ys*bxp*(-1./6.+
     #    1./6.*o*x12+1./6.*o*x2z+1./3.*o+1./2.*os+1./12.*x12
     #    -1./6.*x2z)
      gz31c= gz31c+rs1wz(11)*vvc*gtm2*ys*(-1./6.*o*x12
     #    -1./6.*o*x2z-1./6.*os*x12-1./3.*os*x2z-1./2.*os+1./
     #    6.*x2z)
      gz31c= gz31c+rs1wz(12)*bxpi*vvc*gtm2*ys*(1./6.*o*
     #    x12*x2z-1./3.*o*x2z-1./6.*os*x12-1./3.*oc)
      gz31c= gz31c+rs1wz(12)*vvc*gtm2*bxps*ys*(-1./12.
     #    +1./6.*o+1./12.*x12)
      gz31c= gz31c+rs1wz(12)*vvc*gtm2*ys*bxp*(-1./6.-
     #    1./12.*o*x12-5./12.*o*x2z+1./12.*o-1./4.*os-1./6.*x12
     #    *x2z+1./6.*x12+1./4.*x2z)
      gz31c= gz31c+rs1wz(12)*vvc*gtm2*ys*(1./12.*o*x12*
     #    x2z-1./3.*o*x12+1./12.*o*x2z+1./12.*o*x12s+1./6.*o*
     #    x2zs+1./3.*o+1./3.*os*x12+1./4.*os*x2z-1./6.*os+5./
     #    12.*oc-1./12.*x12*x2z+1./6.*x2z-1./6.*x2zs)
      gz31c= gz31c+rs1wz(13)*bxpi*vvc*gtm2*ys*(1./12.*o*
     #    x12*x2z-1./12.*o*x2z-1./12.*o*x2zs-1./12.*os*x12+1./
     #    12.*oc+1./12.*x2zs)
      gz31c= gz31c+rs1wz(13)*vvc*gtm2*ys*bxp*(1./24.-1./
     #    6.*o-1./24.*x12)
      gz31c= gz31c+rs1wz(13)*vvc*gtm2*ys*(-1./8.*o*x12
     #    *x2z-1./24.*o*x12+7./24.*o*x2z+1./24.*o*x12s+1./12.*o
     #    +1./8.*os*x12-1./12.*os*x2z+1./24.*os-1./12.*oc+1./
     #    24.*x12*x2z-1./8.*x2z)
      gz31c= gz31c+rs1wz(14)*bxpi*vvc*gtm2*ys*(-1./12.*
     #    o*x12*x2z+1./12.*o*x2zs+1./12.*os*x2z-1./12.*x2zs)
      gz31c= gz31c+rs1wz(14)*vvc*gtm2*bxps*ys*(-1./24.
     #    +1./12.*o)
      gz31c= gz31c+rs1wz(14)*vvc*gtm2*ys*bxp*(-1./12.
     #    -1./8.*o*x12-1./24.*o*x2z+1./4.*o-5./24.*os+1./24.*
     #    x12+1./24.*x2z)
      gz31c= gz31c+rs1wz(14)*vvc*gtm2*ys*(1./8.*o*x12*
     #    x2z+1./12.*o*x12-1./3.*o*x2z-1./24.*o*x12s+1./24.*os*
     #    x12+1./12.*os*x2z-1./12.*os+1./12.*oc-1./24.*x12*x2z
     #    +1./6.*x2z)
*
      gz11q= 0.d0
      gz21q= 0.d0
      gz31q= 0.d0
*
*----------------------------------------------------------------
*
       else if(jj.eq.3) then
*
*----------------------------------------------------------------
*
      gz12s= xx*vvs*ums*gtm2*pwsm2*csti*(1./18.*
     #    oc)
      gz12s= gz12s+xx*vvs*ums*gtm2*pwsm2*(-2./
     #    9.*oc)
      gz12s= gz12s+xx*vvs*gtm2*pwsm2*y*csti*(1./18.
     #    *oq)
      gz12s= gz12s+xx*vvs*gtm2*pwsm2*y*(-2./9.*oq)
      gz12s= gz12s+bxpi*vvs*ums*gtm2*pwsm2*csti
     # *(1./18.*os)
      gz12s= gz12s+bxpi*vvs*ums*gtm2*pwsm2*(-2./
     #    9.*os)
      gz12s= gz12s+bxpi*vvs*gtm2*pwsm2*y*csti*(1./18.
     #    *oc)
      gz12s= gz12s+bxpi*vvs*gtm2*pwsm2*y*(-2./9.*oc)
      gz12s= gz12s+vvs*ums*gtm2*pwsm2*bxp*csti
     # *(1./18.*o+1./6.*aut*o)
      gz12s= gz12s+vvs*ums*gtm2*pwsm2*bxp*(-2./
     #    9.*o)
      gz12s= gz12s+vvs*ums*gtm2*pwsm2*csti
     # *(-1./36.*o-1./12.*os+1./6.*aut*os)
      gz12s= gz12s+vvs*ums*gtm2*pwsm2*(1./9.*o
     #    +1./3.*os)
      gz12s= gz12s+vvs*gtm2*pwsm2*y*bxp*csti*(1./36.
     #    *os)
      gz12s= gz12s+vvs*gtm2*pwsm2*y*bxp*(-1./9.*os)
      gz12s= gz12s+vvs*gtm2*pwsm2*y*csti*(-1./36.
     #    *os-1./18.*oc)
      gz12s= gz12s+vvs*gtm2*pwsm2*y*(1./9.*os+2./9.*oc
     #    )
*
      gz22s= xx*vvs*ums*gtm2*pwsm2*csti*(1./6.*oc
     #    )
      gz22s= gz22s+xx*vvs*ums*gtm2*pwsm2*(-2./
     #    3.*oc)
      gz22s= gz22s+xx*vvs*gtm2*pwsm2*y*csti*(1./6.*
     #    oq)
      gz22s= gz22s+xx*vvs*gtm2*pwsm2*y*(-2./3.*oq)
      gz22s= gz22s+bxpi*vvs*ums*gtm2*pwsm2*csti
     # *(1./6.*os)
      gz22s= gz22s+bxpi*vvs*ums*gtm2*pwsm2*(-2./
     #    3.*os)
      gz22s= gz22s+bxpi*vvs*gtm2*pwsm2*y*csti*(1./6.
     #    *oc)
      gz22s= gz22s+bxpi*vvs*gtm2*pwsm2*y*(-2./3.*oc)
      gz22s= gz22s+vvs*ums*gtm2*pwsm2*bxp*csti
     # *(1./18.*o+1./6.*aut*o)
      gz22s= gz22s+vvs*ums*gtm2*pwsm2*bxp*(-2./
     #    9.*o)
      gz22s= gz22s+vvs*ums*gtm2*pwsm2*csti
     # *(-1./36.*o-7./36.*os+1./6.*aut*os)
      gz22s= gz22s+vvs*ums*gtm2*pwsm2*(1./9.*o
     #    +7./9.*os)
      gz22s= gz22s+vvs*gtm2*pwsm2*y*bxp*csti*(1./36.
     #    *os)
      gz22s= gz22s+vvs*gtm2*pwsm2*y*bxp*(-1./9.*os)
      gz22s= gz22s+vvs*gtm2*pwsm2*y*csti*(-1./36.
     #    *os-1./6.*oc)
      gz22s= gz22s+vvs*gtm2*pwsm2*y*(1./9.*os+2./3.*oc
     #    )
*
      gz32s= bxpi*vvs*ums*gtm2*pwsm2*csti*(-1./
     #    18.*os)
      gz32s= gz32s+bxpi*vvs*ums*gtm2*pwsm2*(2./9.
     #    *os)
      gz32s= gz32s+bxpi*vvs*gtm2*pwsm2*y*csti*(-1./
     #    18.*oc)
      gz32s= gz32s+bxpi*vvs*gtm2*pwsm2*y*(2./9.*oc)
      gz32s= gz32s+vvs*ums*gtm2*pwsm2*bxp*csti
     # *(-1./18.*o+1./6.*aut*o)
      gz32s= gz32s+vvs*ums*gtm2*pwsm2*bxp*(2./9.*
     #    o)
      gz32s= gz32s+vvs*ums*gtm2*pwsm2*csti
     # *(1./36.*o+1./18.*os)
      gz32s= gz32s+vvs*ums*gtm2*pwsm2*(-1./9.*
     #    o-2./9.*os)
      gz32s= gz32s+vvs*gtm2*pwsm2*y*bxp*csti*(-1./
     #    36.*os)
      gz32s= gz32s+vvs*gtm2*pwsm2*y*bxp*(1./9.*os)
      gz32s= gz32s+vvs*gtm2*pwsm2*y*csti*(1./36.*os
     #    +1./18.*oc)
      gz32s= gz32s+vvs*gtm2*pwsm2*y*(-1./9.*os-2./9.
     #    *oc)
*
      gz12c= 0.d0
      gz22c= 0.d0
      gz32c= 0.d0
*
      gz12q= 0.d0
      gz22q= 0.d0
      gz32q= 0.d0
*




*
*----------------------------------------------------------------------
*

      if(ii.eq.4) then 
       if(jj.eq.1.or.jj.eq.4) then
        w1zz= zz10s+zz10c+zz10q*gstm2
        w2zz= zz20s+zz20c+zz20q*gstm2
        w3zz= zz30s+zz30c+zz30q*gstm2
        w4zz= zz40s+zz40c+zz40q*gstm2
       else if(jj.eq.2.or.jj.eq.5) then
        w1zz= zz11s+zz11c+zz11q*gstm2
        w2zz= zz21s+zz21c+zz21q*gstm2
        w3zz= zz31s+zz31c+zz31q*gstm2
        w4zz= zz41s+zz41c+zz41q*gstm2
       else if(jj.eq.3.or.jj.eq.6) then
        w1zz= zz12s+zz12c+zz12q*gstm2
        w2zz= zz22s+zz22c+zz22q*gstm2
        w3zz= zz32s+zz32c+zz32q*gstm2
        w4zz= zz42s+zz42c+zz42q*gstm2
       endif  
      endif
      if(ii.eq.4) then 
       if(jj.eq.1.or.jj.eq.4) then
        w1gz= gz10s+gz10c+gz10q*gstm2
        w2gz= gz20s+gz20c+gz20q*gstm2
        w3gz= gz30s+gz30c+gz30q*gstm2
       else if(jj.eq.2.or.jj.eq.5) then
        w1gz= gz11s+gz11c+gz11q*gstm2
        w2gz= gz21s+gz21c+gz21q*gstm2
        w3gz= gz31s+gz31c+gz31q*gstm2
       else if(jj.eq.3.or.jj.eq.6) then
        w1gz= gz12s+gz12c+gz12q*gstm2
        w2gz= gz22s+gz22c+gz22q*gstm2
        w3gz= gz32s+gz32c+gz32q*gstm2
       endif  
      endif
*
*---------------------------------------------------------------------
*



      endif

      www= y*wcom/pwtm2
*
    2 if(iz.eq.0) then
         ww(kk)= 0.d0
         iz= 1
         inull= inull+1
      else
         ww(kk)= www*tjac*tfactsw*stf*psf/sh
      endif
*
      enddo
*
    1 if(iz.eq.0) then
         wwp= 0.d0
      else
         if(inull.gt.0) then
          wwp= 0.d0
         else
          wwp= ww(1)+ww(2)
         endif
      endif
*
      wwt= wwp
      wwtt= wwt
*
      if(inull.gt.0) then
       wtoxsswc= 0.d0
      else
       wtoxsswc= wwtt
      endif
*
      return
      end