diff --git a/src/staden/seeme-dec.f b/src/staden/seeme-dec.f index 0196c51..b4bf09a 100644 --- a/src/staden/seeme-dec.f +++ b/src/staden/seeme-dec.f @@ -162,7 +162,8 @@ C so tell the user JRECL=1 OPEN(UNIT=IDEV,FILE=FILNAM,STATUS='OLD', + READONLY, - + RECORDTYPE='STREAM',ERR=100) +C + RECORDTYPE='STREAM', + + ERR=100) END IF IOK=0 RETURN