Previous: uttsli Up: ../plot79_u.html Next: uttti

UTTSLN

       INTEGER FUNCTION  UTTSLN (TOKEN,LOCTOK,LENTOK,TYPE,NSIZE,LOCVAL)
 C$    (Symbol Table - Lookup by Name)
 C$    Lookup a  name in  the symbol  table and  return its  type,
 C$    size, and value list location in COMMON / CSTAK / DSTAK(*),
 C$    and as a function value, its table index , or 0 if it  does
 C$    not exist.  The arguments are:
 C$
 C$    TOKEN(*).......Packed Hollerith string containing symbol
 C$                   name.
 C$    LOCTOK.........Starting location in TOKEN(*) of symbol name.
 C$    LENTOK.........Length of symbol name.
 C$    TYPE...........INTEGER type flag  returned for symbol,  one
 C$                   of  TYPNIL,  TYPBOO,   TYPINT,  or   TYPFLT.
 C$                   TYPNIL indicates  that  no  value  has  been
 C$                   assigned to the symbol.
 C$    NSIZE..........Number of entries in value list in DSTAK(*).
 C$    LOCVAL.........Index of first value in DSTAK(*).
 C$    (08-AUG-85)