]>
Commit | Line | Data |
---|---|---|
0795afa3 | 1 | #ifndef CERNLIB_ISAJET_KEYS_INC |
2 | #define CERNLIB_ISAJET_KEYS_INC | |
3 | * | |
4 | * | |
5 | * keys.inc | |
6 | * | |
7 | INTEGER MXKEYS | |
8 | PARAMETER (MXKEYS=20) | |
9 | COMMON/KEYS/IKEYS,KEYON,KEYS(MXKEYS) | |
10 | COMMON/XKEYS/REAC | |
11 | SAVE /KEYS/,/XKEYS/ | |
12 | LOGICAL KEYS | |
13 | LOGICAL KEYON | |
14 | CHARACTER*8 REAC | |
15 | INTEGER IKEYS | |
16 | ||
17 | #endif | |
18 | ||
19 | ||
20 |