INDEX(3F)                                                            INDEX(3F)



NAME
       index, rindex, lnblnk, len - tell about character objects

SYNOPSIS
       (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
       _I_n_d_e_x  _(_r_i_n_d_e_x_) returns the index of the first (last) occurrence of the
       substring _s_u_b_s_t_r in _s_t_r_i_n_g_, or zero if it does not occur.  _I_n_d_e_x is  an
       f77 intrinsic function; _r_i_n_d_e_x is a library routine.

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

FILES
       /usr/lib/libF77.a



4.2 Berkeley Distribution        May 15, 1985                        INDEX(3F)