X-Git-Url: http://mmka.chem.univ.gda.pl/gitweb/?a=blobdiff_plain;f=source%2Funres%2Fsrc_MD_DFA%2FCOMMON.MUCA;fp=source%2Funres%2Fsrc_MD_DFA%2FCOMMON.MUCA;h=7529c15023a762b4e9b0155b5bbf8c6555c9f1e7;hb=d21d93a57773de0c363db8764a376202f3a0552d;hp=0000000000000000000000000000000000000000;hpb=b8f5b4118dc932c21ad2bdbba905850f8297a6a2;p=unres.git diff --git a/source/unres/src_MD_DFA/COMMON.MUCA b/source/unres/src_MD_DFA/COMMON.MUCA new file mode 100644 index 0000000..7529c15 --- /dev/null +++ b/source/unres/src_MD_DFA/COMMON.MUCA @@ -0,0 +1,10 @@ + double precision emuca(4*maxres),nemuca(4*maxres), + & nemuca2(4*maxres),elow,ehigh,factor, + & elowi(maxprocs),ehighi(maxprocs),hbin, + & hist(4*maxres),factor_min + integer nmuca,imtime,muca_smooth + common /double_muca/ emuca,nemuca, + & nemuca2,elow,ehigh,factor,hbin,hist,factor_min + common /integer_muca/ nmuca,imtime,muca_smooth + common /mucarem/ elowi,ehighi +