summaryrefslogtreecommitdiff
path: root/3511/CH8/EX8.1/Ex8_1.sce
diff options
context:
space:
mode:
Diffstat (limited to '3511/CH8/EX8.1/Ex8_1.sce')
-rw-r--r--3511/CH8/EX8.1/Ex8_1.sce17
1 files changed, 17 insertions, 0 deletions
diff --git a/3511/CH8/EX8.1/Ex8_1.sce b/3511/CH8/EX8.1/Ex8_1.sce
new file mode 100644
index 000000000..1daf6307a
--- /dev/null
+++ b/3511/CH8/EX8.1/Ex8_1.sce
@@ -0,0 +1,17 @@
+clc;
+N=11500; // Speed in rpm
+T01=21+273; // Inlet total temperature in kelvin
+p01=1;// Inlet total pressure in bar
+p02=4;// Outlet total pressure in bar
+D=0.75; // impeller diameter in m
+mu=0.92;// slip factor
+Cp=1.005; // specific heat at constant pressure in kJ/kg K
+r=1.4; // Specific heat ratio
+
+u=3.14*D*N/60;
+W=mu*u^2;
+T02=W/(Cp*10^3)+T01;
+T_02=T01*(p02/p01)^((r-1)/r);
+eff_c=(T_02-T01)/(T02-T01);
+
+disp ("%",eff_c*100,"Efficiency of the compressor = ");