Explicitly Prevent Negative 3-p Kro Values in Stone 2 Model

This makes the material balance equations converge more smoothly in
corner cases and makes a real field case run at all.
This commit is contained in:
Bård Skaflestad 2021-02-02 16:24:46 +01:00
parent 372bb122a6
commit 1479adf6af

View File

@ -362,7 +362,7 @@ public:
const Evaluation krg = GasOilMaterialLaw::twoPhaseSatKrn(params.gasOilParams(), 1 - Swco - Sg);
const Evaluation krog = GasOilMaterialLaw::twoPhaseSatKrw(params.gasOilParams(), 1 - Swco - Sg);
return krocw * ((krow/krocw + krw) * (krog/krocw + krg) - krw - krg);
return Opm::max(krocw * ((krow/krocw + krw) * (krog/krocw + krg) - krw - krg), Evaluation{0});
}
/*!