X-Git-Url: http://mmka.chem.univ.gda.pl/gitweb/?p=unres.git;a=blobdiff_plain;f=source%2Fcluster%2Fwham%2Fsrc-M%2FCOMMON.SHIELD;h=0fb02edc43b6f265a643ecda5c161ece5e4da973;hp=1f96c94b67c72e5cd6bbd89cbc4e84d5d3c9cbde;hb=e12c8db731e266c6e38b2f5883f3ae7c15bbfb98;hpb=e64f51efa7130a5e8e2ade165f9a7615e084bba0 diff --git a/source/cluster/wham/src-M/COMMON.SHIELD b/source/cluster/wham/src-M/COMMON.SHIELD index 1f96c94..0fb02ed 100644 --- a/source/cluster/wham/src-M/COMMON.SHIELD +++ b/source/cluster/wham/src-M/COMMON.SHIELD @@ -1,10 +1,13 @@ double precision VSolvSphere,VSolvSphere_div,long_r_sidechain, & short_r_sidechain,fac_shield,grad_shield_side,grad_shield, - & buff_shield,wshield,grad_shield_loc + & buff_shield,wshield,grad_shield_loc,lipscale,sslipi,sslipj, + & ssgradlipi,ssgradlipj integer ishield_list,shield_list,ees0plist common /shield/ VSolvSphere,VSolvSphere_div,buff_shield, & long_r_sidechain(ntyp), & short_r_sidechain(ntyp),fac_shield(maxres),wshield, + & sslipi,sslipj,lipscale, + & ssgradlipi,ssgradlipj, & 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),