The GEANT data structures are stored in the common /GCBANK/ accessible through the following Patchy sequence:
The /GCLINK/ variables are pointers to the GEANT data structures in the /GCBANK/ common. They belong to a permanent area declared in GZINIT. GCBANKDynamic core for the GEANT data structures
PARAMETER (KWBANK=69000,KWWORK=5200)
COMMON/GCBANK/NZEBRA,GVERSN,ZVERSN,IXSTOR,IXDIV,IXCONS,FENDQ(16)
+ ,LMAIN,LR1,WS(KWBANK)
DIMENSION IQ(2),Q(2),LQ(8000),IWS(2)
EQUIVALENCE (Q(1),IQ(1),LQ(9)),(LQ(1),LMAIN),(IWS(1),WS(1))
EQUIVALENCE (JCG,JGSTAT)
COMMON/GCLINK/JDIGI ,JDRAW ,JHEAD ,JHITS ,JKINE ,JMATE ,JPART
+ ,JROTM ,JRUNG ,JSET ,JSTAK ,JGSTAT,JTMED ,JTRACK,JVERTX
+ ,JVOLUM,JXYZ ,JGPAR ,JGPAR2,JSKLT
C