1 double precision entropy(-max_ene-4:max_ene),nminima(maxsave),
2 & nhist(-max_ene:max_ene)
3 logical ent_read,multican
4 common /mce/ entropy,emin,emax,nhist,nminima,ent_read,multican,
7 double precision xpool,epool,pool_fraction
8 common /pool/ xpool(maxvar,max_pool),epool(max_pool),
10 integer save_frequency,message_frequency,pool_read_freq,
11 & pool_save_freq,print_freq
12 common /mce_counters/ save_frequency,message_frequency,
13 & pool_read_freq,pool_save_freq,print_freq