Weather/weather.c

   1 /**************************************************************************
   2  * weather.c -- routines to model weather
   3  *
   4  * Written by Curtis Olson, started July 1997.
   5  *
   6  * Copyright (C) 1997  Curtis L. Olson  - curt@infoplane.com
   7  *
   8  * This program is free software; you can redistribute it and/or
   9  * modify it under the terms of the GNU General Public License as
  10  * published by the Free Software Foundation; either version 2 of the
  11  * License, or (at your option) any later version.
  12  *
  13  * This program is distributed in the hope that it will be useful, but
  14  * WITHOUT ANY WARRANTY; without even the implied warranty of
  15  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  16  * General Public License for more details.
  17  *
  18  * You should have received a copy of the GNU General Public License
  19  * along with this program; if not, write to the Free Software
  20  * Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
  21  *
  22  * $Id$
  23  * (Log is kept at end of this file)
  24  **************************************************************************/
  25
  26
  27 #include "weather.h"
  28 #include "../Aircraft/aircraft.h"
  29 #include "../Math/fg_random.h"
  30
  31
  32 /* This is a record containing current weather info */
  33 struct fgWEATHER current_weather;
  34
  35
  36 /* Initialize the weather modeling subsystem */
  37 void fgWeatherInit(void) {
  38     struct fgWEATHER *w;
  39
  40     w = &current_weather;
  41
  42     /* Configure some wind */
  43     /* FG_V_north_airmass = 15; */ /* ft/s =~ 10mph */
  44
  45     w->visibility = 60000.0;       /* meters = 60km */
  46 }
  47
  48
  49 /* Update the weather parameters for the current position */
  50 void fgWeatherUpdate(double lon, double lat, double alt) {
  51     struct fgFLIGHT *f;
  52     struct fgWEATHER *w;
  53
  54     f = &current_aircraft.flight;
  55     w = &current_weather;
  56
  57     /* Add some random turbulence */
  58     /* FG_U_gust = fg_random() * 1.0 - 0.5;
  59     FG_V_gust = fg_random() * 1.0 - 0.5;
  60     FG_W_gust = fg_random() * 1.0 - 0.5; */
  61 }
  62
  63
  64 /* $Log$
  65 /* Revision 1.7  1997/12/10 22:37:56  curt
  66 /* Prepended "fg" on the name of all global structures that didn't have it yet.
  67 /* i.e. "struct WEATHER {}" became "struct fgWEATHER {}"
  68 /*
  69  * Revision 1.6  1997/08/27 03:30:38  curt
  70  * Changed naming scheme of basic shared structures.
  71  *
  72  * Revision 1.5  1997/08/22 21:34:42  curt
  73  * Doing a bit of reorganizing and house cleaning.
  74  *
  75  * Revision 1.4  1997/08/02 16:23:55  curt
  76  * Misc. tweaks.
  77  *
  78  * Revision 1.3  1997/07/31 22:52:41  curt
  79  * Working on redoing internal coordinate systems & scenery transformations.
  80  *
  81  * Revision 1.2  1997/07/30 16:12:44  curt
  82  * Moved fg_random routines from Util/ to Math/
  83  *
  84  * Revision 1.1  1997/07/19 23:03:57  curt
  85  * Initial revision.
  86  *
  87  */