X-Git-Url: http://mmka.chem.univ.gda.pl/gitweb/?p=unres.git;a=blobdiff_plain;f=source%2Funres%2Fsrc_MD-M%2FCOMMON.SHIELD;h=2ead23ec9ec3d89a7e9baf3184dc8481360243e0;hp=6cbf5a8636bab51616eed139fc096c59608ee196;hb=688de817003e3e5f38e18eee73f13c25419c7f00;hpb=eab68ce2fb626e693cd1367fe2bcb717b98c587f diff --git a/source/unres/src_MD-M/COMMON.SHIELD b/source/unres/src_MD-M/COMMON.SHIELD index 6cbf5a8..2ead23e 100644 --- a/source/unres/src_MD-M/COMMON.SHIELD +++ b/source/unres/src_MD-M/COMMON.SHIELD @@ -1,13 +1,15 @@ double precision VSolvSphere,VSolvSphere_div,long_r_sidechain, & short_r_sidechain,fac_shield,grad_shield_side,grad_shield, - & buff_shield,wshield + & buff_shield,wshield,lipscale,sslipi,sslipj, + & ssgradlipi,ssgradlipj integer ishield_list,shield_list,ees0plist common /shield/ VSolvSphere,VSolvSphere_div,buff_shield, - & long_r_sidechain(ntyp), + & long_r_sidechain(ntyp),sslipi,sslipj, + & ssgradlipi,ssgradlipj, & short_r_sidechain(ntyp),fac_shield(maxres),wshield, & grad_shield_side(3,maxcontsshi,-1:maxres), & grad_shield(3,-1:maxres), - & grad_shield_loc(3,maxcontsshi,-1:maxres), + & grad_shield_loc(3,maxcontsshi,-1:maxres),lipscale, & ishield_list(maxres),shield_list(maxcontsshi,maxres), & ees0plist(maxconts,maxres)