X-Git-Url: http://mmka.chem.univ.gda.pl/gitweb/?a=blobdiff_plain;f=source%2Fwham%2Fsrc-HCD-5D%2Finclude_unres%2FCOMMON.CORRMAT;h=ae2562572e823c920997251a6829ceb6b3193008;hb=1441ec2b7d68b4fd94014649e4bd9574db0bfc36;hp=5f154e0adf11ba057526c689852a275a98d97d0e;hpb=79fd686e9d9aaa23e4fda802ee16379470e961d3;p=unres.git

diff --git a/source/wham/src-HCD-5D/include_unres/COMMON.CORRMAT b/source/wham/src-HCD-5D/include_unres/COMMON.CORRMAT
index 5f154e0..ae25625 100644
--- a/source/wham/src-HCD-5D/include_unres/COMMON.CORRMAT
+++ b/source/wham/src-HCD-5D/include_unres/COMMON.CORRMAT
@@ -30,9 +30,6 @@ C consecutive amino-acid residues.
      &  costab2(maxres),sintab2(maxres)
 C This common block contains dipole-interaction matrices and their 
 C Cartesian derivatives.
-      double precision a_chuj,a_chuj_der
-      common /dipmat/ a_chuj(2,2,maxconts,maxres),
-     &  a_chuj_der(2,2,3,5,maxconts,maxres)
       double precision AEA,AEAderg,AEAderx,AECA,AECAderg,AECAderx,
      &  ADtEA,ADtEAderg,ADtEAderx,AEAb1,AEAb1derg,AEAb1derx,
      &  AEAb2,AEAb2derg,AEAb2derx,g_contij,ekont,EAEA,EAEAderg,EAEAderx,