summaryrefslogtreecommitdiff
path: root/689/CH8/EX8.8/8.sce
blob: 17f6321110c8e14b67badfe333d6aaf71dd2e4b0 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
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) : ");