NAME

index, rindex, lnblnk, len − tell about character objects

SYNTAX

(intrinsic) function index(string, substr)
character*(*) string, substr

integer function rindex(string, substr)
character*(*) string, substr

function lnblnk(string)
character*(*) string

(intrinsic) function len(string)
character*(*) string

DESCRIPTION

The index and rindex functions return the index of the first or last occurrence, respectively, of the substring substr in string, or zero if it does not occur.  The index function is an f77 intrinsic function, while rindex is a library routine. 

The lnblnk function returns the index of the last non-blank character in string.  This is useful since all f77 character objects are fixed length, blank padded.  Intrinsic function len returns the size of the character object argument. 

FILES

/usr/lib/libF77.a