The interface to sunpos now updates a global structure rather than returning

current sun position.

diff --git a/Time/sunpos.c b/Time/sunpos.c
index 3eb00e22ba255b607d79826b05d4b6d2c344f51c..ecb8fcffc6fa6cba294979a4959d338dd95c031b 100644 (file)
--- a/Time/sunpos.c
+++ b/Time/sunpos.c
@@ -44,7 +44,11 @@
 #include <time.h>
 
 #include "sunpos.h"
+#include "fg_time.h"
 #include "../constants.h"
+#include "../Math/fg_geodesy.h"
+#include "../Math/polar.h"
+
 #undef E
 
 
@@ -253,10 +257,32 @@ void fgSunPosition(time_t ssue, double *lon, double *lat) {
 }
 
 
+/* update the cur_time_params structure with the current sun position */
+void fgUpdateSunPos() {
+    struct time_params *t;
+    double sun_gd_lat, sl_radius;
+    static int time_warp = 0;
+
+    t = &cur_time_params;
+
+    time_warp += 600; /* increase this to make the world spin real fast */
+
+    fgSunPosition(time(NULL) + time_warp, &t->sun_lon, &sun_gd_lat);
+
+    fgGeodToGeoc(sun_gd_lat, 0.0, &sl_radius, &t->sun_gc_lat);
+
+    t->fg_sunpos = fgPolarToCart(t->sun_lon, t->sun_gc_lat, sl_radius);
+}
+
+
 /* $Log$
-/* Revision 1.2  1997/08/06 00:24:32  curt
-/* Working on correct real time sun lighting.
+/* Revision 1.3  1997/08/13 20:23:49  curt
+/* The interface to sunpos now updates a global structure rather than returning
+/* current sun position.
 /*
+ * Revision 1.2  1997/08/06 00:24:32  curt
+ * Working on correct real time sun lighting.
+ *
  * Revision 1.1  1997/08/01 15:27:56  curt
  * Initial revision.
  *

diff --git a/Time/sunpos.h b/Time/sunpos.h
index ded7a040c5c39a0b971154c65887ab0ad52da948..767728485047aa17030ff1a9a1fe3f0c91ee4dc6 100644 (file)
--- a/Time/sunpos.h
+++ b/Time/sunpos.h
@@ -43,9 +43,8 @@
 #include <time.h>
 
 
-/* given a particular time (expressed in seconds since the unix
- * epoch), compute position on the earth (lat, lon) such that sun is
- * directly overhead.  (lat, lon are reported in radians */
+/* update the cur_time_params structure with the current sun position */
+void fgUpdateSunPos();
 
 void fgSunPosition(time_t ssue, double *lon, double *lat);