summaryrefslogtreecommitdiff
path: root/797/CH11/EX11.1s/11_01_solution.sce
diff options
context:
space:
mode:
Diffstat (limited to '797/CH11/EX11.1s/11_01_solution.sce')
-rw-r--r--797/CH11/EX11.1s/11_01_solution.sce12
1 files changed, 12 insertions, 0 deletions
diff --git a/797/CH11/EX11.1s/11_01_solution.sce b/797/CH11/EX11.1s/11_01_solution.sce
new file mode 100644
index 000000000..3be682b46
--- /dev/null
+++ b/797/CH11/EX11.1s/11_01_solution.sce
@@ -0,0 +1,12 @@
+//Solution 11-1
+WD=get_absolute_file_path('11_01_solution.sce');
+datafile=WD+filesep()+'11_01_example.sci';
+clc;
+exec(datafile)
+//unit conversions
+V = V * 1000 / 3600; //from [km/h] to [m/s]
+P = P * 1.01325 * 10**5; //from [atm] to [Pa]
+T = T + 273; //from [C] to [K]
+rho_air = P / ( R * T);
+C_D = 2 * F_D / (rho_air * A * V**2);
+printf("Drag coefficient is %1.2f", C_D); \ No newline at end of file