X-Git-Url: http://mmka.chem.univ.gda.pl/gitweb/?a=blobdiff_plain;ds=sidebyside;f=source%2Funres%2Fsrc_MD-M%2FCOMMON.SHIELD;h=6cbf5a8636bab51616eed139fc096c59608ee196;hb=185de3b1acf5104dbd1cd129375f102ebd67a15a;hp=a8110d514a0a9cd668249e02d8e087ac0eb119af;hpb=e889596de2b65461a701296b2a3971c81e016041;p=unres.git

diff --git a/source/unres/src_MD-M/COMMON.SHIELD b/source/unres/src_MD-M/COMMON.SHIELD
index a8110d5..6cbf5a8 100644
--- a/source/unres/src_MD-M/COMMON.SHIELD
+++ b/source/unres/src_MD-M/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,maxcontsshi,-1:maxres),
+     &  grad_shield(3,-1:maxres),
+     &  grad_shield_loc(3,maxcontsshi,-1:maxres),
+     & ishield_list(maxres),shield_list(maxcontsshi,maxres),
+     & ees0plist(maxconts,maxres)