Merge pull request #4551 from totto82/outputGIPL

output gas in water to F(R)GIPL for gas-water systems
This commit is contained in:
Bård Skaflestad 2023-03-27 09:58:45 +02:00 committed by GitHub
commit 8858d725a8
No known key found for this signature in database
GPG Key ID: 4AEE18F83AFDEB23

View File

@ -1156,6 +1156,10 @@ private:
if (!this->fip_[Inplace::Phase::WaterInWaterPhase].empty())
this->fip_[Inplace::Phase::WaterInWaterPhase][globalDofIdx] = fip[waterPhaseIdx];
// For water+gas cases the gas in water is added to the GIPL value
if (!this->fip_[Inplace::Phase::GasInLiquidPhase].empty() && !FluidSystem::phaseIsActive(oilPhaseIdx))
this->fip_[Inplace::Phase::GasInLiquidPhase][globalDofIdx] = gasInPlaceWater;
// Add dissolved gas and vaporized water to total Fip
if (!this->fip_[Inplace::Phase::WATER].empty())
this->fip_[Inplace::Phase::WATER][globalDofIdx] += waterInPlaceGas;