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 /2420/CH10 | |
| 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 '2420/CH10')
| -rwxr-xr-x | 2420/CH10/EX10.1/10_1.sce | 19 | ||||
| -rwxr-xr-x | 2420/CH10/EX10.2/10_2.sce | 19 | ||||
| -rwxr-xr-x | 2420/CH10/EX10.3/10_3.sce | 29 | ||||
| -rwxr-xr-x | 2420/CH10/EX10.4/10_4.sce | 21 | ||||
| -rwxr-xr-x | 2420/CH10/EX10.5/10_5.sce | 16 | ||||
| -rwxr-xr-x | 2420/CH10/EX10.6/10_6.sce | 19 | ||||
| -rwxr-xr-x | 2420/CH10/EX10.7/10_7.sce | 23 |
7 files changed, 146 insertions, 0 deletions
diff --git a/2420/CH10/EX10.1/10_1.sce b/2420/CH10/EX10.1/10_1.sce new file mode 100755 index 000000000..bdcc40cf7 --- /dev/null +++ b/2420/CH10/EX10.1/10_1.sce @@ -0,0 +1,19 @@ +clc
+clear
+//Initialization of variables
+hb=29 //in of Hg
+sg=0.491
+Ra=53.3
+Ta=460+40 //R
+Tg=540+460 //R
+H=300 //ft
+gam=62.4 //lb/cu ft
+//calculations
+pb=hb*sg*144
+rhoa=pb/(Ra*Ta)
+rhog=pb/(Ra*Tg)
+dp=H*(rhoa-rhog)
+D=dp/(gam)
+//results
+printf("Theoretical draft = %.1f psf",dp)
+printf("\n Draft = %.2f ft H2O",D)
diff --git a/2420/CH10/EX10.2/10_2.sce b/2420/CH10/EX10.2/10_2.sce new file mode 100755 index 000000000..c587167e2 --- /dev/null +++ b/2420/CH10/EX10.2/10_2.sce @@ -0,0 +1,19 @@ +clc
+clear
+//Initialization of variables
+md=15 //lb per lb of coal
+x=0.1
+mss=1 //basis
+rea=29 //in of Hg
+sg=0.491
+R=53.3
+T=540+460 //R
+V=25 //fps
+gam=0.038 //lb/ft^3
+//calculations
+m=mss-mss*x+md
+ms=m
+rhog=rea*0.491*144/(R*T)
+A=ms/(gam*V)
+//results
+printf("stack area = %.1f sq ft",A)
diff --git a/2420/CH10/EX10.3/10_3.sce b/2420/CH10/EX10.3/10_3.sce new file mode 100755 index 000000000..6ef3af8b3 --- /dev/null +++ b/2420/CH10/EX10.3/10_3.sce @@ -0,0 +1,29 @@ +clc
+clear
+//Initialization of variables
+p=144*29*0.491 //psf
+R=53.3
+T=70+460 //R
+gamw=62.4 //lb/ft^3
+gama=0.073 //lb/ft^3
+hw=3/12 //ft
+hw2=3.5/12 //ft
+hv=32.2 //ft/s^2
+ms=9 //lb
+g=32.2 //ft/s^2
+//calculations
+rhoa=p/(R*T)
+hs=hw*gamw/gama
+ht=hw2*gamw/gama
+hv=ht-hs
+V=sqrt(2*g*hv)
+msv=ms*V*60
+mm=msv*gama
+airhp= ht*mm/33000
+//results
+printf("Velocity head = %d ft of air",hv)
+printf("\n velocity of air in the duct = %.1f fps",V)
+printf("\n volume = %d cu ft per min",msv)
+printf("\n Mass flow rate = %d lb/min",mm)
+printf("\n Air hp = %.1f hp",airhp)
+disp("The answers in the textbook are a bit different due to rounding off error in the textbook. Please use a calculator")
diff --git a/2420/CH10/EX10.4/10_4.sce b/2420/CH10/EX10.4/10_4.sce new file mode 100755 index 000000000..4bde89f0d --- /dev/null +++ b/2420/CH10/EX10.4/10_4.sce @@ -0,0 +1,21 @@ +clc
+clear
+//Initialization of variables
+A2=9 //sq ft
+p2=3/12 *62.4 //psf
+p1=-1/12 *62.4 //psf
+ms=20000 //cfm
+A1=16 //sq ft
+gam=0.075 //lb/ft^3
+g=32.2 //ft/s^2
+inp=17 //hp
+//calculations
+V2=ms/60 *1/A2
+V1=ms/60 *1/A1
+ht=(p2-p1)/gam +(V2^2 -V1^2)/(2*g)
+airhp=ht*ms*gam/33000
+eta=airhp/inp *100
+//results
+printf("Total head = %.1f ft of air",ht)
+printf("\n Air hp = %.1f hp",airhp)
+printf("\n Effifciency = %.1f percent",eta)
diff --git a/2420/CH10/EX10.5/10_5.sce b/2420/CH10/EX10.5/10_5.sce new file mode 100755 index 000000000..c3c45705e --- /dev/null +++ b/2420/CH10/EX10.5/10_5.sce @@ -0,0 +1,16 @@ +clc
+clear
+//Initialization of variables
+n1=400 //rpm
+mv1=10000 //lb
+mv2=15000 //lb
+h1=2 //in of water
+hp1=4 //hp
+//calculations
+n2=mv2/mv1 *n1
+h2=h1*(n2/n1)^2
+hp2=hp1 *(n2/n1)^3
+//results
+printf("The speed = %d rpm",n2)
+printf("\n The pressure = %.1f in of water",h2)
+printf("\n Power = %.1f hp",hp2)
diff --git a/2420/CH10/EX10.6/10_6.sce b/2420/CH10/EX10.6/10_6.sce new file mode 100755 index 000000000..be7d9a72f --- /dev/null +++ b/2420/CH10/EX10.6/10_6.sce @@ -0,0 +1,19 @@ +clc
+clear
+//Initialization of variables
+m=100000 //lb/hr
+p1=1 //psia
+x=0.8
+p2=14.7 //psia
+t2=300 //F
+//calculations
+disp("from table A3 and A2")
+h2=1192.8 //Btu/lb
+hf=69.7 //Btu/lb
+hfg=1036.3 //Btu/lb
+h1=hf+x*hfg
+W=h2-h1
+power=m*W
+hp=power/2545
+//results
+printf("Power required = %d hp",hp)
diff --git a/2420/CH10/EX10.7/10_7.sce b/2420/CH10/EX10.7/10_7.sce new file mode 100755 index 000000000..ec8cf7ff8 --- /dev/null +++ b/2420/CH10/EX10.7/10_7.sce @@ -0,0 +1,23 @@ +clc
+clear
+//Initialization of variables
+p1=14.7 //psia
+t1=60 //F
+p2=60 //psia
+t2=440 //F
+m=10 //lb/sec
+//calculations
+disp("From mollier charts,")
+h2=216.3 //Btu/lb
+h1=124.3 //Btu/lb
+W21=h2-h1
+power=W21*m
+hp=power*3600/2545
+cp=0.237
+W212=cp*(t2-t1)
+power2=W212*m
+hp2=power2*3600/2545
+//results
+printf("Power required = %d hp",hp)
+printf("\n Power required = %d hp",hp2)
+printf("\n Work done = %.1f Btu/lb",W212)
|