X-Git-Url: http://mmka.chem.univ.gda.pl/gitweb/?a=blobdiff_plain;f=source%2Funres%2Fsrc_MD-M%2FCOMMON.SHIELD;h=a8110d514a0a9cd668249e02d8e087ac0eb119af;hb=54453b9e3cc18886558071b1bce406b21e6566cf;hp=56a1c7116e93c4720f1314e59b3e30757c12c270;hpb=dc7deba07f8e1f5bc5eb8e6e2fb433c3636c7782;p=unres.git diff --git a/source/unres/src_MD-M/COMMON.SHIELD b/source/unres/src_MD-M/COMMON.SHIELD index 56a1c71..a8110d5 100644 --- a/source/unres/src_MD-M/COMMON.SHIELD +++ b/source/unres/src_MD-M/COMMON.SHIELD @@ -1,10 +1,10 @@ double precision VSolvSphere,VSolvSphere_div,long_r_sidechain, & short_r_sidechain,fac_shield,grad_shield_side,grad_shield, - & buff_shield + & buff_shield,wshield integer ishield_list,shield_list,ees0plist common /shield/ VSolvSphere,VSolvSphere_div,buff_shield, & long_r_sidechain(ntyp), - & short_r_sidechain(ntyp),fac_shield(maxres), + & 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),