4.6.13 SUBROUTINE ZAUSHS : SHower Sorting

Sort calorimeter clusters by calorimeter (first), and first coordinate of the shower start-point (ie. x in the forward region, RPhi in the barrel)

ARGUMENTS:

none.

IMPLICIT INPUTS:

    From /ZAEVT/ : TTRK, the total number of seen particles,
                   NCLUST, the total number of calorimeter clusters.
    From /ZACLU/ : CTYPCL, types of the calorimeters,
                   CLUAX, cluster axis position and direction;

IMPLICIT OUTPUTS:

    To /ZACLU/ : NFCLU, number of clusters in the forward calorimeters;
                 NBCLU, number of clusters in the barrel calorimeters;
                 The numbers in the following variables are unchanged,
                 but the order is different:
                 CTYPCL, types of the calorimeters,
                 CLUAX, cluster axis position and direction; NSHICL,
                 number of showers in each cluster; CLUORIN, list of
                 showers in each cluster.

    To /ZATRS/ : CLUNBN, cluster number of particles, reordered.

CALLED BY :

ZAUSHO, SHOwer merging (see 4.6.10).

CALLED ROUTINE(S):

ZULOCI (see 4.7.18)

(To locate an integer in an array)

SORTZV, UCOPY

(CERNLIB routines)

SIDE EFFECTS:

none.

AUTHORS:

M. Berggren, UFRJ

CREATION DATE:

01-AUG-1996