From 12cbc12a29258591c69825ec212046c31733e5a2 Mon Sep 17 00:00:00 2001 From: Cezary Czaplewski Date: Thu, 28 Sep 2017 19:11:14 +0200 Subject: [PATCH] gfortran error --- source/unres/src_MD-M/readrtns_CSA.F | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/source/unres/src_MD-M/readrtns_CSA.F b/source/unres/src_MD-M/readrtns_CSA.F index 39c718e..2cbb825 100644 --- a/source/unres/src_MD-M/readrtns_CSA.F +++ b/source/unres/src_MD-M/readrtns_CSA.F @@ -2151,7 +2151,7 @@ c print *,ithep_pdb," opened" call getenv_loc('SIDEPAR',sidename) open (isidep,file=sidename,status='old',readonly) call getenv_loc('LIPTRANPAR',liptranname) - open (iliptranpar,file=liptranname,status='old',action='read') + open (iliptranpar,file=liptranname,status='old',readonly) #ifndef CRYST_SC call getenv_loc('ROTPARPDB',rotname_pdb) open (irotam_pdb,file=rotname_pdb,status='old',action='read') -- 1.7.9.5