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 /1460/CH9 | |
| 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 '1460/CH9')
| -rwxr-xr-x | 1460/CH9/EX9.1/9_1.sce | 23 | ||||
| -rwxr-xr-x | 1460/CH9/EX9.2/9_2.sce | 26 | ||||
| -rwxr-xr-x | 1460/CH9/EX9.3/9_3.sce | 21 | ||||
| -rwxr-xr-x | 1460/CH9/EX9.4/9_4.sce | 18 |
4 files changed, 88 insertions, 0 deletions
diff --git a/1460/CH9/EX9.1/9_1.sce b/1460/CH9/EX9.1/9_1.sce new file mode 100755 index 000000000..b7aa15932 --- /dev/null +++ b/1460/CH9/EX9.1/9_1.sce @@ -0,0 +1,23 @@ +clc
+//initialization of variables
+P=500 //lb/in^2
+T=800+460 //R
+Pf=1 //lb/in^2
+//calculations
+disp("From table 4 of appendix,")
+ht1=69.7
+vt1=0.01614
+W=vt1*(P-Pf)*144
+ht2=W/778 +ht1
+ht3=1412.1
+s3=1.6571
+ht4=925.8
+WbyJ=ht3-ht4
+W3=778*WbyJ
+dW=W3-W
+eta=1-((ht4-ht1)/(ht3-ht2))
+//results
+printf("Neglecting pump work, Work = %d ft-lb/lbm",W3)
+printf("\n Considering pump work, Work = %d ft-lb/lbm",dW)
+printf("\n Considering pump work, Thermal efficiency = %.3f ",eta-0.001)
+printf("\n Neglecting pump work, Thermal efficiency = 0.362")
diff --git a/1460/CH9/EX9.2/9_2.sce b/1460/CH9/EX9.2/9_2.sce new file mode 100755 index 000000000..3bc975306 --- /dev/null +++ b/1460/CH9/EX9.2/9_2.sce @@ -0,0 +1,26 @@ +clc
+//initialization of variables
+P1=400 //lb/in^2
+T1=800+460 //R
+Pt1=1 //lb/in^2
+T2=95+460 //R
+Pt2=500 //lb/in^2
+es=0.8
+ep=0.75
+et=0.8
+//calculations
+disp("From Appendix steam tables and mollier chart")
+ht1=62.98
+ht3=1416.4
+ht4s=941.1
+vt1=0.0161
+WbyJ=vt1*(Pt2-Pt1)/(ep*778)
+ht2=WbyJ+ht1
+Q=(ht3-ht2)/et
+WtbyJ=et*(ht3-ht4s)
+dW=778*(WtbyJ-WbyJ)
+eta=WtbyJ/Q
+//results
+printf("Thermal efficiency = %.3f",eta)
+printf("\n Specific net work = %d B/lbm",dW)
+//The answers in the textbook are a bit different due tot rounding off error
diff --git a/1460/CH9/EX9.3/9_3.sce b/1460/CH9/EX9.3/9_3.sce new file mode 100755 index 000000000..92a24ff27 --- /dev/null +++ b/1460/CH9/EX9.3/9_3.sce @@ -0,0 +1,21 @@ +clc
+//initialization of variables
+P1=500 //lb/in^2
+T1=800 //F
+//calculations
+disp("From steam tables,")
+ht1=69.7
+ht3=1412.1
+s3=1.6571
+ht4=1175
+Pt4=53
+ht5=1430
+s5=1.917
+ht6=1070
+X6=0.966
+Wsum=778*(ht3-ht4+ht5-ht6)
+Qsum=ht3-ht1+ht5-ht4
+eta=Wsum/(778*Qsum)
+//results
+printf("Specific work = %d ft-lb/lbm",Wsum)
+printf("\n Thermal efficiency = %.3f ",eta)
diff --git a/1460/CH9/EX9.4/9_4.sce b/1460/CH9/EX9.4/9_4.sce new file mode 100755 index 000000000..62bdf7e79 --- /dev/null +++ b/1460/CH9/EX9.4/9_4.sce @@ -0,0 +1,18 @@ +clc
+//initialization of variables
+disp("From steam tables")
+ht1=218.12
+ht3=1412.1
+st3=1.6571
+ht4=1134.6
+ht5=925.8
+ht6=69.7
+//calculations
+w=(ht1-ht6)/(ht4-ht6)
+WbyJ=ht3-ht4+(1-w)*(ht4-ht5)
+W=778*WbyJ
+Q=ht3-ht1
+eta=WbyJ/Q
+//results
+printf("Specific work = %d ft-lb/lbm",W)
+printf("\n Efficiency = %.3f",eta)
|