summaryrefslogtreecommitdiff
path: root/3843/CH9/EX9.2
diff options
context:
space:
mode:
authorprashantsinalkar2017-10-10 12:27:19 +0530
committerprashantsinalkar2017-10-10 12:27:19 +0530
commit7f60ea012dd2524dae921a2a35adbf7ef21f2bb6 (patch)
treedbb9e3ddb5fc829e7c5c7e6be99b2c4ba356132c /3843/CH9/EX9.2
parentb1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b (diff)
downloadScilab-TBC-Uploads-7f60ea012dd2524dae921a2a35adbf7ef21f2bb6.tar.gz
Scilab-TBC-Uploads-7f60ea012dd2524dae921a2a35adbf7ef21f2bb6.tar.bz2
Scilab-TBC-Uploads-7f60ea012dd2524dae921a2a35adbf7ef21f2bb6.zip
initial commit / add all books
Diffstat (limited to '3843/CH9/EX9.2')
-rw-r--r--3843/CH9/EX9.2/Ex9_2.sce22
1 files changed, 22 insertions, 0 deletions
diff --git a/3843/CH9/EX9.2/Ex9_2.sce b/3843/CH9/EX9.2/Ex9_2.sce
new file mode 100644
index 000000000..7dd0ad003
--- /dev/null
+++ b/3843/CH9/EX9.2/Ex9_2.sce
@@ -0,0 +1,22 @@
+// Example 9_2
+clc;funcprot(0);
+// Given data
+m=20;// The mass flow rate of air in kg/min
+P_4=1600;// kPa
+T_1=20+273;// K
+P_1=100;// kPa
+n=0.90;// The efficiency of the compressor
+c_p=1.00;// kJ/kg.K
+k=1.4;// The specific heat ratio
+
+// Calculation
+P_2=sqrt(P_1*P_4);// kPa
+T_3=T_1;// K
+T_2a=T_1*(P_2/P_1)^((k-1)/k);// K
+// Assume T_2'=T_2a
+// P_4/P_3=P_2/P_1
+T_4a=T_3*(P_2/P_1)^((k-1)/k);// K
+T_2=T_1+((1/n)*(T_2a-T_1));// K
+T_4=T_2;// K
+W_comp=((m/60)*c_p*(T_2-T_1))+((m/60)*c_p*(T_4-T_3));// The required power in kW
+printf("\nThe power required to drive the two-stage adiabatic compressor,W_comp=%3.0f kW",W_comp);