Projeto Conceitual de Aeronaves de Transporte
Projeto Conceitual de Aeronaves de Transporte
Projeto Conceitual de Aeronaves de Transporte
You also want an ePaper? Increase the reach of your titles
YUMPU automatically turns print PDFs into web optimized ePapers that Google loves.
nc1 = 1; % NUMBER OF CAPTAIN<br />
nc2 = 1; % NUMBER OF FIRST OFFICER<br />
kj = 0.26; % FACTOR WHICH ACCOUNTS FOR VACATION PAY, COST<br />
TRAINING ...<br />
% THESE DATA ARE ASSUMED TO BE APPLICABLE FOR 1990<br />
SAL1 = Sal.Captain; % SALARY CAPTAIN [USD/YR]<br />
SAL2 = Sal.FO; % SALARY FIRST OFFICER [USD/YR]<br />
AH1 = 800; % [HRS]<br />
AH2 = 800; % [HRS]<br />
TEF1 = 7; % [USD/blhr]<br />
TEF2 = TEF1; %TRAVEL EXPENSE FACTOR<br />
Ccrew = (nc1 *((1 + kj)/vbl) * (SAL1/AH1) + (TEF1/vbl)) + ...<br />
(nc2 *((1 + kj)/vbl) * (SAL2/AH2) + (TEF2/vbl)); %<br />
[USD/NM] EQ 5.21 PAG 109<br />
%2) FUEL AND OIL COST -> Cpol (PAG 148)<br />
pfuel = Fuel_price; % PRICE [USD/GALLON]<br />
dfuel = 6.74; % DENSITY [LBS/GALLON]<br />
Wfbl = Cons_Block*kg2lb; % [LBS] OPERATIONAL MISSION FUEL<br />
Cpol = 1.05 * (Wfbl / Block_Range) * (pfuel / dfuel); % EQ 5.30<br />
PAG 116 5% DO DOC<br />
%3) INSURANCE COST -> Cins (PAG 148)<br />
% Cins = 0.02 * (DOC); % EQ 5.32 * PAG 117<br />
% DOCflt = Ccrew + Cpol + Cins;<br />
%==============================%<br />
% DOC MAINT %<br />
%==============================%<br />
fnrev<br />
= 1.03; % NON-REVENUE FACTOR. IT ACCOUNTS FOR EXTRA<br />
MAINTENANCE COSTS INCURRED DUE FLIGHT DELAYS<br />
%1) MAINTENANCE LABOR COST FOR AIRFRAME AND SYSTEMS -> Clab_ap (PAG<br />
148)<br />
weight_empty_lb = weight_empty_kg*kg2lb;<br />
weight_engine_lb = weight_engine_kg*kg2lb;<br />
Wa<br />
= weight_empty_lb - NEng*weight_engine_lb; % [LBS]<br />
AIRFRAME WEIGHT<br />
MHRmap_bl = 3 * 0.067 * Wa /1000; % [mhrs/blhr] FIGURE 5.5 PAG<br />
122<br />
Rlap = 16; % [USD/mhr] RATE PER MANHOUR<br />
Clab_ap = fnrev * MHRmap_bl * Rlap / vbl; % [USD/NM] EQ 5.34<br />
PAG 119<br />
%2) MAINTENANCE LABOR COST FOR ENGINES -> Clab_eng (PAG 149)<br />
% bpr=razao <strong>de</strong> passagem<br />
%<br />
Tto<br />
= NEng*T0; % lbf<br />
Tto_Ne = Tto / NEng; % [LBS] TAKE-OFF THRUST PER ENGINE<br />
Hem<br />
= TBO; % [HRS] OVERHAUL PERIOD<br />
Rleng = Rlap;<br />
MHRmeng_bl = ((0.718 + 0.0317 * (Tto_Ne/1000)) * (1100/Hem) +<br />
0.1); % [mhrs/blhr] FIGURE 5.6 PAG 123<br />
Clab_eng = fnrev * 1.3 * NEng * MHRmeng_bl * Rleng / vbl; %<br />
[USD/NM] EQ 5.36 PAG 120
Change language