Featured Articles

Check out the latest featured articles.

New Article

Product Viscosity vs. Shear

Featured File

Vertical Tank Selection

New Blog Entry

Low Flow in Pipes- posted in Ankur's blog

0

Update To Pr1978 Eos - Thermo Workbook

thermo peng-robinson thermodynamics multi-component compressor power

No replies to this topic
|

#1 steve.calderone

steve.calderone

Brand New Member

• ChE Plus Subscriber
• 3 posts

Posted 07 November 2017 - 03:20 AM

Hello All -

Attached find an update to the workbook I originally posted on July 24, 2017. The VBA code is open source and has been completely rewritten to make the multi-component PR1978 array calculations easy to follow. This code is available to the user for inspection and modification. User defined functions have been added for real gas Cp & Cv (including ideal gas and residual portions), Joule-Thompson coefficient and the speed of sound. A user defined function that returns the various partial derivatives of the equation of state has also been added.

Reproductions of figures 3, 4, 5 & 6 found in the original Peng-Robinson equation of state paper (reference found below) have been added to the workbook.

Example multi-component system problems have been work for:

- Rigorous single stage compressor power problem found here => http://www.jmcampbel...hortcut-method/

- Rigorous three stage compressor power with inter-stage cooling and condensate knock-out

- Constant enthalpy flash

- Joule-Thompson expansion

- Bubble temperature and dew temperature comparisons to Simulis, Hysys and experimental for the ethane-heptane system.

- A 5 tab detailed departure function example for enthalpy and entropy

-All references are provided

A partial list of user functions can be found below.

Thanks,

Steve Calderone

Partial function list:

BubbleT(named range or cell range reference of Dataset, pressure, moles,  binaries used, optional kij0,optional kijT, optional guess bubble point temperature, optional errMsgs as Boolean)

Cp(named range or cell range reference of Dataset, temperature, pressure, moles, phase, binaries used, optional kij0,optional kijT, optional errMsgs as Boolean)

Cv(named range or cell range reference of Dataset, temperature, pressure, moles, phase, binaries used, optional kij0,optional kijT, optional errMsgs as Boolean)

Derivatives(named range or cell range reference  of Dataset, temperature, pressure, moles,  binaries used, optional kij0,optional kijT, optional returnUnits as Boolean, optional errMsgs as Boolean)

DewT(named range or cell range reference of Dataset, pressure, moles,  binaries used, optional kij0,optional kijT, optional guess dew point temperature, optional errMsgs as Boolean)

Enthalpy(named range or cell range reference of Dataset, temperature, pressure, moles, phase, binaries used, optional kij0,optional kijT, optional errMsgs as Boolean)

Entropy(named range or cell range reference of Dataset, temperature, pressure, moles, phase, binaries used, optional kij0,optional kijT, optional errMsgs as Boolean)

FlashTP(named range or cell range reference of Dataset, temperature, pressure, moles, binaries used, optional kij0,optional kijT, optional errMsgs as Boolean)

Hf(named range or cell range reference of Dataset, optional errMsgs as Boolean)

HHV(named range or cell range reference of Dataset, optional errMsgs as Boolean)

Hvap1Bara(named range or cell range reference of Dataset, optional errMsgs as Boolean)

JT_Coeff(named range or cell range reference of Dataset, temperature, pressure, moles, phase, binaries used, optional kij0,optional kijT, optional errMsgs as Boolean)

LHV(named range or cell range reference of Dataset, optional errMsgs as Boolean)

PhasePhi(named range or cell range reference of Dataset, temperature, pressure, moles, phase, binaries used, optional kij0,optional kijT, optional errMsgs as Boolean)

PhaseZ(named range or cell range reference  of Dataset, temperature, pressure, moles, phase, binaries used, optional kij0,optional kijT, optional errMsgs as Boolean)

SpeedOfSound(named range or cell range reference of Dataset, temperature, pressure, moles, phase, binaries used, optional kij0,optional kijT, optional errMsgs as Boolean)

Equation of State reference:

Peng Robinson Equation of State
A New Two-Constant Equation of State
Ding-Yu Peng, Donald B. Robinson
Ind. Eng. Chem. Fundamen., 1976, 15 (1), pp 59–64
DOI: 10.1021/i160057a011
Publication Date: February 1976

Equation of State reference:

Peng Robinson Equation of State
A New Two-Constant Equation of State
Ding-Yu Peng, Donald B. Robinson
Ind. Eng. Chem. Fundamen., 1976, 15 (1), pp 59–64
DOI: 10.1021/i160057a011
Publication Date: February 1976