SCAN — Scan a string for the presence of a set of characters#

SCAN(STRING, SET, BACK, KIND)#

Scans a STRING for any of the characters in a SET of characters.

Parameters:

STRING – Shall be of type CHARACTER.
SET – Shall be of type CHARACTER.
BACK – (Optional) shall be of type LOGICAL.
KIND – (Optional) An INTEGER initialization expression indicating the kind parameter of the result.

Returns:

The return value is of type INTEGER and of kind KIND. If KIND is absent, the return value is of default integer kind.

Standard:

Fortran 90 and later, with KIND argument Fortran 2003 and later

Class:

Elemental function

Syntax:

RESULT = SCAN(STRING, SET[, BACK [, KIND]])

Example:

PROGRAM test_scan
  WRITE(*,*) SCAN("FORTRAN", "AO")          ! 2, found 'O'
  WRITE(*,*) SCAN("FORTRAN", "AO", .TRUE.)  ! 6, found 'A'
  WRITE(*,*) SCAN("FORTRAN", "C++")         ! 0, found none
END PROGRAM