1 /*%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
6 Purpose: Encapsulates the inertial frame forces (coriolis and centrifugal)
8 ------------- Copyright (C) 2000 Jon S. Berndt (jsb@hal-pc.org) -------------
10 This program is free software; you can redistribute it and/or modify it under
11 the terms of the GNU General Public License as published by the Free Software
12 Foundation; either version 2 of the License, or (at your option) any later
15 This program is distributed in the hope that it will be useful, but WITHOUT
16 ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS
17 FOR A PARTICULAR PURPOSE. See the GNU General Public License for more
20 You should have received a copy of the GNU General Public License along with
21 this program; if not, write to the Free Software Foundation, Inc., 59 Temple
22 Place - Suite 330, Boston, MA 02111-1307, USA.
24 Further information about the GNU General Public License can also be found on
25 the world wide web at http://www.gnu.org.
27 FUNCTIONAL DESCRIPTION
28 --------------------------------------------------------------------------------
31 --------------------------------------------------------------------------------
34 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
36 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%*/
38 #include "FGInertial.h"
39 #include "FGPosition.h"
40 #include "FGMassBalance.h"
42 static const char *IdSrc = "$Id$";
43 static const char *IdHdr = ID_INERTIAL;
45 /*%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
47 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%*/
50 FGInertial::FGInertial(FGFDMExec* fgex) : FGModel(fgex),
60 if (debug_lvl & 2) cout << "Instantiated: FGInertial" << endl;
63 //%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
65 FGInertial::~FGInertial(void)
67 if (debug_lvl & 2) cout << "Destroyed: FGInertial" << endl;
70 //%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
72 bool FGInertial::Run(void)
74 float stht, ctht, sphi, cphi;
76 if (!FGModel::Run()) {
78 stht = sin(Rotation->GetEuler(eTht));
79 ctht = cos(Rotation->GetEuler(eTht));
80 sphi = sin(Rotation->GetEuler(ePhi));
81 cphi = cos(Rotation->GetEuler(ePhi));
83 vGravity(eX) = vForces(eX) = -GRAVITY*stht;
84 vGravity(eY) = vForces(eY) = GRAVITY*sphi*ctht;
85 vGravity(eZ) = vForces(eZ) = GRAVITY*cphi*ctht;
87 // The following equation for vOmegaLocal terms shows the angular velocity
88 // calculation _for_the_local_frame_ given the earth's rotation (first set)
89 // at the current latitude, and also the component due to the aircraft
90 // motion over the curved surface of the earth (second set).
92 vOmegaLocal(eX) = OMEGA_EARTH * cos(Position->GetLatitude());
93 vOmegaLocal(eY) = 0.0;
94 vOmegaLocal(eZ) = OMEGA_EARTH * -sin(Position->GetLatitude());
96 vOmegaLocal(eX) += Position->GetVe() / Position->GetRadius();
97 vOmegaLocal(eY) += -Position->GetVn() / Position->GetRadius();
98 vOmegaLocal(eZ) += 0.00;
100 // vForces = State->GetTl2b()*(-2.0*vOmegaLocal * Position->GetVel());
102 vRadius(3) = Position->GetRadius();
103 vForces += State->GetTl2b()*(vOmegaLocal * (vOmegaLocal * vRadius));
105 vForces *= MassBalance->GetMass(); // IMPORTANT !!!!!!!!!!!!!!!!!!!!!!!!!!!!
113 //%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
115 bool FGInertial::LoadInertial(FGConfigFile* AC_cfg)
120 //%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
122 void FGInertial::Debug(void)
124 //TODO: Add your source code here