pyx2xg.f

Go to the documentation of this file. Or view the newest version in sPHENIX GitHub for file pyx2xg.f

 
C*********************************************************************
 
C...PYX2XG
C...Calculates the decay rate for ino -> ino + gauge boson.
 
      FUNCTION pyx2xg(C1,XM1,XM2,XM3,GX2,GLR)
 
C...Double precision and integer declarations.
      IMPLICIT DOUBLE PRECISION(a-h, o-z)
      IMPLICIT INTEGER(i-n)
      INTEGER pyk,pychge,pycomp
 
C...Local variables.
      DOUBLE PRECISION pyx2xg,xm1,xm2,xm3,gx2,glr
      DOUBLE PRECISION xl,pylamf,c1
      DOUBLE PRECISION xmi2,xmj2,xmv2,xmi3
 
      xmi2=xm1**2
      xmi3=abs(xm1**3)
      xmj2=xm2**2
      xmv2=xm3**2
      xl=pylamf(xmi2,xmj2,xmv2)
      pyx2xg=c1/8d0/xmi3*sqrt(xl)
     &*(gx2*(xl+3d0*xmv2*(xmi2+xmj2-xmv2))-
     &12d0*glr*xm1*xm2*xmv2)
 
      RETURN
      END