working cluster for nano parameters

[unres.git] / source / cluster / wham / src-M / COMMON.LOCAL

diff --git a/source/cluster/wham/src-M/COMMON.LOCAL b/source/cluster/wham/src-M/COMMON.LOCAL
index d92ce8e..1328751 100644 (file)
--- a/source/cluster/wham/src-M/COMMON.LOCAL
+++ b/source/cluster/wham/src-M/COMMON.LOCAL
@@ -2,7 +2,9 @@
      & sigc0,dsc,dsc_inv,bsc,censc,gaussc,dsc0,vbl,vblinv,vblinv2,
      & vbl_cis,vbl0,vbld_inv
       integer nlob,loc_start,loc_end,ithet_start,ithet_end,
-     & iphi_start,iphi_end,itau_start,itau_end
+     & iphi_start,iphi_end,itau_start,itau_end,
+     &                 itube_start,itube_end
+
 C Parameters of the virtual-bond-angle probability distribution
       common /thetas/ a0thet(-ntyp:ntyp),athet(2,-ntyp:ntyp,-1:1,-1:1)
      &  ,bthet(2,-ntyp:ntyp,-1:1,-1:1),
@@ -39,6 +41,7 @@ C Parameters of the side-chain probability distribution
 C Virtual-bond lenghts
       common /peptbond/ vbl,vblinv,vblinv2,vbl_cis,vbl0
       common /indices/ loc_start,loc_end,ithet_start,ithet_end,
-     &                 iphi_start,iphi_end,itau_start,itau_end
+     &                 iphi_start,iphi_end,itau_start,itau_end,
+     &                 itube_start,itube_end
 C Inverses of the actual virtual bond lengths
       common /invlen/ vbld_inv(maxres2)