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

diff --git a/source/unres/src-HCD-5D/COMMON.SHIELD b/source/unres/src-HCD-5D/COMMON.SHIELD
index aead071..eecd4c9 100644
--- a/source/unres/src-HCD-5D/COMMON.SHIELD
+++ b/source/unres/src-HCD-5D/COMMON.SHIELD
@@ -5,10 +5,11 @@
        common /shield/ VSolvSphere,VSolvSphere_div,buff_shield,
      & long_r_sidechain(ntyp),
      & short_r_sidechain(ntyp),fac_shield(maxres),wshield,
-     & grad_shield_side(3,maxcont,-1:maxres),grad_shield(3,-1:maxres),
-     &  grad_shield_loc(3,maxcont,-1:maxres),
-     & ishield_list(maxres),shield_list(maxcont,maxres),
-     & ees0plist(maxcont,maxres)
+     & grad_shield_side(3,maxint_res,-1:maxres),
+     & grad_shield(3,-1:maxres),
+     & grad_shield_loc(3,maxint_res,-1:maxres),
+     & ishield_list(maxres),shield_list(maxint_res,maxres),
+     & ees0plist(maxint_res,maxres)