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

// Initialisation of variables
W_by_S = 9;
rho = 0.002378;
alpha = 6 ;
Cl = 0.791;        // Value of Cl from fig 8.8

// Calculations
V = sqrt(W_by_S*2/(rho*Cl));

//Results 
disp(V,"Velocity in ft/sec :");