projects
/
unres.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
| inline |
side by side
cluster wham test homo small memory single sco
[unres.git]
/
source
/
wham
/
src-HCD-5D
/
read_constr_homology.F
diff --git
a/source/wham/src-HCD-5D/read_constr_homology.F
b/source/wham/src-HCD-5D/read_constr_homology.F
index
fa81b80
..
239a49e
100644
(file)
--- a/
source/wham/src-HCD-5D/read_constr_homology.F
+++ b/
source/wham/src-HCD-5D/read_constr_homology.F
@@
-259,8
+259,8
@@
c & constr_homology
endif
sigma_odl(k,ii)=1.0d0/(sigma_odl(k,ii)*sigma_odl(k,ii))
else
- ii=ii+1
- l_homo(k,ii)=.false.
+ct ii=ii+1
+ct l_homo(k,ii)=.false.
endif
enddo
enddo