summaryrefslogtreecommitdiff
path: root/3685/CH11/EX11.10
diff options
context:
space:
mode:
Diffstat (limited to '3685/CH11/EX11.10')
-rw-r--r--3685/CH11/EX11.10/Ex11_10.sce20
-rw-r--r--3685/CH11/EX11.10/Ex11_10.txt4
2 files changed, 24 insertions, 0 deletions
diff --git a/3685/CH11/EX11.10/Ex11_10.sce b/3685/CH11/EX11.10/Ex11_10.sce
new file mode 100644
index 000000000..92f235c04
--- /dev/null
+++ b/3685/CH11/EX11.10/Ex11_10.sce
@@ -0,0 +1,20 @@
+clc
+R = 0.082 // Gas constant in litre-atm/gmol-K
+m = 1.5 // Mass flow rate in kg/s
+p1 = 1 // Pressure in atm
+t2 = 300 // Temperature after compression in K
+p2 = 400 // Pressure after compression in atm
+Tc = 151 // For Argon in K
+pc = 48 // For Argon in atm
+printf("\n Example 11.10 ")
+a = 0.42748*((R*1000)^2)*((Tc)^2)/pc
+b = 0.08664*(R*1000)*(Tc)/pc
+// By solving equation v2^2 - 49.24*v2^2 + 335.6*v2 - 43440 = 0
+v2 = 56.8 // In cm^3/g mol
+v1 = (R*1000)*(t2)/p1
+delta_h = -1790 // In J/g mol
+delta_s = -57 // In J/g mol
+Q = (t2*delta_s*(10^5)/39.8)/(3600*1000)
+W = Q - (delta_h*(10^5)/39.8)/(3600*1000)
+printf("\n Power required to run the compressor = %f kW, \n The rate at which heat must be removed from the compressor = %f kW",W,Q)
+// Answers vary due to round off error.
diff --git a/3685/CH11/EX11.10/Ex11_10.txt b/3685/CH11/EX11.10/Ex11_10.txt
new file mode 100644
index 000000000..faf4bc622
--- /dev/null
+++ b/3685/CH11/EX11.10/Ex11_10.txt
@@ -0,0 +1,4 @@
+
+ Example 11.10
+ Power required to run the compressor = -10.685371 kW,
+ The rate at which heat must be removed from the compressor = -11.934673 kW \ No newline at end of file