X-Git-Url: http://mmka.chem.univ.gda.pl/gitweb/?a=blobdiff_plain;f=source%2Fcluster%2Fwham%2Fsrc-M%2FCOMMON.CHAIN;h=293ea943b5039ed016b3746b6008b01390bbf2b1;hb=22ea58d3be4c7c625b9c5fb0e9f6d1b2bf7428f6;hp=d3f4c54a0fe8919e997c45cb9e048f16d2276067;hpb=5bb791af1e8990b66bc0543222e13e789a3f69aa;p=unres.git diff --git a/source/cluster/wham/src-M/COMMON.CHAIN b/source/cluster/wham/src-M/COMMON.CHAIN index d3f4c54..293ea94 100644 --- a/source/cluster/wham/src-M/COMMON.CHAIN +++ b/source/cluster/wham/src-M/COMMON.CHAIN @@ -10,3 +10,14 @@ & chain_rep(3,maxres2+2,maxsym), nsup,nstart_sup, & nstart_seq, & nend_sup, chain_length,tabperm(maxperm,maxsym) + double precision boxxsize,boxysize,boxzsize,enecut,sscut,sss, + & sssgrad, + & buflipbot, bufliptop,bordlipbot,bordliptop,lipbufthick,lipthick, + & tubecenter,tubeR0, + & buftubebot, buftubetop,bordtubebot,bordtubetop,tubebufthick + + common /box/ boxxsize,boxysize,boxzsize,enecut,sscut,sss,sssgrad, + & buflipbot, bufliptop,bordlipbot,bordliptop,lipbufthick,lipthick + common /tube/ tubecenter(3),tubeR0, + & buftubebot, buftubetop,bordtubebot,bordtubetop,tubebufthick +