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

Implement first cut at Darcy (total) flux calculation.

Browse Source 
This is compile-tested only.
This commit is contained in:
Bård Skaflestad 2013-05-16 09:48:56 +02:00
parent b46cef383f
commit ef354792cd
1 changed files with 28 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

30
opm/autodiff/ImpesTPFAAD.hpp
View File

@ -301,7 +301,7 @@ namespace Opm {
THROW("Failed to compute converged pressure solution");
}
else {
computeFluxes();
computeFluxes(state);
}
}
@ -435,8 +435,34 @@ namespace Opm {
}
void
computeFluxes() const
computeFluxes(BlackoilState& state) const
{
const int nc = grid_.number_of_cells;
const int np = state.numPhases();
const V p0 = Eigen::Map<const V>(&state.pressure()[0], nc, 1);
const ADB p = ADB::constant(p0, std::vector<int>(1, nc));
const V transi = subset(geo_.transmissibility(),
ops_.internal_faces);
const V nkgradp = transi * (ops_.ngrad * p0.matrix()).array();
V flux = Eigen::Map<const V>(&state.faceflux()[0],
grid_.number_of_faces, 1);
for (int phase = 0; phase < np; ++phase) {
const ADB cell_rho = pdepfdata_.phaseDensity(phase, p);
const V kr = pdepfdata_.phaseRelPerm(phase);
const ADB mu = pdepfdata_.phaseViscosity(phase, p);
const V pflux = nkgradp +
(grav_ * cell_rho.value().matrix()).array();
const UpwindSelector<double> upwind(grid_, ops_, pflux);
const V mf = upwind.select(kr / mu.value());
flux += mf * pflux;
}
}
};
} // namespace Opm