Minor corrections after big transformer changes
[u/mrichter/AliRoot.git] / GEANT321 / gcinit.F
CommitLineData
fe4da5cc 1 SUBROUTINE GCINIT
f8a2545b 2 PARAMETER (NWGEANT=4000000)
fe4da5cc 3 COMMON / GCBANK / GMEM(NWGEANT)
4*
5* Initialise geant system with a default dimension of NWGEANT
6*
7 CALL GZEBRA(NWGEANT)
8 CALL GINIT()
9 CALL GZINIT()
10*
11 END