diff options
Diffstat (limited to '1484/CH9')
| -rwxr-xr-x | 1484/CH9/EX9.1/9_1.sce | 15 | ||||
| -rwxr-xr-x | 1484/CH9/EX9.2/9_2.sce | 12 | ||||
| -rwxr-xr-x | 1484/CH9/EX9.3/9_3.sce | 17 | ||||
| -rwxr-xr-x | 1484/CH9/EX9.4/9_4.sce | 14 | ||||
| -rwxr-xr-x | 1484/CH9/EX9.5/9_5.sce | 11 |
5 files changed, 69 insertions, 0 deletions
diff --git a/1484/CH9/EX9.1/9_1.sce b/1484/CH9/EX9.1/9_1.sce new file mode 100755 index 000000000..6b5eb4ac2 --- /dev/null +++ b/1484/CH9/EX9.1/9_1.sce @@ -0,0 +1,15 @@ +clc
+//initialisation of variables
+sg= 0.7
+v= 0.05 //poise
+g= 32.2 //ft/sec^2
+w= 62.4 //lbs/ft^3
+//CALCULATIONS
+u= v*30.5/(g*453.6)
+v1= v/sg
+d= w*v1/g
+v= u/d
+//RESULTS
+printf ('viscocity= %.6f slug/t sec ',u)
+printf ('\n kinematic viscocity= %.4f cm^2/ sec ',v1)
+printf ('\n kinematic viscocity= %.6f ft^2/ sec ',v)
diff --git a/1484/CH9/EX9.2/9_2.sce b/1484/CH9/EX9.2/9_2.sce new file mode 100755 index 000000000..210673c40 --- /dev/null +++ b/1484/CH9/EX9.2/9_2.sce @@ -0,0 +1,12 @@ +clc
+//initialisation of variables
+d= 0.5 //in
+V= 1 //ft/sec
+l= 200 //ft
+T= 5 //degrees
+g= 32.2 //f/sec^2
+//CALCULATIONS
+i= 0.04*V^2*12*4/(g*d)
+gf= i*l
+//RESULTS
+printf ('loss of head= %.1f ft ',gf)
diff --git a/1484/CH9/EX9.3/9_3.sce b/1484/CH9/EX9.3/9_3.sce new file mode 100755 index 000000000..2389f9ea9 --- /dev/null +++ b/1484/CH9/EX9.3/9_3.sce @@ -0,0 +1,17 @@ +
+clc
+//initialisation of variables
+g= 32.2 //ft/sec^2
+T= 25 //C
+dp=8 //lbs/in^2
+t= 0.005 //in
+w= 3 //in
+l= 1 //ft
+//CALCULATIONS
+ut= (0.0179*30.5/(g*453.6))/(1+0.03368*T+0.000221*T^2)
+Ql= dp*144*(t/12)^3*3600*6.24/(12*ut*4)
+//RESULTS
+printf ('Discharge= %.6f gallons per hour ',Ql)
+
+
+//ANSWER GIVEN IN THE TEXTBOOK IS WRONG
diff --git a/1484/CH9/EX9.4/9_4.sce b/1484/CH9/EX9.4/9_4.sce new file mode 100755 index 000000000..d9bc713f5 --- /dev/null +++ b/1484/CH9/EX9.4/9_4.sce @@ -0,0 +1,14 @@ +clc
+//initialisation of variables
+v= 1.25 //poise
+d= 3 //in
+l= 6 //in
+t= 0.002 //in
+w= 40 //R.P.M
+g= 32.2 //ft/sec^2
+//CALCULATIONS
+u= v*30.5/(453.6*g)
+T= u*%pi^2*(d/12)^3*w*(l/12)/(120*t/12)
+hp= T*2*%pi*w/33000
+//RESULTS
+printf ('Horse-power lost in velocit= %.4f ',hp)
diff --git a/1484/CH9/EX9.5/9_5.sce b/1484/CH9/EX9.5/9_5.sce new file mode 100755 index 000000000..bbaedcc5f --- /dev/null +++ b/1484/CH9/EX9.5/9_5.sce @@ -0,0 +1,11 @@ +clc
+//initialisation of variables
+w= 750 //R.P.M
+t= 0.02 //in
+r1=9 //in
+r2= 5 //in
+u= 0.003 //slug/ft sec
+//CALCULATIONS
+T= u*%pi*(2*%pi*w/60)*((r1/24)^4-(r2/24)^4)*2*%pi*w/(2*t/12*33000)
+//RESULTS
+printf ('horse power required to overcome= %.1f hp',T)
|