summaryrefslogtreecommitdiff
path: root/1955/CH5/EX5.11/example11.sce
diff options
context:
space:
mode:
Diffstat (limited to '1955/CH5/EX5.11/example11.sce')
-rwxr-xr-x1955/CH5/EX5.11/example11.sce22
1 files changed, 22 insertions, 0 deletions
diff --git a/1955/CH5/EX5.11/example11.sce b/1955/CH5/EX5.11/example11.sce
new file mode 100755
index 000000000..372e70b51
--- /dev/null
+++ b/1955/CH5/EX5.11/example11.sce
@@ -0,0 +1,22 @@
+clc
+clear
+//input data
+P0=800//Inlet pressure of hot gas in kPa
+T1=973//Inlet temperature of hot gas in K
+P2=100//Final pressure of hot gas in kPa
+a1=73//Nozzle angle in degree
+m=35//Mass flow rate in kg/s
+ns=0.9//Nozzle efficiency
+Cp=1.005//Specific heat of gas at constant pressure in kJ/kg.K
+r=1.4//Ratio of specific heats of air
+
+//calculations
+b1=atand(tand(a1)/2)//Inlet angle of the rotor blade in degree
+b2=b1//Outlet angle of the rotor blade in degree
+pi=2/tand(a1)//Flow coefficient
+psil=pi*(tand(b1)+tand(b2))//Blade loading coefficient
+dh=ns*Cp*T1*(1-(P2/P0)^((r-1)/r))//Change in enthalpy in kJ/kg
+W=m*dh*10^-3//Power developed in MW
+
+//output
+printf('(a)Rotor blade angles\n Inlet angle of the rotor blade is %3.2f degree\n Outlet angle of the rotor blade is %3.2f degree\n(b)Flow coefficient is %3.3f\n(c)Blade loading coefficient is %3.f\n(d)Power developed is %3.1f MW',b1,b2,pi,psil,W)