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/CH8/EX8.5/5.sce | |
| 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/CH8/EX8.5/5.sce')
| -rwxr-xr-x | 1187/CH8/EX8.5/5.sce | 28 |
1 files changed, 28 insertions, 0 deletions
diff --git a/1187/CH8/EX8.5/5.sce b/1187/CH8/EX8.5/5.sce new file mode 100755 index 000000000..23330c8c5 --- /dev/null +++ b/1187/CH8/EX8.5/5.sce @@ -0,0 +1,28 @@ +clc
+
+u_m = 50; // m/s or 180 km/h
+v=1.5*10^(-5); // m^2/s
+l=100; // m
+rho=1.2; // kg/m^3
+b=8.3; // m
+
+delta = 0.37*(v/u_m)^(1/5)*l^(4/5);
+
+disp("(a) the boundary layer thickness at the rear of the train =")
+disp(delta)
+disp("m")
+
+Re_l = u_m*l/v;
+C_F=0.074*(Re_l)^(-1/5);
+F=0.037*rho*u_m^2*l*Re_l^(-1/5);
+
+D_F = F*b;
+
+disp("(b) the frictional drag acting on the train, D_F =")
+disp(D_F)
+disp("N")
+
+P=D_F*u_m;
+disp("(c) the power required to overcome the frictional drag =")
+disp(P/1000)
+disp("kW")
|