*
* $Id$
*
* $Log$
*
*
* gcparm.inc
*
      COMMON/GCPARM/IPARAM,PCUTGA,PCUTEL,PCUTNE,PCUTHA,PCUTMU
     +             ,NSPARA,MPSTAK,NPGENE
      REAL PACUTS(5)
      EQUIVALENCE (PACUTS(1),PCUTGA)
#if defined(GPAMELA_TYPE)
#include "gtparm.inc"
#endif
C
*
* gcparm.inc
*
#if defined(GPAMELA_INCLUDE)
*
#include "incbeg.inc"
     +   gcparm
#include "incend.inc"
#endif