8.8 SUBROUTINE ZROW_INP

c----------------------------------------------------------------------
      subroutine zrow_inp(str,izrow)
c----------------------------------------------------------------------
      implicit double precision (a-h,o-z)
      character*(*) str

evaluates z-matrix row number izrow from string str

Input parameters:

str

string, holding either z-matrix row number or z-matrix symbol

Output parameters:

izrow

row number in z-matrix.
if str is blank, izrow=0 is returned.
if str is an invalid z-matrix row number or an invalid symbol, error exit!