initial commit / add all books

1 files changed, 31 insertions, 0 deletions

diff --git a/32/CH13/EX13.01/13_01.sce b/32/CH13/EX13.01/13_01.sce
new file mode 100755
index 000000000..df39554db
--- /dev/null
+++ b/32/CH13/EX13.01/13_01.sce
@@ -0,0 +1,31 @@
+//pathname=get_absolute_file_path('13.01.sce')

+//filename=pathname+filesep()+'13.01-data.sci'

+//exec(filename)

+//Pressure of dry steam(in bar):

+p1=10

+//Velocity of steam entering(in m/s):

+C1=100

+//Velocity of steam leaving the nozzle(in m/s):

+C2=300

+//Pressure of steam at exit(in bar):

+p2=5

+//Mass flow rate(in kg/s):

+m=16

+//Heat loss to surroundings(in kJ/kg):

+q=10

+//From steam tables:

+h1=2778.1 //kJ/kg

+hf=640.23 //kJ/kg

+hfg=2108.5 //kJ/kg

+//Heat drop in the nozzle(in kJ/kg):

+dh=(q*10^3+(C1^2-C2^2)/2)/1000

+//Total heat drop(in kJ/s):

+dQ=-dh*m

+//Enthalpy at state 2(in kJ/kg):

+h2=h1+dh

+//Dryness fraction at state 2:

+x2=(h2-hf)/hfg

+printf("\nRESULT\n")

+printf("\nHeat drop in the nozzle = %f kJ/kg",-dh)

+printf("\nTotal heat drop = %f kJ/s",dQ)

+printf("\nDryness fraction at exit = %f",x2)
\ No newline at end of file