diff options
| author | priyanka | 2015-06-24 15:03:17 +0530 |
|---|---|---|
| committer | priyanka | 2015-06-24 15:03:17 +0530 |
| commit | b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b (patch) | |
| tree | ab291cffc65280e58ac82470ba63fbcca7805165 /1100/CH16 | |
| download | Scilab-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')
| -rwxr-xr-x | 1100/CH16/EX16.1/16_1.sce | 19 | ||||
| -rwxr-xr-x | 1100/CH16/EX16.2/16_2.sce | 27 | ||||
| -rwxr-xr-x | 1100/CH16/EX16.3/16_3.sce | 27 |
3 files changed, 73 insertions, 0 deletions
diff --git a/1100/CH16/EX16.1/16_1.sce b/1100/CH16/EX16.1/16_1.sce new file mode 100755 index 000000000..c31630a22 --- /dev/null +++ b/1100/CH16/EX16.1/16_1.sce @@ -0,0 +1,19 @@ +clc
+//initialisation of variables
+h1=1279.1 //Btu/lb
+s1=1.7085 //Btu/lb R
+p1= 100 //psia
+p2=10 //psia
+h2=1091.7 //Btu/lb
+s2=s1
+V1=100 //fps
+v2=36.41 //cu ft/lb
+w=1 //lb/sec
+//Calculations
+a2=w*v2/(sqrt(V1*V1 + 2*24956.243*(h1-h2)))
+printf ('Exit area = %.5f sq. ft',a2)
+pt=0.55*p1
+ht=1221.5 //Btu/lb
+vt=8.841 //cu ft/lb
+at=w*vt/(sqrt(V1*V1 + 2*24956.243*(h1-ht)))
+printf ('\n Exit area in case 2 = %.5f sq. ft',at)
diff --git a/1100/CH16/EX16.2/16_2.sce b/1100/CH16/EX16.2/16_2.sce new file mode 100755 index 000000000..312b87ddd --- /dev/null +++ b/1100/CH16/EX16.2/16_2.sce @@ -0,0 +1,27 @@ +clc
+//initialisation of variables
+w=10000 //lb/hr
+p0=250 //psia
+T1=500 //F
+Pf=1 //psia
+vc=0.949
+dc=1
+h0=1263.4 //btu/lb
+s0=1.5949 //btu/lb R
+v2=276 //cu ft/lb
+//Calculations
+pt=0.55*p0
+disp('from tables')
+hts=1208.2 //btu/lb
+vts=3.415 //cu ft/lb
+h2s=891. //btu/lb
+Vts=sqrt(2*32.174*778*(h0-hts))
+w=w/3600 //lb/sec
+cw=1
+at=w*vts/(cw*Vts)
+printf ('Throat area = %.5f ft^2',at)
+V2=sqrt(2*32.174*778*(h0-h2s))
+eta=0.9
+h2=h0-eta*(h0-h2s)
+a2s=w*v2/(cw*V2)
+printf ('\n Exit area = %.5f ft^2',a2s)
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)
|