summaryrefslogtreecommitdiff
path: root/1457/CH10/EX10.8/10_8.sce
blob: 7598cb98d3c9e7ab18ca280920f2e1745a7dc402 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
clc
//Initialization of variables
B=36 //ft
c=6 //ft
Cl=0.8
tau=0.175 
rho=0.001756
V=300 //fps
//calculations
alphai=Cl/(%pi*B/c) *(1+tau) *180/%pi
alpha=5.4 
lift=-5.6 //degrees
alphao=alpha-alphai
alphaod=alphao-lift
alphaor=alphaod*%pi/180
eta=Cl/(2*%pi*alphaor)
Fl=Cl*rho*V^2 /2 *B*c
Fd=0.047/Cl *13680
HP=Fd*V/550
//results
printf("Friction coefficient = %.3f ",eta)
printf("\n weight of the wing = %d lb",Fl)
printf("\n Horsepower required = %d hp",HP)