summaryrefslogtreecommitdiff
path: root/2066/CH9
diff options
context:
space:
mode:
authorpriyanka2015-06-24 15:03:17 +0530
committerpriyanka2015-06-24 15:03:17 +0530
commitb1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b (patch)
treeab291cffc65280e58ac82470ba63fbcca7805165 /2066/CH9
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 '2066/CH9')
-rwxr-xr-x2066/CH9/EX9.1.b/9_1b.sce23
-rwxr-xr-x2066/CH9/EX9.1/9_1a.sce18
-rwxr-xr-x2066/CH9/EX9.2.b/9_2b.sce19
-rwxr-xr-x2066/CH9/EX9.2.c/9_2c.sce19
-rwxr-xr-x2066/CH9/EX9.2/9_2.sce18
-rwxr-xr-x2066/CH9/EX9.3/9_3.sce17
-rwxr-xr-x2066/CH9/EX9.4/9_4.sce15
-rwxr-xr-x2066/CH9/EX9.5/9_5.sce18
-rwxr-xr-x2066/CH9/EX9.6/9_6.sce17
9 files changed, 164 insertions, 0 deletions
diff --git a/2066/CH9/EX9.1.b/9_1b.sce b/2066/CH9/EX9.1.b/9_1b.sce
new file mode 100755
index 000000000..f03845913
--- /dev/null
+++ b/2066/CH9/EX9.1.b/9_1b.sce
@@ -0,0 +1,23 @@
+clc
+clear
+//Initialization of variables
+x=36/12
+rho=2.45 //slugs/ft^3
+mu=9.2e-3 //lb-sec/ft^2
+v=3 //ft/s
+//calculatons
+Nr=v*x*rho/mu
+z=[4.91 5.48 4.65]
+x=36/12
+delta=z*x/sqrt(Nr)
+f=[0.332 0.365 0.322]
+T=f*mu*v/x *sqrt(Nr)
+//results
+disp("Boundary layer thickness = ")
+disp("In order of Blasius, parabola and pohlhauser")
+format('v',6);delta
+disp(delta)
+disp("Shearing stress = ")
+disp("In order of Blasius, parabola and pohlhauser")
+format('v',6);T
+disp(T)
diff --git a/2066/CH9/EX9.1/9_1a.sce b/2066/CH9/EX9.1/9_1a.sce
new file mode 100755
index 000000000..ac3110760
--- /dev/null
+++ b/2066/CH9/EX9.1/9_1a.sce
@@ -0,0 +1,18 @@
+clc
+clear
+//Initialization of variables
+rho=2.45 //slugs/ft^3
+mu=9.2e-3 //lb-sec/ft^2
+x=3
+v=3 //ft/s
+B=6/12 //ft
+L=36/12 //ft
+//calculatons
+Nr=v*x*rho/mu
+y=[1.32 1.46 1.328]
+Cd=y*Nr^(-0.5)
+Fd=2*Cd*B*L*(0.5*rho*v^2)
+//results
+disp("Drag on the plates using different formulae blasius, parabola and pohlhauser in order")
+format('v',6);Fd
+disp(Fd)
diff --git a/2066/CH9/EX9.2.b/9_2b.sce b/2066/CH9/EX9.2.b/9_2b.sce
new file mode 100755
index 000000000..53fd324b1
--- /dev/null
+++ b/2066/CH9/EX9.2.b/9_2b.sce
@@ -0,0 +1,19 @@
+clc
+clear
+//Initialization of variables
+e=0.01 //ft
+rho=2 //slugs/ft^3
+mu=2.6e-5 //lb sec/ft^2
+speed=10 //knots
+L=250 //ft
+A=30000 //ft^2
+//calculations
+V=speed*1.69
+Nrl=V*L*rho/mu
+Cdf=0.074/Nrl^0.2 -1700/Nrl
+Fd=Cdf*A*0.5*rho*V^2
+hp=Fd*V/550
+//results
+printf("Total frictional drag = %d lb",Fd)
+printf("\n Horsepower required = %.1f hp",hp)
+disp("The answer given in textbook is wrong. please use a calculator")
diff --git a/2066/CH9/EX9.2.c/9_2c.sce b/2066/CH9/EX9.2.c/9_2c.sce
new file mode 100755
index 000000000..8c7d0b1f0
--- /dev/null
+++ b/2066/CH9/EX9.2.c/9_2c.sce
@@ -0,0 +1,19 @@
+clc
+clear
+//Initialization of variables
+e=0.01 //ft
+rho=2 //slugs/ft^3
+mu=2.6e-5 //lb sec/ft^2
+speed=10 //knots
+L=250 //ft
+A=30000 //ft^2
+//calculations
+V=speed*1.69
+Nrl=V*L*rho/mu
+Cdf=1/(1.89 + 1.62*log10(L/e))^(2.5)
+Fd=Cdf*A*0.5*rho*V^2
+hp=Fd*V/550
+//results
+printf("Total frictional drag = %d lb",Fd)
+printf("\n Horsepower required = %.1f hp",hp)
+
diff --git a/2066/CH9/EX9.2/9_2.sce b/2066/CH9/EX9.2/9_2.sce
new file mode 100755
index 000000000..9bb2253b3
--- /dev/null
+++ b/2066/CH9/EX9.2/9_2.sce
@@ -0,0 +1,18 @@
+clc
+clear
+//Initialization of variables
+e=0.01 //ft
+rho=2 //slugs/ft^3
+mu=2.6e-5 //lb sec/ft^2
+speed=10 //knots
+L=250 //ft
+A=30000 //ft^2
+//calculations
+V=speed*1.69
+Nrl=V*L*rho/mu
+Cdf=1.32 /sqrt(Nrl)
+Fd=Cdf*A*0.5*rho*V^2
+hp=Fd*V/550
+//results
+printf("Total frictional drag = %d lb",Fd)
+printf("\n Horsepower required = %.1f hp",hp)
diff --git a/2066/CH9/EX9.3/9_3.sce b/2066/CH9/EX9.3/9_3.sce
new file mode 100755
index 000000000..9e3c9acaa
--- /dev/null
+++ b/2066/CH9/EX9.3/9_3.sce
@@ -0,0 +1,17 @@
+clc
+clear
+//Initialization of variables
+V=200 //ft/s
+L=5 //ft
+B=2 //ft
+rho=0.00232 //slug/ft^3
+mu=3.82e-7 //lb-sec/ft^2
+p2=14.815 //psia
+pa=14.7 //psia
+//calculations
+Nr=V*L*rho/mu
+Cdf=0.0032
+Fdf=Cdf*%pi*L*B*0.5*rho*V^2
+Fd=(p2-pa)*%pi/4 *(B*12)^2 -Fdf
+//results
+printf("Drag on the model = %.2f lb",Fd)
diff --git a/2066/CH9/EX9.4/9_4.sce b/2066/CH9/EX9.4/9_4.sce
new file mode 100755
index 000000000..602269289
--- /dev/null
+++ b/2066/CH9/EX9.4/9_4.sce
@@ -0,0 +1,15 @@
+clc
+clear
+//Initialization of variables
+p1=14.7 //psia
+z1=3 //ft
+gam=62.4
+rho=1.94 //slug/ft^3
+pa=0.4 //psia
+za=1 //ft
+//calculations
+v3=(pa-p1)*144 + (za-z1)*gam
+V=sqrt(-v3*2/(3*rho))
+//results
+printf("Velocity of flow = %.1f ft/s",V)
+disp("The answer is a bit different due to rounding off error in textbook")
diff --git a/2066/CH9/EX9.5/9_5.sce b/2066/CH9/EX9.5/9_5.sce
new file mode 100755
index 000000000..b156dd154
--- /dev/null
+++ b/2066/CH9/EX9.5/9_5.sce
@@ -0,0 +1,18 @@
+clc
+clear
+//Initialization of variables
+rpm=60
+rho=2 //slugs/ft^3
+mu=3.5e-5 //lb-sec/ft^2
+D=4/12 //ft
+r=2 //ft
+//calcualtions
+V=rpm*2*%pi/60 *2
+Nr=V*D*rho/mu
+Cd=1.1
+Fd=Cd*%pi/4 *(D)^2 *0.5*rho*V^2
+T=2*Fd*r
+w=rpm*2*%pi/60
+hp=T*w/550
+//results
+printf("Horsepower required = %.2f hp",hp)
diff --git a/2066/CH9/EX9.6/9_6.sce b/2066/CH9/EX9.6/9_6.sce
new file mode 100755
index 000000000..a0f475ce2
--- /dev/null
+++ b/2066/CH9/EX9.6/9_6.sce
@@ -0,0 +1,17 @@
+clc
+clear
+//Initialization of variables
+g=32.2 //ft/s^2
+h=60000 //ft
+F=2000 //;b
+d=3 //ft
+rho=0.00231
+//calculations
+V=sqrt(2*g*h)
+disp("By trail and error")
+Cd=0.25
+Nm=0.87
+A=%pi/4 *d^2
+Vt=sqrt(2*F/(Cd*A*rho))
+//results
+printf("terminal velocity = %.1f ft/s",Vt)