Language Reference

SCAN(STRING, SET, BACK)

Scan a string for any one of the characters in a set of characters.

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.

Class

Elemental function

Result Type and Attributes

Default integer.

Result Value

• Case (i): 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 (ii): 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 (iii): 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.

Examples

• Case (i): SCAN ('FORTRAN', 'TR') has the value 3.
• Case (ii): SCAN ('FORTRAN', 'TR', BACK = .TRUE.) has the value 5.
• Case (iii): SCAN ('FORTRAN', 'BCD') has the value 0.