projects
/
unres.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
merge...
[unres.git]
/
source
/
wham
/
src
/
store_parm.F
diff --git
a/source/wham/src/store_parm.F
b/source/wham/src/store_parm.F
index
6aa33c5
..
ce0047f
100644
(file)
--- a/
source/wham/src/store_parm.F
+++ b/
source/wham/src/store_parm.F
@@
-217,6
+217,8
@@
c Store the SCp parameters
enddo
enddo
c Store disulfide-bond parameters
enddo
enddo
c Store disulfide-bond parameters
+ ht_all(iparm)=ht
+ ss_depth_all(iparm)=ss_depth
ebr_all(iparm)=ebr
d0cm_all(iparm)=d0cm
akcm_all(iparm)=akcm
ebr_all(iparm)=ebr
d0cm_all(iparm)=d0cm
akcm_all(iparm)=akcm
@@
-460,6
+462,8
@@
c Restore the SCp parameters
enddo
enddo
c Restore disulfide-bond parameters
enddo
enddo
c Restore disulfide-bond parameters
+ ht=ht_all(iparm)
+ ss_depth=ss_depth_all(iparm)
ebr=ebr_all(iparm)
d0cm=d0cm_all(iparm)
akcm=akcm_all(iparm)
ebr=ebr_all(iparm)
d0cm=d0cm_all(iparm)
akcm=akcm_all(iparm)