gpamela/gcdes/gcparm.inc

*
* $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
1	*
2	* $Id$
3	*
4	* $Log$
5	*
6	*
7	* gcparm.inc
8	*
9	COMMON/GCPARM/IPARAM,PCUTGA,PCUTEL,PCUTNE,PCUTHA,PCUTMU
10	+ ,NSPARA,MPSTAK,NPGENE
11	REAL PACUTS(5)
12	EQUIVALENCE (PACUTS(1),PCUTGA)
13	#if defined(GPAMELA_TYPE)
14	#include "gtparm.inc"
15	#endif
16	C
17	*
18	* gcparm.inc
19	*
20	#if defined(GPAMELA_INCLUDE)
21	*
22	#include "incbeg.inc"
23	+ gcparm
24	#include "incend.inc"
25	#endif