This adds bubble/dew point pressure output to legacy flow

This commit is contained in:
babrodtk
2017-04-18 11:29:49 +02:00
parent 6d9440d8e2
commit 8ae7178f0a
7 changed files with 96 additions and 15 deletions

View File

@@ -464,6 +464,8 @@ typedef Eigen::Array<double,
, rsSat(ADB::null())
, rvSat(ADB::null())
, soMax()
, Pb()
, Pd()
, krnswdc_ow()
, krnswdc_go()
, pcswmdc_ow()
@@ -670,6 +672,13 @@ typedef Eigen::Array<double,
sd_.soMax = fluid_.satOilMax();
fluid_.getGasOilHystParams(sd_.krnswdc_go, sd_.pcswmdc_go, cells_);
fluid_.getOilWaterHystParams(sd_.krnswdc_ow, sd_.pcswmdc_ow, cells_);
sd_.Pb = fluid_.bubblePointPressure(cells_,
state.temperature.value(),
state.rs.value());
sd_.Pd = fluid_.dewPointPressure(cells_,
state.temperature.value(),
state.rv.value());
}
}
else {