summaryrefslogtreecommitdiff
path: root/1100/CH16/EX16.3/16_3.sce
diff options
context:
space:
mode:
authorpriyanka2015-06-24 15:03:17 +0530
committerpriyanka2015-06-24 15:03:17 +0530
commitb1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b (patch)
treeab291cffc65280e58ac82470ba63fbcca7805165 /1100/CH16/EX16.3/16_3.sce
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 '1100/CH16/EX16.3/16_3.sce')
-rwxr-xr-x1100/CH16/EX16.3/16_3.sce27
1 files changed, 27 insertions, 0 deletions
diff --git a/1100/CH16/EX16.3/16_3.sce b/1100/CH16/EX16.3/16_3.sce
new file mode 100755
index 000000000..17edb5604
--- /dev/null
+++ b/1100/CH16/EX16.3/16_3.sce
@@ -0,0 +1,27 @@
+clc
+//initialisation of variables
+k=1.4
+ptbyp0=0.53
+T0=800 //R
+cp=778
+R=0.0425864
+P0=150 //psia
+Pt=15 //psia
+w=1 //lb/sec
+cw=1.0043782
+//Calculations
+Pt2=ptbyp0*Pt
+Tts=T0*(ptbyp0)^((k-1)/k)
+Vts=sqrt(2*32.174*cp*0.24*(T0-Tts))
+printf ('Exit velocity case 1= %.2f fps',Vts)
+vts=3.12 //cu ft/lb
+at=w*vts/(cw*Vts)
+printf ('\n Throat Area = %.5f ft^2', at)
+T2s=T0*(Pt/P0)^((k-1)/k)
+eta=0.88
+T2=T0-eta*(T0-T2s)
+V2=sqrt(2*32.174*cp*0.24*(T0-T2))
+printf ('\n Exit velocity = %.2f fps', V2)
+v2=11.4 //cu ft/lb
+a2=w*v2/V2
+printf('\n Exit area = %.5f ft^2',a2)