HP Fortran Programmer's Reference

Intrinsic procedures
Intrinsic procedure specifications
Description
Scan a string for any one of the characters in a set of characters.
Class
Elemental function.
Arguments
STRING must be of type character.
SET must be of type character with the same kind type parameter as STRING.
BACK (optional) must be of type logical.
Result type/
type parameters
Default integer.
Result value
Case 1 If BACK is absent or is present with the value .FALSE. and if STRING
contains at least one character that is in SET, the value of the result is the
position of the leftmost character of STRING that is in SET.
Case 2 If BACK is present with the value .TRUE. and if STRING contains at least one
character that is in SET, the value of the result is the position of the
rightmost character of STRING that is in SET.
Case 3 The value of the result is zero if no character of STRING is in SET or if the
length of STRING or SET is zero.
SECNDS(X)
Description
Return the number of seconds that have elapsed since midnight, less the value of the
argument.
Class
Elemental nonstandard function.
582
Chapter 11