src/FDM/JSBSim/FGPosition.cpp

   1 /*%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
   2
   3  Module:       FGPosition.cpp
   4  Author:       Jon S. Berndt
   5  Date started: 01/05/99
   6  Purpose:      Integrate the EOM to determine instantaneous position
   7  Called by:    FGFDMExec
   8
   9  ------------- Copyright (C) 1999  Jon S. Berndt (jsb@hal-pc.org) -------------
  10
  11  This program is free software; you can redistribute it and/or modify it under
  12  the terms of the GNU 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 General Public License for more
  19  details.
  20
  21  You should have received a copy of the GNU 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 General Public License can also be found on
  26  the world wide web at http://www.gnu.org.
  27
  28 FUNCTIONAL DESCRIPTION
  29 --------------------------------------------------------------------------------
  30 This class encapsulates the integration of rates and accelerations to get the
  31 current position of the aircraft.
  32
  33 HISTORY
  34 --------------------------------------------------------------------------------
  35 01/05/99   JSB   Created
  36
  37 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
  38 COMMENTS, REFERENCES,  and NOTES
  39 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
  40 [1] Cooke, Zyda, Pratt, and McGhee, "NPSNET: Flight Simulation Dynamic Modeling
  41     Using Quaternions", Presence, Vol. 1, No. 4, pp. 404-420  Naval Postgraduate
  42     School, January 1994
  43 [2] D. M. Henderson, "Euler Angles, Quaternions, and Transformation Matrices",
  44     JSC 12960, July 1977
  45 [3] Richard E. McFarland, "A Standard Kinematic Model for Flight Simulation at
  46     NASA-Ames", NASA CR-2497, January 1975
  47 [4] Barnes W. McCormick, "Aerodynamics, Aeronautics, and Flight Mechanics",
  48     Wiley & Sons, 1979 ISBN 0-471-03032-5
  49 [5] Bernard Etkin, "Dynamics of Flight, Stability and Control", Wiley & Sons,
  50     1982 ISBN 0-471-08936-2
  51
  52 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
  53 INCLUDES
  54 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%*/
  55
  56 #ifdef FGFS
  57 #  include <simgear/compiler.h>
  58 #  ifdef SG_HAVE_STD_INCLUDES
  59 #    include <cmath>
  60 #    include <iomanip>
  61 #  else
  62 #    include <math.h>
  63 #    include <iomanip.h>
  64 #  endif
  65 #else
  66 #  if defined(sgi) && !defined(__GNUC__)
  67 #    include <math.h>
  68 #    include <iomanip.h>
  69 #  else
  70 #    include <cmath>
  71 #    include <iomanip>
  72 #  endif
  73 #endif
  74
  75 #include "FGPosition.h"
  76 #include "FGAtmosphere.h"
  77 #include "FGState.h"
  78 #include "FGFDMExec.h"
  79 #include "FGFCS.h"
  80 #include "FGAircraft.h"
  81 #include "FGMassBalance.h"
  82 #include "FGTranslation.h"
  83 #include "FGRotation.h"
  84 #include "FGAuxiliary.h"
  85 #include "FGOutput.h"
  86
  87 static const char *IdSrc = "$Id$";
  88 static const char *IdHdr = ID_POSITION;
  89
  90 /*%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
  91 CLASS IMPLEMENTATION
  92 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%*/
  93
  94 extern float globalTriNormal[3];
  95 extern double globalSceneryAltitude;
  96 extern double globalSeaLevelRadius;
  97
  98 FGPosition::FGPosition(FGFDMExec* fdmex) : FGModel(fdmex),
  99     vVel(3),
 100     vVelDot(3),
 101     vRunwayNormal(3)
 102 {
 103   Name = "FGPosition";
 104   LongitudeDot = LatitudeDot = RadiusDot = 0.0;
 105   lastLongitudeDot = lastLatitudeDot = lastRadiusDot = 0.0;
 106   Longitude = Latitude = 0.0;
 107   gamma = Vt = Vground = 0.0;
 108   h = 3.0;                                 // Est. height of aircraft cg off runway
 109   SeaLevelRadius = EARTHRAD;               // For initialization ONLY
 110   Radius         = SeaLevelRadius + h;
 111   RunwayRadius   = SeaLevelRadius;
 112   DistanceAGL    = Radius - RunwayRadius;  // Geocentric
 113   vRunwayNormal(3) = -1.0;                 // Initialized for standalone mode
 114   b =1;
 115
 116
 117   if (debug_lvl & 2) cout << "Instantiated: " << Name << endl;
 118 }
 119
 120 //%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
 121
 122 FGPosition::~FGPosition()
 123 {
 124   if (debug_lvl & 2) cout << "Destroyed:    FGPosition" << endl;
 125 }
 126
 127 //%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
 128 /*
 129 Purpose: Called on a schedule to perform Positioning algorithms
 130 Notes:   [TP] Make sure that -Vt <= hdot <= Vt, which, of course, should always
 131          be the case
 132          [JB] Run in standalone mode, SeaLevelRadius will be EARTHRAD. In FGFS,
 133          SeaLevelRadius is stuffed from FGJSBSim in JSBSim.cxx each pass.
 134 */
 135
 136 bool FGPosition:: Run(void) {
 137   double cosLat;
 138   double hdot_Vt;
 139
 140   if (!FGModel::Run()) {
 141     GetState();
 142
 143     Vground = sqrt( vVel(eNorth)*vVel(eNorth) + vVel(eEast)*vVel(eEast) );
 144     psigt =  atan2(vVel(eEast), vVel(eNorth));
 145     if(psigt < 0.0)
 146       psigt += 2*M_PI;
 147
 148     invMass   = 1.0 / MassBalance->GetMass();
 149     Radius    = h + SeaLevelRadius;
 150     invRadius = 1.0 / Radius;
 151
 152     cosLat = cos(Latitude);
 153     if (cosLat != 0) LongitudeDot = vVel(eEast) / (Radius * cosLat);
 154
 155     LatitudeDot = vVel(eNorth) * invRadius;
 156     RadiusDot   = -vVel(eDown);
 157
 158     Longitude += 0.5*dt*rate*(LongitudeDot + lastLongitudeDot);
 159     Latitude  += 0.5*dt*rate*(LatitudeDot + lastLatitudeDot);
 160     Radius    += 0.5*dt*rate*(RadiusDot + lastRadiusDot);
 161
 162     h = Radius - SeaLevelRadius;           // Geocentric
 163
 164     DistanceAGL = Radius - RunwayRadius;   // Geocentric
 165
 166     hoverb = DistanceAGL/b;
 167
 168     if (Vt > 0) {
 169       hdot_Vt = RadiusDot/Vt;
 170       if (fabs(hdot_Vt) <= 1) gamma = asin(hdot_Vt);
 171     } else {
 172       gamma = 0.0;
 173     }
 174
 175     lastLatitudeDot  = LatitudeDot;
 176     lastLongitudeDot = LongitudeDot;
 177     lastRadiusDot    = RadiusDot;
 178
 179     return false;
 180
 181   } else {
 182     return true;
 183   }
 184 }
 185
 186 //%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
 187
 188 void FGPosition::GetState(void) {
 189   dt = State->Getdt();
 190
 191   Vt        = Translation->GetVt();
 192   vVel      = State->GetTb2l() * Translation->GetUVW();
 193   vVelDot   = State->GetTb2l() * Translation->GetUVWdot();
 194
 195   b = Aircraft->GetWingSpan();
 196 }
 197
 198 //%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
 199
 200 void FGPosition::Seth(double tt) {
 201  h = tt;
 202  Radius    = h + SeaLevelRadius;
 203  DistanceAGL = Radius - RunwayRadius;   // Geocentric
 204  hoverb = DistanceAGL/b;
 205 }
 206
 207 //%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
 208
 209 void FGPosition::SetDistanceAGL(double tt) {
 210   DistanceAGL=tt;
 211   Radius = RunwayRadius + DistanceAGL;
 212   h = Radius - SeaLevelRadius;
 213   hoverb = DistanceAGL/b;
 214 }
 215
 216 //%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
 217
 218 void FGPosition::Debug(void)
 219 {
 220     //TODO: Add your source code here
 221 }
 222