Scans a STRING for any of the characters in a SET of characters.
If BACK is either absent or equals
FALSE, this function returns the position of the leftmost character of STRING that is in SET. If BACK equals
TRUE, the rightmost position is returned. If no character of SET is found in STRING, the result is zero.
Fortran 95 and later, with KIND argument Fortran 2003 and later
RESULT = SCAN(STRING, SET[, BACK [, KIND]])
|STRING||Shall be of type
|SET||Shall be of type
|BACK||(Optional) shall be of type
The return value is of type
INTEGER and of kind KIND. If KIND is absent, the return value is of default integer kind.
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
© Free Software Foundation
Licensed under the GNU Free Documentation License, Version 1.3.