1 files changed, 16 insertions, 0 deletions
diff --git a/689/CH8/EX8.8/8.sce b/689/CH8/EX8.8/8.sce
new file mode 100644
index 000000000..17f632111
--- /dev/null
+++ b/689/CH8/EX8.8/8.sce
@@ -0,0 +1,16 @@
+clc; funcprot(0);
+//Example 8.8  Polar Curves 
+
+// Initialisation of variables
+W = 3000;
+S = 350;
+V = 90;
+rho = 0.002378;
+
+// Calculations
+Cl = 2*W/(S*V^2);
+Cd = 0.0561; //From figure 8.18
+HP = Cd*rho*S*V^3/(2*550);
+ 
+//Results 
+disp(HP,"Horse power required by wing (hp) : ");
+\ No newline at end of file