OilfieldToolsNet/LBPM
4
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

increased default inlet/outlet layers to 10

Browse Source
This commit is contained in:
James E McClure 2019-03-26 15:30:34 -04:00
parent 6b8ea6bdf0
commit 2eddcfd8cd
1 changed files with 39 additions and 35 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

10
common/Domain.cpp
View File

@ -531,6 +531,8 @@ void Domain::ReadIDs(){
readID=fread(id,1,N,IDFILE);
if (readID != size_t(N)) printf("Domain::ReadIDs -- Error reading ID (rank=%i) \n",rank());
fclose(IDFILE);
int inlet_layers=0;
int outlet_layers=0;
// Compute the porosity
double sum;
double porosity;
@ -540,7 +542,8 @@ void Domain::ReadIDs(){
//.........................................................
// If external boundary conditions are applied remove solid
if (BoundaryCondition > 0 && kproc() == 0){
for (int k=0; k<3; k++){
inlet_layers=outlet_layers=10;
for (int k=0; k<inlet_layers; k++){
for (int j=0;j<Ny;j++){
for (int i=0;i<Nx;i++){
int n = k*Nx*Ny+j*Nx+i;
@ -550,7 +553,8 @@ void Domain::ReadIDs(){
}
}
if (BoundaryCondition > 0 && kproc() == nprocz()-1){
for (int k=Nz-3; k<Nz; k++){
outlet_layers=10;
for (int k=Nz-outlet_layers; k<Nz; k++){
for (int j=0;j<Ny;j++){
for (int i=0;i<Nx;i++){
int n = k*Nx*Ny+j*Nx+i;
@ -559,7 +563,7 @@ void Domain::ReadIDs(){
}
}
}
for (int k=1;k<Nz-1;k++){
for (int k=inlet_layers+1; k<Nz-outlet_layers-1;k++){
for (int j=1;j<Ny-1;j++){
for (int i=1;i<Nx-1;i++){
int n = k*Nx*Ny+j*Nx+i;