AIRES library reference: scontain.

c
c     Routine directly callable from C/C++ (it could be necessary to
c     append an underscore, "_", to its name depending on the C/C++
c     compiler used).
c
c
      subroutine scontain(string1, slen1, maxlen, string2, slen2)
c
c     Limiting the length of a string to a given maximum length.
c     If the string is too long it is written in the form
c
c            'first chars...last chars'
c
c     Written by: S. J. Sciutto, La Plata 1997.
c
c
c     Arguments:
c     =========
c
c     string1......... (input, character*(*)) The original string.
c     slen1........... (input, integer) Original string length.
c     maxlen.......... (input, integer) Maximum length of the output
c                      string. Must be greater than 4.
c     string2......... (output, character*(*)) Edited string.
c     slen2........... (output, integer) Edited string length, will
c                      be equal to min(slen1, maxlen).
c
c
c<--->

These pages are maintained by Sergio J. Sciutto	Back to AIRES library index
	Back to AIRES home