summaryrefslogtreecommitdiff
path: root/689/CH8/EX8.2/2.sce
blob: ef80c4492f2172a883eb8de2bef4259c0a620fd5 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
clc; funcprot(0);
//Example 8.2  Lift Equation

// Initialisation of variables
V = 90*1.467;        // Velocity in ft/s
S = 300;            //Wing Area.
rho = 0.00237;
W = 3000;

// Calculations
Cl = W*2/(rho*S*V^2);            // From figure 8.8

//Results 
disp("Corrosponding value of alpha for the above Lift Coefficient is 1.7 degree (from fig 8.8).",Cl,"Lift Coefficient for the above data is :");