Merge branch 'newpc92timings' of /scm/spider into newpc92timings

[spider.git] / perl / Sun.pm

diff --git a/perl/Sun.pm b/perl/Sun.pm
index 6b9b88eb4da0edf6dc59656e2b6af2a8d270d986..aaf85a33eeb18e569f00bdf2309afa28c717ef70 100644 (file)
--- a/perl/Sun.pm
+++ b/perl/Sun.pm
@@ -16,7 +16,7 @@
 #
 # Copyright (c) 1999 - Steve Franke K9AN
 #
-# $Id$
+#
 # 
 # 2005/02/25 add calculation of civil dawn and dusk, defined to be times
 #            when solar zenith angle is 96 degrees.
@@ -26,7 +26,6 @@
 
 package Sun;
 
-use POSIX;
 
 require Exporter;
 @ISA = qw(Exporter);
@@ -34,12 +33,6 @@ require Exporter;
 
 use strict;
 
-use vars qw($VERSION $BRANCH);
-$VERSION = sprintf( "%d.%03d", q$Revision$ =~ /(\d+)\.(\d+)/ );
-$BRANCH = sprintf( "%d.%03d", q$Revision$ =~ /\d+\.\d+\.(\d+)\.(\d+)/  || (0,0));
-$main::build += $VERSION;
-$main::branch += $BRANCH;
-
 use vars qw($pi $d2r $r2d);
  
 $pi = 3.141592653589;
@@ -50,6 +43,9 @@ use vars qw(%keps);
 use Keps;
 use DXVars;
 use DXUtil;
+use DXDebug;
+
+use POSIX qw(:math_h);
 
 # reload the keps data
 sub load