Previous: prsfld Up: ../plot79_p.html Next: prsflt

PRSFLE

       INTEGER FUNCTION  PRSFLE (STATUS, STDHMS, HLPSTR, LENHLP, DEFSTR,
      X     LENDEF)
 C$    (Parse Floating-Point Number or (Expression))
 C$    Parse a floating-point number or parenthesized  expression,
 C$    leaving it in COMMON.  The arguments are:
 C$
 C$    STATUS.........Parsing status  value (and  function  value)
 C$                   returned;  one  of   EOF,  NOPABT,   NOPFLT,
 C$                   NOPHLP,  NOPIFL,   NOPNUL,   NOPUNK,   OKAY,
 C$                   OVRFLO, or REPARS.  The help return, NOPHLP,
 C$                   is only given if an alternative parse is  in
 C$                   progress.   Otherwise,  this  routine  loops
 C$                   until the  user  completes the  input  field
 C$                   with   something   other   than   the   help
 C$                   character.
 C$    STDHMS......... .TRUE. - issue standard help message.
 C$                   .FALSE. - suppress standard help message.
 C$    HLPSTR(*)......Packed Hollerith help string.
 C$    LENHLP.........Length of HLPSTR(*).
 C$    DEFSTR(*)......Packed Hollerith default value string.
 C$    LENDEF.........Length of DEFSTR(*).
 C$    (25-APR-84)