X-Git-Url: http://mmka.chem.univ.gda.pl/gitweb/?a=blobdiff_plain;f=source%2Fwham%2Fsrc-M%2Fstore_parm.F;h=c8e42c08554153050f0e79a45d6b0a9c146d138d;hb=e4ae8a59273dfb32df1fb57382aef393c73b43a5;hp=f44b6f418a6e7508764d42c42e140abf0f03b309;hpb=48f00408a2e488d2c34fd65d26fc69b214b4fbb2;p=unres.git

diff --git a/source/wham/src-M/store_parm.F b/source/wham/src-M/store_parm.F
index f44b6f4..c8e42c0 100644
--- a/source/wham/src-M/store_parm.F
+++ b/source/wham/src-M/store_parm.F
@@ -41,6 +41,7 @@ c Store weights
       ww_all(17,iparm)=wbond
       ww_all(19,iparm)=wsccor
       ww_all(22,iparm)=wliptran
+      ww_all(26,iparm)=wtube
 c Store bond parameters
       vbldp0_all(iparm)=vbldp0
       akp_all(iparm)=akp
@@ -316,6 +317,7 @@ c Restore weights
       wbond=ww_all(17,iparm)
       wsccor=ww_all(19,iparm)
       wliptran=ww_all(22,iparm)
+      wtube=ww_all(26,iparm)
 c Restore bond parameters
       vbldp0=vbldp0_all(iparm)
       akp=akp_all(iparm)