Previous: utsesc Up: ../plot79_u.html Next: utsgcc

UTSFIL

       SUBROUTINE  UTSFIL (DELIM,ARRAY,I,SET,J,MAXSET)
 C$    (FILSET - Internal - Fill Set)
 C$    Expand the set at ARRAY(I) into SET(J), stop at DELIM.   No
 C$    error indication is returned if  SET(*) was too small,  but
 C$    it will never be written beyond its last element.
 INCLUDE,L (KP Credit)
 C$    (13-SEP-84)