X-Git-Url: http://mmka.chem.univ.gda.pl/gitweb/?a=blobdiff_plain;f=source%2Fwham%2Fsrc-M%2Fstore_parm.F;h=c8e42c08554153050f0e79a45d6b0a9c146d138d;hb=f556d80a6510feca5aaf727b8f62720e7bd07aa0;hp=f44b6f418a6e7508764d42c42e140abf0f03b309;hpb=1536b939ec862d08bab3cb784112fd6cebd971a7;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)