projects
/
unres.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
wham in lipid still diff
[unres.git]
/
source
/
wham
/
src-M
/
openunits.F
diff --git
a/source/wham/src-M/openunits.F
b/source/wham/src-M/openunits.F
index
b9f54b7
..
5200b3e
100644
(file)
--- a/
source/wham/src-M/openunits.F
+++ b/
source/wham/src-M/openunits.F
@@
-48,6
+48,8
@@
C Get parameter filenames and open the parameter files.
open (isidep,file=sidename,status='old')
call mygetenv('SIDEP',sidepname)
open (isidep1,file=sidepname,status="old")
open (isidep,file=sidename,status='old')
call mygetenv('SIDEP',sidepname)
open (isidep1,file=sidepname,status="old")
+ call mygetenv('LIPTRANPAR',liptranname)
+ open (iliptranpar,file=liptranname,status='old',action='read')
#ifndef OLDSCP
C
C 8/9/01 In the newest version SCp interaction constants are read from a file
#ifndef OLDSCP
C
C 8/9/01 In the newest version SCp interaction constants are read from a file