initial commit / add all books

1 files changed, 38 insertions, 0 deletions

diff --git a/1775/CH4/EX4.18/Chapter4_Example18.sce b/1775/CH4/EX4.18/Chapter4_Example18.sce
new file mode 100755
index 000000000..8414b2e2f
--- /dev/null
+++ b/1775/CH4/EX4.18/Chapter4_Example18.sce
@@ -0,0 +1,38 @@
+//Chapter-4, Illustration 18, Page 207

+//Title: Steam Nozzles and Steam Turbines

+//=============================================================================

+clc

+clear

+

+//INPUT DATA

+U=150;//Blade speed in m/s

+m=3;//Mass flow rate of steam in kg/s

+P=10.5;//Pressure in bar

+r=0.21;//Ratio blade velocity to steam velocity

+a1=16;//Nozzle angle in first stage in degrees

+b2=20;//Blade angle at exit in first stage in degrees

+a3=24;//Nozzle angle in second stage in degrees

+b4=32;//Blade angle at exit in second stage in degrees

+Wr=0.79;//Blade friction factor for first stage

+Wr2=0.88;//Blade friction factor for second stage

+Cr=0.83;//Blade velocity coefficient

+W1=570;//Relative velocity at inlet from the velocity triangle for first stage in m/s

+C2=375;//Velocity in m/s

+W3=185;//Relative velocity at inlet from the velocity triangle for second stage in m/s

+

+//CALCULATIONS

+C1=U/r;//Steam speed at exit in m/s

+W2=Wr*W1;//Relative velocity at outlet for first stage in m/s

+C3=Cr*C2;//Steam velocity at inlet for second stage in m/s

+W4=Wr2*W3;//Relative velocity at exit for second stage in m/s

+DW1=W1+W2;//Change in relative velocity for first stage in m/s

+DW2=275;//Change in relative velocity from the velocity triangle for second stage in m/s

+ndia=((2*U*(DW1+DW2))/(C1^2))*100;//Diagram efficiency

+

+//OUTPUT

+mprintf('Diagram efficiency is %3.1f percent',ndia)

+

+

+

+

+//==============================END OF PROGRAM=================================