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 /* Initialize the weather modeling subsystem */
  33 void fgWeatherInit(void) {
  34     struct WEATHER *w;
  35
  36     w = &current_weather;
  37
  38     /* Configure some wind */
  39     /* FG_V_north_airmass = 15; */ /* ft/s =~ 10mph */
  40
  41     w->visibility = 60000.0;       /* meters = 60km */
  42 }
  43
  44
  45 /* Update the weather parameters for the current position */
  46 void fgWeatherUpdate(double lon, double lat, double alt) {
  47     struct FLIGHT *f;
  48     struct WEATHER *w;
  49
  50     f = &current_aircraft.flight;
  51     w = &current_weather;
  52
  53     /* Add some random turbulence */
  54     /* FG_U_gust = fg_random() * 1.0 - 0.5;
  55     FG_V_gust = fg_random() * 1.0 - 0.5;
  56     FG_W_gust = fg_random() * 1.0 - 0.5; */
  57 }
  58
  59
  60 /* $Log$
  61 /* Revision 1.6  1997/08/27 03:30:38  curt
  62 /* Changed naming scheme of basic shared structures.
  63 /*
  64  * Revision 1.5  1997/08/22 21:34:42  curt
  65  * Doing a bit of reorganizing and house cleaning.
  66  *
  67  * Revision 1.4  1997/08/02 16:23:55  curt
  68  * Misc. tweaks.
  69  *
  70  * Revision 1.3  1997/07/31 22:52:41  curt
  71  * Working on redoing internal coordinate systems & scenery transformations.
  72  *
  73  * Revision 1.2  1997/07/30 16:12:44  curt
  74  * Moved fg_random routines from Util/ to Math/
  75  *
  76  * Revision 1.1  1997/07/19 23:03:57  curt
  77  * Initial revision.
  78  *
  79  */