asc/senior-design
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

initial commit

Browse Source
This commit is contained in:
Anthony Correa
2010-04-17 12:00:00 -05:00
commit 0da2092d89
460 changed files with 10528 additions and 0 deletions
Download Patch File Download Diff File Expand all files Collapse all files

60
Matlab code/Legacy/Jacobi/Airfoils/CB30015.dat Executable file
View File

@@ -0,0 +1,60 @@
Centerbody 3
0.927434 0.030867
0.885738 0.037894
0.832426 0.044544
0.770708 0.050733
0.703824 0.054767
0.634967 0.057296
0.567289 0.058793
0.503215 0.059528
0.443412 0.059717
0.388348 0.059516
0.338469 0.059099
0.294235 0.058631
0.256072 0.058263
0.223760 0.058026
0.196178 0.057792
0.172167 0.057433
0.150558 0.056791
0.130182 0.055719
0.109959 0.054041
0.089801 0.051717
0.070408 0.048804
0.052499 0.045333
0.036815 0.041386
0.024065 0.037043
0.014845 0.032427
0.008795 0.027556
0.005152 0.022433
0.003127 0.017031
0.001941 0.011266
0.000833 0.004850
0.000868 -0.006228
0.002777 -0.014501
0.006960 -0.024027
0.014590 -0.033727
0.026905 -0.043466
0.045147 -0.053006
0.070516 -0.061993
0.104060 -0.070058
0.145165 -0.076927
0.192399 -0.082424
0.244294 -0.086545
0.299425 -0.089280
0.356322 -0.090523
0.413532 -0.090135
0.469635 -0.087990
0.523580 -0.084127
0.574750 -0.078781
0.622524 -0.072162
0.666283 -0.064484
0.705419 -0.055972
0.739322 -0.046855
0.767373 -0.037351
0.789853 -0.027657
0.808793 -0.017830
0.826372 -0.007917
0.844831 0.002026
0.866348 0.011975
0.893151 0.021929
0.927426 0.031964

1
Matlab code/Legacy/Jacobi/Planforms/AirData.dat Executable file
View File

@@ -0,0 +1 @@
0 0.610000000000000 0 n0011sc.dat

BIN
Matlab code/Legacy/Jacobi/Planforms/AirData.mat Executable file
View File

Binary file not shown.

7
Matlab code/Legacy/Jacobi/Planforms/FDR001.avl Executable file
View File

@@ -0,0 +1,7 @@
0 85 0 n0012.dat
2.32 82.73 2.27 n0012.dat
6.38 73.67 11.33 n0012.dat
14.2 52.13 30.6 n0012.dat
28.98 20 55 nasasc2-0714.dat
34.77 15 60 nasasc2-0714.dat
70 7.5 803 nasasc2-0714.dat

7
Matlab code/Legacy/Jacobi/Planforms/olddater.dat Executable file
View File

@@ -0,0 +1,7 @@
0, 0.607142857, 0, 'CB50015.dat'
0.016571429, 0.590928571, 0.02, 'CB50015.dat'
0.045571429, 0.526214286, 0.08, 'CB50015.dat'
0.101428571, 0.371428571, 0.22, 'CB50015.dat'
0.207, 0.142857143, 0.39, 'nasasc-718.dat'
0.248357143, 0.107142857, 0.43, 'nasasc2-714.dat'
0.5, 0.053571429, 0.54, 'nasasc2-714.dat'

54
Matlab code/Legacy/Jacobi/WhettedArea.m Executable file
View File

