projects
/
unres.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
Zmiana w parametrach scinter_GB
[unres.git]
/
source
/
unres
/
src_MD
/
dihed_cons.F
diff --git
a/source/unres/src_MD/dihed_cons.F
b/source/unres/src_MD/dihed_cons.F
index
1fb6c53
..
e45405f
100644
(file)
--- a/
source/unres/src_MD/dihed_cons.F
+++ b/
source/unres/src_MD/dihed_cons.F
@@
-23,7
+23,7
@@
cdr call getenv_loc('SECPREDFIL',secpred)
#elif (defined G77)
open(isecpred,file=secpred,status='old')
#else
#elif (defined G77)
open(isecpred,file=secpred,status='old')
#else
- open(isecpred,file=secpred,status='old',readonly)
+ open(isecpred,file=secpred,status='old',action='read')
#endif
C read secondary structure prediction from JPRED here!
! read(isecpred,'(A80)',err=100,end=100) line
#endif
C read secondary structure prediction from JPRED here!
! read(isecpred,'(A80)',err=100,end=100) line