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 RESULT COMMON STORES ALL INFORMATION OF THE CURRENT TRACK:
14 C** XEND | START- OR END- COORDINATES OF THE CURRENT STEP.
17 C** RCA CALO1*1000.+CALO2*1. |CALO1 AND CALO2 (CELL1 AND
18 C** RCE CELL1*1000.+CELL2*1. |CELL2) ARE THE CALORIMETER
19 C** |(CELLS), WHERE THIS STEP COMES
20 C** |FROM AND GOES TO.
23 C** TOF TIME OF FLIGHT (IN 1/20 NSEC)
24 C** PX PX/P = COSL*COSP
25 C** PY PY/P = COSL*SINP
27 C** USERW USERWORD (SEE 'HSTORY')
28 C** INTCT INTERACTION/DECAY-COUNTER
33 C** DELTN ACTUAL STEPSIZE (SEE ALSO DDELTN IN COMMON /CURPAR)
34 C** ITK NUMBER OF GENERATOR TRACK (SEE INPUT-ROUTINES)
35 C** NTK NUMBER OF TRACK IN SHOWER
36 C** IPART PARTICLE INDEX (SEE #MASIND)
37 C** IND MATERIAL INDEX (SEE #MATTER)
38 C** LCALO CALORIMETER NUMBER (=CALORIMETER1 IN RCA)
39 C** ICEL CELL NUMBER (=CELL1 IN RCE)
40 C** SINL SINE OF DIP-ANGLE
41 C** COSL COSINE OF DIP-ANGLE
42 C** SINP SINE OF NORMAL PHI-ANGLE (WITH RESPECT TO X-AXIS)
43 C** COSP COSINE OF NORMAL PHI-ANGLE