CHARACTER(50) :: RSTFIL
    COMMON /OUTFIL/ ITAG,LRSTRT,RSTFIL