verify(3I)

NAME
     VERIFY - Verifies that a set of characters contains all characters in
     a string

SYNOPSIS
     VERIFY ([STRING=]string, [SET=]set [,[BACK=]back])

IMPLEMENTATION
     UNICOS, UNICOS/mk, IRIX systems

     CF90, MIPSpro 7 Fortran 90

STANDARDS
     Fortran

DESCRIPTION
     The VERIFY intrinsic function verifies that a set of characters
     contains all characters in a string by identifying the first character
     position in a string of characters that does not appear in a given set
     of characters.  VERIFY accepts the following arguments:

     string    Must be of type character variable.

     set       Must be of type character variable, expression, or constant.

     back      Must be of type logical.  If back is omitted, a value of
               false is assumed.

     VERIFY is an elemental function.  The name of this intrinsic cannot be
     passed as an argument.

RETURN VALUES
     The result is an integer.

     If back is absent or is present with a value FALSE and string contains
     at least one character that is not in set, the value of the result is
     the position of the leftmost character of string that is not in set.

     If back is present with a value TRUE and if string contains at least
     one character that is not in set, the value of the result is the
     position of the rightmost character of string that is not in set.

     VERIFY returns 0 if each character in string is in set, or if the
     length of string is 0.

EXAMPLES
     Example 1:  The statement VERIFY('ABBA', 'A') returns the value 2.

     Example 2:  The statement VERIFY('ABBA', 'A', BACK=.TRUE.)  returns
     the value 3.

     Example 3:  The statement VERIFY('ABBA', 'AB') returns the value 0.

SEE ALSO
     Intrinsic Procedures Reference Manual for the printed version of this
     man page.