AIRES library reference: strimcopy.

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 strimcopy(string1, slen1, string2, slen2)
c
c     Copying a string while eliminating leading and trailing blanks
c     (or special characters).
c
c     Written by: S. J. Sciutto, La Plata 1999, 2003.
c
c
c     Arguments:
c     =========
c
c     string1......... (input, character*(*)) The string to process.
c                      This string will not be modified.
c     slen1........... (input, integer) Length of string 1.
c     string2......... (output, character*(*)) A copy of string 1,
c                      with no leading or trailing blanks.
c     slen2........... (output, integer) Length of string 2, or
c                      position of the last character.
c
c
c<--->

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