Specifications

3-36 Extension Reaction Kinetics
3-36
10. Select Make VinylAc.dll command from the File menu. The
Make Project property view appears.
11. Select the folder you want to save the VinylAc.dll file in, and
click the OK button.
rate = 0.1036 * Exp(-3674 /
RxnTemperatureinK) * OxygenPP * EthylenePP *
AceticAcidPP * (1 + 1.7 * WaterPP) / ((1 +
0.583 * OxygenPP * (1 + 1.7 * WaterPP)) * (1 +
6.8 * AceticAcidPP)) * hyBulkDens.Value *
1000
Calculate the reaction rate
1
. The rate is in
g mol AceticAcid consumed/min-g
catalyst. hyBulkDens.Value is
multiplied by 1000 to convert it to g
catalyst/m
3
reactor volume.
rate = rate / 1000 / 60
Since the units required by HYSYS are kg
mole/m
3
-s, divide by 1000 g mol/kg mol
and divide by 60 s/min.
ReactionRate = True
Tell HYSYS that the calculation worked as
expected.
ErrorTrap:
Line to which the On Error statement
branches if an error occurs.
End Function
Signifies the end of the function. This line
does not need to be added.
Code Explanation
Figure 3.8