Name:         GRSKPB

Purpose:      skip blanks in character string

Category:     GRAPHICS

File:         pgplot.src

Author:       T.J. Pearson

Use:          see description below.

Description:

            SUBROUTINE GRSKPB (S, I)
            CHARACTER*(*) S
            INTEGER I
      
       GRSKPB: increment I so that it points to the next non-blank
       character in string S.  'Blank' characters are space and tab (ASCII 
       character value 9).
      
       Arguments:
        S      (input)  : character string to be parsed.
        I      (in/out) : on input, I is the index of the first character
                          in S to be examined; on output, either it points
                          to the next non-blank character, or it is equal
                          to LEN(S)+1 (if all the rest of the string is 
                          blank).

Updates:      Oct 16, 1998: JPT automatically extracted from source.