VERIFY(3I) Last changed: 1-6-98
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, and IRIX systems
STANDARDS
Fortran 90
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, publication SR-2138, for the
printed version of this man page.
