pulled readrtns
[unres.git] / source / cluster / wham / src / COMMON.THREAD
1       integer nthread,nexcl,iexam,ipatt
2       double precision ener0,ener,max_time_for_thread,
3      &  ave_time_for_thread
4       common /thread/ nthread,nexcl,iexam(2,maxthread),
5      &  ipatt(2,maxthread)
6       common /thread1/ ener0(n_ene,maxthread),ener(n_ene,maxthread),
7      &  max_time_for_thread,ave_time_for_thread