@@ -0,0 +1,54 @@
%function Area = WhettedArea( fileName, wingSpan )
function WhettedArea(fileName,wingSpan, n)
% fileName = 'AirData.mat';
% wingSpan = 1;
% n = 50;
Area = 0;
pranformArea = 0;
PlanData1 = load(fileName);
PlanData = PlanData1.(fileName(1:end-4));
Chords = findChords(n, PlanData);
for i = 1:(size(PlanData,1)-1)
for j = 1:n
dist = wingSpan*(PlanData{i+1,1}-PlanData{i,1})./n;
Area = Area+findPerim( PlanData{i,4}, Chords(i,j), wingSpan).*dist;
% fprintf('Chord: %f Perimiter: %f Area: %f\n', Chords(i,j), findPerim( PlanData{i,4}, Chords(i,j), wingSpan), Area)
end
end
for i = 1:(size(PlanData,1)-1)
for j = 1:n
dist = wingSpan*(PlanData{i+1,1}-PlanData{i,1})./n;
pranformArea = pranformArea+Chords(i,j).*dist;
% fprintf('Chord: %f pranformArea: %f \n', Chords(i,j), pranformArea)
end
end
WetArea = Area *2;
pranformArea = pranformArea*2;
fprintf('Planform Area: %f, Wetted Area: %f \n', pranformArea, WetArea)
end
function Chords = findChords( n, PlanData )
Chord = cell2mat(PlanData(:,2));
X = cell2mat(PlanData(:,1));
for( i = 1:(length(Chord)-1) )
Xtemp = linspace(X(i),X(i+1),n);
Chords(i,:) = (Chord(i+1)-Chord(i))./(X(i+1)-X(i)).*(Xtemp-X(i))+Chord(i);
end
end
function peri = findPerim( airFile, chord, span)
peri = 0;
Airfoil = load(airFile);
Airfoil = Airfoil*chord*span;
for i = 1:(size(Airfoil,1)-1)
peri = peri + sqrt((Airfoil(i+1,1)-Airfoil(i,1))^2+(Airfoil(i+1,2)-Airfoil(i,2))^2);
end
end

60
Matlab code/Legacy/Jacobi/WhettedAreaflubbed.m Executable file
View File

@@ -0,0 +1,60 @@
%function Area = WhettedArea( fileName, wingSpan )
function WhettedAreaflubbed(fileName,wingSpan, n)
% fileName = 'AirData.mat';
% wingSpan = 1;
% n = 50;
engineArea=600;
Area = 0;
pranformArea = 0;
cd('\\ad.uiuc.edu\ae\correa2\Desktop\AE441\Matlab code\Jacobi\Planforms')
[spans, chords, offsets, airfoil]=textread(fileName, '%f %f %f %s');
Chords = findChords(n, chords, spans);
cd('\\ad.uiuc.edu\ae\correa2\Desktop\AE441\Matlab code\Jacobi\Airfoils')
for i = 1:(size(chords)-1)
for j = 1:n
Chords(i,j);
dist = wingSpan*(spans(i+1)-spans(i))./n;
Area = Area+findPerim( airfoil{i}, Chords(i,j), wingSpan).*dist;
end
end
for i = 1:(size(chords)-1)
for j = 1:n
dist = wingSpan*(spans(i+1)-spans(i))./n;
pranformArea = pranformArea+Chords(i,j).*dist;
% fprintf('Chord: %f pranformArea: %f \n', Chords(i,j), pranformArea)
end
end
Area = Area *2+engineArea;
WetArea = Area;
pranformArea = pranformArea*2;
fprintf('Planform Area: %f, Wetted Area: %f \n', pranformArea, WetArea)
cd('\\ad.uiuc.edu\ae\correa2\Desktop\AE441\Matlab code\Jacobi\')
end
function Chords = findChords( n, Chord, X )
% Chord = PlanData(:,2);
% X = PlanData(:,1);
for( i = 1:(length(Chord)-1) )
Xtemp = linspace(X(i),X(i+1),n);
Chords(i,:) = (Chord(i+1)-Chord(i))./(X(i+1)-X(i)).*(Xtemp-X(i))+Chord(i);
end
end
function peri = findPerim( airFile, chord, span)
peri = 0;
Airfoil = load(airFile);
Airfoil = Airfoil*chord*span;
for i = 1:(size(Airfoil,1)-1)
peri = peri + sqrt((Airfoil(i+1,1)-Airfoil(i,1))^2+(Airfoil(i+1,2)-Airfoil(i,2))^2);
end
end