summaryrefslogtreecommitdiff
path: root/548/CH6/EX6.1.a
diff options
context:
space:
mode:
Diffstat (limited to '548/CH6/EX6.1.a')
-rwxr-xr-x548/CH6/EX6.1.a/6_1a.JPGbin0 -> 20243 bytes
-rwxr-xr-x548/CH6/EX6.1.a/6_1a.sce16
2 files changed, 16 insertions, 0 deletions
diff --git a/548/CH6/EX6.1.a/6_1a.JPG b/548/CH6/EX6.1.a/6_1a.JPG
new file mode 100755
index 000000000..1bfa69781
--- /dev/null
+++ b/548/CH6/EX6.1.a/6_1a.JPG
Binary files differ
diff --git a/548/CH6/EX6.1.a/6_1a.sce b/548/CH6/EX6.1.a/6_1a.sce
new file mode 100755
index 000000000..b2159f4a7
--- /dev/null
+++ b/548/CH6/EX6.1.a/6_1a.sce
@@ -0,0 +1,16 @@
+pathname=get_absolute_file_path('6_1a.sce')
+filename=pathname+filesep()+'6_1a_data.sci'
+exec(filename)
+clf();
+i = 1;
+Cl = 0;Cd = 0;Cl_Cd =0;Thrust = 0;
+while(i<=length(V))
+ Cl(i) = 2*W/(D*S*V(i)^2);
+ Cd(i) = Cdo + Cl(i)^2/(%pi*e*AR);
+ Cl_Cd(i) = Cl(i)/Cd(i);
+ Thrust(i) = W/Cl_Cd(i)/1000;
+ i = i+1;
+end
+xlabel("Velocity (m/s)");
+ylabel("Thrust (kN)");
+plot2d(V,Thrust,3);