|
Geo::Template - Not a real package but a template for your Geo:: functions. |
Geo::Template - Not a real package but a template for your Geo:: functions.
use Geo::Template; my $obj = Geo::Template->new(); print "A=", $obj->A, "\n";
This package is not a real package but an example of how to package your Geo:: functions in a package.
The new() constructor may be called with any parameter that is appropriate to the ellipsoid method which establishes the ellipsoid.
my $obj = Geo::Template->new(); #default "WGS84"
Method to set or retrieve the current ellipsoid object. The ellipsoid is a Geo::Ellipsoids object.
my $ellipsoid=$obj->ellipsoid; #Default is WGS84
$obj->ellipsoid('Clarke 1866'); #Built in ellipsoids from Geo::Ellipsoids
$obj->ellipsoid({a=>1}); #Custom Sphere 1 unit radius
Example method...
my $A=$obj->A;
Please send to the geo-perl email list.
Michael R. Davis qw/perl michaelrdavis com/
Copyright (c) 2006 Michael R. Davis (mrdvt92)
This library is free software; you can redistribute it and/or modify it under the same terms as Perl itself.
|
Geo::Template - Not a real package but a template for your Geo:: functions. |