gpamela/gcdes/gcvolu.inc

*
* $Id$
*
* $Log$
*
*
* gcvolu.inc
*
      COMMON/GCVOLU/NLEVEL,NAMES(15),NUMBER(15),
     +LVOLUM(15),LINDEX(15),INFROM,NLEVMX,NLDEV(15),LINMX(15),
     +GTRAN(3,15),GRMAT(10,15),GONLY(15),GLX(3)
C
#if defined(GPAMELA_TYPE)
#include "gtvolu.inc"
#endif
*
* gcvolu.inc
*
#if defined(GPAMELA_INCLUDE)
*
#include "incbeg.inc"
     +   gcvolu
#include "incend.inc"
#endif
1	cafagna	3.1	*
2			* $Id$
3			*
4			* $Log$
5			*
6			*
7			* gcvolu.inc
8			*
9			COMMON/GCVOLU/NLEVEL,NAMES(15),NUMBER(15),
10			+LVOLUM(15),LINDEX(15),INFROM,NLEVMX,NLDEV(15),LINMX(15),
11			+GTRAN(3,15),GRMAT(10,15),GONLY(15),GLX(3)
12			C
13			#if defined(GPAMELA_TYPE)
14			#include "gtvolu.inc"
15			#endif
16			*
17			* gcvolu.inc
18			*
19			#if defined(GPAMELA_INCLUDE)
20			*
21			#include "incbeg.inc"
22			+ gcvolu
23			#include "incend.inc"
24			#endif