Searched refs:great_circle_direction (Results 1 - 2 of 2) sorted by relevance

/osnet-11/usr/src/cmd/perl/5.8.4/distrib/lib/Math/
H A DTrig.t181 use Math::Trig 'great_circle_direction';
184 unless (near(great_circle_direction(0, 0, 0, pi/2), pi));
189 # unless (near(great_circle_direction(0, 0, pi, pi), -pi()/2));
198 unless (near(rad2deg(great_circle_direction(@London, @Tokyo)),
203 unless (near(rad2deg(great_circle_direction(@Tokyo, @London)),
208 unless (near(rad2deg(great_circle_direction(@Berlin, @Paris)),
213 unless (near(rad2deg(great_circle_direction(@Paris, @Berlin)),
H A DTrig.pm35 @EXPORT_OK = (@rdlcnv, 'great_circle_distance', 'great_circle_direction');
133 sub great_circle_direction { subroutine
434 great_circle_direction() function:
436 use Math::Trig 'great_circle_direction';
438 $direction = great_circle_direction($theta0, $phi0, $theta1, $phi1);
464 use Math::Trig qw(great_circle_direction);
466 $rad = great_circle_direction(@L, @T);

Completed in 21 milliseconds