#include <sstream>
#include <iomanip>
+#include <mpi.h>
+
#include "latlib/progress.h"
using namespace std;
extern int opterr;
o815::o815(int argc, char **argv, const string& _programid, comoption specOps[], void (*helpHeader)()) {
- long timestamp;
-
programid = _programid;
comargs.nmeas = 100;
MPI_Comm_size(MPI_COMM_WORLD, &numprocs);
MPI_Comm_rank(MPI_COMM_WORLD, &rank);
- paraQ = new paraq(numprocs, rank);
-
addComOption("lsize", required_argument, NULL, 'L', "define lattice size", "xsize:tsize");
addComOption("nmeas", required_argument, NULL, 'N', "set number of measurements", "nmeas");
addComOption("skip", required_argument, NULL, 'S', "set number of skips between configs", "nskip");
exit(0);
}
+ paraQ = new paraq(numprocs, rank);
+
+ hypercache::addPara("lx", comargs.lsize[0]);
+ hypercache::addPara("lt", comargs.lsize[1]);
+}
+
+void o815::postParaInit() {
+ long timestamp;
+
if(comargs.idonly) {
cout << programid << headMaster() << endl << flush;
exit(0);
}
+ if( comargs.showjobnum ) {
+ for( int i=1; i<=paraQ->getTotalJobs(); i++ ) {
+ if( paraQ->getTotalJobs()%i == 0 ) cout << paraQ->getTotalJobs()/i << "@" << i << " ";
+ }
+ cout << endl;
+ exit(0);
+ }
+
if(rank==0) {
timestamp = time(NULL);
for(int idest=1; idest<numprocs; idest++)
MPI_Send(×tamp, 1, MPI_LONG, idest, 123, MPI_COMM_WORLD);
}
else if(rank>0)
- MPI_Recv(×tamp, 1, MPI_LONG, 0, 123, MPI_COMM_WORLD, &mpiStatus);
+ MPI_Recv(×tamp, 1, MPI_LONG, 0, 123, MPI_COMM_WORLD, MPI_STATUS_IGNORE);
out = new writeout(comargs.outdir, programid+headMaster(), rank, numprocs, timestamp);
}
void o815::mainLoop() {
- if( comargs.showjobnum ) {
- for( int i=1; i<=paraQ->getTotalJobs(); i++ ) {
- if( paraQ->getTotalJobs()%i == 0 ) cout << paraQ->getTotalJobs()/i << "@" << i << " ";
- }
- cout << endl;
- exit(0);
- }
-
*out->log << "OBS: Starting main loop." << endl;
for (vector<obs*>::iterator obsit = observables.begin(); obsit != observables.end(); ++obsit)
bool readnewObs;
int nequileftNewObs;
- hypercache::readO( (*obsit)->ocid, readnewObs, nequileftNewObs );
+ hypercache::readO( (*obsit)->ocid, &readnewObs, &nequileftNewObs );
if ( readnewObs && nequileftNewObs < 0 ) {
- (*obsit)->meas(true);
+ (*obsit)->meas(true, imeas);
}
else {
if (!nextAlready) {
Sim->nextConfig();
nextAlready = true;
}
- (*obsit)->meas(false);
+ (*obsit)->meas(false, imeas);
hypercache::writeO( (*obsit)->ocid );
}