& 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,