git://git.uio.no / u / mrichter / AliRoot.git / blame
| Commit | Line | Data |
|---|---|---|
| 0795afa3 | 1 | #ifndef CERNLIB_ISAJET_ZLINKA_INC |
| 2 | #define CERNLIB_ISAJET_ZLINKA_INC | |
| 3 | * | |
| 4 | * | |
| 5 | * zlinka.inc | |
| 6 | * | |
| 7 | C | |
| 8 | C general Zebra link area | |
| 9 | C use with utility subroutines GSLINK,GRLINK,RSLINK and RRLINK | |
| 10 | INTEGER NSLINK,NRLINK,LSLINK,LRLINK | |
| 11 | PARAMETER (NSLINK=100) | |
| 12 | PARAMETER (NRLINK=100) | |
| 13 | COMMON/ZLINKA/LSLINK(NSLINK),LRLINK(NRLINK) | |
| 14 | SAVE /ZLINKA/ | |
| 15 | ||
| 16 | #endif |