// There is bug inside stagingMove
bool pimc::StagingMove(path p, int ptcl)
{
//srand((unsigned)time(NULL));
// the length of the stage
int m = 16;
int NumTime=p.get_NumTime();
double tau=p.get_tau();
double lam=p.get_lam();
double oldbeads[m-1];
// Choose the start and end of the stage
int alpha_start = (int) NumTime*((double) rand() / (RAND_MAX)) ; //np.random.randint(0,Path.numTimeSlices)
//cout<< alpha_start<< endl;
//int alpha_start = 15;
int alpha_end = (alpha_start + m) % NumTime;
// Record the positions of the beads to be updated and store the action
for(int a=0; a<m-1; a++)
oldbeads[a] = 0;
double oldAction = 0.0;
for (int a=1; a<m; a++)
{
int slice = (alpha_start + a) % NumTime;
oldbeads[a-1] = p.beads[slice][ptcl];
oldAction += p.PotentialAction(slice);
}
// Generate new positions and accumulate the new action
double newAction = 0.0;
for (int a=1; a<m; a++)
{
int slicem1;
int slice = (alpha_start + a) % NumTime;
if( (slice-1) > 0 )
slicem1 = (slice - 1) % NumTime;
else if( (slice-1)==0)
slicem1 = 0;
else
slicem1 = ((slice - 1) % NumTime) + NumTime;
//cout << slicem1 <<endl;
double tau1 = (m-a)*tau;
//cout <<ptcl <<" " << slicem1 << " "<< slice <<endl;
double avex = (tau1*p.beads[slicem1][ptcl] + tau*p.beads[alpha_end][ptcl]) / (tau + tau1);
double sigma2 = 2.0*lam / ((1.0 / tau) + (1.0 / tau1));
p.beads[slice][ptcl] = avex + sqrt(sigma2)*((double) rand() / (RAND_MAX));
newAction += p.PotentialAction(slice);
}
// Perform the Metropolis step, if we rejct, revert the worldline
if( ((double) rand() / (RAND_MAX)) < exp(-(newAction - oldAction)) )
return true;
else
for(int a=1; a<m; a++)
{
int slice = (alpha_start + a) % NumTime;
p.beads[slice][ptcl] = oldbeads[a-1];
return false;
}
}
