0% found this document useful (0 votes)
34 views1 page

Zee Algorithm

The document contains a mathematical formula for calculating the compressibility factor (Z-factor) of a gas based on its pressure, temperature, and specific gravity. It uses the Dranchuk and Abu-Kassem correlation which involves iterating calculations of the Z-factor using coefficients related to the reduced pressure and temperature until the calculated and assumed values converge within a tolerance.

Uploaded by

Maqsood Iqbal
Copyright
© © All Rights Reserved
We take content rights seriously. If you suspect this is your content, claim it here.
Available Formats
Download as DOCX, PDF, TXT or read online on Scribd
0% found this document useful (0 votes)
34 views1 page

Zee Algorithm

The document contains a mathematical formula for calculating the compressibility factor (Z-factor) of a gas based on its pressure, temperature, and specific gravity. It uses the Dranchuk and Abu-Kassem correlation which involves iterating calculations of the Z-factor using coefficients related to the reduced pressure and temperature until the calculated and assumed values converge within a tolerance.

Uploaded by

Maqsood Iqbal
Copyright
© © All Rights Reserved
We take content rights seriously. If you suspect this is your content, claim it here.
Available Formats
Download as DOCX, PDF, TXT or read online on Scribd
You are on page 1/ 1

Tpc = 120.1 + (429 * (SG)) - (62.

9 * ((SG) ^ 2))
Ppr = P / Ppc
Tpr = T / Tpc
'Dranchuk and abu Kassem Correlation
c1 = 0.3265 - (1.07 / Tpr) - (0.5339 / Tpr ^ 3) + (0.01569 / Tpr ^ 4) - (0.05165 /
Tpr ^ 5)
c2 = 0.5475 - (0.7361 / Tpr) + (0.1844 / Tpr ^ 2)
c3 = 0.1056 * ((-0.7361 / Tpr) + (0.1844 / Tpr ^ 2))
Z = 1 'assumed
Zcalc = 0.9 'assumed
Dim Trial As Integer
Trial = 1
Do While Abs(Z - Zcalc) > 0.0000001
Rho = (0.27 * Ppr) / (Z * Tpr)
c4 = 0.6134 * (1 + (0.721 * Rho ^ 2)) * (Rho ^ 2 / (Tpr ^ 3)) * Exp(-0.721 * Rho
^ 2)
Zcalc = 1 + (c1 * Rho) + (c2 * Rho ^ 2) - (c3 * Rho ^ 5) + c4
Trial = Trial + 1
If Trial > 100 Then
Exit Do
End If

Z = Zcalc
Loop
Z_Factor = Zcalc
End Function

You might also like

pFad - Phonifier reborn

Pfad - The Proxy pFad of © 2024 Garber Painting. All rights reserved.

Note: This service is not intended for secure transactions such as banking, social media, email, or purchasing. Use at your own risk. We assume no liability whatsoever for broken pages.


Alternative Proxies:

Alternative Proxy

pFad Proxy

pFad v3 Proxy

pFad v4 Proxy