1 /***************************************************************************
5 ----------------------------------------------------------------------------
7 FUNCTION: Model loop executive
9 ----------------------------------------------------------------------------
11 MODULE STATUS: developmental
13 ----------------------------------------------------------------------------
15 GENEALOGY: Created 15 October 1992 as part of LaRCSIM project
18 ----------------------------------------------------------------------------
20 DESIGNED BY: Bruce Jackson
22 CODED BY: Bruce Jackson
24 MAINTAINED BY: maintainer
26 ----------------------------------------------------------------------------
32 950306 Added parameters to call: dt, which is the step size
33 to be taken this loop (caution: may vary from call to call)
34 and Initialize, which if non-zero, implies an initialization
37 CURRENT RCS HEADER INFO:
40 Revision 1.5 2005/12/19 12:53:21 ehofman
43 clean up some build warnings caught with gcc-4.0.
45 Revision 1.4 2003/07/25 17:53:41 mselig
46 UIUC code initilization mods to tidy things up a bit.
48 Revision 1.3 2003/05/13 18:45:06 curt
51 I have attached some revisions for the UIUCModel and some LaRCsim.
52 The only thing you should need to check is LaRCsim.cxx. The file
53 I attached is a revised version of 1.5 and the latest is 1.7. Also,
54 uiuc_getwind.c and uiuc_getwind.h are no longer in the LaRCsim
55 directory. They have been moved over to UIUCModel.
57 Revision 1.2 2003/03/31 03:05:41 m-selig
58 uiuc wind changes, MSS
60 Revision 1.1.1.1 2003/02/28 01:33:39 rob
61 uiuc version of FlightGear v0.9.0
63 Revision 1.3 2002/12/12 00:01:04 rob
64 *** empty log message ***
66 Revision 1.2 2002/10/22 21:06:49 rob
67 *** empty log message ***
69 Revision 1.2 2002/08/29 18:56:37 rob
70 *** empty log message ***
72 Revision 1.1.1.1 2002/04/24 17:08:23 rob
73 UIUC version of FlightGear-0.7.pre11
75 Revision 1.5 2002/04/01 19:37:34 curt
76 I have attached revisions to the UIUC code. The revisions include the
77 ability to run a nonlinear model with flaps. The files ls_model.c and
78 uiuc_aero.c were changed since we had some functions with the same
79 name. The name changes doesn't affect the code, it just makes it a
80 little easier to read. There are changes in LaRCsim.cxx so UIUC
81 models have engine sound. Could you send me an email when you receive
82 this and/or when the changes make it to the CVS? Thanks.
84 Also I noticed you have some outdated files that are no longer used in
85 the UIUCModel directory. They are uiuc_initializemaps1.cpp,
86 uiuc_initializemaps2.cpp, uiuc_initializemaps3.cpp, and
87 uiuc_initializemaps4.cpp
91 Revision 1.4 2001/09/14 18:47:27 curt
92 More changes in support of UIUCModel.
94 Revision 1.3 2000/10/28 14:30:33 curt
95 Updates by Tony working on the FDM interface bus.
97 Revision 1.2 2000/04/10 18:09:41 curt
98 David Megginson made a few (mostly minor) mods to the LaRCsim files, and
99 it's now possible to choose the LaRCsim model at runtime, as in
105 fgfs --aircraft=uiuc --aircraft-dir=Aircraft-uiuc/Boeing747
107 I did this so that I could play with the UIUC stuff without losing
108 Tony's C172 with its flaps, etc. I did my best to respect the design
109 of the LaRCsim code by staying in C, making only minimal changes, and
110 not introducing any dependencies on the rest of FlightGear. The
111 modified files are attached.
113 Revision 1.1.1.1 1999/06/17 18:07:33 curt
114 Start of 0.7.x branch
116 Revision 1.1.1.1 1999/04/05 21:32:45 curt
117 Start of 0.6.x branch.
119 Revision 1.3 1998/08/06 12:46:39 curt
122 Revision 1.2 1998/01/19 18:40:27 curt
123 Tons of little changes to clean up the code and to remove fatal errors
124 when building with the c++ compiler.
126 Revision 1.1 1997/05/29 00:09:58 curt
127 Initial Flight Gear revision.
129 * Revision 1.3 1995/03/06 18:49:46 bjax
130 * Added dt and initialize flag parameters to subroutine calls. This will
131 * support trim routine (to allow single throttle setting to drive
132 * all four throttle positions, for example, if initialize is TRUE).
134 * Revision 1.2 1993/03/10 06:38:09 bjax
135 * Added additional calls: inertias() and subsystems()... EBJ
137 * Revision 1.1 92/12/30 13:19:08 bjax
141 ----------------------------------------------------------------------------
145 ----------------------------------------------------------------------------
147 CALLED BY: ls_step (in initialization), ls_loop (planned)
149 ----------------------------------------------------------------------------
151 CALLS TO: aero(), engine(), gear()
153 ----------------------------------------------------------------------------
157 ----------------------------------------------------------------------------
161 --------------------------------------------------------------------------*/
164 #include "ls_types.h"
165 #include "ls_model.h"
166 #include "default_model_routines.h"
171 void ls_model( SCALAR dt, int Initialize ) {
172 switch (current_model) {
174 inertias( dt, Initialize );
175 subsystems( dt, Initialize );
176 navion_aero( dt, Initialize );
177 navion_engine( dt, Initialize );
178 navion_gear( dt, Initialize );
181 printf("here we are in C172 \n");
182 if(Initialize < 0) c172_init();
183 inertias( dt, Initialize );
184 subsystems( dt, Initialize );
185 c172_aero( dt, Initialize );
186 c172_engine( dt, Initialize );
187 c172_gear( dt, Initialize );
190 inertias( dt, Initialize );
191 subsystems( dt, Initialize );
192 cherokee_aero( dt, Initialize );
193 cherokee_engine( dt, Initialize );
194 cherokee_gear( dt, Initialize );
197 // printf("here we are in BASIC \n");
198 if(Initialize < 0) basic_init();
199 printf("Initialize %d \n", Initialize);
200 inertias( dt, Initialize );
201 subsystems( dt, Initialize );
202 basic_aero( dt, Initialize );
203 basic_engine( dt, Initialize );
204 basic_gear( dt, Initialize );
207 inertias( dt, Initialize );
208 subsystems( dt, Initialize );
209 // During initialization period, re-initialize velocities
211 if (Initialize !=0) uiuc_init_2_wrapper();
212 uiuc_network_recv_2_wrapper();
213 uiuc_engine_2_wrapper( dt, Initialize );
214 uiuc_wind_2_wrapper( dt, Initialize );
215 uiuc_aero_2_wrapper( dt, Initialize );
216 uiuc_gear_2_wrapper( dt, Initialize );
217 uiuc_network_send_2_wrapper();
218 uiuc_record_2_wrapper(dt);