5 * Revision 1.1.1.1 1995/10/24 10:19:51 cernlib
9 *CMZ : 3.21/02 29/03/94 15.41.37 by S.Giani
12 C** THE /EVENT COMMON IS THE STACK, WHERE ALL PARTICLES PRODUCED
13 C** IN A SHOWER ARE STORED. ONE TRACK HAS 12 LOCATIONS .
15 C** NSIZE = TOTAL LENGTH OF THE STACK (TO BE SET IN BLOCK-DATA)
16 C** NCUR = POINTER TO THE TRACK WHICH SHOULD BE COPIED NEXT FROM
17 C** THE STACK TO THE RESULT-COMMON.
18 C** NEXT = POINTER TO THE LOCATION WHERE THE NEXT PRODUCED TRACK
20 C** NTOT = TOTAL NUMBER OF TRACKS CURRENTLY STORED.
22 C** THE TRACK NEXT TO BE COPIED FROM THE STACK THEN LOOKS LIKE
25 C** EVENT(NCUR+ 1) = Y
26 C** EVENT(NCUR+ 2) = Z
27 C** EVENT(NCUR+ 3) = RCA
28 C** EVENT(NCUR+ 4) = RCE
29 C** EVENT(NCUR+ 5) = MASS
30 C** EVENT(NCUR+ 6) = CHARGE
31 C** EVENT(NCUR+ 7) = TOF
32 C** EVENT(NCUR+ 8) = PX
33 C** EVENT(NCUR+ 9) = PY
34 C** EVENT(NCUR+10) = PZ
35 C** EVENT(NCUR+11) = USERW