Poettmann-Carpenter Functions
Poettmann-Carpenter (1952) no-slip correlation with an empirical friction factor.
3 functions
PO.VFP.PoettmannCarpenter.dPdL(Ql, Qg, P, Rho_l, Ul, Bl, Rho_g, Ug, Bg, IFT_gl, Rs, pipe_ID, pipe_roughness)
Calculates pressure gradient using Poettmann-Carpenter (1952), [psi/ft]. Historical no-slip method for high-rate dispersed bubble flow.
PO.VFP.PoettmannCarpenter.Pout(Ql, Qg, P_in, T_degF, Rho_l, Ul, SG_gas, IFT_gl, pipe_ID, pipe_length, pipe_roughness)
Calculates outlet pipe pressure using Poettmann-Carpenter (1952), [psi]. No-slip method. Gas properties (ρg, μg, Bg) use DAK (Z-factor) and LGE (viscosity).
PO.VFP.PoettmannCarpenter.Pin(Ql, Qg, P_out, T_degF, Rho_l, Ul, SG_gas, IFT_gl, pipe_ID, pipe_length, pipe_roughness)
Calculates inlet pipe pressure using Poettmann-Carpenter (1952), [psi]. No-slip method. Gas properties (ρg, μg, Bg) use DAK (Z-factor) and LGE (viscosity).