X-Git-Url: http://mmka.chem.univ.gda.pl/gitweb/?a=blobdiff_plain;f=source%2Funres%2Fsrc_MD-NEWSC%2FCOMMON.MCE;fp=source%2Funres%2Fsrc_MD-NEWSC%2FCOMMON.MCE;h=2d7918460b43bfa092c1818114472eddf53f56d9;hb=7308760ff07636ef6b1ee28d8c3a67a23c14b34b;hp=0000000000000000000000000000000000000000;hpb=9a54ab407f6d0d9d564d52763b3e2136450b9ffc;p=unres.git

diff --git a/source/unres/src_MD-NEWSC/COMMON.MCE b/source/unres/src_MD-NEWSC/COMMON.MCE
new file mode 100644
index 0000000..2d79184
--- /dev/null
+++ b/source/unres/src_MD-NEWSC/COMMON.MCE
@@ -0,0 +1,13 @@
+      double precision entropy(-max_ene-4:max_ene),nminima(maxsave),
+     &        nhist(-max_ene:max_ene)
+      logical ent_read,multican
+      common /mce/ entropy,emin,emax,nhist,nminima,ent_read,multican,
+     & indminn,indmaxx
+      integer npool
+      double precision xpool,epool,pool_fraction
+      common /pool/ xpool(maxvar,max_pool),epool(max_pool),
+     & pool_fraction,npool
+      integer save_frequency,message_frequency,pool_read_freq,
+     & pool_save_freq,print_freq
+      common /mce_counters/ save_frequency,message_frequency,
+     & pool_read_freq,pool_save_freq,print_freq