mirror of
https://github.com/OPM/ResInsight.git
synced 2025-02-25 18:55:39 -06:00
#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:
parent
87ff498609
commit
26ae9911b7
@ -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;
|
||||
}
|
||||
|
||||
//--------------------------------------------------------------------------------------------------
|
||||
///
|
||||
//--------------------------------------------------------------------------------------------------
|
||||
|
@ -62,6 +62,7 @@ public:
|
||||
|
||||
static void computeStimPlanCellTransmissibilityInFracture(RigStimPlanCell* stimPlanCell);
|
||||
double computeRadialTransmissibilityToWell(RigStimPlanCell* stimPlanCell);
|
||||
double computeLinearTransmissibilityToWell(RigStimPlanCell* stimPlanCell, double perforationLengthVertical, double perforationLengthHorizontal);
|
||||
|
||||
|
||||
|
||||
|
Loading…
Reference in New Issue
Block a user