summaryrefslogtreecommitdiff
path: root/2015/CH9/EX9.17
diff options
context:
space:
mode:
authorpriyanka2015-06-24 15:03:17 +0530
committerpriyanka2015-06-24 15:03:17 +0530
commitb1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b (patch)
treeab291cffc65280e58ac82470ba63fbcca7805165 /2015/CH9/EX9.17
downloadScilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.tar.gz
Scilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.tar.bz2
Scilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.zip
initial commit / add all books
Diffstat (limited to '2015/CH9/EX9.17')
-rwxr-xr-x2015/CH9/EX9.17/9_17.sce24
1 files changed, 24 insertions, 0 deletions
diff --git a/2015/CH9/EX9.17/9_17.sce b/2015/CH9/EX9.17/9_17.sce
new file mode 100755
index 000000000..097441e0e
--- /dev/null
+++ b/2015/CH9/EX9.17/9_17.sce
@@ -0,0 +1,24 @@
+
+clc
+//initialisation of variables
+p2=6 //prressure in bar
+p1=1 //pressure in bar
+t1=313 //temp in k
+a1=45 //angle in degrees
+a2=10 //angle in degrees
+a3=55 //angle in degrees
+r=1.4
+cp=1.005 //kj/kg
+ieff=0.85 //isentropic efficiency
+c=200 //m/s
+//CALCULATIONS
+t2s=(t1*(p2/p1)^((r-1)/r))
+t2=(((t2s-t1)/ieff)+t1)
+w=cp*(t2-t1)
+cro=(c*(sin(45*(%pi/180))/sin(55*(%pi/180))))
+cv=c-cro
+n=w/cv
+//RESULTS
+printf('actual work is %2fkj/kg',w)
+printf('\nchange in whirl velocities is %2fkj/kg/stage',cv)
+printf('\nnumber of stages is %2fstages',n)