Parent Directory | Revision Log
First GPAMELA release on CVS
1 | cafagna | 3.1 | * |
2 | * $Id$ | ||
3 | * | ||
4 | * $Log$ | ||
5 | * | ||
6 | * | ||
7 | * gcflag.inc | ||
8 | * | ||
9 | COMMON/GCFLAG/IDEBUG,IDEMIN,IDEMAX,ITEST,IDRUN,IDEVT,IEORUN | ||
10 | + ,IEOTRI,IEVENT,ISWIT(10),IFINIT(20),NEVENT,NRNDM(2) | ||
11 | COMMON/GCFLAX/BATCH, NOLOG | ||
12 | LOGICAL BATCH, NOLOG | ||
13 | C | ||
14 | #if defined(GPAMELA_TYPE) | ||
15 | #include "gtflag.inc" | ||
16 | #endif | ||
17 | * | ||
18 | * gcflag.inc | ||
19 | * | ||
20 | #if defined(GPAMELA_INCLUDE) | ||
21 | * | ||
22 | #include "incbeg.inc" | ||
23 | + gcflag | ||
24 | #include "incend.inc" | ||
25 | #endif |
ViewVC Help | |
Powered by ViewVC 1.1.23 |