diff options
author | priyanka | 2015-06-24 15:03:17 +0530 |
---|---|---|
committer | priyanka | 2015-06-24 15:03:17 +0530 |
commit | b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b (patch) | |
tree | ab291cffc65280e58ac82470ba63fbcca7805165 /611/CH8/EX8.5/Chap8_Ex5_R1.sce | |
download | Scilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.tar.gz Scilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.tar.bz2 Scilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.zip |
initial commit / add all books
Diffstat (limited to '611/CH8/EX8.5/Chap8_Ex5_R1.sce')
-rwxr-xr-x | 611/CH8/EX8.5/Chap8_Ex5_R1.sce | 26 |
1 files changed, 26 insertions, 0 deletions
diff --git a/611/CH8/EX8.5/Chap8_Ex5_R1.sce b/611/CH8/EX8.5/Chap8_Ex5_R1.sce new file mode 100755 index 000000000..eb10b789c --- /dev/null +++ b/611/CH8/EX8.5/Chap8_Ex5_R1.sce @@ -0,0 +1,26 @@ +// Y.V.C.Rao ,1997.Chemical Engineering Thermodynamics.Universities Press,Hyderabad,India.
+
+//Chapter-8,Example 5,Page 281
+//Title: Enthalpy and entropy departure using the generalized Redlich-Kwong equation of state
+//================================================================================================================
+clear
+clc
+
+//INPUT
+T=427.85;//temperature of n-octane vapour in K
+P=0.215;//pressure of n-octane vapour in MPa
+a=4.426;//Redlich-Kwong constant taken from Example(3.9) in (m^6 Pa mol^-2)
+b=164.3*10^-6;//Redlich-Kwong constant taken from Example(3.9) in m^3/mol
+Z=0.9308;//compressibility factor taken from Example(3.9) (no unit)
+B=9.9306*10^-3;//value of B, used in the Cardan's method in Example (3.9)
+R=8.314;//universal gas constant in J/molK
+
+//CALCULATION
+dep_h=(R*T*(Z-1))-(((3*a)/(2*b))*log ((Z+B)/Z));//calculation of the enthalpy departure using Eq.(8.39) in J/mol
+dep_s=(R*log(Z-B))-((a/(2*b*T))*log((Z+B)/Z));//calculation of the entropy departure using Eq.(8.40) in J/molK
+
+//OUTPUT
+mprintf("\n The enthalpy departure for n-octane vapour using the generalized Redlich-Kwong equation of state = %0.2f J/mol\n",dep_h);
+mprintf("\n The entropy departure for n-octane vapour using the generalized Redlich-Kwong equation of state = %0.4f J/mol K\n",dep_s);
+
+//===============================================END OF PROGRAM===================================================
|