4.7.8 LOGICAL FUNCTION ZUCINS ( ELEM, SET ) : Check if IN Set

This function checks if ELEM is in the set SET

ARGUMENTS:

INPUT :

    ELEM : An integer number to be checked if it is in a set
           (0 to (32*dim of set)-1)
    SET  : An integer array interpreted as a set of numbers
            (each bit represents an integer equal to its offset )

IMPLICIT INPUTS:

    none

IMPLICIT OUTPUTS:

    none

FUNCTION VALUE:

.TRUE. is ELEM is in SET, .FALSE. otherwise.

CALLED BY :

any routine

CALLED ROUTINE(S):

none

SIDE EFFECTS:

none

AUTHORS:

M. Berggren,CERN

CREATION DATE:

20-May-1989