]> git.mxchange.org Git - flightgear.git/blob - src/FDM/JSBSim/models/propulsion/FGTurboProp.cpp
Andreas Gaeb: fix #222 (JSBSIm reset problems)
[flightgear.git] / src / FDM / JSBSim / models / propulsion / FGTurboProp.cpp
1 /*%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
2
3  Module:       FGTurboProp.cpp
4  Author:       Jiri "Javky" Javurek
5                based on SimTurbine and Turbine engine from David Culp
6  Date started: 05/14/2004
7  Purpose:      This module models a turbo propeller engine.
8
9  ------------- Copyright (C) 2004  (javky@email.cz) ---------
10
11  This program is free software; you can redistribute it and/or modify it under
12  the terms of the GNU Lesser General Public License as published by the Free Software
13  Foundation; either version 2 of the License, or (at your option) any later
14  version.
15
16  This program is distributed in the hope that it will be useful, but WITHOUT
17  ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS
18  FOR A PARTICULAR PURPOSE.  See the GNU Lesser General Public License for more
19  details.
20
21  You should have received a copy of the GNU Lesser General Public License along with
22  this program; if not, write to the Free Software Foundation, Inc., 59 Temple
23  Place - Suite 330, Boston, MA  02111-1307, USA.
24
25  Further information about the GNU Lesser General Public License can also be found on
26  the world wide web at http://www.gnu.org.
27
28 FUNCTIONAL DESCRIPTION
29 --------------------------------------------------------------------------------
30
31 This class descends from the FGEngine class and models a Turbo propeller engine
32 based on parameters given in the engine config file for this class
33
34 HISTORY
35 --------------------------------------------------------------------------------
36 05/14/2004  Created
37
38 //JVK (mark)
39
40 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
41 INCLUDES
42 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%*/
43
44 #include <iostream>
45 #include <sstream>
46 #include "FGTurboProp.h"
47 #include "FGPropeller.h"
48 #include "models/FGPropulsion.h"
49 #include "models/FGAuxiliary.h"
50
51 using namespace std;
52
53 namespace JSBSim {
54
55 static const char *IdSrc = "$Id: FGTurboProp.cpp,v 1.17 2010/08/21 17:13:48 jberndt Exp $";
56 static const char *IdHdr = ID_TURBOPROP;
57
58 /*%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
59 CLASS IMPLEMENTATION
60 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%*/
61
62 FGTurboProp::FGTurboProp(FGFDMExec* exec, Element *el, int engine_number)
63   : FGEngine(exec, el, engine_number),
64     ITT_N1(NULL), EnginePowerRPM_N1(NULL), EnginePowerVC(NULL)
65 {
66   SetDefaults();
67
68   Load(exec, el);
69   Debug(0);
70 }
71
72 //%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
73
74 FGTurboProp::~FGTurboProp()
75 {
76   delete ITT_N1;
77   delete EnginePowerRPM_N1;
78   delete EnginePowerVC;
79   Debug(1);
80 }
81
82 //%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
83
84 bool FGTurboProp::Load(FGFDMExec* exec, Element *el)
85 {
86   IdleFF=-1;
87   MaxStartingTime = 999999; //very big timeout -> infinite
88   Ielu_max_torque=-1;
89
90 // ToDo: Need to make sure units are properly accounted for below.
91
92   if (el->FindElement("milthrust"))
93     MilThrust = el->FindElementValueAsNumberConvertTo("milthrust","LBS");
94   if (el->FindElement("idlen1"))
95     IdleN1 = el->FindElementValueAsNumber("idlen1");
96   if (el->FindElement("idlen2"))
97     IdleN2 = el->FindElementValueAsNumber("idlen2");
98   if (el->FindElement("maxn1"))
99     MaxN1 = el->FindElementValueAsNumber("maxn1");
100   if (el->FindElement("maxn2"))
101     MaxN2 = el->FindElementValueAsNumber("maxn2");
102   if (el->FindElement("betarangeend"))
103     BetaRangeThrottleEnd = el->FindElementValueAsNumber("betarangeend")/100.0;
104   if (el->FindElement("reversemaxpower"))
105     ReverseMaxPower = el->FindElementValueAsNumber("reversemaxpower")/100.0;
106
107   if (el->FindElement("maxpower"))
108     MaxPower = el->FindElementValueAsNumber("maxpower");
109   if (el->FindElement("idlefuelflow"))
110     IdleFF = el->FindElementValueAsNumber("idlefuelflow");
111   if (el->FindElement("psfc"))
112     PSFC = el->FindElementValueAsNumber("psfc");
113   if (el->FindElement("n1idle_max_delay"))
114     Idle_Max_Delay = el->FindElementValueAsNumber("n1idle_max_delay");
115   if (el->FindElement("maxstartingtime"))
116     MaxStartingTime = el->FindElementValueAsNumber("maxstartingtime");
117   if (el->FindElement("startern1"))
118     StarterN1 = el->FindElementValueAsNumber("startern1");
119   if (el->FindElement("ielumaxtorque"))
120     Ielu_max_torque = el->FindElementValueAsNumber("ielumaxtorque");
121   if (el->FindElement("itt_delay"))
122     ITT_Delay = el->FindElementValueAsNumber("itt_delay");
123
124   Element *table_element;
125   string name;
126   FGPropertyManager* PropertyManager = exec->GetPropertyManager();
127
128   while (true) {
129     table_element = el->FindNextElement("table");
130     if (!table_element) break;
131     name = table_element->GetAttributeValue("name");
132     if (name == "EnginePowerVC") {
133       EnginePowerVC = new FGTable(PropertyManager, table_element);
134     } else if (name == "EnginePowerRPM_N1") {
135       EnginePowerRPM_N1 = new FGTable(PropertyManager, table_element);
136     } else if (name == "ITT_N1") {
137       ITT_N1 = new FGTable(PropertyManager, table_element);
138     } else {
139       cerr << "Unknown table type: " << name << " in turbine definition." <<
140       endl;
141     }
142   }
143
144   // Pre-calculations and initializations
145
146   delay=1;
147   N1_factor = MaxN1 - IdleN1;
148   N2_factor = MaxN2 - IdleN2;
149   OilTemp_degK = (Auxiliary->GetTotalTemperature() - 491.69) * 0.5555556 + 273.0;
150   if (IdleFF==-1) IdleFF = pow(MilThrust, 0.2) * 107.0;  // just an estimate
151
152   cout << "ENG POWER:" << EnginePowerRPM_N1->GetValue(1200,90) << "\n";
153
154   return true;
155 }
156
157 //%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
158 // The main purpose of Calculate() is to determine what phase the engine should
159 // be in, then call the corresponding function.
160
161 void FGTurboProp::Calculate(void)
162 {
163   RunPreFunctions();
164
165   TAT = (Auxiliary->GetTotalTemperature() - 491.69) * 0.5555556;
166   dt = FDMExec->GetDeltaT() * Propulsion->GetRate();
167
168   ThrottleCmd = FCS->GetThrottleCmd(EngineNumber);
169
170   Prop_RPM = Thruster->GetRPM() * Thruster->GetGearRatio();
171   if (Thruster->GetType() == FGThruster::ttPropeller) {
172     ((FGPropeller*)Thruster)->SetAdvance(FCS->GetPropAdvance(EngineNumber));
173     ((FGPropeller*)Thruster)->SetFeather(FCS->GetPropFeather(EngineNumber));
174     ((FGPropeller*)Thruster)->SetReverse(Reversed);
175     if (Reversed) {
176       ((FGPropeller*)Thruster)->SetReverseCoef(ThrottleCmd);
177     } else {
178       ((FGPropeller*)Thruster)->SetReverseCoef(0.0);
179     }
180   }
181
182   if (Reversed) {
183     if (ThrottleCmd < BetaRangeThrottleEnd) {
184         ThrottleCmd = 0.0;  // idle when in Beta-range
185     } else {
186       // when reversed:
187       ThrottleCmd = (ThrottleCmd-BetaRangeThrottleEnd)/(1-BetaRangeThrottleEnd) * ReverseMaxPower;
188     }
189   }
190
191   // When trimming is finished check if user wants engine OFF or RUNNING
192   if ((phase == tpTrim) && (dt > 0)) {
193     if (Running && !Starved) {
194       phase = tpRun;
195       N2 = IdleN2;
196       N1 = IdleN1;
197       OilTemp_degK = 366.0;
198       Cutoff = false;
199     } else {
200       phase = tpOff;
201       Cutoff = true;
202       Eng_ITT_degC = TAT;
203       Eng_Temperature = TAT;
204       OilTemp_degK = TAT+273.15;
205     }
206   }
207
208   if (!Running && Starter) {
209     if (phase == tpOff) {
210       phase = tpSpinUp;
211       if (StartTime < 0) StartTime=0;
212     }
213   }
214   if (!Running && !Cutoff && (N1 > 15.0)) {
215     phase = tpStart;
216     StartTime = -1;
217   }
218   if (Cutoff && (phase != tpSpinUp)) phase = tpOff;
219   if (dt == 0) phase = tpTrim;
220   if (Starved) phase = tpOff;
221   if (Condition >= 10) {
222     phase = tpOff;
223     StartTime=-1;
224   }
225
226   if (Condition < 1) {
227     if (Ielu_max_torque > 0
228       && -Ielu_max_torque > ((FGPropeller*)(Thruster))->GetTorque()
229       && ThrottleCmd >= OldThrottle ) {
230       ThrottleCmd = OldThrottle - 0.1 * dt; //IELU down
231       Ielu_intervent = true;
232     } else if (Ielu_max_torque > 0 && Ielu_intervent && ThrottleCmd >= OldThrottle) {
233       ThrottleCmd = OldThrottle;
234       ThrottleCmd = OldThrottle + 0.05 * dt; //IELU up
235       Ielu_intervent = true;
236     } else {
237       Ielu_intervent = false;
238     }
239   } else {
240     Ielu_intervent = false;
241   }
242   OldThrottle = ThrottleCmd;
243
244   switch (phase) {
245     case tpOff:    Eng_HP = Off(); break;
246     case tpRun:    Eng_HP = Run(); break;
247     case tpSpinUp: Eng_HP = SpinUp(); break;
248     case tpStart:  Eng_HP = Start(); break;
249     default: Eng_HP = 0;
250   }
251
252   //printf ("EngHP: %lf / Requi: %lf\n",Eng_HP,Prop_Required_Power);
253   PowerAvailable = (Eng_HP * hptoftlbssec) - Thruster->GetPowerRequired();
254
255   Thruster->Calculate(PowerAvailable);
256
257   RunPostFunctions();
258 }
259
260 //%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
261
262 double FGTurboProp::Off(void)
263 {
264   double qbar = Auxiliary->Getqbar();
265   Running = false; EngStarting = false;
266
267   FuelFlow_pph = Seek(&FuelFlow_pph, 0, 800.0, 800.0);
268
269   //allow the air turn with generator
270   N1 = ExpSeek(&N1, qbar/15.0, Idle_Max_Delay*2.5, Idle_Max_Delay * 5);
271
272   OilTemp_degK = ExpSeek(&OilTemp_degK,273.15 + TAT, 400 , 400);
273
274   Eng_Temperature = ExpSeek(&Eng_Temperature,TAT,300,400);
275   double ITT_goal = ITT_N1->GetValue(N1,0.1) + ((N1>20) ? 0.0 : (20-N1)/20.0 * Eng_Temperature);
276   Eng_ITT_degC  = ExpSeek(&Eng_ITT_degC,ITT_goal,ITT_Delay,ITT_Delay*1.2);
277
278   OilPressure_psi = (N1/100.0*0.25+(0.1-(OilTemp_degK-273.15)*0.1/80.0)*N1/100.0) / 7692.0e-6; //from MPa to psi
279
280   ConsumeFuel(); // for possible setting Starved = false when fuel tank
281                  // is refilled (fuel crossfeed etc.)
282
283   if (Prop_RPM>5) return -0.012; // friction in engine when propeller spining (estimate)
284   return 0.0;
285 }
286
287 //%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
288
289 double FGTurboProp::Run(void)
290 {
291   double thrust = 0.0, EngPower_HP, eff_coef;
292   Running = true; Starter = false; EngStarting = false;
293
294 //---
295   double old_N1 = N1;
296   N1 = ExpSeek(&N1, IdleN1 + ThrottleCmd * N1_factor, Idle_Max_Delay, Idle_Max_Delay * 2.4);
297
298   EngPower_HP = EnginePowerRPM_N1->GetValue(Prop_RPM,N1);
299   EngPower_HP *= EnginePowerVC->GetValue();
300   if (EngPower_HP > MaxPower) EngPower_HP = MaxPower;
301
302   eff_coef = 9.333 - (N1)/12; // 430%Fuel at 60%N1
303   FuelFlow_pph = PSFC * EngPower_HP * eff_coef;
304
305   Eng_Temperature = ExpSeek(&Eng_Temperature,Eng_ITT_degC,300,400);
306   double ITT_goal = ITT_N1->GetValue((N1-old_N1)*300+N1,1);
307   Eng_ITT_degC  = ExpSeek(&Eng_ITT_degC,ITT_goal,ITT_Delay,ITT_Delay*1.2);
308
309   OilPressure_psi = (N1/100.0*0.25+(0.1-(OilTemp_degK-273.15)*0.1/80.0)*N1/100.0) / 7692.0e-6; //from MPa to psi
310 //---
311   EPR = 1.0 + thrust/MilThrust;
312
313   OilTemp_degK = Seek(&OilTemp_degK, 353.15, 0.4-N1*0.001, 0.04);
314
315   ConsumeFuel();
316
317   if (Cutoff) phase = tpOff;
318   if (Starved) phase = tpOff;
319
320   return EngPower_HP;
321 }
322
323 //%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
324
325 double FGTurboProp::SpinUp(void)
326 {
327   double EngPower_HP;
328   Running = false; EngStarting = true;
329   FuelFlow_pph = 0.0;
330
331   if (!GeneratorPower) {
332     EngStarting=false;
333     phase=tpOff;
334     StartTime = -1;
335     return 0.0;
336   }
337
338   N1 = ExpSeek(&N1, StarterN1, Idle_Max_Delay * 6, Idle_Max_Delay * 2.4);
339
340   Eng_Temperature = ExpSeek(&Eng_Temperature,TAT,300,400);
341   double ITT_goal = ITT_N1->GetValue(N1,0.1) + ((N1>20) ? 0.0 : (20-N1)/20.0 * Eng_Temperature);
342   Eng_ITT_degC  = ExpSeek(&Eng_ITT_degC,ITT_goal,ITT_Delay,ITT_Delay*1.2);
343
344   OilTemp_degK = ExpSeek(&OilTemp_degK,273.15 + TAT, 400 , 400);
345
346   OilPressure_psi = (N1/100.0*0.25+(0.1-(OilTemp_degK-273.15)*0.1/80.0)*N1/100.0) / 7692.0e-6; //from MPa to psi
347   NozzlePosition = 1.0;
348
349   EngPower_HP = EnginePowerRPM_N1->GetValue(Prop_RPM,N1);
350   EngPower_HP *= EnginePowerVC->GetValue();
351   if (EngPower_HP > MaxPower) EngPower_HP = MaxPower;
352
353   if (StartTime>=0) StartTime+=dt;
354   if (StartTime > MaxStartingTime && MaxStartingTime > 0) { //start failed due timeout
355     phase = tpOff;
356     StartTime = -1;
357   }
358
359   ConsumeFuel(); // for possible setting Starved = false when fuel tank
360                  // is refilled (fuel crossfeed etc.)
361
362   return EngPower_HP;
363 }
364
365 //%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
366
367 double FGTurboProp::Start(void)
368 {
369   double EngPower_HP,eff_coef;
370   EngStarting = false;
371   if ((N1 > 15.0) && !Starved) {       // minimum 15% N2 needed for start
372     double old_N1 = N1;
373     Cranking = true;                   // provided for sound effects signal
374     if (N1 < IdleN1) {
375       EngPower_HP = EnginePowerRPM_N1->GetValue(Prop_RPM,N1);
376       EngPower_HP *= EnginePowerVC->GetValue();
377       if (EngPower_HP > MaxPower) EngPower_HP = MaxPower;
378       N1 = ExpSeek(&N1, IdleN1*1.1, Idle_Max_Delay*4, Idle_Max_Delay * 2.4);
379       eff_coef = 9.333 - (N1)/12; // 430%Fuel at 60%N1
380       FuelFlow_pph = PSFC * EngPower_HP * eff_coef;
381       Eng_Temperature = ExpSeek(&Eng_Temperature,Eng_ITT_degC,300,400);
382       double ITT_goal = ITT_N1->GetValue((N1-old_N1)*300+N1,1);
383       Eng_ITT_degC  = ExpSeek(&Eng_ITT_degC,ITT_goal,ITT_Delay,ITT_Delay*1.2);
384
385       OilPressure_psi = (N1/100.0*0.25+(0.1-(OilTemp_degK-273.15)*0.1/80.0)*N1/100.0) / 7692.0e-6; //from MPa to psi
386       OilTemp_degK = Seek(&OilTemp_degK, 353.15, 0.4-N1*0.001, 0.04);
387
388     } else {
389       phase = tpRun;
390       Running = true;
391       Starter = false;
392       Cranking = false;
393       FuelFlow_pph = 0;
394       EngPower_HP=0.0;
395     }
396   } else {                 // no start if N2 < 15% or Starved
397     phase = tpOff;
398     Starter = false;
399   }
400
401   ConsumeFuel();
402
403   return EngPower_HP;
404 }
405
406
407 //%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
408
409 double FGTurboProp::CalcFuelNeed(void)
410 {
411   double dT = FDMExec->GetDeltaT() * Propulsion->GetRate();
412   FuelFlowRate = FuelFlow_pph / 3600.0;
413   FuelExpended = FuelFlowRate * dT;
414   return FuelExpended;
415 }
416
417 //%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
418
419 double FGTurboProp::Seek(double *var, double target, double accel, double decel)
420 {
421   double v = *var;
422   if (v > target) {
423     v -= dt * decel;
424     if (v < target) v = target;
425   } else if (v < target) {
426     v += dt * accel;
427     if (v > target) v = target;
428   }
429   return v;
430 }
431
432 //%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
433
434 double FGTurboProp::ExpSeek(double *var, double target, double accel_tau, double decel_tau)
435 {
436 // exponential delay instead of the linear delay used in Seek
437   double v = *var;
438   if (v > target) {
439     v = (v - target) * exp ( -dt / decel_tau) + target;
440   } else if (v < target) {
441     v = (target - v) * (1 - exp ( -dt / accel_tau)) + v;
442   }
443   return v;
444 }
445
446 //%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
447
448 void FGTurboProp::SetDefaults(void)
449 {
450 //  Name = "Not defined";
451   N1 = N2 = 0.0;
452   Type = etTurboprop;
453   MilThrust = 10000.0;
454   IdleN1 = 30.0;
455   IdleN2 = 60.0;
456   MaxN1 = 100.0;
457   MaxN2 = 100.0;
458   ThrottleCmd = 0.0;
459   InletPosition = 1.0;
460   NozzlePosition = 1.0;
461   Reversed = false;
462   Cutoff = true;
463   phase = tpOff;
464   Stalled = false;
465   Seized = false;
466   Overtemp = false;
467   Fire = false;
468   Eng_ITT_degC = 0.0;
469
470   GeneratorPower=true;
471   Condition = 0;
472   Ielu_intervent=false;
473
474   Idle_Max_Delay = 1.0;
475 }
476
477 //%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
478
479
480 string FGTurboProp::GetEngineLabels(const string& delimiter)
481 {
482   std::ostringstream buf;
483
484   buf << Name << "_N1[" << EngineNumber << "]" << delimiter
485       << Name << "_N2[" << EngineNumber << "]" << delimiter
486       << Name << "_PwrAvail[" << EngineNumber << "]" << delimiter
487       << Thruster->GetThrusterLabels(EngineNumber, delimiter);
488
489   return buf.str();
490 }
491
492 //%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
493
494 string FGTurboProp::GetEngineValues(const string& delimiter)
495 {
496   std::ostringstream buf;
497
498   buf << PowerAvailable << delimiter
499       << N1 << delimiter
500       << N2 << delimiter
501       << Thruster->GetThrusterValues(EngineNumber,delimiter);
502
503   return buf.str();
504 }
505
506 //%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
507
508 int FGTurboProp::InitRunning(void)
509 {
510   FDMExec->SuspendIntegration();
511   Cutoff=false;
512   Running=true;  
513   N2=16.0;
514   Calculate();
515   FDMExec->ResumeIntegration();
516   return phase==tpRun;
517 }
518
519 //%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
520
521 void FGTurboProp::bindmodel()
522 {
523   string property_name, base_property_name;
524   base_property_name = CreateIndexedPropertyName("propulsion/engine", EngineNumber);
525   property_name = base_property_name + "/n1";
526   PropertyManager->Tie( property_name.c_str(), &N1);
527   property_name = base_property_name + "/n2";
528   PropertyManager->Tie( property_name.c_str(), &N2);
529   property_name = base_property_name + "/reverser";
530   PropertyManager->Tie( property_name.c_str(), &Reversed);
531 }
532
533 //%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
534 //    The bitmasked value choices are as follows:
535 //    unset: In this case (the default) JSBSim would only print
536 //       out the normally expected messages, essentially echoing
537 //       the config files as they are read. If the environment
538 //       variable is not set, debug_lvl is set to 1 internally
539 //    0: This requests JSBSim not to output any messages
540 //       whatsoever.
541 //    1: This value explicity requests the normal JSBSim
542 //       startup messages
543 //    2: This value asks for a message to be printed out when
544 //       a class is instantiated
545 //    4: When this value is set, a message is displayed when a
546 //       FGModel object executes its Run() method
547 //    8: When this value is set, various runtime state variables
548 //       are printed out periodically
549 //    16: When set various parameters are sanity checked and
550 //       a message is printed out when they go out of bounds
551
552 void FGTurboProp::Debug(int from)
553 {
554   if (debug_lvl <= 0) return;
555
556   if (debug_lvl & 1) { // Standard console startup message output
557     if (from == 0) { // Constructor
558
559     }
560     if (from == 2) { // called from Load()
561       cout << "\n ****MUJ MOTOR TURBOPROP****\n";
562       cout << "\n    Engine Name: "         << Name << endl;
563       cout << "      MilThrust:   "         << MilThrust << endl;
564       cout << "      IdleN1:      "         << IdleN1 << endl;
565       cout << "      MaxN1:       "         << MaxN1 << endl;
566
567       cout << endl;
568     }
569   }
570   if (debug_lvl & 2 ) { // Instantiation/Destruction notification
571     if (from == 0) cout << "Instantiated: FGTurboProp" << endl;
572     if (from == 1) cout << "Destroyed:    FGTurboProp" << endl;
573   }
574   if (debug_lvl & 4 ) { // Run() method entry print for FGModel-derived objects
575   }
576   if (debug_lvl & 8 ) { // Runtime state variables
577   }
578   if (debug_lvl & 16) { // Sanity checking
579   }
580   if (debug_lvl & 64) {
581     if (from == 0) { // Constructor
582       cout << IdSrc << endl;
583       cout << IdHdr << endl;
584     }
585   }
586 }
587 }