the queen's croquet field

This commit is contained in:
James E McClure
2018-05-19 07:49:32 -04:00
parent bb4a03da47
commit 9ade92ba36
39 changed files with 66 additions and 143 deletions

View File

@@ -115,8 +115,8 @@ int main(int argc, char **argv)
double iVol_global = 1.0/Nx/Ny/Nz/nprocx/nprocy/nprocz;
std::shared_ptr<Domain> Dm (new Domain(db));
Dm->CommInit(comm);
std::shared_ptr<Domain> Dm (new Domain(db,comm));
Dm->CommInit();
Nx += 2;
Ny += 2;
@@ -164,7 +164,7 @@ int main(int argc, char **argv)
}
}
}
Dm->CommInit(comm);
Dm->CommInit();
//.......................................................................
// Compute the media porosity, assign phase labels and solid composition
@@ -174,7 +174,7 @@ int main(int argc, char **argv)
int Np=0; // number of local pore nodes
double *PhaseLabel;
PhaseLabel = new double[N];
Dm->AssignComponentLabels(PhaseLabel);
//Dm->AssignComponentLabels(PhaseLabel);
//.......................................................................
for (k=1;k<Nz-1;k++){
for (j=1;j<Ny-1;j++){