-
Notifications
You must be signed in to change notification settings - Fork 6
/
blendedwingbody.m
65 lines (45 loc) · 2.08 KB
/
blendedwingbody.m
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
% BLENDEDWINGBODY is an example script illustrating the use of the liftsurf
% function. It generates a wing and a blended centrebody. The output is
% available as a Matlab surface or (using Bill McDonald's surf2stl
% function) as an STL file.
% -------------------------------------------------------------------------
% Aircraft Geometry Toolbox v0.1.0, Andras Sobester 2014.
%
% Sobester, A, Forrester, A I J, "Aircraft Aerodynamic Design - Geometry
% and Optimization", Wiley, 2014.
% -------------------------------------------------------------------------
Span = 3.5;
FuselageWidth = 0.2;
FuselageHeight = 0.24;
% ========= LiftSurfInput definition
LiftSurfInput.Name = 'blendedwingbody';
% Generate plot (1) and STL file (3), but not cross section txt files (2)
LiftSurfInput.LSPlotRequired = [1 3];
LiftSurfInput.TargetArea = 0.9;
LiftSurfInput.wTargetArea = 1;
LiftSurfInput.TargetAspectRatio = 8.9;
LiftSurfInput.wTargetAspectRatio = 0;
LiftSurfInput.TargetSpan = 3.5;
LiftSurfInput.wTargetSpan = 1;
LiftSurfInput.TargetVolume = 0;
LiftSurfInput.wTargetVolume = 0;
LiftSurfInput.TargetRootChord = 1;
LiftSurfInput.wTargetRootChord = 1;
LiftSurfInput.TargetWettedArea = 0;
LiftSurfInput.wTargetWettedArea = 0;
LiftSurfInput.Epsilon = [0:0.005:0.3,0.5:0.1:1];
% Fuselage side station is included
FuselageSide = FuselageWidth/Span;
LiftSurfInput.Dihedral.Funct = 'dihedral_unifloadbeam';
LiftSurfInput.Dihedral.Parameters = [0 0 0 0];
LiftSurfInput.Sweep.Funct = 'sweepangle_fuselage';
LiftSurfInput.Sweep.Parameters = [1.88 0 0 0 0.25 90 FuselageSide-0.01];
LiftSurfInput.Twist.Funct = 'twistangle_linear';
LiftSurfInput.Twist.Parameters = [-3 -3];
LiftSurfInput.Chord.Funct = 'chord_simpletaper_rootfillet_fuselage';
LiftSurfInput.Chord.Parameters = [0.51 0 0 0];
LiftSurfInput.Airfoil.Funct = 'airfoil_linear_fuselage';
LiftSurfInput.Airfoil.Parameters = {'NACA5',[0.3, 0.15, 15],'NACA5',[0.3, 0.15, 15], 0.2, 0.2};
LiftSurfInput.Airfoil.NPoints = 100;
% ========= liftsurf call
LiftSurfGeometry = liftsurf(LiftSurfInput);