Research Article

The Framework Dedicated to Three Phase Flows Wellbore Modelling

Listing 4

Step algorithm.
for i=0 To WellBottom [
()  BubblePointPressure[i]=correlation.BubblePointPressure(GT[i], SepT, API, SG, SepP, GOR)
()  GasSolubility[i]=correlation.GasSolubility(GT[i], API, LP[i], GOR)
()  GasViscosity[i]=correlation.GasViscosity(GT[i], SG)
()  DeadOilViscosity[i]=correlation.DeadOilViscosity(GT[i], API)
()  SaturatedOilViscosity[i]=correlation.SaturatedOilViscosity(GasSolubility[i], DeadOilViscosity[i])
()  UnderSaturatedOilViscosity[i]=correlation.UnderSaturatedOilViscosity(LP[i], BubblePointPressure[i],
SaturatedOilViscosity[i]
() OilViscosity[i]=correlation.OilViscosity(DeadOilViscosity[i], SaturatedOilViscosity[i],
UnderSaturatedOilViscosity[i], LP[i],  BubblePointPressure[i])
()  WaterViscosity[i]=correlation.WaterViscosity(WD, GT[i])
()  GasCompressibility[i]=correlation.GasCompressibility(GT[i], SG, LP[i])
()  GasFormationVolumeFactor[i]=correlation.GasFormationVolumeFactor(GT[i], GasCompressibility[i], LP[i])
()  OilFormationVolumeFactor[i]=correlation.OilFormationVolumeFactor(GT[i], API, GOR, SG)
()  WaterFormationVolumeFactor[i]=correlation.WaterFormationVolumeFactor(GT[i], API, GOR, SG)
()  OilHeatCapacity[i]=correlation.OilHeatCapacity(API, GT[i])
()  WaterHeatCapacity[i]=correlation.WaterHeatCapacity(GT[i], WD)
()  GasHeatCapacity[i]=correlation.GasHeatCapacity(GT[i], SG)
]
()  return new objectStep 3(BubblePoint, GasSolubility, GasViscosity, OilViscosity, DeadOilViscosity, SaturatedOilViscosity,
UnderSaturatedOilViscosity, WaterViscosity, GasCompressibility, GasFormationVolumeFactor, OilFormationVolumeFactor,
WaterFormationVolumeFactor, GasHeatCapacity, OilHeatCapacity, WaterHeatCapacity);