diff options
Diffstat (limited to '797/CH11/EX11.4s/11_04_solution.sce')
| -rw-r--r-- | 797/CH11/EX11.4s/11_04_solution.sce | 12 |
1 files changed, 12 insertions, 0 deletions
diff --git a/797/CH11/EX11.4s/11_04_solution.sce b/797/CH11/EX11.4s/11_04_solution.sce new file mode 100644 index 000000000..d47d2a981 --- /dev/null +++ b/797/CH11/EX11.4s/11_04_solution.sce @@ -0,0 +1,12 @@ +//Solution 11-4 +WD=get_absolute_file_path('11_04_solution.sce'); +datafile=WD+filesep()+'11_04_example.sci'; +clc; +exec(datafile) +//unit conversions +D = D / 100; //from [cm] to [m] +Re = rho * V * D / mu; //Reynolds number +A = L * D; //average frontal area +C_D = 1; +F_D = C_D * A * rho * V**2 / 2; //drag force acting +printf("Hence the drag force acting on the pipe is %1.0f N", F_D);
\ No newline at end of file |