& ndowna(0:maxprocs/4,0:maxprocs)
real t_restart1(5,maxprocs)
integer iset_restart1(maxprocs)
+ logical t_exchange_only
common /remdcommon/ nrep,nstex,retmin,retmax,remd_t,remd_tlist,
& remd_mlist,remd_m,mremdsync,restart1file,
- & traj1file,i_sync_step
+ & traj1file,i_sync_step,t_exchange_only
common /remdrestart/ i2rep,i2set,ifirst,nupa,ndowna,t_restart1,
& iset_restart1
real totT_cache,EK_cache,potE_cache,t_bath_cache,Uconst_cache,
- & qfrag_cache,qpair_cache,c_cache,
+ & qfrag_cache,qpair_cache,c_cache,uscdiff_cache,
& ugamma_cache,utheta_cache
integer ntwx_cache,ii_write,max_cache_traj_use
common /traj1cache/ totT_cache(max_cache_traj),