C COMMON/INOUT/
C IIN - INPUT LOGICAL UNIT NUMBER
C IOUT - OUTPUT LOGICAL UNIT NUMBER
C
	character*59 filename
      COMMON/INOUT/IIN,IOUT,ISOUT,ISO
	common/inputname/filename
C