]>
Commit | Line | Data |
---|---|---|
0795afa3 | 1 | #ifndef CERNLIB_ISAJET_Q1Q2_INC |
2 | #define CERNLIB_ISAJET_Q1Q2_INC | |
3 | * | |
4 | * | |
5 | * q1q2.inc | |
6 | * | |
7 | INTEGER MXGOQ,MXGOJ | |
8 | PARAMETER (MXGOQ=85,MXGOJ=8) | |
9 | COMMON/Q1Q2/GOQ(MXGOQ,MXGOJ),GOALL(MXGOJ),GODY(4),STDDY, | |
10 | $GOWW(25,2),ALLWW(2),GOWMOD(25,MXGOJ) | |
11 | SAVE /Q1Q2/ | |
12 | LOGICAL GOQ,GOALL,GODY,STDDY,GOWW,ALLWW,GOWMOD | |
13 | ||
14 | #endif |