Added support for wconinjh

This commit is contained in:
Xavier Raynaud
2014-09-19 14:58:37 +02:00
parent eccf3d4551
commit fe15d4a1d2

View File

@@ -302,15 +302,18 @@ namespace Opm {
WellPtr well = getWell(wellName);
// convert injection rates to SI
WellInjector::TypeEnum wellType = WellInjector::TypeFromString( record->getItem("TYPE")->getTrimmedString(0));
WellInjector::TypeEnum injectorType = WellInjector::TypeFromString( record->getItem("TYPE")->getTrimmedString(0));
double injectionRate = record->getItem("RATE")->getRawDouble(0);
injectionRate = convertInjectionRateToSI(injectionRate, wellType, *deck->getActiveUnitSystem());
injectionRate = convertInjectionRateToSI(injectionRate, injectorType, *deck->getActiveUnitSystem());
WellCommon::StatusEnum status = WellCommon::StatusFromString( record->getItem("STATUS")->getTrimmedString(0));
well->setStatus( currentStep , status );
WellInjectionProperties properties(well->getInjectionPropertiesCopy(currentStep));
properties.injectorType = injectorType;
properties.surfaceInjectionRate = injectionRate;
// History matches are usually rate controled. Here, we assume it.
properties.addInjectionControl(WellInjector::RATE);
properties.predictionMode = false;
well->setInjectionProperties(currentStep, properties);
}