gpamela/gcdes/gcomis.inc

*
* $Id$
*
* $Log$
*
*
* gcomis.inc
*
      COMMON/GCOMIS/JUINIT,JUGEOM,JUKINE,JUSTEP,JUOUT,JULAST
      DIMENSION JPCOMS(6)
      EQUIVALENCE (JPCOMS,JUINIT)
*
*
* gcomis.inc
*
#if defined(GPAMELA_INCLUDE)
*
#include "incbeg.inc"
     +   gcomis
#include "incend.inc"
#endif
1	*
2	* $Id$
3	*
4	* $Log$
5	*
6	*
7	* gcomis.inc
8	*
9	COMMON/GCOMIS/JUINIT,JUGEOM,JUKINE,JUSTEP,JUOUT,JULAST
10	DIMENSION JPCOMS(6)
11	EQUIVALENCE (JPCOMS,JUINIT)
12	*
13	*
14	* gcomis.inc
15	*
16	#if defined(GPAMELA_INCLUDE)
17	*
18	#include "incbeg.inc"
19	+ gcomis
20	#include "incend.inc"
21	#endif