DPMJET/flukapro/(ELFLCM)

   1 *$ CREATE ELFLCM.ADD
   2 *COPY ELFLCM
   3 *
   4 *=== elflcm ===========================================================*
   5 *
   6 *----------------------------------------------------------------------*
   7 *                                                                      *
   8 *     Energy Loss FLuctuation CoMmon:                                  *
   9 *                                                                      *
  10 *     Created on  23 november 1993   by  Alfredo Ferrari & Paola Sala  *
  11 *                                                   Infn - Milan       *
  12 *                                                                      *
  13 *     Last change on 25-oct-95     by    Alfredo Ferrari               *
  14 *                                                                      *
  15 *     Included in the following routines:                              *
  16 *                                                                      *
  17 *                  DLFINI                                              *
  18 *                                                                      *
  19 *----------------------------------------------------------------------*
  20 *
  21       PARAMETER ( NMXEPX = 20 )
  22       PARAMETER ( NMNEPX = -8 )
  23       PARAMETER ( ELSFTY = ONEONE )
  24       PARAMETER ( EPMXRT = HLFHLF )
  25 *
  26       COMMON / ELFLCM / USMCUM (6,NMNEPX:NMXEPX), ELLEIX (6), ELLEIE(6),
  27      &                  AVEPSF (NMNEPX:NMXEPX), SGEPSF (NMNEPX:NMXEPX),
  28      &                  AEPSDL, SGEPDL, EPSFMX, EPSFCT, EPSFTP,
  29      &                  ENDLDF, SNDLDF, NDLDFL, IEPFMX
  30