+++ /dev/null
- 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