4.4.4 SUBROUTINE ZTCALO(IGEOM, PP, VERT, DIST, CTYP, X0, LAMBDA, SHOAX, CALTYP, NLAY, IERR) : Track to CALOrimeter

Calorimeter tracking.

ARGUMENTS:

INPUT :

    IGEOM  : Detector geometry number
    PP     : Momentum of particle
    VERT   : Production point of particle

OUTPUT :

    All output values have a layer index (except NLAY, clearly). They are
    all ordered in distance.
    DIST : distances along the particle trajectory to the hit calorimeters
    CTYP : Code of calorimeter. +ve : barrel; -ve forward. The absoulte
           value is the index to the appropriate detector description.
    X0   : tot # of radiation lengths in calorimeter i
    LAMBDA : tot # of nuclear interaction lengths in calorimeter i
    SHOAX  : shower axis and position :
                 1 : First seen impactpoint (barrel : Rphi, forward : x)
                 2 : Second  "       "      (barrel : z, forward : y)
                 3 : Theta angle of shower
                 4 : Phi     "   "    "
    CALTYP : 1 : em-calorimeter
             2 : hadronic calorimeter
    NLAY   : number of calorimeters transversed by particle
    IERR   : Error code. 0 -> no error

IMPLICIT INPUTS:

    from /ZTGPT/ : LOCYCA,LOPLCA,HICYCA and HIPLCA : first and last
                   indicies of the cylindical or plane calorimeters
    from /ZTBAC/ : the radii and lateral extents of the barrel calorimeters
    from /ZTCLF/ : the z-positions and radiail extents of the forward
                   calorimeters.

IMPLICIT OUTPUTS:

    none.

CALLED BY :

ZDCALO, Detector simulation of CALOrimeter (see 4.3.17).

CALLED ROUTINE(S):

ZUGAUS (see 4.7.13)

(To get a GAUSsian random number.)

ZURECT (see 4.7.14)

(To get a RECTangular random number.)

ZUI2PI (see 4.7.2)

(To bring angle In the range 0 to 2PI.)

ZUINPI (see 4.7.3)

(To bring angle IN the range 0 to PI.)

ZTTCYL (see 4.4.6)

(To get Track intersection with CYLinder.)

ZTTPLA (see 4.4.8)

(To get Track intersection with PLAne.)

VSCALE,VADD,VMOD,VDIST

(CERNLIB routines.)

SIDE EFFECTS:

none.

AUTHORS:

M. Berggren, UFRJ, M. A. Do Vale, UFRJ

CREATION DATE:

06-APR-1995