4.6.4 LOGICAL FUNCTION ZAUSTP(ITRK) : STrange particle decay Product

Returns .TRUE. if the track ITRK is a product of a strange decay (true values).

ARGUMENTS:

INPUT :

    ITRK : track-number in /ZATRS/

IMPLICIT INPUTS:

     From /ZATRS/ : ANC, line of ancestor of track;
                    CD, true particle code of ancestor.

IMPLICIT OUTPUTS:

     none.

FUNCTION VALUE:

TRUE if ITRK is a product of a strange decay, FALSE otherwise.

CALLED BY :

ZAURST, Reject STrange particle decay products (see 4.6.3).

CALLED ROUTINE(S):

none

SIDE EFFECTS:

none

AUTHORS:

M. Berggren, UFRJ

CREATION DATE:

11-APR-1995