From: Steve Hay <SteveHay@planit.com>
Date: Wed, 14 Jan 2009 18:12:18 +0000 (+0000)
Subject: Upgrade to Math-Complex-1.55
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=1e98a568fc7f77573643406492540266e2a7c858;p=p5sagit%2Fp5-mst-13.2.git

Upgrade to Math-Complex-1.55
---

diff --git a/lib/Math/Complex.pm b/lib/Math/Complex.pm
index 523b11c..7d05a44 100644
--- a/lib/Math/Complex.pm
+++ b/lib/Math/Complex.pm
@@ -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;
 
diff --git a/lib/Math/Trig.pm b/lib/Math/Trig.pm
index 6d4d949..30e8433 100644
--- a/lib/Math/Trig.pm
+++ b/lib/Math/Trig.pm
@@ -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