HP Fortran Programmer's Reference (September 2007)

Intrinsic procedures
Intrinsic procedure speciļ¬cations
Chapter 11638
BACK (optional) must be of type logical.
Result type/
type parameters
Default integer.
Result value
Case 1 If BACK is absent or present with the value .FALSE. and if 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.
Case 2 If BACK is present with the 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.
Case 3 The value of the result is zero if each character in STRING is in SET or if
STRING has zero length.
XOR(I, J)
Description
Bitwise exclusive OR.
Class
Elemental nonstandard function.
Arguments
I must be of type integer.
J must be of type integer with the same kind type parameter as I.
Result type/
type parameters
Same as I.
Result value
The result has the value obtained by performing an exclusive OR on I and J bit-by-bit
according to Table 11-9.