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 /1187/CH6 | |
| 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 '1187/CH6')
| -rwxr-xr-x | 1187/CH6/EX6.1/1.sce | 28 | ||||
| -rwxr-xr-x | 1187/CH6/EX6.2/2.sce | 10 | ||||
| -rwxr-xr-x | 1187/CH6/EX6.3/3.sce | 21 | ||||
| -rwxr-xr-x | 1187/CH6/EX6.4/4.sce | 18 | ||||
| -rwxr-xr-x | 1187/CH6/EX6.5/5.sce | 32 | ||||
| -rwxr-xr-x | 1187/CH6/EX6.6/6.sce | 16 | ||||
| -rwxr-xr-x | 1187/CH6/EX6.7/7.sce | 22 |
7 files changed, 147 insertions, 0 deletions
diff --git a/1187/CH6/EX6.1/1.sce b/1187/CH6/EX6.1/1.sce new file mode 100755 index 000000000..44cb37305 --- /dev/null +++ b/1187/CH6/EX6.1/1.sce @@ -0,0 +1,28 @@ +clc
+
+RD=0.83;
+rho_w=1000; // density of water in kg/m^3
+v=2.3; // m/s
+d=0.012; // m
+u=0.08; // dynamic viscocity in kg/m/s
+
+rho_oil=RD*rho_w;
+
+Re=rho_oil*v*d/u;
+disp("(a) Reynolds number =")
+disp(Re)
+
+v_max=2*v;
+disp("(b)Maximum velocity =")
+disp(v_max)
+disp("m/s")
+
+Q=%pi/4*d^2*v;
+disp("(c)Volumetric flow rate =")
+disp(Q)
+disp("m^3/s")
+
+p=-128*Q*u/%pi/d^4;
+disp("Pressure gradient along the pipe = ")
+disp(p)
+disp("Pa/m")
\ No newline at end of file diff --git a/1187/CH6/EX6.2/2.sce b/1187/CH6/EX6.2/2.sce new file mode 100755 index 000000000..82cee4e55 --- /dev/null +++ b/1187/CH6/EX6.2/2.sce @@ -0,0 +1,10 @@ +clc
+c=0.001; // m
+p1=15*10^3; // Pa
+u=0.6; // kg/m/s
+R=6; // ratio of R2/R1
+
+Q=%pi*c^3*p1/(6*u*log(R));
+disp("(b)Rate at which oil must be supplied =")
+disp(Q)
+disp("m^3/s")
\ No newline at end of file diff --git a/1187/CH6/EX6.3/3.sce b/1187/CH6/EX6.3/3.sce new file mode 100755 index 000000000..674f7f06e --- /dev/null +++ b/1187/CH6/EX6.3/3.sce @@ -0,0 +1,21 @@ +clc
+
+F=6*10^3; // Pa
+b=0.12; // m
+
+f=F*b;
+
+disp("(a) The load the pad will support =")
+disp(f)
+disp("N/m")
+
+dp=12*10^3; // N/m^2
+dx=0.12; // m
+c=0.00018; // m
+u=0.5; // kg/m/s
+V=5; // m/s
+
+q=(dp/dx)*c^3/12/u + V*c/2;
+disp("(b) The rate at which oil must be supplied =")
+disp(q)
+disp("m^2/s")
\ No newline at end of file diff --git a/1187/CH6/EX6.4/4.sce b/1187/CH6/EX6.4/4.sce new file mode 100755 index 000000000..ef1805894 --- /dev/null +++ b/1187/CH6/EX6.4/4.sce @@ -0,0 +1,18 @@ +clc
+
+d_p=0.05; // diameter of piston in m
+d_c=0.0504; // diameter of cylinder in m
+SG=0.87;
+rho_w=1000; // kg/m^3
+v=10^-4; // m^2/s
+dp=1.4*10^6; // Pa
+l=0.13; // m
+
+c=(d_c-d_p)/2; // clearance
+
+u=SG*rho_w*v; // Dynamice viscocity
+
+Vp=dp*c^3/(6*u*l*(d_p/2+c));
+disp("Velocity of the dashpot =")
+disp(Vp)
+disp("m/s")
\ No newline at end of file diff --git a/1187/CH6/EX6.5/5.sce b/1187/CH6/EX6.5/5.sce new file mode 100755 index 000000000..855726b1d --- /dev/null +++ b/1187/CH6/EX6.5/5.sce @@ -0,0 +1,32 @@ +clc
+
+disp("(a)the dynamic and kinematic viscosities of the oil")
+
+d=0.00475; // m
+g=9.81; // m/s^2
+rho_s=1151; // kg/m^3
+rho=880; // kg/m^3
+u=0.006; // m/s
+
+F=%pi/6*d^3*g*(rho_s-rho);
+
+rat_d=0.25; // ratio of d/D
+rat_F=1.8; // ratio of F/Fo
+
+dynamic=F/(1.8*3*%pi*u*d);
+
+kinematic=dynamic/rho;
+
+disp("Dynamic viscosity = ")
+disp(dynamic)
+disp("kg/m/s")
+
+disp("Kinematic viscosity =")
+disp(kinematic)
+disp("m^2/s")
+
+disp("(b) Reynolds number of sphere =")
+
+Re=rho*u*d/dynamic;
+disp("Reynolds number =")
+disp(Re)
diff --git a/1187/CH6/EX6.6/6.sce b/1187/CH6/EX6.6/6.sce new file mode 100755 index 000000000..2144a3761 --- /dev/null +++ b/1187/CH6/EX6.6/6.sce @@ -0,0 +1,16 @@ +clc
+
+D=0.120; // m
+h=0.08; // m
+c=0.001; // m
+t=0.01875; // m
+rev=65; // revolutions per min
+T=4*10^-3; // N.m
+
+K1=%pi*h/4/c;
+K2=%pi/32/t;
+
+u=T/(rev*2*%pi/60)/(K1*D^3+K2*D^4);
+disp("viscosity of the liquid =")
+disp(u)
+disp("Pa.s")
\ No newline at end of file diff --git a/1187/CH6/EX6.7/7.sce b/1187/CH6/EX6.7/7.sce new file mode 100755 index 000000000..34b9647d5 --- /dev/null +++ b/1187/CH6/EX6.7/7.sce @@ -0,0 +1,22 @@ +clc
+
+V=10; // m/s
+h1=0.0005; // m
+h2=0.00025; // m
+L=0.1; // m
+b=0.1; // m
+RD=0.87;
+u=2*10^-4; // m^2/s
+rho_w=1000; // kg/m^3
+
+H=h1/h2;
+
+Q=V/2*(1+H^2)/(1+H^3)*b*h1;
+disp("(b) Volumetric flow rate of oil =")
+disp(Q)
+disp("m^3/s")
+
+F=V/2*(1-(1+H^2)/(1+H^3))*12*RD*rho_w*u/h1^2*L^2/4*b;
+disp("The load supported by the bearing =")
+disp(F)
+disp("N")
\ No newline at end of file |