Previous: utsadd Up: ../plot79_u.html Next: utsdsh
INTEGER FUNCTION UTSAMA (LINE,FROM,PAT)
C$ (AMATCH - Internal - Regular Expression Match)
C$ Look for a pattern match beginning at LINE(FROM). The
C$ function value on return is 0 if no match was found, and
C$ otherwise is the index of the character in LINE(*)
C$ FOLLOWING the last character of a matching pattern which
C$ begins at LINE(FROM).
INCLUDE,L (KP Credit)
C$ (13-SEP-84)