blob: c1cc4c14a00791f9d727be44431433b927817675 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
|
//Chapter-4, Illustration 26, Page 221
//Title: Steam Nozzles and Steam Turbines
//=============================================================================
clc
clear
//INPUT DATA
a1=30;//Nozzle angle in degrees
Ca=180;//Axial velocity in m/s
U=280;//Rotor blade speed in m/s
R=0.5;//Degree of reaction
//CALCULATIONS
a1n=90-a1;//Nozzle angle measured from axial direction in degrees
Cx1=Ca*tand(a1n);//Whirl velocity in m/s
b1=atand((Cx1-U)/Ca);//Blade angle at inlet in degrees
b2=a1n;//Blade angle at exit in degrees
//OUTPUT
mprintf('Blade angle at inlet is %3.0f degrees \n Blade angle at exit is %3.0f degrees',b1,b2)
//==============================END OF PROGRAM=================================
|