projects
/
unres.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
|
inline
| side by side (parent:
5ff7ad0
)
fixed WHAM for gfortran: src/energy_p_new.F
author
Dawid Jagiela
<lightnir@chem.univ.gda.pl>
Thu, 25 Jul 2013 08:14:18 +0000
(10:14 +0200)
committer
Dawid Jagiela
<lightnir@chem.univ.gda.pl>
Thu, 25 Jul 2013 08:14:18 +0000
(10:14 +0200)
source/wham/src/energy_p_new.F
patch
|
blob
|
history
diff --git
a/source/wham/src/energy_p_new.F
b/source/wham/src/energy_p_new.F
index
d857079
..
b6540fb
100644
(file)
--- a/
source/wham/src/energy_p_new.F
+++ b/
source/wham/src/energy_p_new.F
@@
-3104,7
+3104,7
@@
c
include 'COMMON.FFIELD'
include 'COMMON.CONTROL'
double precision u(3),ud(3)
include 'COMMON.FFIELD'
include 'COMMON.CONTROL'
double precision u(3),ud(3)
- lprn=.false.
+ logical :: lprn=.false.
estr=0.0d0
do i=nnt+1,nct
diff = vbld(i)-vbldp0
estr=0.0d0
do i=nnt+1,nct
diff = vbld(i)-vbldp0