Upgrade to Math-Complex-1.55
Steve Hay [Wed, 14 Jan 2009 18:12:18 +0000 (18:12 +0000)]
lib/Math/Complex.pm
lib/Math/Trig.pm

index 523b11c..7d05a44 100644 (file)
@@ -9,7 +9,7 @@ package Math::Complex;
 
 use vars qw($VERSION @ISA @EXPORT @EXPORT_OK %EXPORT_TAGS $Inf $ExpInf);
 
-$VERSION = 1.54;
+$VERSION = 1.55;
 
 use Config;
 
index 6d4d949..30e8433 100644 (file)
@@ -10,14 +10,14 @@ package Math::Trig;
 use 5.005;
 use strict;
 
-use Math::Complex 1.54;
+use Math::Complex 1.55;
 use Math::Complex qw(:trig :pi);
 
 use vars qw($VERSION $PACKAGE @ISA @EXPORT @EXPORT_OK %EXPORT_TAGS);
 
 @ISA = qw(Exporter);
 
-$VERSION = 1.18;
+$VERSION = 1.19;
 
 my @angcnv = qw(rad2deg rad2grad
                deg2rad deg2grad
@@ -166,7 +166,7 @@ sub great_circle_distance {
 sub great_circle_direction {
     my ( $theta0, $phi0, $theta1, $phi1 ) = @_;
 
-    my $distance = &great_circle_distance;
+    my $distance = great_circle_distance($theta0, $phi0, $theta1, $phi1);
 
     my $lat0 = pip2 - $phi0;
     my $lat1 = pip2 - $phi1;
@@ -684,7 +684,7 @@ B<NOTE>: you B<cannot> get from A to B like this:
 and expect C to be B, because the bearing constantly changes when
 going from A to B (except in some special case like the meridians or
 the circles of latitudes) and in great_circle_destination() one gives
-a constant bearing to follow.
+a B<constant> bearing to follow.
 
 =head2 CAVEAT FOR GREAT CIRCLE FORMULAS