sPhenix code displayed by LXR |
|
|
|
|||
File indexing completed on 2025-08-05 08:21:11
0001 0002 C********************************************************************* 0003 0004 C...PYGRVW 0005 C...Auxiliary for the GRV 94 parton distribution functions 0006 C...for d+u sea and gluon. 0007 C...Authors: M. Glueck, E. Reya and A. Vogt. 0008 0009 FUNCTION PYGRVW (X, S, AL, BE, AK, BK, A, B, C, D, E, ES) 0010 0011 C...Double precision declaration. 0012 IMPLICIT DOUBLE PRECISION (A - Z) 0013 0014 C...Evaluation. 0015 LX = LOG (1D0/X) 0016 PYGRVW = (X**AK * (A + X * (B + X*C)) * LX**BK + S**AL 0017 & * EXP (-E + SQRT (ES * S**BE * LX))) * (1D0- X)**D 0018 0019 RETURN 0020 END
| [ Source navigation ] | [ Diff markup ] | [ Identifier search ] | [ general search ] |
|
This page was automatically generated by the 2.3.7 LXR engine. The LXR team |
|