X-Git-Url: http://mmka.chem.univ.gda.pl/gitweb/?a=blobdiff_plain;f=source%2Funres%2Fdata%2Fcomm_local.f90;h=89a42b4e436823f07ecad7ab86dd04a01430c375;hb=d9408016c2011e3dade935da06f883a2665bb73b;hp=ad29715c6f4d87961441dca60423b032b69a1cf8;hpb=299e2c41124d3fa8adba7244716515a2cc160ed1;p=unres4.git

diff --git a/source/unres/data/comm_local.f90 b/source/unres/data/comm_local.f90
index ad29715..89a42b4 100644
--- a/source/unres/data/comm_local.f90
+++ b/source/unres/data/comm_local.f90
@@ -3,7 +3,7 @@
 
       integer :: num_conti,j1,j2
       real(kind=8) :: a22,a23,a32,a33,dxi,dyi,dzi,dx_normi,dy_normi,&
-        dz_normi,xmedi,ymedi,zmedi
+        dz_normi,xmedi,ymedi,zmedi,sslipi,sslipj,ssgradlipi,ssgradlipj
       real(kind=8),dimension(2,2) :: a_temp
       real(kind=8),dimension(3,4) :: agg,aggi,aggi1,aggj,aggj1