#1417 - pre-proto - Calculate transmissibility for linear flow from fracture to well (for longitudinal fractures), for a given stimPlanCell and given perforation lengths in this cell.

This commit is contained in:
astridkbjorke 2017-04-19 14:50:55 +02:00
parent 87ff498609
commit 26ae9911b7
2 changed files with 21 additions and 0 deletions

View File

@ -764,6 +764,26 @@ double RigFractureTransCalc::computeRadialTransmissibilityToWell(RigStimPlanCell
return Tc;
}
//--------------------------------------------------------------------------------------------------
///
//--------------------------------------------------------------------------------------------------
double RigFractureTransCalc::computeLinearTransmissibilityToWell(RigStimPlanCell* stimPlanCell, double perforationLengthVertical, double perforationLengthHorizontal)
{
double TcPrefix = 8 * cDarcy() * stimPlanCell->getConductivtyValue();
double DzPerf = perforationLengthVertical * m_fracture->perforationEfficiency();
double DxPerf = perforationLengthHorizontal * m_fracture->perforationEfficiency();
double TcZ = TcPrefix * DzPerf /
(stimPlanCell->cellSizeX() + m_fracture->attachedFractureDefinition()->skinFactor() * DzPerf / cvf::PI_D);
double TcX = TcPrefix * DxPerf /
(stimPlanCell->cellSizeZ() + m_fracture->attachedFractureDefinition()->skinFactor() * DxPerf / cvf::PI_D);
double Tc = cvf::Math::sqrt(pow(TcX, 2) + pow(TcZ, 2));
return Tc;
}
//--------------------------------------------------------------------------------------------------
///
//--------------------------------------------------------------------------------------------------

View File

@ -62,6 +62,7 @@ public:
static void computeStimPlanCellTransmissibilityInFracture(RigStimPlanCell* stimPlanCell);
double computeRadialTransmissibilityToWell(RigStimPlanCell* stimPlanCell);
double computeLinearTransmissibilityToWell(RigStimPlanCell* stimPlanCell, double perforationLengthVertical, double perforationLengthHorizontal);