Previous: chrlcl Up: ../chrrtn.html Next: chrmat

CHRLEN

 INTEGER FUNCTION  CHRLEN (TEXT,LENGTH)
 (Length)

 Trim trailing  blanks from  TEXT(*), returning  the index  of the  last
 non-blank character in TEXT(*) as the function value.  If the string is
 entirely blank, or has LENGTH .LT.  1, then 0 will be returned.