OilfieldToolsNet/opm-simulators
4
0
Fork 0
mirror of https://github.com/OPM/opm-simulators.git synced 2025-02-25 18:55:30 -06:00
Code Issues Packages Projects Releases Wiki Activity

Averaging multiple layers of NTG values

Browse Source
This commit is contained in:
Tor Harald Sandve 2015-03-19 12:24:18 +01:00
parent 65199735e2
commit 388ce7548e
1 changed files with 11 additions and 9 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

20
opm/autodiff/GeoProps.hpp
View File

@ -222,23 +222,25 @@ namespace Opm
const int nx = grid.cartdims[0]; const int nx = grid.cartdims[0];
const int ny = grid.cartdims[1]; const int ny = grid.cartdims[1];
const int cartesianCellIdx = global_cell[cellIdx]; const int cartesianCellIdx = global_cell[cellIdx];
const int cartesianCellIdxAbove = cartesianCellIdx - nx*ny;
// Average properties when the cell above exist const double cellVolume = eclgrid->getCellVolume(cartesianCellIdx);
// and has porv less than the MINPV threshold ntg[cartesianCellIdx] *= cellVolume;
if ( cartesianCellIdxAbove > 0 && double totalCellVolume = cellVolume;
// Average properties as long as there exist cells above
// that has pore volume less than the MINPV threshold
int cartesianCellIdxAbove = cartesianCellIdx - nx*ny;
while ( cartesianCellIdxAbove >= 0 &&
porv[cartesianCellIdxAbove] > 0 && porv[cartesianCellIdxAbove] > 0 &&
porv[cartesianCellIdxAbove] < eclgrid->getMinpvValue() ) { porv[cartesianCellIdxAbove] < eclgrid->getMinpvValue() ) {
// Volume weighted arithmetic average of NTG // Volume weighted arithmetic average of NTG
const double cellVolume = eclgrid->getCellVolume(cartesianCellIdx);
const double cellAboveVolume = eclgrid->getCellVolume(cartesianCellIdxAbove); const double cellAboveVolume = eclgrid->getCellVolume(cartesianCellIdxAbove);
const double inv_totalCellVolume = 1/(cellVolume + cellAboveVolume); totalCellVolume += cellAboveVolume;
ntg[cartesianCellIdx] *= cellAboveVolume;
ntg[cartesianCellIdx] += ntg[cartesianCellIdxAbove]*cellAboveVolume; ntg[cartesianCellIdx] += ntg[cartesianCellIdxAbove]*cellAboveVolume;
ntg[cartesianCellIdx] *= inv_totalCellVolume; cartesianCellIdxAbove -= nx*ny;
} }
ntg[cartesianCellIdx] /= totalCellVolume;
} }
} }