PO.PVT.Co.Sat.ByVillenaLanzi


Description

Calculates oil compressibility using Villena-Lanzi (1985) correlation, P <= Pb, [1/psi].

Syntax

=PO.PVT.Co.Sat.ByVillenaLanzi(P, Pb, T_degF, Rsb, API)

Parameters

Parameter Description
P Pressure, [psi].
Pb Bubble point pressure, [psi].
T_degF Temperature, [degF].
Rsb Solution gas-oil ratio at the bubble point pressure, [scf/STB].
API Oil gravity, [API].

SI Unit Version

Lambda Name PO.PVT.Co.Sat.ByVillenaLanzi.SI
Formula
=LAMBDA(P, Pb, T_degC, Rsb, API, LET( P_psi, PO.UnitConverter(P, "kPa", "psi"), Pb_psi, PO.UnitConverter(Pb, "kPa", "psi"), T_degF, PO.UnitConverter(T_degC, "degC", "degF"), Rsb_scfSTB, PO.UnitConverter(Rsb, "sm3/sm3", "scf/STB"), result_1psi, PO.PVT.Co.Sat.ByVillenaLanzi(P_psi, Pb_psi, T_degF, Rsb_scfSTB, API), PO.UnitConverter(result_1psi, "1/psi", "1/kPa")))
SI Parameters
Parameter Unit Description
P kPa Pressure
Pb kPa Bubble point pressure
T_degC degC Temperature
Rsb sm3/sm3 Solution gas-oil ratio at bubble point
API - Oil API gravity
How to save as a reusable Excel function

LAMBDA is a built-in Excel feature (Microsoft 365) that lets you create custom functions without VBA. The formula above works as-is when pasted into a cell.

To save a LAMBDA as a reusable named function:

  1. Go to Formulas → Name Manager → New
  2. Enter a name, e.g. PO.PVT.Co.Sat.ByVillenaLanzi.SI
  3. In Refers to, paste the LAMBDA formula without the trailing invocation (...)
  4. Click OK

Now use =PO.PVT.Co.Sat.ByVillenaLanzi.SI(...) anywhere in your workbook.

Missing a formula? Suggest a New Formula

An unhandled error has occurred. Reload X