pygrvv.f

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

 
C*********************************************************************
 
C...PYGRVV
C...Auxiliary for the GRV 94 parton distribution functions
C...for u and d valence and d-u sea.
C...Authors: M. Glueck, E. Reya and A. Vogt.
 
      FUNCTION pygrvv (X, N, AK, BK, A, B, C, D)
 
C...Double precision declaration.
      IMPLICIT DOUBLE PRECISION (a - z)
 
C...Evaluation.
      dx = sqrt(x)
      pygrvv = n * x**ak * (1d0+ a*x**bk + x * (b + c*dx)) *
     & (1d0- x)**d
 
      RETURN
      END