(Perl Data Language) aims to turn perl into an efficient numerical language for scientific computing (similar to IDL and MatLab).
| Proj4.pm (PDL-2.074) | : | Proj4.pm (PDL-2.075) |
|---|
| # | | # |
| # GENERATED WITH PDL::PP! Don't modify! | | # GENERATED WITH PDL::PP! Don't modify! |
| # | | # |
| package PDL::Transform::Proj4; | | package PDL::Transform::Proj4; |
| | |
|
| our @EXPORT_OK = qw(t_proj _proj4_dummy ); | | our @EXPORT_OK = qw(t_proj t_proj_adams_hemi t_proj_adams_ws1 t_proj_adams_ws2 t
_proj_aea t_proj_aeqd t_proj_affine t_proj_airy t_proj_aitoff t_proj_alsk t_proj
_apian t_proj_august t_proj_axisswap t_proj_bacon t_proj_bertin1953 t_proj_bipc
t_proj_boggs t_proj_bonne t_proj_calcofi t_proj_cart t_proj_cass t_proj_cc t_pro
j_ccon t_proj_cea t_proj_chamb t_proj_col_urban t_proj_collg t_proj_comill t_pro
j_crast t_proj_defmodel t_proj_deformation t_proj_denoy t_proj_eck1 t_proj_eck2
t_proj_eck3 t_proj_eck4 t_proj_eck5 t_proj_eck6 t_proj_eqc t_proj_eqdc t_proj_eq
earth t_proj_etmerc t_proj_euler t_proj_fahey t_proj_fouc t_proj_fouc_s t_proj_g
all t_proj_geoc t_proj_geocent t_proj_geogoffset t_proj_geos t_proj_gins8 t_proj
_gn_sinu t_proj_gnom t_proj_goode t_proj_gs48 t_proj_gs50 t_proj_gstmerc t_proj_
guyou t_proj_hammer t_proj_hatano t_proj_healpix t_proj_helmert t_proj_hgridshif
t t_proj_horner t_proj_igh t_proj_igh_o t_proj_imw_p t_proj_isea t_proj_kav5 t_p
roj_kav7 t_proj_krovak t_proj_labrd t_proj_laea t_proj_lagrng t_proj_larr t_proj
_lask t_proj_latlon t_proj_latlong t_proj_lcc t_proj_lcca t_proj_leac t_proj_lee
_os t_proj_longlat t_proj_lonlat t_proj_loxim t_proj_lsat t_proj_mbt_fps t_proj_
mbt_s t_proj_mbtfpp t_proj_mbtfpq t_proj_mbtfps t_proj_merc t_proj_mil_os t_proj
_mill t_proj_misrsom t_proj_moll t_proj_molobadekas t_proj_molodensky t_proj_mur
d1 t_proj_murd2 t_proj_murd3 t_proj_natearth t_proj_natearth2 t_proj_nell t_proj
_nell_h t_proj_nicol t_proj_noop t_proj_nsper t_proj_nzmg t_proj_ob_tran t_proj_
ocea t_proj_oea t_proj_omerc t_proj_ortel t_proj_ortho t_proj_patterson t_proj_p
conic t_proj_peirce_q t_proj_pipeline t_proj_poly t_proj_pop t_proj_push t_proj_
putp1 t_proj_putp2 t_proj_putp3 t_proj_putp3p t_proj_putp4p t_proj_putp5 t_proj_
putp5p t_proj_putp6 t_proj_putp6p t_proj_qsc t_proj_qua_aut t_proj_rhealpix t_pr
oj_robin t_proj_rouss t_proj_rpoly t_proj_s2 t_proj_sch t_proj_set t_proj_sinu t
_proj_somerc t_proj_stere t_proj_sterea t_proj_tcc t_proj_tcea t_proj_times t_pr
oj_tinshift t_proj_tissot t_proj_tmerc t_proj_tobmerc t_proj_topocentric t_proj_
tpeqd t_proj_tpers t_proj_unitconvert t_proj_ups t_proj_urm5 t_proj_urmfps t_pro
j_utm t_proj_vandg t_proj_vandg2 t_proj_vandg3 t_proj_vandg4 t_proj_vgridshift t
_proj_vitk1 t_proj_wag1 t_proj_wag2 t_proj_wag3 t_proj_wag4 t_proj_wag5 t_proj_w
ag6 t_proj_wag7 t_proj_webmerc t_proj_weren t_proj_wink1 t_proj_wink2 t_proj_win
tri t_proj_xyzgridshift _proj4_dummy ); |
| our %EXPORT_TAGS = (Func=>\@EXPORT_OK); | | our %EXPORT_TAGS = (Func=>\@EXPORT_OK); |
| | |
| use PDL::Core; | | use PDL::Core; |
| use PDL::Exporter; | | use PDL::Exporter; |
| use DynaLoader; | | use DynaLoader; |
| | |
| our @ISA = ( 'PDL::Exporter','DynaLoader','PDL::Transform' ); | | our @ISA = ( 'PDL::Exporter','DynaLoader','PDL::Transform' ); |
| push @PDL::Core::PP, __PACKAGE__; | | push @PDL::Core::PP, __PACKAGE__; |
| bootstrap PDL::Transform::Proj4 ; | | bootstrap PDL::Transform::Proj4 ; |
| | |
| BEGIN { | | BEGIN { |
| use PDL::LiteF; | | use PDL::LiteF; |
| use PDL::NiceSlice; | | use PDL::NiceSlice; |
| use PDL::Transform; | | use PDL::Transform; |
| use PDL::GIS::Proj; | | use PDL::GIS::Proj; |
| | |
| } | | } |
| | |
|
| #line 28 "Proj4.pd" | | #line 27 "Proj4.pd" |
| | |
| # | | # |
| # PDL::Transform::Proj4 | | # PDL::Transform::Proj4 |
| # | | # |
| # Judd Taylor, USF IMaRS | | # Judd Taylor, USF IMaRS |
| # 4 Apr 2006 | | # 4 Apr 2006 |
| # | | # |
| | |
| =head1 NAME | | =head1 NAME |
| | |
| | |
| skipping to change at line 318 | | skipping to change at line 318 |
|---|
| { | | { |
| my $self = shift; | | my $self = shift; |
| my $sub = "PDL::Transform::Proj4::update_proj_string()"; | | my $sub = "PDL::Transform::Proj4::update_proj_string()"; |
| | |
| # (Re)Generate the proj_params string from the options passed: | | # (Re)Generate the proj_params string from the options passed: |
| # | | # |
| delete( $self->{params}->{proj_params} ); | | delete( $self->{params}->{proj_params} ); |
| my $proj_string = ""; | | my $proj_string = ""; |
| | |
| foreach my $param ( sort keys %{ $self->{params} } ) | | foreach my $param ( sort keys %{ $self->{params} } ) |
|
| #line 326 "Proj4.pm" | | #line 327 "Proj4.pm" |
| #line 321 "Proj4.pd" | | #line 321 "Proj4.pd" |
| { | | { |
| next unless defined( $self->{params}->{$param} ); | | next unless defined( $self->{params}->{$param} ); |
| | |
| $proj_string .= ( $self->{params}->{$param} eq 'ON' ) | | $proj_string .= ( $self->{params}->{$param} eq 'ON' ) |
| ? "+$param " : " +$param=" . $self->{params}->{$param} .
" "; | | ? "+$param " : " +$param=" . $self->{params}->{$param} .
" "; |
| #print STDERR "$sub: Adding \'$proj_string\'...\n"; | | #print STDERR "$sub: Adding \'$proj_string\'...\n"; |
| } | | } |
| | |
| #print STDERR "$sub: Final proj_params: \'$proj_string\'\n"; | | #print STDERR "$sub: Final proj_params: \'$proj_string\'\n"; |
| | |
| skipping to change at line 346 | | skipping to change at line 346 |
|---|
| $self->update_proj_string(); | | $self->update_proj_string(); |
| return $self->{params}->{proj_params}; | | return $self->{params}->{proj_params}; |
| } # End of proj_params()... | | } # End of proj_params()... |
| | |
| sub t_proj | | sub t_proj |
| { | | { |
| PDL::Transform::Proj4->new( @_ ); | | PDL::Transform::Proj4->new( @_ ); |
| } # End of t_proj()... | | } # End of t_proj()... |
| | |
| 1; | | 1; |
|
| #line 354 "Proj4.pm" | | #line 355 "Proj4.pm" |
| | |
|
| #line 354 "Proj4.pd" | | #line 353 "Proj4.pd" |
| | |
| =head1 FUNCTIONS | | =head1 FUNCTIONS |
| | |
| =head2 t_proj | | =head2 t_proj |
| | |
| This is the main entry point for the generalized interface. See above on its usa
ge. | | This is the main entry point for the generalized interface. See above on its usa
ge. |
| | |
| =cut | | =cut |
|
| #line 371 "Proj4.pm" | | #line 373 "Proj4.pm" |
| | |
| | #line 469 "Proj4.pd" |
| | |
| | #line 450 "Proj4.pd" |
| | =head2 t_proj_adams_hemi |
| | |
| | Autogenerated transformation function for Proj4 projection code adams_hemi. |
| | |
| | The full name for this projection is Adams Hemisphere in a Square. |
| | |
| | =cut |
| | |
| | sub t_proj_adams_hemi |
| | { 'PDL::Transform::Proj4::adams_hemi'->new( @_ ); } |
| | #line 484 "Proj4.pd" |
| | #line 394 "Proj4.pm" |
| | |
| | #line 469 "Proj4.pd" |
| | |
| | #line 450 "Proj4.pd" |
| | =head2 t_proj_adams_ws1 |
| | |
| | Autogenerated transformation function for Proj4 projection code adams_ws1. |
| | |
| | The full name for this projection is Adams World in a Square I. |
| | |
| | =cut |
| | |
| | sub t_proj_adams_ws1 |
| | { 'PDL::Transform::Proj4::adams_ws1'->new( @_ ); } |
| | #line 484 "Proj4.pd" |
| | #line 415 "Proj4.pm" |
| | |
| | #line 469 "Proj4.pd" |
| | |
| | #line 450 "Proj4.pd" |
| | =head2 t_proj_adams_ws2 |
| | |
| | Autogenerated transformation function for Proj4 projection code adams_ws2. |
| | |
| | The full name for this projection is Adams World in a Square II. |
| | |
| | =cut |
| | |
| | sub t_proj_adams_ws2 |
| | { 'PDL::Transform::Proj4::adams_ws2'->new( @_ ); } |
| | #line 484 "Proj4.pd" |
| | #line 436 "Proj4.pm" |
| | |
| | #line 469 "Proj4.pd" |
| | |
| | #line 450 "Proj4.pd" |
| | =head2 t_proj_aea |
| | |
| | Autogenerated transformation function for Proj4 projection code aea. |
| | |
| | The full name for this projection is Albers Equal Area. |
| | |
| | Projection Parameters |
| | |
| | =for options |
| | |
| | =over 4 |
| | |
| | =item lat_1 |
| | |
| | =item lat_2 |
| | |
| | =back |
| | |
| | =cut |
| | |
| | sub t_proj_aea |
| | { 'PDL::Transform::Proj4::aea'->new( @_ ); } |
| | #line 497 "Proj4.pd" |
| | #line 470 "Proj4.pm" |
| | |
| | #line 469 "Proj4.pd" |
| | |
| | #line 450 "Proj4.pd" |
| | =head2 t_proj_aeqd |
| | |
| | Autogenerated transformation function for Proj4 projection code aeqd. |
| | |
| | The full name for this projection is Azimuthal Equidistant. |
| | |
| | Projection Parameters |
| | |
| | =for options |
| | |
| | =over 4 |
| | |
| | =item guam |
| | |
| | =item lat_0 |
| | |
| | =back |
| | |
| | =cut |
| | |
| | sub t_proj_aeqd |
| | { 'PDL::Transform::Proj4::aeqd'->new( @_ ); } |
| | #line 497 "Proj4.pd" |
| | #line 504 "Proj4.pm" |
| | |
| | #line 469 "Proj4.pd" |
| | |
| | #line 450 "Proj4.pd" |
| | =head2 t_proj_affine |
| | |
| | Autogenerated transformation function for Proj4 projection code affine. |
| | |
| | The full name for this projection is Affine transformation. |
| | |
| | =cut |
| | |
| | sub t_proj_affine |
| | { 'PDL::Transform::Proj4::affine'->new( @_ ); } |
| | #line 484 "Proj4.pd" |
| | #line 525 "Proj4.pm" |
| | |
| | #line 469 "Proj4.pd" |
| | |
| | #line 450 "Proj4.pd" |
| | =head2 t_proj_airy |
| | |
| | Autogenerated transformation function for Proj4 projection code airy. |
| | |
| | The full name for this projection is Airy. |
| | |
| | Projection Parameters |
| | |
| | =for options |
| | |
| | =over 4 |
| | |
| | =item lat_b |
| | |
| | =item no_cut |
| | |
| | =back |
| | |
| | =cut |
| | |
| | sub t_proj_airy |
| | { 'PDL::Transform::Proj4::airy'->new( @_ ); } |
| | #line 497 "Proj4.pd" |
| | #line 559 "Proj4.pm" |
| | |
| | #line 469 "Proj4.pd" |
| | |
| | #line 450 "Proj4.pd" |
| | =head2 t_proj_aitoff |
| | |
| | Autogenerated transformation function for Proj4 projection code aitoff. |
| | |
| | The full name for this projection is Aitoff. |
| | |
| | =cut |
| | |
| | sub t_proj_aitoff |
| | { 'PDL::Transform::Proj4::aitoff'->new( @_ ); } |
| | #line 484 "Proj4.pd" |
| | #line 580 "Proj4.pm" |
| | |
| | #line 469 "Proj4.pd" |
| | |
| | #line 450 "Proj4.pd" |
| | =head2 t_proj_alsk |
| | |
| | Autogenerated transformation function for Proj4 projection code alsk. |
| | |
| | The full name for this projection is Modified Stereographic of Alaska. |
| | |
| | =cut |
| | |
| | sub t_proj_alsk |
| | { 'PDL::Transform::Proj4::alsk'->new( @_ ); } |
| | #line 484 "Proj4.pd" |
| | #line 601 "Proj4.pm" |
| | |
| | #line 469 "Proj4.pd" |
| | |
| | #line 450 "Proj4.pd" |
| | =head2 t_proj_apian |
| | |
| | Autogenerated transformation function for Proj4 projection code apian. |
| | |
| | The full name for this projection is Apian Globular I. |
| | |
| | =cut |
| | |
| | sub t_proj_apian |
| | { 'PDL::Transform::Proj4::apian'->new( @_ ); } |
| | #line 484 "Proj4.pd" |
| | #line 622 "Proj4.pm" |
| | |
| | #line 469 "Proj4.pd" |
| | |
| | #line 450 "Proj4.pd" |
| | =head2 t_proj_august |
| | |
| | Autogenerated transformation function for Proj4 projection code august. |
| | |
| | The full name for this projection is August Epicycloidal. |
| | |
| | =cut |
| | |
| | sub t_proj_august |
| | { 'PDL::Transform::Proj4::august'->new( @_ ); } |
| | #line 484 "Proj4.pd" |
| | #line 643 "Proj4.pm" |
| | |
| | #line 469 "Proj4.pd" |
| | |
| | #line 450 "Proj4.pd" |
| | =head2 t_proj_axisswap |
| | |
| | Autogenerated transformation function for Proj4 projection code axisswap. |
| | |
| | The full name for this projection is Axis ordering. |
| | |
| | =cut |
| | |
| | sub t_proj_axisswap |
| | { 'PDL::Transform::Proj4::axisswap'->new( @_ ); } |
| | #line 484 "Proj4.pd" |
| | #line 664 "Proj4.pm" |
| | |
| | #line 469 "Proj4.pd" |
| | |
| | #line 450 "Proj4.pd" |
| | =head2 t_proj_bacon |
| | |
| | Autogenerated transformation function for Proj4 projection code bacon. |
| | |
| | The full name for this projection is Bacon Globular. |
| | |
| | =cut |
| | |
| | sub t_proj_bacon |
| | { 'PDL::Transform::Proj4::bacon'->new( @_ ); } |
| | #line 484 "Proj4.pd" |
| | #line 685 "Proj4.pm" |
| | |
| | #line 469 "Proj4.pd" |
| | |
| | #line 450 "Proj4.pd" |
| | =head2 t_proj_bertin1953 |
| | |
| | Autogenerated transformation function for Proj4 projection code bertin1953. |
| | |
| | The full name for this projection is Bertin 1953. |
| | |
| | =cut |
| | |
| | sub t_proj_bertin1953 |
| | { 'PDL::Transform::Proj4::bertin1953'->new( @_ ); } |
| | #line 484 "Proj4.pd" |
| | #line 706 "Proj4.pm" |
| | |
| | #line 469 "Proj4.pd" |
| | |
| | #line 450 "Proj4.pd" |
| | =head2 t_proj_bipc |
| | |
| | Autogenerated transformation function for Proj4 projection code bipc. |
| | |
| | The full name for this projection is Bipolar conic of western hemisphere. |
| | |
| | =cut |
| | |
| | sub t_proj_bipc |
| | { 'PDL::Transform::Proj4::bipc'->new( @_ ); } |
| | #line 484 "Proj4.pd" |
| | #line 727 "Proj4.pm" |
| | |
| | #line 469 "Proj4.pd" |
| | |
| | #line 450 "Proj4.pd" |
| | =head2 t_proj_boggs |
| | |
| | Autogenerated transformation function for Proj4 projection code boggs. |
| | |
| | The full name for this projection is Boggs Eumorphic. |
| | |
| | =cut |
| | |
| | sub t_proj_boggs |
| | { 'PDL::Transform::Proj4::boggs'->new( @_ ); } |
| | #line 484 "Proj4.pd" |
| | #line 748 "Proj4.pm" |
| | |
| | #line 469 "Proj4.pd" |
| | |
| | #line 450 "Proj4.pd" |
| | =head2 t_proj_bonne |
| | |
| | Autogenerated transformation function for Proj4 projection code bonne. |
| | |
| | The full name for this projection is Bonne (Werner lat_1=90). |
| | |
| | Projection Parameters |
| | |
| | =for options |
| | |
| | =over 4 |
| | |
| | =item lat_1 |
| | |
| | =back |
| | |
| | =cut |
| | |
| | sub t_proj_bonne |
| | { 'PDL::Transform::Proj4::bonne'->new( @_ ); } |
| | #line 495 "Proj4.pd" |
| | #line 780 "Proj4.pm" |
| | |
| | #line 469 "Proj4.pd" |
| | |
| | #line 450 "Proj4.pd" |
| | =head2 t_proj_calcofi |
| | |
| | Autogenerated transformation function for Proj4 projection code calcofi. |
| | |
| | The full name for this projection is Cal Coop Ocean Fish Invest Lines/Stations. |
| | |
| | =cut |
| | |
| | sub t_proj_calcofi |
| | { 'PDL::Transform::Proj4::calcofi'->new( @_ ); } |
| | #line 484 "Proj4.pd" |
| | #line 801 "Proj4.pm" |
| | |
| | #line 469 "Proj4.pd" |
| | |
| | #line 450 "Proj4.pd" |
| | =head2 t_proj_cart |
| | |
| | Autogenerated transformation function for Proj4 projection code cart. |
| | |
| | The full name for this projection is Geodetic/cartesian conversions. |
| | |
| | =cut |
| | |
| | sub t_proj_cart |
| | { 'PDL::Transform::Proj4::cart'->new( @_ ); } |
| | #line 484 "Proj4.pd" |
| | #line 822 "Proj4.pm" |
| | |
| | #line 469 "Proj4.pd" |
| | |
| | #line 450 "Proj4.pd" |
| | =head2 t_proj_cass |
| | |
| | Autogenerated transformation function for Proj4 projection code cass. |
| | |
| | The full name for this projection is Cassini. |
| | |
| | =cut |
| | |
| | sub t_proj_cass |
| | { 'PDL::Transform::Proj4::cass'->new( @_ ); } |
| | #line 484 "Proj4.pd" |
| | #line 843 "Proj4.pm" |
| | |
| | #line 469 "Proj4.pd" |
| | |
| | #line 450 "Proj4.pd" |
| | =head2 t_proj_cc |
| | |
| | Autogenerated transformation function for Proj4 projection code cc. |
| | |
| | The full name for this projection is Central Cylindrical. |
| | |
| | =cut |
| | |
| | sub t_proj_cc |
| | { 'PDL::Transform::Proj4::cc'->new( @_ ); } |
| | #line 484 "Proj4.pd" |
| | #line 864 "Proj4.pm" |
| | |
| | #line 469 "Proj4.pd" |
| | |
| | #line 450 "Proj4.pd" |
| | =head2 t_proj_ccon |
| | |
| | Autogenerated transformation function for Proj4 projection code ccon. |
| | |
| | The full name for this projection is Central Conic. |
| | |
| | Projection Parameters |
| | |
| | =for options |
| | |
| | =over 4 |
| | |
| | =item lat_1 |
| | |
| | =back |
| | |
| | =cut |
| | |
| | sub t_proj_ccon |
| | { 'PDL::Transform::Proj4::ccon'->new( @_ ); } |
| | #line 495 "Proj4.pd" |
| | #line 896 "Proj4.pm" |
| | |
| | #line 469 "Proj4.pd" |
| | |
| | #line 450 "Proj4.pd" |
| | =head2 t_proj_cea |
| | |
| | Autogenerated transformation function for Proj4 projection code cea. |
| | |
| | The full name for this projection is Equal Area Cylindrical. |
| | |
| | Projection Parameters |
| | |
| | =for options |
| | |
| | =over 4 |
| | |
| | =item lat_ts |
| | |
| | =back |
| | |
| | =cut |
| | |
| | sub t_proj_cea |
| | { 'PDL::Transform::Proj4::cea'->new( @_ ); } |
| | #line 495 "Proj4.pd" |
| | #line 928 "Proj4.pm" |
| | |
| | #line 469 "Proj4.pd" |
| | |
| | #line 450 "Proj4.pd" |
| | =head2 t_proj_chamb |
| | |
| | Autogenerated transformation function for Proj4 projection code chamb. |
| | |
| | The full name for this projection is Chamberlin Trimetric. |
| | |
| | Projection Parameters |
| | |
| | =for options |
| | |
| | =over 4 |
| | |
| | =item lat_1 |
| | |
| | =item lat_2 |
| | |
| | =item lat_3 |
| | |
| | =item lon_1 |
| | |
| | =item lon_2 |
| | |
| | =item lon_3 |
| | |
| | =back |
| | |
| | =cut |
| | |
| | sub t_proj_chamb |
| | { 'PDL::Transform::Proj4::chamb'->new( @_ ); } |
| | #line 505 "Proj4.pd" |
| | #line 970 "Proj4.pm" |
| | |
| | #line 469 "Proj4.pd" |
| | |
| | #line 450 "Proj4.pd" |
| | =head2 t_proj_col_urban |
| | |
| | Autogenerated transformation function for Proj4 projection code col_urban. |
| | |
| | The full name for this projection is Colombia Urban. |
| | |
| | Projection Parameters |
| | |
| | =for options |
| | |
| | =over 4 |
| | |
| | =item h_0 |
| | |
| | =back |
| | |
| | =cut |
| | |
| | sub t_proj_col_urban |
| | { 'PDL::Transform::Proj4::col_urban'->new( @_ ); } |
| | #line 495 "Proj4.pd" |
| | #line 1002 "Proj4.pm" |
| | |
| | #line 469 "Proj4.pd" |
| | |
| | #line 450 "Proj4.pd" |
| | =head2 t_proj_collg |
| | |
| | Autogenerated transformation function for Proj4 projection code collg. |
| | |
| | The full name for this projection is Collignon. |
| | |
| | =cut |
| | |
| | sub t_proj_collg |
| | { 'PDL::Transform::Proj4::collg'->new( @_ ); } |
| | #line 484 "Proj4.pd" |
| | #line 1023 "Proj4.pm" |
| | |
| | #line 469 "Proj4.pd" |
| | |
| | #line 450 "Proj4.pd" |
| | =head2 t_proj_comill |
| | |
| | Autogenerated transformation function for Proj4 projection code comill. |
| | |
| | The full name for this projection is Compact Miller. |
| | |
| | =cut |
| | |
| | sub t_proj_comill |
| | { 'PDL::Transform::Proj4::comill'->new( @_ ); } |
| | #line 484 "Proj4.pd" |
| | #line 1044 "Proj4.pm" |
| | |
| | #line 469 "Proj4.pd" |
| | |
| | #line 450 "Proj4.pd" |
| | =head2 t_proj_crast |
| | |
| | Autogenerated transformation function for Proj4 projection code crast. |
| | |
| | The full name for this projection is Craster Parabolic (Putnins P4). |
| | |
| | =cut |
| | |
| | sub t_proj_crast |
| | { 'PDL::Transform::Proj4::crast'->new( @_ ); } |
| | #line 484 "Proj4.pd" |
| | #line 1065 "Proj4.pm" |
| | |
| | #line 469 "Proj4.pd" |
| | |
| | #line 450 "Proj4.pd" |
| | =head2 t_proj_defmodel |
| | |
| | Autogenerated transformation function for Proj4 projection code defmodel. |
| | |
| | The full name for this projection is Deformation model. |
| | |
| | =cut |
| | |
| | sub t_proj_defmodel |
| | { 'PDL::Transform::Proj4::defmodel'->new( @_ ); } |
| | #line 484 "Proj4.pd" |
| | #line 1086 "Proj4.pm" |
| | |
| | #line 469 "Proj4.pd" |
| | |
| | #line 450 "Proj4.pd" |
| | =head2 t_proj_deformation |
| | |
| | Autogenerated transformation function for Proj4 projection code deformation. |
| | |
| | The full name for this projection is Kinematic grid shift. |
| | |
| | =cut |
| | |
| | sub t_proj_deformation |
| | { 'PDL::Transform::Proj4::deformation'->new( @_ ); } |
| | #line 484 "Proj4.pd" |
| | #line 1107 "Proj4.pm" |
| | |
| | #line 469 "Proj4.pd" |
| | |
| | #line 450 "Proj4.pd" |
| | =head2 t_proj_denoy |
| | |
| | Autogenerated transformation function for Proj4 projection code denoy. |
| | |
| | The full name for this projection is Denoyer Semi-Elliptical. |
| | |
| | =cut |
| | |
| | sub t_proj_denoy |
| | { 'PDL::Transform::Proj4::denoy'->new( @_ ); } |
| | #line 484 "Proj4.pd" |
| | #line 1128 "Proj4.pm" |
| | |
| | #line 469 "Proj4.pd" |
| | |
| | #line 450 "Proj4.pd" |
| | =head2 t_proj_eck1 |
| | |
| | Autogenerated transformation function for Proj4 projection code eck1. |
| | |
| | The full name for this projection is Eckert I. |
| | |
| | =cut |
| | |
| | sub t_proj_eck1 |
| | { 'PDL::Transform::Proj4::eck1'->new( @_ ); } |
| | #line 484 "Proj4.pd" |
| | #line 1149 "Proj4.pm" |
| | |
| | #line 469 "Proj4.pd" |
| | |
| | #line 450 "Proj4.pd" |
| | =head2 t_proj_eck2 |
| | |
| | Autogenerated transformation function for Proj4 projection code eck2. |
| | |
| | The full name for this projection is Eckert II. |
| | |
| | =cut |
| | |
| | sub t_proj_eck2 |
| | { 'PDL::Transform::Proj4::eck2'->new( @_ ); } |
| | #line 484 "Proj4.pd" |
| | #line 1170 "Proj4.pm" |
| | |
| | #line 469 "Proj4.pd" |
| | |
| | #line 450 "Proj4.pd" |
| | =head2 t_proj_eck3 |
| | |
| | Autogenerated transformation function for Proj4 projection code eck3. |
| | |
| | The full name for this projection is Eckert III. |
| | |
| | =cut |
| | |
| | sub t_proj_eck3 |
| | { 'PDL::Transform::Proj4::eck3'->new( @_ ); } |
| | #line 484 "Proj4.pd" |
| | #line 1191 "Proj4.pm" |
| | |
| | #line 469 "Proj4.pd" |
| | |
| | #line 450 "Proj4.pd" |
| | =head2 t_proj_eck4 |
| | |
| | Autogenerated transformation function for Proj4 projection code eck4. |
| | |
| | The full name for this projection is Eckert IV. |
| | |
| | =cut |
| | |
| | sub t_proj_eck4 |
| | { 'PDL::Transform::Proj4::eck4'->new( @_ ); } |
| | #line 484 "Proj4.pd" |
| | #line 1212 "Proj4.pm" |
| | |
| | #line 469 "Proj4.pd" |
| | |
| | #line 450 "Proj4.pd" |
| | =head2 t_proj_eck5 |
| | |
| | Autogenerated transformation function for Proj4 projection code eck5. |
| | |
| | The full name for this projection is Eckert V. |
| | |
| | =cut |
| | |
| | sub t_proj_eck5 |
| | { 'PDL::Transform::Proj4::eck5'->new( @_ ); } |
| | #line 484 "Proj4.pd" |
| | #line 1233 "Proj4.pm" |
| | |
| | #line 469 "Proj4.pd" |
| | |
| | #line 450 "Proj4.pd" |
| | =head2 t_proj_eck6 |
| | |
| | Autogenerated transformation function for Proj4 projection code eck6. |
| | |
| | The full name for this projection is Eckert VI. |
| | |
| | =cut |
| | |
| | sub t_proj_eck6 |
| | { 'PDL::Transform::Proj4::eck6'->new( @_ ); } |
| | #line 484 "Proj4.pd" |
| | #line 1254 "Proj4.pm" |
| | |
| | #line 469 "Proj4.pd" |
| | |
| | #line 450 "Proj4.pd" |
| | =head2 t_proj_eqc |
| | |
| | Autogenerated transformation function for Proj4 projection code eqc. |
| | |
| | The full name for this projection is Equidistant Cylindrical (Plate Carree). |
| | |
| | Projection Parameters |
| | |
| | =for options |
| | |
| | =over 4 |
| | |
| | =item lat_00 |
| | |
| | =item lat_ts |
| | |
| | =back |
| | |
| | =cut |
| | |
| | sub t_proj_eqc |
| | { 'PDL::Transform::Proj4::eqc'->new( @_ ); } |
| | #line 497 "Proj4.pd" |
| | #line 1288 "Proj4.pm" |
| | |
| | #line 469 "Proj4.pd" |
| | |
| | #line 450 "Proj4.pd" |
| | =head2 t_proj_eqdc |
| | |
| | Autogenerated transformation function for Proj4 projection code eqdc. |
| | |
| | The full name for this projection is Equidistant Conic. |
| | |
| | Projection Parameters |
| | |
| | =for options |
| | |
| | =over 4 |
| | |
| | =item lat_1 |
| | |
| | =item lat_2 |
| | |
| | =back |
| | |
| | =cut |
| | |
| | sub t_proj_eqdc |
| | { 'PDL::Transform::Proj4::eqdc'->new( @_ ); } |
| | #line 497 "Proj4.pd" |
| | #line 1322 "Proj4.pm" |
| | |
| | #line 469 "Proj4.pd" |
| | |
| | #line 450 "Proj4.pd" |
| | =head2 t_proj_eqearth |
| | |
| | Autogenerated transformation function for Proj4 projection code eqearth. |
| | |
| | The full name for this projection is Equal Earth. |
| | |
| | =cut |
| | |
| | sub t_proj_eqearth |
| | { 'PDL::Transform::Proj4::eqearth'->new( @_ ); } |
| | #line 484 "Proj4.pd" |
| | #line 1343 "Proj4.pm" |
| | |
| | #line 469 "Proj4.pd" |
| | |
| | #line 450 "Proj4.pd" |
| | =head2 t_proj_etmerc |
| | |
| | Autogenerated transformation function for Proj4 projection code etmerc. |
| | |
| | The full name for this projection is Extended Transverse Mercator. |
| | |
| | =cut |
| | |
| | sub t_proj_etmerc |
| | { 'PDL::Transform::Proj4::etmerc'->new( @_ ); } |
| | #line 484 "Proj4.pd" |
| | #line 1364 "Proj4.pm" |
| | |
| | #line 469 "Proj4.pd" |
| | |
| | #line 450 "Proj4.pd" |
| | =head2 t_proj_euler |
| | |
| | Autogenerated transformation function for Proj4 projection code euler. |
| | |
| | The full name for this projection is Euler. |
| | |
| | Projection Parameters |
| | |
| | =for options |
| | |
| | =over 4 |
| | |
| | =item lat_1 |
| | |
| | =item lat_2 |
| | |
| | =back |
| | |
| | =cut |
| | |
| | sub t_proj_euler |
| | { 'PDL::Transform::Proj4::euler'->new( @_ ); } |
| | #line 497 "Proj4.pd" |
| | #line 1398 "Proj4.pm" |
| | |
| | #line 469 "Proj4.pd" |
| | |
| | #line 450 "Proj4.pd" |
| | =head2 t_proj_fahey |
| | |
| | Autogenerated transformation function for Proj4 projection code fahey. |
| | |
| | The full name for this projection is Fahey. |
| | |
| | =cut |
| | |
| | sub t_proj_fahey |
| | { 'PDL::Transform::Proj4::fahey'->new( @_ ); } |
| | #line 484 "Proj4.pd" |
| | #line 1419 "Proj4.pm" |
| | |
| | #line 469 "Proj4.pd" |
| | |
| | #line 450 "Proj4.pd" |
| | =head2 t_proj_fouc |
| | |
| | Autogenerated transformation function for Proj4 projection code fouc. |
| | |
| | The full name for this projection is Foucaut. |
| | |
| | =cut |
| | |
| | sub t_proj_fouc |
| | { 'PDL::Transform::Proj4::fouc'->new( @_ ); } |
| | #line 484 "Proj4.pd" |
| | #line 1440 "Proj4.pm" |
| | |
| | #line 469 "Proj4.pd" |
| | |
| | #line 450 "Proj4.pd" |
| | =head2 t_proj_fouc_s |
| | |
| | Autogenerated transformation function for Proj4 projection code fouc_s. |
| | |
| | The full name for this projection is Foucaut Sinusoidal. |
| | |
| | =cut |
| | |
| | sub t_proj_fouc_s |
| | { 'PDL::Transform::Proj4::fouc_s'->new( @_ ); } |
| | #line 484 "Proj4.pd" |
| | #line 1461 "Proj4.pm" |
| | |
| | #line 469 "Proj4.pd" |
| | |
| | #line 450 "Proj4.pd" |
| | =head2 t_proj_gall |
| | |
| | Autogenerated transformation function for Proj4 projection code gall. |
| | |
| | The full name for this projection is Gall (Gall Stereographic). |
| | |
| | =cut |
| | |
| | sub t_proj_gall |
| | { 'PDL::Transform::Proj4::gall'->new( @_ ); } |
| | #line 484 "Proj4.pd" |
| | #line 1482 "Proj4.pm" |
| | |
| | #line 469 "Proj4.pd" |
| | |
| | #line 450 "Proj4.pd" |
| | =head2 t_proj_geoc |
| | |
| | Autogenerated transformation function for Proj4 projection code geoc. |
| | |
| | The full name for this projection is Geocentric Latitude. |
| | |
| | =cut |
| | |
| | sub t_proj_geoc |
| | { 'PDL::Transform::Proj4::geoc'->new( @_ ); } |
| | #line 484 "Proj4.pd" |
| | #line 1503 "Proj4.pm" |
| | |
| | #line 469 "Proj4.pd" |
| | |
| | #line 450 "Proj4.pd" |
| | =head2 t_proj_geocent |
| | |
| | Autogenerated transformation function for Proj4 projection code geocent. |
| | |
| | The full name for this projection is Geocentric. |
| | |
| | =cut |
| | |
| | sub t_proj_geocent |
| | { 'PDL::Transform::Proj4::geocent'->new( @_ ); } |
| | #line 484 "Proj4.pd" |
| | #line 1524 "Proj4.pm" |
| | |
| | #line 469 "Proj4.pd" |
| | |
| | #line 450 "Proj4.pd" |
| | =head2 t_proj_geogoffset |
| | |
| | Autogenerated transformation function for Proj4 projection code geogoffset. |
| | |
| | The full name for this projection is Geographic Offset. |
| | |
| | =cut |
| | |
| | sub t_proj_geogoffset |
| | { 'PDL::Transform::Proj4::geogoffset'->new( @_ ); } |
| | #line 484 "Proj4.pd" |
| | #line 1545 "Proj4.pm" |
| | |
| | #line 469 "Proj4.pd" |
| | |
| | #line 450 "Proj4.pd" |
| | =head2 t_proj_geos |
| | |
| | Autogenerated transformation function for Proj4 projection code geos. |
| | |
| | The full name for this projection is Geostationary Satellite View. |
| | |
| | Projection Parameters |
| | |
| | =for options |
| | |
| | =over 4 |
| | |
| | =item h |
| | |
| | =back |
| | |
| | =cut |
| | |
| | sub t_proj_geos |
| | { 'PDL::Transform::Proj4::geos'->new( @_ ); } |
| | #line 495 "Proj4.pd" |
| | #line 1577 "Proj4.pm" |
| | |
| | #line 469 "Proj4.pd" |
| | |
| | #line 450 "Proj4.pd" |
| | =head2 t_proj_gins8 |
| | |
| | Autogenerated transformation function for Proj4 projection code gins8. |
| | |
| | The full name for this projection is Ginsburg VIII (TsNIIGAiK). |
| | |
| | =cut |
| | |
| | sub t_proj_gins8 |
| | { 'PDL::Transform::Proj4::gins8'->new( @_ ); } |
| | #line 484 "Proj4.pd" |
| | #line 1598 "Proj4.pm" |
| | |
| | #line 469 "Proj4.pd" |
| | |
| | #line 450 "Proj4.pd" |
| | =head2 t_proj_gn_sinu |
| | |
| | Autogenerated transformation function for Proj4 projection code gn_sinu. |
| | |
| | The full name for this projection is General Sinusoidal Series. |
| | |
| | Projection Parameters |
| | |
| | =for options |
| | |
| | =over 4 |
| | |
| | =item m |
| | |
| | =item n |
| | |
| | =back |
| | |
| | =cut |
| | |
| | sub t_proj_gn_sinu |
| | { 'PDL::Transform::Proj4::gn_sinu'->new( @_ ); } |
| | #line 497 "Proj4.pd" |
| | #line 1632 "Proj4.pm" |
| | |
| | #line 469 "Proj4.pd" |
| | |
| | #line 450 "Proj4.pd" |
| | =head2 t_proj_gnom |
| | |
| | Autogenerated transformation function for Proj4 projection code gnom. |
| | |
| | The full name for this projection is Gnomonic. |
| | |
| | =cut |
| | |
| | sub t_proj_gnom |
| | { 'PDL::Transform::Proj4::gnom'->new( @_ ); } |
| | #line 484 "Proj4.pd" |
| | #line 1653 "Proj4.pm" |
| | |
| | #line 469 "Proj4.pd" |
| | |
| | #line 450 "Proj4.pd" |
| | =head2 t_proj_goode |
| | |
| | Autogenerated transformation function for Proj4 projection code goode. |
| | |
| | The full name for this projection is Goode Homolosine. |
| | |
| | =cut |
| | |
| | sub t_proj_goode |
| | { 'PDL::Transform::Proj4::goode'->new( @_ ); } |
| | #line 484 "Proj4.pd" |
| | #line 1674 "Proj4.pm" |
| | |
| | #line 469 "Proj4.pd" |
| | |
| | #line 450 "Proj4.pd" |
| | =head2 t_proj_gs48 |
| | |
| | Autogenerated transformation function for Proj4 projection code gs48. |
| | |
| | The full name for this projection is Modified Stereographic of 48 U.S.. |
| | |
| | =cut |
| | |
| | sub t_proj_gs48 |
| | { 'PDL::Transform::Proj4::gs48'->new( @_ ); } |
| | #line 484 "Proj4.pd" |
| | #line 1695 "Proj4.pm" |
| | |
| | #line 469 "Proj4.pd" |
| | |
| | #line 450 "Proj4.pd" |
| | =head2 t_proj_gs50 |
| | |
| | Autogenerated transformation function for Proj4 projection code gs50. |
| | |
| | The full name for this projection is Modified Stereographic of 50 U.S.. |
| | |
| | =cut |
| | |
| | sub t_proj_gs50 |
| | { 'PDL::Transform::Proj4::gs50'->new( @_ ); } |
| | #line 484 "Proj4.pd" |
| | #line 1716 "Proj4.pm" |
| | |
| | #line 469 "Proj4.pd" |
| | |
| | #line 450 "Proj4.pd" |
| | =head2 t_proj_gstmerc |
| | |
| | Autogenerated transformation function for Proj4 projection code gstmerc. |
| | |
| | The full name for this projection is Gauss-Schreiber Transverse Mercator (aka Ga |
| | uss-Laborde Reunion). |
| | |
| | Projection Parameters |
| | |
| | =for options |
| | |
| | =over 4 |
| | |
| | =item k_0 |
| | |
| | =item lat_0 |
| | |
| | =item lon_0 |
| | |
| | =back |
| | |
| | =cut |
| | |
| | sub t_proj_gstmerc |
| | { 'PDL::Transform::Proj4::gstmerc'->new( @_ ); } |
| | #line 499 "Proj4.pd" |
| | #line 1752 "Proj4.pm" |
| | |
| | #line 469 "Proj4.pd" |
| | |
| | #line 450 "Proj4.pd" |
| | =head2 t_proj_guyou |
| | |
| | Autogenerated transformation function for Proj4 projection code guyou. |
| | |
| | The full name for this projection is Guyou. |
| | |
| | =cut |
| | |
| | sub t_proj_guyou |
| | { 'PDL::Transform::Proj4::guyou'->new( @_ ); } |
| | #line 484 "Proj4.pd" |
| | #line 1773 "Proj4.pm" |
| | |
| | #line 469 "Proj4.pd" |
| | |
| | #line 450 "Proj4.pd" |
| | =head2 t_proj_hammer |
| | |
| | Autogenerated transformation function for Proj4 projection code hammer. |
| | |
| | The full name for this projection is Hammer & Eckert-Greifendorff. |
| | |
| | Projection Parameters |
| | |
| | =for options |
| | |
| | =over 4 |
| | |
| | =item M |
| | |
| | =item W |
| | |
| | =back |
| | |
| | =cut |
| | |
| | sub t_proj_hammer |
| | { 'PDL::Transform::Proj4::hammer'->new( @_ ); } |
| | #line 497 "Proj4.pd" |
| | #line 1807 "Proj4.pm" |
| | |
| | #line 469 "Proj4.pd" |
| | |
| | #line 450 "Proj4.pd" |
| | =head2 t_proj_hatano |
| | |
| | Autogenerated transformation function for Proj4 projection code hatano. |
| | |
| | The full name for this projection is Hatano Asymmetrical Equal Area. |
| | |
| | =cut |
| | |
| | sub t_proj_hatano |
| | { 'PDL::Transform::Proj4::hatano'->new( @_ ); } |
| | #line 484 "Proj4.pd" |
| | #line 1828 "Proj4.pm" |
| | |
| | #line 469 "Proj4.pd" |
| | |
| | #line 450 "Proj4.pd" |
| | =head2 t_proj_healpix |
| | |
| | Autogenerated transformation function for Proj4 projection code healpix. |
| | |
| | The full name for this projection is HEALPix. |
| | |
| | Projection Parameters |
| | |
| | =for options |
| | |
| | =over 4 |
| | |
| | =item rot_xy |
| | |
| | =back |
| | |
| | =cut |
| | |
| | sub t_proj_healpix |
| | { 'PDL::Transform::Proj4::healpix'->new( @_ ); } |
| | #line 495 "Proj4.pd" |
| | #line 1860 "Proj4.pm" |
| | |
| | #line 469 "Proj4.pd" |
| | |
| | #line 450 "Proj4.pd" |
| | =head2 t_proj_helmert |
| | |
| | Autogenerated transformation function for Proj4 projection code helmert. |
| | |
| | The full name for this projection is 3(6)-, 4(8)- and 7(14)-parameter Helmert sh |
| | ift. |
| | |
| | =cut |
| | |
| | sub t_proj_helmert |
| | { 'PDL::Transform::Proj4::helmert'->new( @_ ); } |
| | #line 484 "Proj4.pd" |
| | #line 1881 "Proj4.pm" |
| | |
| | #line 469 "Proj4.pd" |
| | |
| | #line 450 "Proj4.pd" |
| | =head2 t_proj_hgridshift |
| | |
| | Autogenerated transformation function for Proj4 projection code hgridshift. |
| | |
| | The full name for this projection is Horizontal grid shift. |
| | |
| | =cut |
| | |
| | sub t_proj_hgridshift |
| | { 'PDL::Transform::Proj4::hgridshift'->new( @_ ); } |
| | #line 484 "Proj4.pd" |
| | #line 1902 "Proj4.pm" |
| | |
| | #line 469 "Proj4.pd" |
| | |
| | #line 450 "Proj4.pd" |
| | =head2 t_proj_horner |
| | |
| | Autogenerated transformation function for Proj4 projection code horner. |
| | |
| | The full name for this projection is Horner polynomial evaluation. |
| | |
| | =cut |
| | |
| | sub t_proj_horner |
| | { 'PDL::Transform::Proj4::horner'->new( @_ ); } |
| | #line 484 "Proj4.pd" |
| | #line 1923 "Proj4.pm" |
| | |
| | #line 469 "Proj4.pd" |
| | |
| | #line 450 "Proj4.pd" |
| | =head2 t_proj_igh |
| | |
| | Autogenerated transformation function for Proj4 projection code igh. |
| | |
| | The full name for this projection is Interrupted Goode Homolosine. |
| | |
| | =cut |
| | |
| | sub t_proj_igh |
| | { 'PDL::Transform::Proj4::igh'->new( @_ ); } |
| | #line 484 "Proj4.pd" |
| | #line 1944 "Proj4.pm" |
| | |
| | #line 469 "Proj4.pd" |
| | |
| | #line 450 "Proj4.pd" |
| | =head2 t_proj_igh_o |
| | |
| | Autogenerated transformation function for Proj4 projection code igh_o. |
| | |
| | The full name for this projection is Interrupted Goode Homolosine Oceanic View. |
| | |
| | =cut |
| | |
| | sub t_proj_igh_o |
| | { 'PDL::Transform::Proj4::igh_o'->new( @_ ); } |
| | #line 484 "Proj4.pd" |
| | #line 1965 "Proj4.pm" |
| | |
| | #line 469 "Proj4.pd" |
| | |
| | #line 450 "Proj4.pd" |
| | =head2 t_proj_imw_p |
| | |
| | Autogenerated transformation function for Proj4 projection code imw_p. |
| | |
| | The full name for this projection is International Map of the World Polyconic. |
| | |
| | Projection Parameters |
| | |
| | =for options |
| | |
| | =over 4 |
| | |
| | =item lat_1 |
| | |
| | =item lat_2 |
| | |
| | =item lon_1 |
| | |
| | =back |
| | |
| | =cut |
| | |
| | sub t_proj_imw_p |
| | { 'PDL::Transform::Proj4::imw_p'->new( @_ ); } |
| | #line 499 "Proj4.pd" |
| | #line 2001 "Proj4.pm" |
| | |
| | #line 469 "Proj4.pd" |
| | |
| | #line 450 "Proj4.pd" |
| | =head2 t_proj_isea |
| | |
| | Autogenerated transformation function for Proj4 projection code isea. |
| | |
| | The full name for this projection is Icosahedral Snyder Equal Area. |
| | |
| | =cut |
| | |
| | sub t_proj_isea |
| | { 'PDL::Transform::Proj4::isea'->new( @_ ); } |
| | #line 484 "Proj4.pd" |
| | #line 2022 "Proj4.pm" |
| | |
| | #line 469 "Proj4.pd" |
| | |
| | #line 450 "Proj4.pd" |
| | =head2 t_proj_kav5 |
| | |
| | Autogenerated transformation function for Proj4 projection code kav5. |
| | |
| | The full name for this projection is Kavraisky V. |
| | |
| | =cut |
| | |
| | sub t_proj_kav5 |
| | { 'PDL::Transform::Proj4::kav5'->new( @_ ); } |
| | #line 484 "Proj4.pd" |
| | #line 2043 "Proj4.pm" |
| | |
| | #line 469 "Proj4.pd" |
| | |
| | #line 450 "Proj4.pd" |
| | =head2 t_proj_kav7 |
| | |
| | Autogenerated transformation function for Proj4 projection code kav7. |
| | |
| | The full name for this projection is Kavraisky VII. |
| | |
| | =cut |
| | |
| | sub t_proj_kav7 |
| | { 'PDL::Transform::Proj4::kav7'->new( @_ ); } |
| | #line 484 "Proj4.pd" |
| | #line 2064 "Proj4.pm" |
| | |
| | #line 469 "Proj4.pd" |
| | |
| | #line 450 "Proj4.pd" |
| | =head2 t_proj_krovak |
| | |
| | Autogenerated transformation function for Proj4 projection code krovak. |
| | |
| | The full name for this projection is Krovak. |
| | |
| | =cut |
| | |
| | sub t_proj_krovak |
| | { 'PDL::Transform::Proj4::krovak'->new( @_ ); } |
| | #line 484 "Proj4.pd" |
| | #line 2085 "Proj4.pm" |
| | |
| | #line 469 "Proj4.pd" |
| | |
| | #line 450 "Proj4.pd" |
| | =head2 t_proj_labrd |
| | |
| | Autogenerated transformation function for Proj4 projection code labrd. |
| | |
| | The full name for this projection is Laborde. |
| | |
| | =cut |
| | |
| | sub t_proj_labrd |
| | { 'PDL::Transform::Proj4::labrd'->new( @_ ); } |
| | #line 484 "Proj4.pd" |
| | #line 2106 "Proj4.pm" |
| | |
| | #line 469 "Proj4.pd" |
| | |
| | #line 450 "Proj4.pd" |
| | =head2 t_proj_laea |
| | |
| | Autogenerated transformation function for Proj4 projection code laea. |
| | |
| | The full name for this projection is Lambert Azimuthal Equal Area. |
| | |
| | =cut |
| | |
| | sub t_proj_laea |
| | { 'PDL::Transform::Proj4::laea'->new( @_ ); } |
| | #line 484 "Proj4.pd" |
| | #line 2127 "Proj4.pm" |
| | |
| | #line 469 "Proj4.pd" |
| | |
| | #line 450 "Proj4.pd" |
| | =head2 t_proj_lagrng |
| | |
| | Autogenerated transformation function for Proj4 projection code lagrng. |
| | |
| | The full name for this projection is Lagrange. |
| | |
| | Projection Parameters |
| | |
| | =for options |
| | |
| | =over 4 |
| | |
| | =item W |
| | |
| | =back |
| | |
| | =cut |
| | |
| | sub t_proj_lagrng |
| | { 'PDL::Transform::Proj4::lagrng'->new( @_ ); } |
| | #line 495 "Proj4.pd" |
| | #line 2159 "Proj4.pm" |
| | |
| | #line 469 "Proj4.pd" |
| | |
| | #line 450 "Proj4.pd" |
| | =head2 t_proj_larr |
| | |
| | Autogenerated transformation function for Proj4 projection code larr. |
| | |
| | The full name for this projection is Larrivee. |
| | |
| | =cut |
| | |
| | sub t_proj_larr |
| | { 'PDL::Transform::Proj4::larr'->new( @_ ); } |
| | #line 484 "Proj4.pd" |
| | #line 2180 "Proj4.pm" |
| | |
| | #line 469 "Proj4.pd" |
| | |
| | #line 450 "Proj4.pd" |
| | =head2 t_proj_lask |
| | |
| | Autogenerated transformation function for Proj4 projection code lask. |
| | |
| | The full name for this projection is Laskowski. |
| | |
| | =cut |
| | |
| | sub t_proj_lask |
| | { 'PDL::Transform::Proj4::lask'->new( @_ ); } |
| | #line 484 "Proj4.pd" |
| | #line 2201 "Proj4.pm" |
| | |
| | #line 469 "Proj4.pd" |
| | |
| | #line 450 "Proj4.pd" |
| | =head2 t_proj_latlon |
| | |
| | Autogenerated transformation function for Proj4 projection code latlon. |
| | |
| | The full name for this projection is Lat/long (Geodetic alias). |
| | |
| | =cut |
| | |
| | sub t_proj_latlon |
| | { 'PDL::Transform::Proj4::latlon'->new( @_ ); } |
| | #line 484 "Proj4.pd" |
| | #line 2222 "Proj4.pm" |
| | |
| | #line 469 "Proj4.pd" |
| | |
| | #line 450 "Proj4.pd" |
| | =head2 t_proj_latlong |
| | |
| | Autogenerated transformation function for Proj4 projection code latlong. |
| | |
| | The full name for this projection is Lat/long (Geodetic alias). |
| | |
| | =cut |
| | |
| | sub t_proj_latlong |
| | { 'PDL::Transform::Proj4::latlong'->new( @_ ); } |
| | #line 484 "Proj4.pd" |
| | #line 2243 "Proj4.pm" |
| | |
| | #line 469 "Proj4.pd" |
| | |
| | #line 450 "Proj4.pd" |
| | =head2 t_proj_lcc |
| | |
| | Autogenerated transformation function for Proj4 projection code lcc. |
| | |
| | The full name for this projection is Lambert Conformal Conic. |
| | |
| | Projection Parameters |
| | |
| | =for options |
| | |
| | =over 4 |
| | |
| | =item k_0 |
| | |
| | =item lat_0 |
| | |
| | =item lat_1 |
| | |
| | =item lat_2 |
| | |
| | =back |
| | |
| | =cut |
| | |
| | sub t_proj_lcc |
| | { 'PDL::Transform::Proj4::lcc'->new( @_ ); } |
| | #line 501 "Proj4.pd" |
| | #line 2281 "Proj4.pm" |
| | |
| | #line 469 "Proj4.pd" |
| | |
| | #line 450 "Proj4.pd" |
| | =head2 t_proj_lcca |
| | |
| | Autogenerated transformation function for Proj4 projection code lcca. |
| | |
| | The full name for this projection is Lambert Conformal Conic Alternative. |
| | |
| | Projection Parameters |
| | |
| | =for options |
| | |
| | =over 4 |
| | |
| | =item lat_0 |
| | |
| | =back |
| | |
| | =cut |
| | |
| | sub t_proj_lcca |
| | { 'PDL::Transform::Proj4::lcca'->new( @_ ); } |
| | #line 495 "Proj4.pd" |
| | #line 2313 "Proj4.pm" |
| | |
| | #line 469 "Proj4.pd" |
| | |
| | #line 450 "Proj4.pd" |
| | =head2 t_proj_leac |
| | |
| | Autogenerated transformation function for Proj4 projection code leac. |
| | |
| | The full name for this projection is Lambert Equal Area Conic. |
| | |
| | Projection Parameters |
| | |
| | =for options |
| | |
| | =over 4 |
| | |
| | =item lat_1 |
| | |
| | =item south |
| | |
| | =back |
| | |
| | =cut |
| | |
| | sub t_proj_leac |
| | { 'PDL::Transform::Proj4::leac'->new( @_ ); } |
| | #line 497 "Proj4.pd" |
| | #line 2347 "Proj4.pm" |
| | |
| | #line 469 "Proj4.pd" |
| | |
| | #line 450 "Proj4.pd" |
| | =head2 t_proj_lee_os |
| | |
| | Autogenerated transformation function for Proj4 projection code lee_os. |
| | |
| | The full name for this projection is Lee Oblated Stereographic. |
| | |
| | =cut |
| | |
| | sub t_proj_lee_os |
| | { 'PDL::Transform::Proj4::lee_os'->new( @_ ); } |
| | #line 484 "Proj4.pd" |
| | #line 2368 "Proj4.pm" |
| | |
| | #line 469 "Proj4.pd" |
| | |
| | #line 450 "Proj4.pd" |
| | =head2 t_proj_longlat |
| | |
| | Autogenerated transformation function for Proj4 projection code longlat. |
| | |
| | The full name for this projection is Lat/long (Geodetic alias). |
| | |
| | =cut |
| | |
| | sub t_proj_longlat |
| | { 'PDL::Transform::Proj4::longlat'->new( @_ ); } |
| | #line 484 "Proj4.pd" |
| | #line 2389 "Proj4.pm" |
| | |
| | #line 469 "Proj4.pd" |
| | |
| | #line 450 "Proj4.pd" |
| | =head2 t_proj_lonlat |
| | |
| | Autogenerated transformation function for Proj4 projection code lonlat. |
| | |
| | The full name for this projection is Lat/long (Geodetic). |
| | |
| | =cut |
| | |
| | sub t_proj_lonlat |
| | { 'PDL::Transform::Proj4::lonlat'->new( @_ ); } |
| | #line 484 "Proj4.pd" |
| | #line 2410 "Proj4.pm" |
| | |
| | #line 469 "Proj4.pd" |
| | |
| | #line 450 "Proj4.pd" |
| | =head2 t_proj_loxim |
| | |
| | Autogenerated transformation function for Proj4 projection code loxim. |
| | |
| | The full name for this projection is Loximuthal. |
| | |
| | =cut |
| | |
| | sub t_proj_loxim |
| | { 'PDL::Transform::Proj4::loxim'->new( @_ ); } |
| | #line 484 "Proj4.pd" |
| | #line 2431 "Proj4.pm" |
| | |
| | #line 469 "Proj4.pd" |
| | |
| | #line 450 "Proj4.pd" |
| | =head2 t_proj_lsat |
| | |
| | Autogenerated transformation function for Proj4 projection code lsat. |
| | |
| | The full name for this projection is Space oblique for LANDSAT. |
| | |
| | Projection Parameters |
| | |
| | =for options |
| | |
| | =over 4 |
| | |
| | =item lsat |
| | |
| | =item path |
| | |
| | =back |
| | |
| | =cut |
| | |
| | sub t_proj_lsat |
| | { 'PDL::Transform::Proj4::lsat'->new( @_ ); } |
| | #line 497 "Proj4.pd" |
| | #line 2465 "Proj4.pm" |
| | |
| | #line 469 "Proj4.pd" |
| | |
| | #line 450 "Proj4.pd" |
| | =head2 t_proj_mbt_fps |
| | |
| | Autogenerated transformation function for Proj4 projection code mbt_fps. |
| | |
| | The full name for this projection is McBryde-Thomas Flat-Pole Sine (No. 2). |
| | |
| | =cut |
| | |
| | sub t_proj_mbt_fps |
| | { 'PDL::Transform::Proj4::mbt_fps'->new( @_ ); } |
| | #line 484 "Proj4.pd" |
| | #line 2486 "Proj4.pm" |
| | |
| | #line 469 "Proj4.pd" |
| | |
| | #line 450 "Proj4.pd" |
| | =head2 t_proj_mbt_s |
| | |
| | Autogenerated transformation function for Proj4 projection code mbt_s. |
| | |
| | The full name for this projection is McBryde-Thomas Flat-Polar Sine (No. 1). |
| | |
| | =cut |
| | |
| | sub t_proj_mbt_s |
| | { 'PDL::Transform::Proj4::mbt_s'->new( @_ ); } |
| | #line 484 "Proj4.pd" |
| | #line 2507 "Proj4.pm" |
| | |
| | #line 469 "Proj4.pd" |
| | |
| | #line 450 "Proj4.pd" |
| | =head2 t_proj_mbtfpp |
| | |
| | Autogenerated transformation function for Proj4 projection code mbtfpp. |
| | |
| | The full name for this projection is McBride-Thomas Flat-Polar Parabolic. |
| | |
| | =cut |
| | |
| | sub t_proj_mbtfpp |
| | { 'PDL::Transform::Proj4::mbtfpp'->new( @_ ); } |
| | #line 484 "Proj4.pd" |
| | #line 2528 "Proj4.pm" |
| | |
| | #line 469 "Proj4.pd" |
| | |
| | #line 450 "Proj4.pd" |
| | =head2 t_proj_mbtfpq |
| | |
| | Autogenerated transformation function for Proj4 projection code mbtfpq. |
| | |
| | The full name for this projection is McBryde-Thomas Flat-Polar Quartic. |
| | |
| | =cut |
| | |
| | sub t_proj_mbtfpq |
| | { 'PDL::Transform::Proj4::mbtfpq'->new( @_ ); } |
| | #line 484 "Proj4.pd" |
| | #line 2549 "Proj4.pm" |
| | |
| | #line 469 "Proj4.pd" |
| | |
| | #line 450 "Proj4.pd" |
| | =head2 t_proj_mbtfps |
| | |
| | Autogenerated transformation function for Proj4 projection code mbtfps. |
| | |
| | The full name for this projection is McBryde-Thomas Flat-Polar Sinusoidal. |
| | |
| | =cut |
| | |
| | sub t_proj_mbtfps |
| | { 'PDL::Transform::Proj4::mbtfps'->new( @_ ); } |
| | #line 484 "Proj4.pd" |
| | #line 2570 "Proj4.pm" |
| | |
| | #line 469 "Proj4.pd" |
| | |
| | #line 450 "Proj4.pd" |
| | =head2 t_proj_merc |
| | |
| | Autogenerated transformation function for Proj4 projection code merc. |
| | |
| | The full name for this projection is Mercator. |
| | |
| | Projection Parameters |
| | |
| | =for options |
| | |
| | =over 4 |
| | |
| | =item lat_ts |
| | |
| | =back |
| | |
| | =cut |
| | |
| | sub t_proj_merc |
| | { 'PDL::Transform::Proj4::merc'->new( @_ ); } |
| | #line 495 "Proj4.pd" |
| | #line 2602 "Proj4.pm" |
| | |
| | #line 469 "Proj4.pd" |
| | |
| | #line 450 "Proj4.pd" |
| | =head2 t_proj_mil_os |
| | |
| | Autogenerated transformation function for Proj4 projection code mil_os. |
| | |
| | The full name for this projection is Miller Oblated Stereographic. |
| | |
| | =cut |
| | |
| | sub t_proj_mil_os |
| | { 'PDL::Transform::Proj4::mil_os'->new( @_ ); } |
| | #line 484 "Proj4.pd" |
| | #line 2623 "Proj4.pm" |
| | |
| | #line 469 "Proj4.pd" |
| | |
| | #line 450 "Proj4.pd" |
| | =head2 t_proj_mill |
| | |
| | Autogenerated transformation function for Proj4 projection code mill. |
| | |
| | The full name for this projection is Miller Cylindrical. |
| | |
| | =cut |
| | |
| | sub t_proj_mill |
| | { 'PDL::Transform::Proj4::mill'->new( @_ ); } |
| | #line 484 "Proj4.pd" |
| | #line 2644 "Proj4.pm" |
| | |
| | #line 469 "Proj4.pd" |
| | |
| | #line 450 "Proj4.pd" |
| | =head2 t_proj_misrsom |
| | |
| | Autogenerated transformation function for Proj4 projection code misrsom. |
| | |
| | The full name for this projection is Space oblique for MISR. |
| | |
| | Projection Parameters |
| | |
| | =for options |
| | |
| | =over 4 |
| | |
| | =item path |
| | |
| | =back |
| | |
| | =cut |
| | |
| | sub t_proj_misrsom |
| | { 'PDL::Transform::Proj4::misrsom'->new( @_ ); } |
| | #line 495 "Proj4.pd" |
| | #line 2676 "Proj4.pm" |
| | |
| | #line 469 "Proj4.pd" |
| | |
| | #line 450 "Proj4.pd" |
| | =head2 t_proj_moll |
| | |
| | Autogenerated transformation function for Proj4 projection code moll. |
| | |
| | The full name for this projection is Mollweide. |
| | |
| | =cut |
| | |
| | sub t_proj_moll |
| | { 'PDL::Transform::Proj4::moll'->new( @_ ); } |
| | #line 484 "Proj4.pd" |
| | #line 2697 "Proj4.pm" |
| | |
| | #line 469 "Proj4.pd" |
| | |
| | #line 450 "Proj4.pd" |
| | =head2 t_proj_molobadekas |
| | |
| | Autogenerated transformation function for Proj4 projection code molobadekas. |
| | |
| | The full name for this projection is Molodensky-Badekas transformation. |
| | |
| | =cut |
| | |
| | sub t_proj_molobadekas |
| | { 'PDL::Transform::Proj4::molobadekas'->new( @_ ); } |
| | #line 484 "Proj4.pd" |
| | #line 2718 "Proj4.pm" |
| | |
| | #line 469 "Proj4.pd" |
| | |
| | #line 450 "Proj4.pd" |
| | =head2 t_proj_molodensky |
| | |
| | Autogenerated transformation function for Proj4 projection code molodensky. |
| | |
| | The full name for this projection is Molodensky transform. |
| | |
| | =cut |
| | |
| | sub t_proj_molodensky |
| | { 'PDL::Transform::Proj4::molodensky'->new( @_ ); } |
| | #line 484 "Proj4.pd" |
| | #line 2739 "Proj4.pm" |
| | |
| | #line 469 "Proj4.pd" |
| | |
| | #line 450 "Proj4.pd" |
| | =head2 t_proj_murd1 |
| | |
| | Autogenerated transformation function for Proj4 projection code murd1. |
| | |
| | The full name for this projection is Murdoch I. |
| | |
| | Projection Parameters |
| | |
| | =for options |
| | |
| | =over 4 |
| | |
| | =item lat_1 |
| | |
| | =item lat_2 |
| | |
| | =back |
| | |
| | =cut |
| | |
| | sub t_proj_murd1 |
| | { 'PDL::Transform::Proj4::murd1'->new( @_ ); } |
| | #line 497 "Proj4.pd" |
| | #line 2773 "Proj4.pm" |
| | |
| | #line 469 "Proj4.pd" |
| | |
| | #line 450 "Proj4.pd" |
| | =head2 t_proj_murd2 |
| | |
| | Autogenerated transformation function for Proj4 projection code murd2. |
| | |
| | The full name for this projection is Murdoch II. |
| | |
| | Projection Parameters |
| | |
| | =for options |
| | |
| | =over 4 |
| | |
| | =item lat_1 |
| | |
| | =item lat_2 |
| | |
| | =back |
| | |
| | =cut |
| | |
| | sub t_proj_murd2 |
| | { 'PDL::Transform::Proj4::murd2'->new( @_ ); } |
| | #line 497 "Proj4.pd" |
| | #line 2807 "Proj4.pm" |
| | |
| | #line 469 "Proj4.pd" |
| | |
| | #line 450 "Proj4.pd" |
| | =head2 t_proj_murd3 |
| | |
| | Autogenerated transformation function for Proj4 projection code murd3. |
| | |
| | The full name for this projection is Murdoch III. |
| | |
| | Projection Parameters |
| | |
| | =for options |
| | |
| | =over 4 |
| | |
| | =item lat_1 |
| | |
| | =item lat_2 |
| | |
| | =back |
| | |
| | =cut |
| | |
| | sub t_proj_murd3 |
| | { 'PDL::Transform::Proj4::murd3'->new( @_ ); } |
| | #line 497 "Proj4.pd" |
| | #line 2841 "Proj4.pm" |
| | |
| | #line 469 "Proj4.pd" |
| | |
| | #line 450 "Proj4.pd" |
| | =head2 t_proj_natearth |
| | |
| | Autogenerated transformation function for Proj4 projection code natearth. |
| | |
| | The full name for this projection is Natural Earth. |
| | |
| | =cut |
| | |
| | sub t_proj_natearth |
| | { 'PDL::Transform::Proj4::natearth'->new( @_ ); } |
| | #line 484 "Proj4.pd" |
| | #line 2862 "Proj4.pm" |
| | |
| | #line 469 "Proj4.pd" |
| | |
| | #line 450 "Proj4.pd" |
| | =head2 t_proj_natearth2 |
| | |
| | Autogenerated transformation function for Proj4 projection code natearth2. |
| | |
| | The full name for this projection is Natural Earth 2. |
| | |
| | =cut |
| | |
| | sub t_proj_natearth2 |
| | { 'PDL::Transform::Proj4::natearth2'->new( @_ ); } |
| | #line 484 "Proj4.pd" |
| | #line 2883 "Proj4.pm" |
| | |
| | #line 469 "Proj4.pd" |
| | |
| | #line 450 "Proj4.pd" |
| | =head2 t_proj_nell |
| | |
| | Autogenerated transformation function for Proj4 projection code nell. |
| | |
| | The full name for this projection is Nell. |
| | |
| | =cut |
| | |
| | sub t_proj_nell |
| | { 'PDL::Transform::Proj4::nell'->new( @_ ); } |
| | #line 484 "Proj4.pd" |
| | #line 2904 "Proj4.pm" |
| | |
| | #line 469 "Proj4.pd" |
| | |
| | #line 450 "Proj4.pd" |
| | =head2 t_proj_nell_h |
| | |
| | Autogenerated transformation function for Proj4 projection code nell_h. |
| | |
| | The full name for this projection is Nell-Hammer. |
| | |
| | =cut |
| | |
| | sub t_proj_nell_h |
| | { 'PDL::Transform::Proj4::nell_h'->new( @_ ); } |
| | #line 484 "Proj4.pd" |
| | #line 2925 "Proj4.pm" |
| | |
| | #line 469 "Proj4.pd" |
| | |
| | #line 450 "Proj4.pd" |
| | =head2 t_proj_nicol |
| | |
| | Autogenerated transformation function for Proj4 projection code nicol. |
| | |
| | The full name for this projection is Nicolosi Globular. |
| | |
| | =cut |
| | |
| | sub t_proj_nicol |
| | { 'PDL::Transform::Proj4::nicol'->new( @_ ); } |
| | #line 484 "Proj4.pd" |
| | #line 2946 "Proj4.pm" |
| | |
| | #line 469 "Proj4.pd" |
| | |
| | #line 450 "Proj4.pd" |
| | =head2 t_proj_noop |
| | |
| | Autogenerated transformation function for Proj4 projection code noop. |
| | |
| | The full name for this projection is No operation. |
| | |
| | =cut |
| | |
| | sub t_proj_noop |
| | { 'PDL::Transform::Proj4::noop'->new( @_ ); } |
| | #line 484 "Proj4.pd" |
| | #line 2967 "Proj4.pm" |
| | |
| | #line 469 "Proj4.pd" |
| | |
| | #line 450 "Proj4.pd" |
| | =head2 t_proj_nsper |
| | |
| | Autogenerated transformation function for Proj4 projection code nsper. |
| | |
| | The full name for this projection is Near-sided perspective. |
| | |
| | Projection Parameters |
| | |
| | =for options |
| | |
| | =over 4 |
| | |
| | =item h |
| | |
| | =back |
| | |
| | =cut |
| | |
| | sub t_proj_nsper |
| | { 'PDL::Transform::Proj4::nsper'->new( @_ ); } |
| | #line 495 "Proj4.pd" |
| | #line 2999 "Proj4.pm" |
| | |
| | #line 469 "Proj4.pd" |
| | |
| | #line 450 "Proj4.pd" |
| | =head2 t_proj_nzmg |
| | |
| | Autogenerated transformation function for Proj4 projection code nzmg. |
| | |
| | The full name for this projection is New Zealand Map Grid. |
| | |
| | =cut |
| | |
| | sub t_proj_nzmg |
| | { 'PDL::Transform::Proj4::nzmg'->new( @_ ); } |
| | #line 484 "Proj4.pd" |
| | #line 3020 "Proj4.pm" |
| | |
| | #line 469 "Proj4.pd" |
| | |
| | #line 450 "Proj4.pd" |
| | =head2 t_proj_ob_tran |
| | |
| | Autogenerated transformation function for Proj4 projection code ob_tran. |
| | |
| | The full name for this projection is General Oblique Transformation. |
| | |
| | Projection Parameters |
| | |
| | =for options |
| | |
| | =over 4 |
| | |
| | =item o_alpha |
| | |
| | =item o_lat_1 |
| | |
| | =item o_lat_2 |
| | |
| | =item o_lat_c |
| | |
| | =item o_lat_p |
| | |
| | =item o_lon_1 |
| | |
| | =item o_lon_2 |
| | |
| | =item o_lon_c |
| | |
| | =item o_lon_p |
| | |
| | =item o_proj |
| | |
| | =back |
| | |
| | =cut |
| | |
| | sub t_proj_ob_tran |
| | { 'PDL::Transform::Proj4::ob_tran'->new( @_ ); } |
| | #line 513 "Proj4.pd" |
| | #line 3070 "Proj4.pm" |
| | |
| | #line 469 "Proj4.pd" |
| | |
| | #line 450 "Proj4.pd" |
| | =head2 t_proj_ocea |
| | |
| | Autogenerated transformation function for Proj4 projection code ocea. |
| | |
| | The full name for this projection is Oblique Cylindrical Equal Area. |
| | |
| | Projection Parameters |
| | |
| | =for options |
| | |
| | =over 4 |
| | |
| | =item lat_1 |
| | |
| | =item lat_2 |
| | |
| | =item lon_1 |
| | |
| | =item lon_2 |
| | |
| | =back |
| | |
| | =cut |
| | |
| | sub t_proj_ocea |
| | { 'PDL::Transform::Proj4::ocea'->new( @_ ); } |
| | #line 501 "Proj4.pd" |
| | #line 3108 "Proj4.pm" |
| | |
| | #line 469 "Proj4.pd" |
| | |
| | #line 450 "Proj4.pd" |
| | =head2 t_proj_oea |
| | |
| | Autogenerated transformation function for Proj4 projection code oea. |
| | |
| | The full name for this projection is Oblated Equal Area. |
| | |
| | Projection Parameters |
| | |
| | =for options |
| | |
| | =over 4 |
| | |
| | =item m |
| | |
| | =item n |
| | |
| | =item theta |
| | |
| | =back |
| | |
| | =cut |
| | |
| | sub t_proj_oea |
| | { 'PDL::Transform::Proj4::oea'->new( @_ ); } |
| | #line 499 "Proj4.pd" |
| | #line 3144 "Proj4.pm" |
| | |
| | #line 469 "Proj4.pd" |
| | |
| | #line 450 "Proj4.pd" |
| | =head2 t_proj_omerc |
| | |
| | Autogenerated transformation function for Proj4 projection code omerc. |
| | |
| | The full name for this projection is Oblique Mercator. |
| | |
| | Projection Parameters |
| | |
| | =for options |
| | |
| | =over 4 |
| | |
| | =item alpha |
| | |
| | =item gamma |
| | |
| | =item lat_1 |
| | |
| | =item lat_2 |
| | |
| | =item lon_1 |
| | |
| | =item lon_2 |
| | |
| | =item lonc |
| | |
| | =item no_off |
| | |
| | =back |
| | |
| | =cut |
| | |
| | sub t_proj_omerc |
| | { 'PDL::Transform::Proj4::omerc'->new( @_ ); } |
| | #line 509 "Proj4.pd" |
| | #line 3190 "Proj4.pm" |
| | |
| | #line 469 "Proj4.pd" |
| | |
| | #line 450 "Proj4.pd" |
| | =head2 t_proj_ortel |
| | |
| | Autogenerated transformation function for Proj4 projection code ortel. |
| | |
| | The full name for this projection is Ortelius Oval. |
| | |
| | =cut |
| | |
| | sub t_proj_ortel |
| | { 'PDL::Transform::Proj4::ortel'->new( @_ ); } |
| | #line 484 "Proj4.pd" |
| | #line 3211 "Proj4.pm" |
| | |
| | #line 469 "Proj4.pd" |
| | |
| | #line 450 "Proj4.pd" |
| | =head2 t_proj_ortho |
| | |
| | Autogenerated transformation function for Proj4 projection code ortho. |
| | |
| | The full name for this projection is Orthographic. |
| | |
| | =cut |
| | |
| | sub t_proj_ortho |
| | { 'PDL::Transform::Proj4::ortho'->new( @_ ); } |
| | #line 484 "Proj4.pd" |
| | #line 3232 "Proj4.pm" |
| | |
| | #line 469 "Proj4.pd" |
| | |
| | #line 450 "Proj4.pd" |
| | =head2 t_proj_patterson |
| | |
| | Autogenerated transformation function for Proj4 projection code patterson. |
| | |
| | The full name for this projection is Patterson Cylindrical. |
| | |
| | =cut |
| | |
| | sub t_proj_patterson |
| | { 'PDL::Transform::Proj4::patterson'->new( @_ ); } |
| | #line 484 "Proj4.pd" |
| | #line 3253 "Proj4.pm" |
| | |
| | #line 469 "Proj4.pd" |
| | |
| | #line 450 "Proj4.pd" |
| | =head2 t_proj_pconic |
| | |
| | Autogenerated transformation function for Proj4 projection code pconic. |
| | |
| | The full name for this projection is Perspective Conic. |
| | |
| | Projection Parameters |
| | |
| | =for options |
| | |
| | =over 4 |
| | |
| | =item lat_1 |
| | |
| | =item lat_2 |
| | |
| | =back |
| | |
| | =cut |
| | |
| | sub t_proj_pconic |
| | { 'PDL::Transform::Proj4::pconic'->new( @_ ); } |
| | #line 497 "Proj4.pd" |
| | #line 3287 "Proj4.pm" |
| | |
| | #line 469 "Proj4.pd" |
| | |
| | #line 450 "Proj4.pd" |
| | =head2 t_proj_peirce_q |
| | |
| | Autogenerated transformation function for Proj4 projection code peirce_q. |
| | |
| | The full name for this projection is Peirce Quincuncial. |
| | |
| | =cut |
| | |
| | sub t_proj_peirce_q |
| | { 'PDL::Transform::Proj4::peirce_q'->new( @_ ); } |
| | #line 484 "Proj4.pd" |
| | #line 3308 "Proj4.pm" |
| | |
| | #line 469 "Proj4.pd" |
| | |
| | #line 450 "Proj4.pd" |
| | =head2 t_proj_pipeline |
| | |
| | Autogenerated transformation function for Proj4 projection code pipeline. |
| | |
| | The full name for this projection is Transformation pipeline manager. |
| | |
| | =cut |
| | |
| | sub t_proj_pipeline |
| | { 'PDL::Transform::Proj4::pipeline'->new( @_ ); } |
| | #line 484 "Proj4.pd" |
| | #line 3329 "Proj4.pm" |
| | |
| | #line 469 "Proj4.pd" |
| | |
| | #line 450 "Proj4.pd" |
| | =head2 t_proj_poly |
| | |
| | Autogenerated transformation function for Proj4 projection code poly. |
| | |
| | The full name for this projection is Polyconic (American). |
| | |
| | =cut |
| | |
| | sub t_proj_poly |
| | { 'PDL::Transform::Proj4::poly'->new( @_ ); } |
| | #line 484 "Proj4.pd" |
| | #line 3350 "Proj4.pm" |
| | |
| | #line 469 "Proj4.pd" |
| | |
| | #line 450 "Proj4.pd" |
| | =head2 t_proj_pop |
| | |
| | Autogenerated transformation function for Proj4 projection code pop. |
| | |
| | The full name for this projection is Retrieve coordinate value from pipeline sta |
| | ck. |
| | |
| | =cut |
| | |
| | sub t_proj_pop |
| | { 'PDL::Transform::Proj4::pop'->new( @_ ); } |
| | #line 484 "Proj4.pd" |
| | #line 3371 "Proj4.pm" |
| | |
| | #line 469 "Proj4.pd" |
| | |
| | #line 450 "Proj4.pd" |
| | =head2 t_proj_push |
| | |
| | Autogenerated transformation function for Proj4 projection code push. |
| | |
| | The full name for this projection is Save coordinate value on pipeline stack. |
| | |
| | =cut |
| | |
| | sub t_proj_push |
| | { 'PDL::Transform::Proj4::push'->new( @_ ); } |
| | #line 484 "Proj4.pd" |
| | #line 3392 "Proj4.pm" |
| | |
| | #line 469 "Proj4.pd" |
| | |
| | #line 450 "Proj4.pd" |
| | =head2 t_proj_putp1 |
| | |
| | Autogenerated transformation function for Proj4 projection code putp1. |
| | |
| | The full name for this projection is Putnins P1. |
| | |
| | =cut |
| | |
| | sub t_proj_putp1 |
| | { 'PDL::Transform::Proj4::putp1'->new( @_ ); } |
| | #line 484 "Proj4.pd" |
| | #line 3413 "Proj4.pm" |
| | |
| | #line 469 "Proj4.pd" |
| | |
| | #line 450 "Proj4.pd" |
| | =head2 t_proj_putp2 |
| | |
| | Autogenerated transformation function for Proj4 projection code putp2. |
| | |
| | The full name for this projection is Putnins P2. |
| | |
| | =cut |
| | |
| | sub t_proj_putp2 |
| | { 'PDL::Transform::Proj4::putp2'->new( @_ ); } |
| | #line 484 "Proj4.pd" |
| | #line 3434 "Proj4.pm" |
| | |
| | #line 469 "Proj4.pd" |
| | |
| | #line 450 "Proj4.pd" |
| | =head2 t_proj_putp3 |
| | |
| | Autogenerated transformation function for Proj4 projection code putp3. |
| | |
| | The full name for this projection is Putnins P3. |
| | |
| | =cut |
| | |
| | sub t_proj_putp3 |
| | { 'PDL::Transform::Proj4::putp3'->new( @_ ); } |
| | #line 484 "Proj4.pd" |
| | #line 3455 "Proj4.pm" |
| | |
| | #line 469 "Proj4.pd" |
| | |
| | #line 450 "Proj4.pd" |
| | =head2 t_proj_putp3p |
| | |
| | Autogenerated transformation function for Proj4 projection code putp3p. |
| | |
| | The full name for this projection is Putnins P3'. |
| | |
| | =cut |
| | |
| | sub t_proj_putp3p |
| | { 'PDL::Transform::Proj4::putp3p'->new( @_ ); } |
| | #line 484 "Proj4.pd" |
| | #line 3476 "Proj4.pm" |
| | |
| | #line 469 "Proj4.pd" |
| | |
| | #line 450 "Proj4.pd" |
| | =head2 t_proj_putp4p |
| | |
| | Autogenerated transformation function for Proj4 projection code putp4p. |
| | |
| | The full name for this projection is Putnins P4'. |
| | |
| | =cut |
| | |
| | sub t_proj_putp4p |
| | { 'PDL::Transform::Proj4::putp4p'->new( @_ ); } |
| | #line 484 "Proj4.pd" |
| | #line 3497 "Proj4.pm" |
| | |
| | #line 469 "Proj4.pd" |
| | |
| | #line 450 "Proj4.pd" |
| | =head2 t_proj_putp5 |
| | |
| | Autogenerated transformation function for Proj4 projection code putp5. |
| | |
| | The full name for this projection is Putnins P5. |
| | |
| | =cut |
| | |
| | sub t_proj_putp5 |
| | { 'PDL::Transform::Proj4::putp5'->new( @_ ); } |
| | #line 484 "Proj4.pd" |
| | #line 3518 "Proj4.pm" |
| | |
| | #line 469 "Proj4.pd" |
| | |
| | #line 450 "Proj4.pd" |
| | =head2 t_proj_putp5p |
| | |
| | Autogenerated transformation function for Proj4 projection code putp5p. |
| | |
| | The full name for this projection is Putnins P5'. |
| | |
| | =cut |
| | |
| | sub t_proj_putp5p |
| | { 'PDL::Transform::Proj4::putp5p'->new( @_ ); } |
| | #line 484 "Proj4.pd" |
| | #line 3539 "Proj4.pm" |
| | |
| | #line 469 "Proj4.pd" |
| | |
| | #line 450 "Proj4.pd" |
| | =head2 t_proj_putp6 |
| | |
| | Autogenerated transformation function for Proj4 projection code putp6. |
| | |
| | The full name for this projection is Putnins P6. |
| | |
| | =cut |
| | |
| | sub t_proj_putp6 |
| | { 'PDL::Transform::Proj4::putp6'->new( @_ ); } |
| | #line 484 "Proj4.pd" |
| | #line 3560 "Proj4.pm" |
| | |
| | #line 469 "Proj4.pd" |
| | |
| | #line 450 "Proj4.pd" |
| | =head2 t_proj_putp6p |
| | |
| | Autogenerated transformation function for Proj4 projection code putp6p. |
| | |
| | The full name for this projection is Putnins P6'. |
| | |
| | =cut |
| | |
| | sub t_proj_putp6p |
| | { 'PDL::Transform::Proj4::putp6p'->new( @_ ); } |
| | #line 484 "Proj4.pd" |
| | #line 3581 "Proj4.pm" |
| | |
| | #line 469 "Proj4.pd" |
| | |
| | #line 450 "Proj4.pd" |
| | =head2 t_proj_qsc |
| | |
| | Autogenerated transformation function for Proj4 projection code qsc. |
| | |
| | The full name for this projection is Quadrilateralized Spherical Cube. |
| | |
| | =cut |
| | |
| | sub t_proj_qsc |
| | { 'PDL::Transform::Proj4::qsc'->new( @_ ); } |
| | #line 484 "Proj4.pd" |
| | #line 3602 "Proj4.pm" |
| | |
| | #line 469 "Proj4.pd" |
| | |
| | #line 450 "Proj4.pd" |
| | =head2 t_proj_qua_aut |
| | |
| | Autogenerated transformation function for Proj4 projection code qua_aut. |
| | |
| | The full name for this projection is Quartic Authalic. |
| | |
| | =cut |
| | |
| | sub t_proj_qua_aut |
| | { 'PDL::Transform::Proj4::qua_aut'->new( @_ ); } |
| | #line 484 "Proj4.pd" |
| | #line 3623 "Proj4.pm" |
| | |
| | #line 469 "Proj4.pd" |
| | |
| | #line 450 "Proj4.pd" |
| | =head2 t_proj_rhealpix |
| | |
| | Autogenerated transformation function for Proj4 projection code rhealpix. |
| | |
| | The full name for this projection is rHEALPix. |
| | |
| | Projection Parameters |
| | |
| | =for options |
| | |
| | =over 4 |
| | |
| | =item north_square |
| | |
| | =item south_square |
| | |
| | =back |
| | |
| | =cut |
| | |
| | sub t_proj_rhealpix |
| | { 'PDL::Transform::Proj4::rhealpix'->new( @_ ); } |
| | #line 497 "Proj4.pd" |
| | #line 3657 "Proj4.pm" |
| | |
| | #line 469 "Proj4.pd" |
| | |
| | #line 450 "Proj4.pd" |
| | =head2 t_proj_robin |
| | |
| | Autogenerated transformation function for Proj4 projection code robin. |
| | |
| | The full name for this projection is Robinson. |
| | |
| | =cut |
| | |
| | sub t_proj_robin |
| | { 'PDL::Transform::Proj4::robin'->new( @_ ); } |
| | #line 484 "Proj4.pd" |
| | #line 3678 "Proj4.pm" |
| | |
| | #line 469 "Proj4.pd" |
| | |
| | #line 450 "Proj4.pd" |
| | =head2 t_proj_rouss |
| | |
| | Autogenerated transformation function for Proj4 projection code rouss. |
| | |
| | The full name for this projection is Roussilhe Stereographic. |
| | |
| | =cut |
| | |
| | sub t_proj_rouss |
| | { 'PDL::Transform::Proj4::rouss'->new( @_ ); } |
| | #line 484 "Proj4.pd" |
| | #line 3699 "Proj4.pm" |
| | |
| | #line 469 "Proj4.pd" |
| | |
| | #line 450 "Proj4.pd" |
| | =head2 t_proj_rpoly |
| | |
| | Autogenerated transformation function for Proj4 projection code rpoly. |
| | |
| | The full name for this projection is Rectangular Polyconic. |
| | |
| | Projection Parameters |
| | |
| | =for options |
| | |
| | =over 4 |
| | |
| | =item lat_ts |
| | |
| | =back |
| | |
| | =cut |
| | |
| | sub t_proj_rpoly |
| | { 'PDL::Transform::Proj4::rpoly'->new( @_ ); } |
| | #line 495 "Proj4.pd" |
| | #line 3731 "Proj4.pm" |
| | |
| | #line 469 "Proj4.pd" |
| | |
| | #line 450 "Proj4.pd" |
| | =head2 t_proj_s2 |
| | |
| | Autogenerated transformation function for Proj4 projection code s2. |
| | |
| | The full name for this projection is S2. |
| | |
| | =cut |
| | |
| | sub t_proj_s2 |
| | { 'PDL::Transform::Proj4::s2'->new( @_ ); } |
| | #line 484 "Proj4.pd" |
| | #line 3752 "Proj4.pm" |
| | |
| | #line 469 "Proj4.pd" |
| | |
| | #line 450 "Proj4.pd" |
| | =head2 t_proj_sch |
| | |
| | Autogenerated transformation function for Proj4 projection code sch. |
| | |
| | The full name for this projection is Spherical Cross-track Height. |
| | |
| | Projection Parameters |
| | |
| | =for options |
| | |
| | =over 4 |
| | |
| | =item h_0 |
| | |
| | =item phdg_0 |
| | |
| | =item plat_0 |
| | |
| | =item plon_0 |
| | |
| | =back |
| | |
| | =cut |
| | |
| | sub t_proj_sch |
| | { 'PDL::Transform::Proj4::sch'->new( @_ ); } |
| | #line 501 "Proj4.pd" |
| | #line 3790 "Proj4.pm" |
| | |
| | #line 469 "Proj4.pd" |
| | |
| | #line 450 "Proj4.pd" |
| | =head2 t_proj_set |
| | |
| | Autogenerated transformation function for Proj4 projection code set. |
| | |
| | The full name for this projection is Set coordinate value. |
| | |
| | =cut |
| | |
| | sub t_proj_set |
| | { 'PDL::Transform::Proj4::set'->new( @_ ); } |
| | #line 484 "Proj4.pd" |
| | #line 3811 "Proj4.pm" |
| | |
| | #line 469 "Proj4.pd" |
| | |
| | #line 450 "Proj4.pd" |
| | =head2 t_proj_sinu |
| | |
| | Autogenerated transformation function for Proj4 projection code sinu. |
| | |
| | The full name for this projection is Sinusoidal (Sanson-Flamsteed). |
| | |
| | =cut |
| | |
| | sub t_proj_sinu |
| | { 'PDL::Transform::Proj4::sinu'->new( @_ ); } |
| | #line 484 "Proj4.pd" |
| | #line 3832 "Proj4.pm" |
| | |
| | #line 469 "Proj4.pd" |
| | |
| | #line 450 "Proj4.pd" |
| | =head2 t_proj_somerc |
| | |
| | Autogenerated transformation function for Proj4 projection code somerc. |
| | |
| | The full name for this projection is Swiss. Obl. Mercator. |
| | |
| | =cut |
| | |
| | sub t_proj_somerc |
| | { 'PDL::Transform::Proj4::somerc'->new( @_ ); } |
| | #line 484 "Proj4.pd" |
| | #line 3853 "Proj4.pm" |
| | |
| | #line 469 "Proj4.pd" |
| | |
| | #line 450 "Proj4.pd" |
| | =head2 t_proj_stere |
| | |
| | Autogenerated transformation function for Proj4 projection code stere. |
| | |
| | The full name for this projection is Stereographic. |
| | |
| | Projection Parameters |
| | |
| | =for options |
| | |
| | =over 4 |
| | |
| | =item lat_ts |
| | |
| | =back |
| | |
| | =cut |
| | |
| | sub t_proj_stere |
| | { 'PDL::Transform::Proj4::stere'->new( @_ ); } |
| | #line 495 "Proj4.pd" |
| | #line 3885 "Proj4.pm" |
| | |
| | #line 469 "Proj4.pd" |
| | |
| | #line 450 "Proj4.pd" |
| | =head2 t_proj_sterea |
| | |
| | Autogenerated transformation function for Proj4 projection code sterea. |
| | |
| | The full name for this projection is Oblique Stereographic Alternative. |
| | |
| | =cut |
| | |
| | sub t_proj_sterea |
| | { 'PDL::Transform::Proj4::sterea'->new( @_ ); } |
| | #line 484 "Proj4.pd" |
| | #line 3906 "Proj4.pm" |
| | |
| | #line 469 "Proj4.pd" |
| | |
| | #line 450 "Proj4.pd" |
| | =head2 t_proj_tcc |
| | |
| | Autogenerated transformation function for Proj4 projection code tcc. |
| | |
| | The full name for this projection is Transverse Central Cylindrical. |
| | |
| | =cut |
| | |
| | sub t_proj_tcc |
| | { 'PDL::Transform::Proj4::tcc'->new( @_ ); } |
| | #line 484 "Proj4.pd" |
| | #line 3927 "Proj4.pm" |
| | |
| | #line 469 "Proj4.pd" |
| | |
| | #line 450 "Proj4.pd" |
| | =head2 t_proj_tcea |
| | |
| | Autogenerated transformation function for Proj4 projection code tcea. |
| | |
| | The full name for this projection is Transverse Cylindrical Equal Area. |
| | |
| | =cut |
| | |
| | sub t_proj_tcea |
| | { 'PDL::Transform::Proj4::tcea'->new( @_ ); } |
| | #line 484 "Proj4.pd" |
| | #line 3948 "Proj4.pm" |
| | |
| | #line 469 "Proj4.pd" |
| | |
| | #line 450 "Proj4.pd" |
| | =head2 t_proj_times |
| | |
| | Autogenerated transformation function for Proj4 projection code times. |
| | |
| | The full name for this projection is Times. |
| | |
| | =cut |
| | |
| | sub t_proj_times |
| | { 'PDL::Transform::Proj4::times'->new( @_ ); } |
| | #line 484 "Proj4.pd" |
| | #line 3969 "Proj4.pm" |
| | |
| | #line 469 "Proj4.pd" |
| | |
| | #line 450 "Proj4.pd" |
| | =head2 t_proj_tinshift |
| | |
| | Autogenerated transformation function for Proj4 projection code tinshift. |
| | |
| | The full name for this projection is Triangulation based transformation. |
| | |
| | =cut |
| | |
| | sub t_proj_tinshift |
| | { 'PDL::Transform::Proj4::tinshift'->new( @_ ); } |
| | #line 484 "Proj4.pd" |
| | #line 3990 "Proj4.pm" |
| | |
| | #line 469 "Proj4.pd" |
| | |
| | #line 450 "Proj4.pd" |
| | =head2 t_proj_tissot |
| | |
| | Autogenerated transformation function for Proj4 projection code tissot. |
| | |
| | The full name for this projection is Tissot. |
| | |
| | Projection Parameters |
| | |
| | =for options |
| | |
| | =over 4 |
| | |
| | =item lat_1 |
| | |
| | =item lat_2 |
| | |
| | =back |
| | |
| | =cut |
| | |
| | sub t_proj_tissot |
| | { 'PDL::Transform::Proj4::tissot'->new( @_ ); } |
| | #line 497 "Proj4.pd" |
| | #line 4024 "Proj4.pm" |
| | |
| | #line 469 "Proj4.pd" |
| | |
| | #line 450 "Proj4.pd" |
| | =head2 t_proj_tmerc |
| | |
| | Autogenerated transformation function for Proj4 projection code tmerc. |
| | |
| | The full name for this projection is Transverse Mercator. |
| | |
| | Projection Parameters |
| | |
| | =for options |
| | |
| | =over 4 |
| | |
| | =item approx |
| | |
| | =back |
| | |
| | =cut |
| | |
| | sub t_proj_tmerc |
| | { 'PDL::Transform::Proj4::tmerc'->new( @_ ); } |
| | #line 495 "Proj4.pd" |
| | #line 4056 "Proj4.pm" |
| | |
| | #line 469 "Proj4.pd" |
| | |
| | #line 450 "Proj4.pd" |
| | =head2 t_proj_tobmerc |
| | |
| | Autogenerated transformation function for Proj4 projection code tobmerc. |
| | |
| | The full name for this projection is Tobler-Mercator. |
| | |
| | =cut |
| | |
| | sub t_proj_tobmerc |
| | { 'PDL::Transform::Proj4::tobmerc'->new( @_ ); } |
| | #line 484 "Proj4.pd" |
| | #line 4077 "Proj4.pm" |
| | |
| | #line 469 "Proj4.pd" |
| | |
| | #line 450 "Proj4.pd" |
| | =head2 t_proj_topocentric |
| | |
| | Autogenerated transformation function for Proj4 projection code topocentric. |
| | |
| | The full name for this projection is Geocentric/Topocentric conversion. |
| | |
| | =cut |
| | |
| | sub t_proj_topocentric |
| | { 'PDL::Transform::Proj4::topocentric'->new( @_ ); } |
| | #line 484 "Proj4.pd" |
| | #line 4098 "Proj4.pm" |
| | |
| | #line 469 "Proj4.pd" |
| | |
| | #line 450 "Proj4.pd" |
| | =head2 t_proj_tpeqd |
| | |
| | Autogenerated transformation function for Proj4 projection code tpeqd. |
| | |
| | The full name for this projection is Two Point Equidistant. |
| | |
| | Projection Parameters |
| | |
| | =for options |
| | |
| | =over 4 |
| | |
| | =item lat_1 |
| | |
| | =item lat_2 |
| | |
| | =item lon_1 |
| | |
| | =item lon_2 |
| | |
| | =back |
| | |
| | =cut |
| | |
| | sub t_proj_tpeqd |
| | { 'PDL::Transform::Proj4::tpeqd'->new( @_ ); } |
| | #line 501 "Proj4.pd" |
| | #line 4136 "Proj4.pm" |
| | |
| | #line 469 "Proj4.pd" |
| | |
| | #line 450 "Proj4.pd" |
| | =head2 t_proj_tpers |
| | |
| | Autogenerated transformation function for Proj4 projection code tpers. |
| | |
| | The full name for this projection is Tilted perspective. |
| | |
| | Projection Parameters |
| | |
| | =for options |
| | |
| | =over 4 |
| | |
| | =item azi |
| | |
| | =item h |
| | |
| | =item tilt |
| | |
| | =back |
| | |
| | =cut |
| | |
| | sub t_proj_tpers |
| | { 'PDL::Transform::Proj4::tpers'->new( @_ ); } |
| | #line 499 "Proj4.pd" |
| | #line 4172 "Proj4.pm" |
| | |
| | #line 469 "Proj4.pd" |
| | |
| | #line 450 "Proj4.pd" |
| | =head2 t_proj_unitconvert |
| | |
| | Autogenerated transformation function for Proj4 projection code unitconvert. |
| | |
| | The full name for this projection is Unit conversion. |
| | |
| | =cut |
| | |
| | sub t_proj_unitconvert |
| | { 'PDL::Transform::Proj4::unitconvert'->new( @_ ); } |
| | #line 484 "Proj4.pd" |
| | #line 4193 "Proj4.pm" |
| | |
| | #line 469 "Proj4.pd" |
| | |
| | #line 450 "Proj4.pd" |
| | =head2 t_proj_ups |
| | |
| | Autogenerated transformation function for Proj4 projection code ups. |
| | |
| | The full name for this projection is Universal Polar Stereographic. |
| | |
| | Projection Parameters |
| | |
| | =for options |
| | |
| | =over 4 |
| | |
| | =item south |
| | |
| | =back |
| | |
| | =cut |
| | |
| | sub t_proj_ups |
| | { 'PDL::Transform::Proj4::ups'->new( @_ ); } |
| | #line 495 "Proj4.pd" |
| | #line 4225 "Proj4.pm" |
| | |
| | #line 469 "Proj4.pd" |
| | |
| | #line 450 "Proj4.pd" |
| | =head2 t_proj_urm5 |
| | |
| | Autogenerated transformation function for Proj4 projection code urm5. |
| | |
| | The full name for this projection is Urmaev V. |
| | |
| | Projection Parameters |
| | |
| | =for options |
| | |
| | =over 4 |
| | |
| | =item alpha |
| | |
| | =item n |
| | |
| | =item q |
| | |
| | =back |
| | |
| | =cut |
| | |
| | sub t_proj_urm5 |
| | { 'PDL::Transform::Proj4::urm5'->new( @_ ); } |
| | #line 499 "Proj4.pd" |
| | #line 4261 "Proj4.pm" |
| | |
| | #line 469 "Proj4.pd" |
| | |
| | #line 450 "Proj4.pd" |
| | =head2 t_proj_urmfps |
| | |
| | Autogenerated transformation function for Proj4 projection code urmfps. |
| | |
| | The full name for this projection is Urmaev Flat-Polar Sinusoidal. |
| | |
| | Projection Parameters |
| | |
| | =for options |
| | |
| | =over 4 |
| | |
| | =item n |
| | |
| | =back |
| | |
| | =cut |
| | |
| | sub t_proj_urmfps |
| | { 'PDL::Transform::Proj4::urmfps'->new( @_ ); } |
| | #line 495 "Proj4.pd" |
| | #line 4293 "Proj4.pm" |
| | |
| | #line 469 "Proj4.pd" |
| | |
| | #line 450 "Proj4.pd" |
| | =head2 t_proj_utm |
| | |
| | Autogenerated transformation function for Proj4 projection code utm. |
| | |
| | The full name for this projection is Universal Transverse Mercator (UTM). |
| | |
| | Projection Parameters |
| | |
| | =for options |
| | |
| | =over 4 |
| | |
| | =item approx |
| | |
| | =item south |
| | |
| | =item zone |
| | |
| | =back |
| | |
| | =cut |
| | |
| | sub t_proj_utm |
| | { 'PDL::Transform::Proj4::utm'->new( @_ ); } |
| | #line 499 "Proj4.pd" |
| | #line 4329 "Proj4.pm" |
| | |
| | #line 469 "Proj4.pd" |
| | |
| | #line 450 "Proj4.pd" |
| | =head2 t_proj_vandg |
| | |
| | Autogenerated transformation function for Proj4 projection code vandg. |
| | |
| | The full name for this projection is van der Grinten (I). |
| | |
| | =cut |
| | |
| | sub t_proj_vandg |
| | { 'PDL::Transform::Proj4::vandg'->new( @_ ); } |
| | #line 484 "Proj4.pd" |
| | #line 4350 "Proj4.pm" |
| | |
| | #line 469 "Proj4.pd" |
| | |
| | #line 450 "Proj4.pd" |
| | =head2 t_proj_vandg2 |
| | |
| | Autogenerated transformation function for Proj4 projection code vandg2. |
| | |
| | The full name for this projection is van der Grinten II. |
| | |
| | =cut |
| | |
| | sub t_proj_vandg2 |
| | { 'PDL::Transform::Proj4::vandg2'->new( @_ ); } |
| | #line 484 "Proj4.pd" |
| | #line 4371 "Proj4.pm" |
| | |
| | #line 469 "Proj4.pd" |
| | |
| | #line 450 "Proj4.pd" |
| | =head2 t_proj_vandg3 |
| | |
| | Autogenerated transformation function for Proj4 projection code vandg3. |
| | |
| | The full name for this projection is van der Grinten III. |
| | |
| | =cut |
| | |
| | sub t_proj_vandg3 |
| | { 'PDL::Transform::Proj4::vandg3'->new( @_ ); } |
| | #line 484 "Proj4.pd" |
| | #line 4392 "Proj4.pm" |
| | |
| | #line 469 "Proj4.pd" |
| | |
| | #line 450 "Proj4.pd" |
| | =head2 t_proj_vandg4 |
| | |
| | Autogenerated transformation function for Proj4 projection code vandg4. |
| | |
| | The full name for this projection is van der Grinten IV. |
| | |
| | =cut |
| | |
| | sub t_proj_vandg4 |
| | { 'PDL::Transform::Proj4::vandg4'->new( @_ ); } |
| | #line 484 "Proj4.pd" |
| | #line 4413 "Proj4.pm" |
| | |
| | #line 469 "Proj4.pd" |
| | |
| | #line 450 "Proj4.pd" |
| | =head2 t_proj_vgridshift |
| | |
| | Autogenerated transformation function for Proj4 projection code vgridshift. |
| | |
| | The full name for this projection is Vertical grid shift. |
| | |
| | =cut |
| | |
| | sub t_proj_vgridshift |
| | { 'PDL::Transform::Proj4::vgridshift'->new( @_ ); } |
| | #line 484 "Proj4.pd" |
| | #line 4434 "Proj4.pm" |
| | |
| | #line 469 "Proj4.pd" |
| | |
| | #line 450 "Proj4.pd" |
| | =head2 t_proj_vitk1 |
| | |
| | Autogenerated transformation function for Proj4 projection code vitk1. |
| | |
| | The full name for this projection is Vitkovsky I. |
| | |
| | Projection Parameters |
| | |
| | =for options |
| | |
| | =over 4 |
| | |
| | =item lat_1 |
| | |
| | =item lat_2 |
| | |
| | =back |
| | |
| | =cut |
| | |
| | sub t_proj_vitk1 |
| | { 'PDL::Transform::Proj4::vitk1'->new( @_ ); } |
| | #line 497 "Proj4.pd" |
| | #line 4468 "Proj4.pm" |
| | |
| | #line 469 "Proj4.pd" |
| | |
| | #line 450 "Proj4.pd" |
| | =head2 t_proj_wag1 |
| | |
| | Autogenerated transformation function for Proj4 projection code wag1. |
| | |
| | The full name for this projection is Wagner I (Kavraisky VI). |
| | |
| | =cut |
| | |
| | sub t_proj_wag1 |
| | { 'PDL::Transform::Proj4::wag1'->new( @_ ); } |
| | #line 484 "Proj4.pd" |
| | #line 4489 "Proj4.pm" |
| | |
| | #line 469 "Proj4.pd" |
| | |
| | #line 450 "Proj4.pd" |
| | =head2 t_proj_wag2 |
| | |
| | Autogenerated transformation function for Proj4 projection code wag2. |
| | |
| | The full name for this projection is Wagner II. |
| | |
| | =cut |
| | |
| | sub t_proj_wag2 |
| | { 'PDL::Transform::Proj4::wag2'->new( @_ ); } |
| | #line 484 "Proj4.pd" |
| | #line 4510 "Proj4.pm" |
| | |
| | #line 469 "Proj4.pd" |
| | |
| | #line 450 "Proj4.pd" |
| | =head2 t_proj_wag3 |
| | |
| | Autogenerated transformation function for Proj4 projection code wag3. |
| | |
| | The full name for this projection is Wagner III. |
| | |
| | Projection Parameters |
| | |
| | =for options |
| | |
| | =over 4 |
| | |
| | =item lat_ts |
| | |
| | =back |
| | |
| | =cut |
| | |
| | sub t_proj_wag3 |
| | { 'PDL::Transform::Proj4::wag3'->new( @_ ); } |
| | #line 495 "Proj4.pd" |
| | #line 4542 "Proj4.pm" |
| | |
| | #line 469 "Proj4.pd" |
| | |
| | #line 450 "Proj4.pd" |
| | =head2 t_proj_wag4 |
| | |
| | Autogenerated transformation function for Proj4 projection code wag4. |
| | |
| | The full name for this projection is Wagner IV. |
| | |
| | =cut |
| | |
| | sub t_proj_wag4 |
| | { 'PDL::Transform::Proj4::wag4'->new( @_ ); } |
| | #line 484 "Proj4.pd" |
| | #line 4563 "Proj4.pm" |
| | |
| | #line 469 "Proj4.pd" |
| | |
| | #line 450 "Proj4.pd" |
| | =head2 t_proj_wag5 |
| | |
| | Autogenerated transformation function for Proj4 projection code wag5. |
| | |
| | The full name for this projection is Wagner V. |
| | |
| | =cut |
| | |
| | sub t_proj_wag5 |
| | { 'PDL::Transform::Proj4::wag5'->new( @_ ); } |
| | #line 484 "Proj4.pd" |
| | #line 4584 "Proj4.pm" |
| | |
| | #line 469 "Proj4.pd" |
| | |
| | #line 450 "Proj4.pd" |
| | =head2 t_proj_wag6 |
| | |
| | Autogenerated transformation function for Proj4 projection code wag6. |
| | |
| | The full name for this projection is Wagner VI. |
| | |
| | =cut |
| | |
| | sub t_proj_wag6 |
| | { 'PDL::Transform::Proj4::wag6'->new( @_ ); } |
| | #line 484 "Proj4.pd" |
| | #line 4605 "Proj4.pm" |
| | |
| | #line 469 "Proj4.pd" |
| | |
| | #line 450 "Proj4.pd" |
| | =head2 t_proj_wag7 |
| | |
| | Autogenerated transformation function for Proj4 projection code wag7. |
| | |
| | The full name for this projection is Wagner VII. |
| | |
| | =cut |
| | |
| | sub t_proj_wag7 |
| | { 'PDL::Transform::Proj4::wag7'->new( @_ ); } |
| | #line 484 "Proj4.pd" |
| | #line 4626 "Proj4.pm" |
| | |
| | #line 469 "Proj4.pd" |
| | |
| | #line 450 "Proj4.pd" |
| | =head2 t_proj_webmerc |
| | |
| | Autogenerated transformation function for Proj4 projection code webmerc. |
| | |
| | The full name for this projection is Web Mercator / Pseudo Mercator. |
| | |
| | =cut |
| | |
| | sub t_proj_webmerc |
| | { 'PDL::Transform::Proj4::webmerc'->new( @_ ); } |
| | #line 484 "Proj4.pd" |
| | #line 4647 "Proj4.pm" |
| | |
| | #line 469 "Proj4.pd" |
| | |
| | #line 450 "Proj4.pd" |
| | =head2 t_proj_weren |
| | |
| | Autogenerated transformation function for Proj4 projection code weren. |
| | |
| | The full name for this projection is Werenskiold I. |
| | |
| | =cut |
| | |
| | sub t_proj_weren |
| | { 'PDL::Transform::Proj4::weren'->new( @_ ); } |
| | #line 484 "Proj4.pd" |
| | #line 4668 "Proj4.pm" |
| | |
| | #line 469 "Proj4.pd" |
| | |
| | #line 450 "Proj4.pd" |
| | =head2 t_proj_wink1 |
| | |
| | Autogenerated transformation function for Proj4 projection code wink1. |
| | |
| | The full name for this projection is Winkel I. |
| | |
| | Projection Parameters |
| | |
| | =for options |
| | |
| | =over 4 |
| | |
| | =item lat_ts |
| | |
| | =back |
| | |
| | =cut |
| | |
| | sub t_proj_wink1 |
| | { 'PDL::Transform::Proj4::wink1'->new( @_ ); } |
| | #line 495 "Proj4.pd" |
| | #line 4700 "Proj4.pm" |
| | |
| | #line 469 "Proj4.pd" |
| | |
| | #line 450 "Proj4.pd" |
| | =head2 t_proj_wink2 |
| | |
| | Autogenerated transformation function for Proj4 projection code wink2. |
| | |
| | The full name for this projection is Winkel II. |
| | |
| | Projection Parameters |
| | |
| | =for options |
| | |
| | =over 4 |
| | |
| | =item lat_1 |
| | |
| | =back |
| | |
| | =cut |
| | |
| | sub t_proj_wink2 |
| | { 'PDL::Transform::Proj4::wink2'->new( @_ ); } |
| | #line 495 "Proj4.pd" |
| | #line 4732 "Proj4.pm" |
| | |
| | #line 469 "Proj4.pd" |
| | |
| | #line 450 "Proj4.pd" |
| | =head2 t_proj_wintri |
| | |
| | Autogenerated transformation function for Proj4 projection code wintri. |
| | |
| | The full name for this projection is Winkel Tripel. |
| | |
| | Projection Parameters |
| | |
| | =for options |
| | |
| | =over 4 |
| | |
| | =item lat_1 |
| | |
| | =back |
| | |
| | =cut |
| | |
| | sub t_proj_wintri |
| | { 'PDL::Transform::Proj4::wintri'->new( @_ ); } |
| | #line 495 "Proj4.pd" |
| | #line 4764 "Proj4.pm" |
| | |
| | #line 469 "Proj4.pd" |
| | |
| | #line 450 "Proj4.pd" |
| | =head2 t_proj_xyzgridshift |
| | |
| | Autogenerated transformation function for Proj4 projection code xyzgridshift. |
| | |
| | The full name for this projection is Geocentric grid shift. |
| | |
| | =cut |
| | |
| | sub t_proj_xyzgridshift |
| | { 'PDL::Transform::Proj4::xyzgridshift'->new( @_ ); } |
| | #line 484 "Proj4.pd" |
| | #line 4785 "Proj4.pm" |
| | |
| | #line 1060 "../../../blib/lib/PDL/PP.pm" |
| | |
|
| #line 1061 "/home/osboxes/pdl-code/blib/lib/PDL/PP.pm" | | |
| *_proj4_dummy = \&PDL::_proj4_dummy; | | *_proj4_dummy = \&PDL::_proj4_dummy; |
|
| #line 377 "Proj4.pm" | | #line 4792 "Proj4.pm" |
| | |
| | #line 433 "Proj4.pd" |
| | |
| | #line 379 "Proj4.pd" |
| | # Autogenerated code for the Proj4 projection code: |
| | # adams_hemi |
| | # |
| | package PDL::Transform::Proj4::adams_hemi; |
| | use strict; |
| | use warnings; |
| | our @ISA = ( 'PDL::Transform::Proj4' ); |
| | |
| | sub new |
| | { |
| | my $proto = shift; |
| | my $class = ref($proto) || $proto; |
| | my $sub = "PDL::Transform::Proj4::adams_hemi::new()"; |
| | #print STDERR "$sub: ARGS: [" . join(", ", @_ ) . "]\n"; |
| | my $self = $class->SUPER::new( @_ ); |
| | bless ($self, $class); |
| | my $o = $_[0]; |
| | unless( (ref $o) ) |
| | { $o = {@_}; } |
| | #use Data::Dumper; |
| | #my $dd2 = Data::Dumper->new( [$o], ["$sub: o"] ); |
| | #$dd2->Indent(1); |
| | #print STDERR $dd2->Dump(); |
| | $self->{name} = "Adams Hemisphere in a Square"; |
| | $self->{proj_code} = "adams_hemi"; |
| | # Make sure proj is set in the options: |
| | $self->{params}->{proj} = $self->{proj_code}; |
| | # Grab our projection specific options: |
| | # |
| | $self->{projection_params} = [ qw( ) ]; |
| | foreach my $param ( @{ $self->{projection_params} } ) |
| | { $self->{params}->{$param} = PDL::Transform::_opt( $o, [ $param ] ); } |
| | $self->update_proj_string(); |
| | #my $dd = Data::Dumper->new( [$self->{params}], ["$sub: params"] ); |
| | #$dd->Indent(1); |
| | #print STDERR $dd->Dump(); |
| | #print STDERR "$sub: Final proj_params: \'" . $self->{params}->{proj_params} |
| | . "\'\n"; |
| | return $self; |
| | } # End of PDL::Transform::adams_hemi::new()... |
| | |
| | 1; |
| | #line 477 "Proj4.pd" |
| | #line 4844 "Proj4.pm" |
| | |
| | #line 433 "Proj4.pd" |
| | |
| | #line 379 "Proj4.pd" |
| | # Autogenerated code for the Proj4 projection code: |
| | # adams_ws1 |
| | # |
| | package PDL::Transform::Proj4::adams_ws1; |
| | use strict; |
| | use warnings; |
| | our @ISA = ( 'PDL::Transform::Proj4' ); |
| | |
| | sub new |
| | { |
| | my $proto = shift; |
| | my $class = ref($proto) || $proto; |
| | my $sub = "PDL::Transform::Proj4::adams_ws1::new()"; |
| | #print STDERR "$sub: ARGS: [" . join(", ", @_ ) . "]\n"; |
| | my $self = $class->SUPER::new( @_ ); |
| | bless ($self, $class); |
| | my $o = $_[0]; |
| | unless( (ref $o) ) |
| | { $o = {@_}; } |
| | #use Data::Dumper; |
| | #my $dd2 = Data::Dumper->new( [$o], ["$sub: o"] ); |
| | #$dd2->Indent(1); |
| | #print STDERR $dd2->Dump(); |
| | $self->{name} = "Adams World in a Square I"; |
| | $self->{proj_code} = "adams_ws1"; |
| | # Make sure proj is set in the options: |
| | $self->{params}->{proj} = $self->{proj_code}; |
| | # Grab our projection specific options: |
| | # |
| | $self->{projection_params} = [ qw( ) ]; |
| | foreach my $param ( @{ $self->{projection_params} } ) |
| | { $self->{params}->{$param} = PDL::Transform::_opt( $o, [ $param ] ); } |
| | $self->update_proj_string(); |
| | #my $dd = Data::Dumper->new( [$self->{params}], ["$sub: params"] ); |
| | #$dd->Indent(1); |
| | #print STDERR $dd->Dump(); |
| | #print STDERR "$sub: Final proj_params: \'" . $self->{params}->{proj_params} |
| | . "\'\n"; |
| | return $self; |
| | } # End of PDL::Transform::adams_ws1::new()... |
| | |
| | 1; |
| | #line 477 "Proj4.pd" |
| | #line 4894 "Proj4.pm" |
| | |
| | #line 433 "Proj4.pd" |
| | |
| | #line 379 "Proj4.pd" |
| | # Autogenerated code for the Proj4 projection code: |
| | # adams_ws2 |
| | # |
| | package PDL::Transform::Proj4::adams_ws2; |
| | use strict; |
| | use warnings; |
| | our @ISA = ( 'PDL::Transform::Proj4' ); |
| | |
| | sub new |
| | { |
| | my $proto = shift; |
| | my $class = ref($proto) || $proto; |
| | my $sub = "PDL::Transform::Proj4::adams_ws2::new()"; |
| | #print STDERR "$sub: ARGS: [" . join(", ", @_ ) . "]\n"; |
| | my $self = $class->SUPER::new( @_ ); |
| | bless ($self, $class); |
| | my $o = $_[0]; |
| | unless( (ref $o) ) |
| | { $o = {@_}; } |
| | #use Data::Dumper; |
| | #my $dd2 = Data::Dumper->new( [$o], ["$sub: o"] ); |
| | #$dd2->Indent(1); |
| | #print STDERR $dd2->Dump(); |
| | $self->{name} = "Adams World in a Square II"; |
| | $self->{proj_code} = "adams_ws2"; |
| | # Make sure proj is set in the options: |
| | $self->{params}->{proj} = $self->{proj_code}; |
| | # Grab our projection specific options: |
| | # |
| | $self->{projection_params} = [ qw( ) ]; |
| | foreach my $param ( @{ $self->{projection_params} } ) |
| | { $self->{params}->{$param} = PDL::Transform::_opt( $o, [ $param ] ); } |
| | $self->update_proj_string(); |
| | #my $dd = Data::Dumper->new( [$self->{params}], ["$sub: params"] ); |
| | #$dd->Indent(1); |
| | #print STDERR $dd->Dump(); |
| | #print STDERR "$sub: Final proj_params: \'" . $self->{params}->{proj_params} |
| | . "\'\n"; |
| | return $self; |
| | } # End of PDL::Transform::adams_ws2::new()... |
| | |
| | 1; |
| | #line 477 "Proj4.pd" |
| | #line 4944 "Proj4.pm" |
| | |
| | #line 433 "Proj4.pd" |
| | |
| | #line 379 "Proj4.pd" |
| | # Autogenerated code for the Proj4 projection code: |
| | # aea |
| | # |
| | package PDL::Transform::Proj4::aea; |
| | use strict; |
| | use warnings; |
| | our @ISA = ( 'PDL::Transform::Proj4' ); |
| | |
| | sub new |
| | { |
| | my $proto = shift; |
| | my $class = ref($proto) || $proto; |
| | my $sub = "PDL::Transform::Proj4::aea::new()"; |
| | #print STDERR "$sub: ARGS: [" . join(", ", @_ ) . "]\n"; |
| | my $self = $class->SUPER::new( @_ ); |
| | bless ($self, $class); |
| | my $o = $_[0]; |
| | unless( (ref $o) ) |
| | { $o = {@_}; } |
| | #use Data::Dumper; |
| | #my $dd2 = Data::Dumper->new( [$o], ["$sub: o"] ); |
| | #$dd2->Indent(1); |
| | #print STDERR $dd2->Dump(); |
| | $self->{name} = "Albers Equal Area"; |
| | $self->{proj_code} = "aea"; |
| | # Make sure proj is set in the options: |
| | $self->{params}->{proj} = $self->{proj_code}; |
| | # Grab our projection specific options: |
| | # |
| | $self->{projection_params} = [ qw( lat_1 lat_2 ) ]; |
| | foreach my $param ( @{ $self->{projection_params} } ) |
| | { $self->{params}->{$param} = PDL::Transform::_opt( $o, [ $param ] ); } |
| | $self->update_proj_string(); |
| | #my $dd = Data::Dumper->new( [$self->{params}], ["$sub: params"] ); |
| | #$dd->Indent(1); |
| | #print STDERR $dd->Dump(); |
| | #print STDERR "$sub: Final proj_params: \'" . $self->{params}->{proj_params} |
| | . "\'\n"; |
| | return $self; |
| | } # End of PDL::Transform::aea::new()... |
| | |
| | 1; |
| | #line 477 "Proj4.pd" |
| | #line 4994 "Proj4.pm" |
| | |
| | #line 433 "Proj4.pd" |
| | |
| | #line 379 "Proj4.pd" |
| | # Autogenerated code for the Proj4 projection code: |
| | # aeqd |
| | # |
| | package PDL::Transform::Proj4::aeqd; |
| | use strict; |
| | use warnings; |
| | our @ISA = ( 'PDL::Transform::Proj4' ); |
| | |
| | sub new |
| | { |
| | my $proto = shift; |
| | my $class = ref($proto) || $proto; |
| | my $sub = "PDL::Transform::Proj4::aeqd::new()"; |
| | #print STDERR "$sub: ARGS: [" . join(", ", @_ ) . "]\n"; |
| | my $self = $class->SUPER::new( @_ ); |
| | bless ($self, $class); |
| | my $o = $_[0]; |
| | unless( (ref $o) ) |
| | { $o = {@_}; } |
| | #use Data::Dumper; |
| | #my $dd2 = Data::Dumper->new( [$o], ["$sub: o"] ); |
| | #$dd2->Indent(1); |
| | #print STDERR $dd2->Dump(); |
| | $self->{name} = "Azimuthal Equidistant"; |
| | $self->{proj_code} = "aeqd"; |
| | # Make sure proj is set in the options: |
| | $self->{params}->{proj} = $self->{proj_code}; |
| | # Grab our projection specific options: |
| | # |
| | $self->{projection_params} = [ qw( lat_0 guam ) ]; |
| | foreach my $param ( @{ $self->{projection_params} } ) |
| | { $self->{params}->{$param} = PDL::Transform::_opt( $o, [ $param ] ); } |
| | $self->update_proj_string(); |
| | #my $dd = Data::Dumper->new( [$self->{params}], ["$sub: params"] ); |
| | #$dd->Indent(1); |
| | #print STDERR $dd->Dump(); |
| | #print STDERR "$sub: Final proj_params: \'" . $self->{params}->{proj_params} |
| | . "\'\n"; |
| | return $self; |
| | } # End of PDL::Transform::aeqd::new()... |
| | |
| | 1; |
| | #line 477 "Proj4.pd" |
| | #line 5044 "Proj4.pm" |
| | |
| | #line 433 "Proj4.pd" |
| | |
| | #line 379 "Proj4.pd" |
| | # Autogenerated code for the Proj4 projection code: |
| | # affine |
| | # |
| | package PDL::Transform::Proj4::affine; |
| | use strict; |
| | use warnings; |
| | our @ISA = ( 'PDL::Transform::Proj4' ); |
| | |
| | sub new |
| | { |
| | my $proto = shift; |
| | my $class = ref($proto) || $proto; |
| | my $sub = "PDL::Transform::Proj4::affine::new()"; |
| | #print STDERR "$sub: ARGS: [" . join(", ", @_ ) . "]\n"; |
| | my $self = $class->SUPER::new( @_ ); |
| | bless ($self, $class); |
| | my $o = $_[0]; |
| | unless( (ref $o) ) |
| | { $o = {@_}; } |
| | #use Data::Dumper; |
| | #my $dd2 = Data::Dumper->new( [$o], ["$sub: o"] ); |
| | #$dd2->Indent(1); |
| | #print STDERR $dd2->Dump(); |
| | $self->{name} = "Affine transformation"; |
| | $self->{proj_code} = "affine"; |
| | # Make sure proj is set in the options: |
| | $self->{params}->{proj} = $self->{proj_code}; |
| | # Grab our projection specific options: |
| | # |
| | $self->{projection_params} = [ qw( ) ]; |
| | foreach my $param ( @{ $self->{projection_params} } ) |
| | { $self->{params}->{$param} = PDL::Transform::_opt( $o, [ $param ] ); } |
| | $self->update_proj_string(); |
| | #my $dd = Data::Dumper->new( [$self->{params}], ["$sub: params"] ); |
| | #$dd->Indent(1); |
| | #print STDERR $dd->Dump(); |
| | #print STDERR "$sub: Final proj_params: \'" . $self->{params}->{proj_params} |
| | . "\'\n"; |
| | return $self; |
| | } # End of PDL::Transform::affine::new()... |
| | |
| | 1; |
| | #line 477 "Proj4.pd" |
| | #line 5094 "Proj4.pm" |
| | |
| | #line 433 "Proj4.pd" |
| | |
| | #line 379 "Proj4.pd" |
| | # Autogenerated code for the Proj4 projection code: |
| | # airy |
| | # |
| | package PDL::Transform::Proj4::airy; |
| | use strict; |
| | use warnings; |
| | our @ISA = ( 'PDL::Transform::Proj4' ); |
| | |
| | sub new |
| | { |
| | my $proto = shift; |
| | my $class = ref($proto) || $proto; |
| | my $sub = "PDL::Transform::Proj4::airy::new()"; |
| | #print STDERR "$sub: ARGS: [" . join(", ", @_ ) . "]\n"; |
| | my $self = $class->SUPER::new( @_ ); |
| | bless ($self, $class); |
| | my $o = $_[0]; |
| | unless( (ref $o) ) |
| | { $o = {@_}; } |
| | #use Data::Dumper; |
| | #my $dd2 = Data::Dumper->new( [$o], ["$sub: o"] ); |
| | #$dd2->Indent(1); |
| | #print STDERR $dd2->Dump(); |
| | $self->{name} = "Airy"; |
| | $self->{proj_code} = "airy"; |
| | # Make sure proj is set in the options: |
| | $self->{params}->{proj} = $self->{proj_code}; |
| | # Grab our projection specific options: |
| | # |
| | $self->{projection_params} = [ qw( no_cut lat_b ) ]; |
| | foreach my $param ( @{ $self->{projection_params} } ) |
| | { $self->{params}->{$param} = PDL::Transform::_opt( $o, [ $param ] ); } |
| | $self->update_proj_string(); |
| | #my $dd = Data::Dumper->new( [$self->{params}], ["$sub: params"] ); |
| | #$dd->Indent(1); |
| | #print STDERR $dd->Dump(); |
| | #print STDERR "$sub: Final proj_params: \'" . $self->{params}->{proj_params} |
| | . "\'\n"; |
| | return $self; |
| | } # End of PDL::Transform::airy::new()... |
| | |
| | 1; |
| | #line 477 "Proj4.pd" |
| | #line 5144 "Proj4.pm" |
| | |
| | #line 433 "Proj4.pd" |
| | |
| | #line 379 "Proj4.pd" |
| | # Autogenerated code for the Proj4 projection code: |
| | # aitoff |
| | # |
| | package PDL::Transform::Proj4::aitoff; |
| | use strict; |
| | use warnings; |
| | our @ISA = ( 'PDL::Transform::Proj4' ); |
| | |
| | sub new |
| | { |
| | my $proto = shift; |
| | my $class = ref($proto) || $proto; |
| | my $sub = "PDL::Transform::Proj4::aitoff::new()"; |
| | #print STDERR "$sub: ARGS: [" . join(", ", @_ ) . "]\n"; |
| | my $self = $class->SUPER::new( @_ ); |
| | bless ($self, $class); |
| | my $o = $_[0]; |
| | unless( (ref $o) ) |
| | { $o = {@_}; } |
| | #use Data::Dumper; |
| | #my $dd2 = Data::Dumper->new( [$o], ["$sub: o"] ); |
| | #$dd2->Indent(1); |
| | #print STDERR $dd2->Dump(); |
| | $self->{name} = "Aitoff"; |
| | $self->{proj_code} = "aitoff"; |
| | # Make sure proj is set in the options: |
| | $self->{params}->{proj} = $self->{proj_code}; |
| | # Grab our projection specific options: |
| | # |
| | $self->{projection_params} = [ qw( ) ]; |
| | foreach my $param ( @{ $self->{projection_params} } ) |
| | { $self->{params}->{$param} = PDL::Transform::_opt( $o, [ $param ] ); } |
| | $self->update_proj_string(); |
| | #my $dd = Data::Dumper->new( [$self->{params}], ["$sub: params"] ); |
| | #$dd->Indent(1); |
| | #print STDERR $dd->Dump(); |
| | #print STDERR "$sub: Final proj_params: \'" . $self->{params}->{proj_params} |
| | . "\'\n"; |
| | return $self; |
| | } # End of PDL::Transform::aitoff::new()... |
| | |
| | 1; |
| | #line 477 "Proj4.pd" |
| | #line 5194 "Proj4.pm" |
| | |
| | #line 433 "Proj4.pd" |
| | |
| | #line 379 "Proj4.pd" |
| | # Autogenerated code for the Proj4 projection code: |
| | # alsk |
| | # |
| | package PDL::Transform::Proj4::alsk; |
| | use strict; |
| | use warnings; |
| | our @ISA = ( 'PDL::Transform::Proj4' ); |
| | |
| | sub new |
| | { |
| | my $proto = shift; |
| | my $class = ref($proto) || $proto; |
| | my $sub = "PDL::Transform::Proj4::alsk::new()"; |
| | #print STDERR "$sub: ARGS: [" . join(", ", @_ ) . "]\n"; |
| | my $self = $class->SUPER::new( @_ ); |
| | bless ($self, $class); |
| | my $o = $_[0]; |
| | unless( (ref $o) ) |
| | { $o = {@_}; } |
| | #use Data::Dumper; |
| | #my $dd2 = Data::Dumper->new( [$o], ["$sub: o"] ); |
| | #$dd2->Indent(1); |
| | #print STDERR $dd2->Dump(); |
| | $self->{name} = "Modified Stereographic of Alaska"; |
| | $self->{proj_code} = "alsk"; |
| | # Make sure proj is set in the options: |
| | $self->{params}->{proj} = $self->{proj_code}; |
| | # Grab our projection specific options: |
| | # |
| | $self->{projection_params} = [ qw( ) ]; |
| | foreach my $param ( @{ $self->{projection_params} } ) |
| | { $self->{params}->{$param} = PDL::Transform::_opt( $o, [ $param ] ); } |
| | $self->update_proj_string(); |
| | #my $dd = Data::Dumper->new( [$self->{params}], ["$sub: params"] ); |
| | #$dd->Indent(1); |
| | #print STDERR $dd->Dump(); |
| | #print STDERR "$sub: Final proj_params: \'" . $self->{params}->{proj_params} |
| | . "\'\n"; |
| | return $self; |
| | } # End of PDL::Transform::alsk::new()... |
| | |
| | 1; |
| | #line 477 "Proj4.pd" |
| | #line 5244 "Proj4.pm" |
| | |
| | #line 433 "Proj4.pd" |
| | |
| | #line 379 "Proj4.pd" |
| | # Autogenerated code for the Proj4 projection code: |
| | # apian |
| | # |
| | package PDL::Transform::Proj4::apian; |
| | use strict; |
| | use warnings; |
| | our @ISA = ( 'PDL::Transform::Proj4' ); |
| | |
| | sub new |
| | { |
| | my $proto = shift; |
| | my $class = ref($proto) || $proto; |
| | my $sub = "PDL::Transform::Proj4::apian::new()"; |
| | #print STDERR "$sub: ARGS: [" . join(", ", @_ ) . "]\n"; |
| | my $self = $class->SUPER::new( @_ ); |
| | bless ($self, $class); |
| | my $o = $_[0]; |
| | unless( (ref $o) ) |
| | { $o = {@_}; } |
| | #use Data::Dumper; |
| | #my $dd2 = Data::Dumper->new( [$o], ["$sub: o"] ); |
| | #$dd2->Indent(1); |
| | #print STDERR $dd2->Dump(); |
| | $self->{name} = "Apian Globular I"; |
| | $self->{proj_code} = "apian"; |
| | # Make sure proj is set in the options: |
| | $self->{params}->{proj} = $self->{proj_code}; |
| | # Grab our projection specific options: |
| | # |
| | $self->{projection_params} = [ qw( ) ]; |
| | foreach my $param ( @{ $self->{projection_params} } ) |
| | { $self->{params}->{$param} = PDL::Transform::_opt( $o, [ $param ] ); } |
| | $self->update_proj_string(); |
| | #my $dd = Data::Dumper->new( [$self->{params}], ["$sub: params"] ); |
| | #$dd->Indent(1); |
| | #print STDERR $dd->Dump(); |
| | #print STDERR "$sub: Final proj_params: \'" . $self->{params}->{proj_params} |
| | . "\'\n"; |
| | return $self; |
| | } # End of PDL::Transform::apian::new()... |
| | |
| | 1; |
| | #line 477 "Proj4.pd" |
| | #line 5294 "Proj4.pm" |
| | |
| | #line 433 "Proj4.pd" |
| | |
| | #line 379 "Proj4.pd" |
| | # Autogenerated code for the Proj4 projection code: |
| | # august |
| | # |
| | package PDL::Transform::Proj4::august; |
| | use strict; |
| | use warnings; |
| | our @ISA = ( 'PDL::Transform::Proj4' ); |
| | |
| | sub new |
| | { |
| | my $proto = shift; |
| | my $class = ref($proto) || $proto; |
| | my $sub = "PDL::Transform::Proj4::august::new()"; |
| | #print STDERR "$sub: ARGS: [" . join(", ", @_ ) . "]\n"; |
| | my $self = $class->SUPER::new( @_ ); |
| | bless ($self, $class); |
| | my $o = $_[0]; |
| | unless( (ref $o) ) |
| | { $o = {@_}; } |
| | #use Data::Dumper; |
| | #my $dd2 = Data::Dumper->new( [$o], ["$sub: o"] ); |
| | #$dd2->Indent(1); |
| | #print STDERR $dd2->Dump(); |
| | $self->{name} = "August Epicycloidal"; |
| | $self->{proj_code} = "august"; |
| | # Make sure proj is set in the options: |
| | $self->{params}->{proj} = $self->{proj_code}; |
| | # Grab our projection specific options: |
| | # |
| | $self->{projection_params} = [ qw( ) ]; |
| | foreach my $param ( @{ $self->{projection_params} } ) |
| | { $self->{params}->{$param} = PDL::Transform::_opt( $o, [ $param ] ); } |
| | $self->update_proj_string(); |
| | #my $dd = Data::Dumper->new( [$self->{params}], ["$sub: params"] ); |
| | #$dd->Indent(1); |
| | #print STDERR $dd->Dump(); |
| | #print STDERR "$sub: Final proj_params: \'" . $self->{params}->{proj_params} |
| | . "\'\n"; |
| | return $self; |
| | } # End of PDL::Transform::august::new()... |
| | |
| | 1; |
| | #line 477 "Proj4.pd" |
| | #line 5344 "Proj4.pm" |
| | |
| | #line 433 "Proj4.pd" |
| | |
| | #line 379 "Proj4.pd" |
| | # Autogenerated code for the Proj4 projection code: |
| | # axisswap |
| | # |
| | package PDL::Transform::Proj4::axisswap; |
| | use strict; |
| | use warnings; |
| | our @ISA = ( 'PDL::Transform::Proj4' ); |
| | |
| | sub new |
| | { |
| | my $proto = shift; |
| | my $class = ref($proto) || $proto; |
| | my $sub = "PDL::Transform::Proj4::axisswap::new()"; |
| | #print STDERR "$sub: ARGS: [" . join(", ", @_ ) . "]\n"; |
| | my $self = $class->SUPER::new( @_ ); |
| | bless ($self, $class); |
| | my $o = $_[0]; |
| | unless( (ref $o) ) |
| | { $o = {@_}; } |
| | #use Data::Dumper; |
| | #my $dd2 = Data::Dumper->new( [$o], ["$sub: o"] ); |
| | #$dd2->Indent(1); |
| | #print STDERR $dd2->Dump(); |
| | $self->{name} = "Axis ordering"; |
| | $self->{proj_code} = "axisswap"; |
| | # Make sure proj is set in the options: |
| | $self->{params}->{proj} = $self->{proj_code}; |
| | # Grab our projection specific options: |
| | # |
| | $self->{projection_params} = [ qw( ) ]; |
| | foreach my $param ( @{ $self->{projection_params} } ) |
| | { $self->{params}->{$param} = PDL::Transform::_opt( $o, [ $param ] ); } |
| | $self->update_proj_string(); |
| | #my $dd = Data::Dumper->new( [$self->{params}], ["$sub: params"] ); |
| | #$dd->Indent(1); |
| | #print STDERR $dd->Dump(); |
| | #print STDERR "$sub: Final proj_params: \'" . $self->{params}->{proj_params} |
| | . "\'\n"; |
| | return $self; |
| | } # End of PDL::Transform::axisswap::new()... |
| | |
| | 1; |
| | #line 477 "Proj4.pd" |
| | #line 5394 "Proj4.pm" |
| | |
| | #line 433 "Proj4.pd" |
| | |
| | #line 379 "Proj4.pd" |
| | # Autogenerated code for the Proj4 projection code: |
| | # bacon |
| | # |
| | package PDL::Transform::Proj4::bacon; |
| | use strict; |
| | use warnings; |
| | our @ISA = ( 'PDL::Transform::Proj4' ); |
| | |
| | sub new |
| | { |
| | my $proto = shift; |
| | my $class = ref($proto) || $proto; |
| | my $sub = "PDL::Transform::Proj4::bacon::new()"; |
| | #print STDERR "$sub: ARGS: [" . join(", ", @_ ) . "]\n"; |
| | my $self = $class->SUPER::new( @_ ); |
| | bless ($self, $class); |
| | my $o = $_[0]; |
| | unless( (ref $o) ) |
| | { $o = {@_}; } |
| | #use Data::Dumper; |
| | #my $dd2 = Data::Dumper->new( [$o], ["$sub: o"] ); |
| | #$dd2->Indent(1); |
| | #print STDERR $dd2->Dump(); |
| | $self->{name} = "Bacon Globular"; |
| | $self->{proj_code} = "bacon"; |
| | # Make sure proj is set in the options: |
| | $self->{params}->{proj} = $self->{proj_code}; |
| | # Grab our projection specific options: |
| | # |
| | $self->{projection_params} = [ qw( ) ]; |
| | foreach my $param ( @{ $self->{projection_params} } ) |
| | { $self->{params}->{$param} = PDL::Transform::_opt( $o, [ $param ] ); } |
| | $self->update_proj_string(); |
| | #my $dd = Data::Dumper->new( [$self->{params}], ["$sub: params"] ); |
| | #$dd->Indent(1); |
| | #print STDERR $dd->Dump(); |
| | #print STDERR "$sub: Final proj_params: \'" . $self->{params}->{proj_params} |
| | . "\'\n"; |
| | return $self; |
| | } # End of PDL::Transform::bacon::new()... |
| | |
| | 1; |
| | #line 477 "Proj4.pd" |
| | #line 5444 "Proj4.pm" |
| | |
| | #line 433 "Proj4.pd" |
| | |
| | #line 379 "Proj4.pd" |
| | # Autogenerated code for the Proj4 projection code: |
| | # bertin1953 |
| | # |
| | package PDL::Transform::Proj4::bertin1953; |
| | use strict; |
| | use warnings; |
| | our @ISA = ( 'PDL::Transform::Proj4' ); |
| | |
| | sub new |
| | { |
| | my $proto = shift; |
| | my $class = ref($proto) || $proto; |
| | my $sub = "PDL::Transform::Proj4::bertin1953::new()"; |
| | #print STDERR "$sub: ARGS: [" . join(", ", @_ ) . "]\n"; |
| | my $self = $class->SUPER::new( @_ ); |
| | bless ($self, $class); |
| | my $o = $_[0]; |
| | unless( (ref $o) ) |
| | { $o = {@_}; } |
| | #use Data::Dumper; |
| | #my $dd2 = Data::Dumper->new( [$o], ["$sub: o"] ); |
| | #$dd2->Indent(1); |
| | #print STDERR $dd2->Dump(); |
| | $self->{name} = "Bertin 1953"; |
| | $self->{proj_code} = "bertin1953"; |
| | # Make sure proj is set in the options: |
| | $self->{params}->{proj} = $self->{proj_code}; |
| | # Grab our projection specific options: |
| | # |
| | $self->{projection_params} = [ qw( ) ]; |
| | foreach my $param ( @{ $self->{projection_params} } ) |
| | { $self->{params}->{$param} = PDL::Transform::_opt( $o, [ $param ] ); } |
| | $self->update_proj_string(); |
| | #my $dd = Data::Dumper->new( [$self->{params}], ["$sub: params"] ); |
| | #$dd->Indent(1); |
| | #print STDERR $dd->Dump(); |
| | #print STDERR "$sub: Final proj_params: \'" . $self->{params}->{proj_params} |
| | . "\'\n"; |
| | return $self; |
| | } # End of PDL::Transform::bertin1953::new()... |
| | |
| | 1; |
| | #line 477 "Proj4.pd" |
| | #line 5494 "Proj4.pm" |
| | |
| | #line 433 "Proj4.pd" |
| | |
| | #line 379 "Proj4.pd" |
| | # Autogenerated code for the Proj4 projection code: |
| | # bipc |
| | # |
| | package PDL::Transform::Proj4::bipc; |
| | use strict; |
| | use warnings; |
| | our @ISA = ( 'PDL::Transform::Proj4' ); |
| | |
| | sub new |
| | { |
| | my $proto = shift; |
| | my $class = ref($proto) || $proto; |
| | my $sub = "PDL::Transform::Proj4::bipc::new()"; |
| | #print STDERR "$sub: ARGS: [" . join(", ", @_ ) . "]\n"; |
| | my $self = $class->SUPER::new( @_ ); |
| | bless ($self, $class); |
| | my $o = $_[0]; |
| | unless( (ref $o) ) |
| | { $o = {@_}; } |
| | #use Data::Dumper; |
| | #my $dd2 = Data::Dumper->new( [$o], ["$sub: o"] ); |
| | #$dd2->Indent(1); |
| | #print STDERR $dd2->Dump(); |
| | $self->{name} = "Bipolar conic of western hemisphere"; |
| | $self->{proj_code} = "bipc"; |
| | # Make sure proj is set in the options: |
| | $self->{params}->{proj} = $self->{proj_code}; |
| | # Grab our projection specific options: |
| | # |
| | $self->{projection_params} = [ qw( ) ]; |
| | foreach my $param ( @{ $self->{projection_params} } ) |
| | { $self->{params}->{$param} = PDL::Transform::_opt( $o, [ $param ] ); } |
| | $self->update_proj_string(); |
| | #my $dd = Data::Dumper->new( [$self->{params}], ["$sub: params"] ); |
| | #$dd->Indent(1); |
| | #print STDERR $dd->Dump(); |
| | #print STDERR "$sub: Final proj_params: \'" . $self->{params}->{proj_params} |
| | . "\'\n"; |
| | return $self; |
| | } # End of PDL::Transform::bipc::new()... |
| | |
| | 1; |
| | #line 477 "Proj4.pd" |
| | #line 5544 "Proj4.pm" |
| | |
| | #line 433 "Proj4.pd" |
| | |
| | #line 379 "Proj4.pd" |
| | # Autogenerated code for the Proj4 projection code: |
| | # boggs |
| | # |
| | package PDL::Transform::Proj4::boggs; |
| | use strict; |
| | use warnings; |
| | our @ISA = ( 'PDL::Transform::Proj4' ); |
| | |
| | sub new |
| | { |
| | my $proto = shift; |
| | my $class = ref($proto) || $proto; |
| | my $sub = "PDL::Transform::Proj4::boggs::new()"; |
| | #print STDERR "$sub: ARGS: [" . join(", ", @_ ) . "]\n"; |
| | my $self = $class->SUPER::new( @_ ); |
| | bless ($self, $class); |
| | my $o = $_[0]; |
| | unless( (ref $o) ) |
| | { $o = {@_}; } |
| | #use Data::Dumper; |
| | #my $dd2 = Data::Dumper->new( [$o], ["$sub: o"] ); |
| | #$dd2->Indent(1); |
| | #print STDERR $dd2->Dump(); |
| | $self->{name} = "Boggs Eumorphic"; |
| | $self->{proj_code} = "boggs"; |
| | # Make sure proj is set in the options: |
| | $self->{params}->{proj} = $self->{proj_code}; |
| | # Grab our projection specific options: |
| | # |
| | $self->{projection_params} = [ qw( ) ]; |
| | foreach my $param ( @{ $self->{projection_params} } ) |
| | { $self->{params}->{$param} = PDL::Transform::_opt( $o, [ $param ] ); } |
| | $self->update_proj_string(); |
| | #my $dd = Data::Dumper->new( [$self->{params}], ["$sub: params"] ); |
| | #$dd->Indent(1); |
| | #print STDERR $dd->Dump(); |
| | #print STDERR "$sub: Final proj_params: \'" . $self->{params}->{proj_params} |
| | . "\'\n"; |
| | return $self; |
| | } # End of PDL::Transform::boggs::new()... |
| | |
| | 1; |
| | #line 477 "Proj4.pd" |
| | #line 5594 "Proj4.pm" |
| | |
| | #line 433 "Proj4.pd" |
| | |
| | #line 379 "Proj4.pd" |
| | # Autogenerated code for the Proj4 projection code: |
| | # bonne |
| | # |
| | package PDL::Transform::Proj4::bonne; |
| | use strict; |
| | use warnings; |
| | our @ISA = ( 'PDL::Transform::Proj4' ); |
| | |
| | sub new |
| | { |
| | my $proto = shift; |
| | my $class = ref($proto) || $proto; |
| | my $sub = "PDL::Transform::Proj4::bonne::new()"; |
| | #print STDERR "$sub: ARGS: [" . join(", ", @_ ) . "]\n"; |
| | my $self = $class->SUPER::new( @_ ); |
| | bless ($self, $class); |
| | my $o = $_[0]; |
| | unless( (ref $o) ) |
| | { $o = {@_}; } |
| | #use Data::Dumper; |
| | #my $dd2 = Data::Dumper->new( [$o], ["$sub: o"] ); |
| | #$dd2->Indent(1); |
| | #print STDERR $dd2->Dump(); |
| | $self->{name} = "Bonne (Werner lat_1=90)"; |
| | $self->{proj_code} = "bonne"; |
| | # Make sure proj is set in the options: |
| | $self->{params}->{proj} = $self->{proj_code}; |
| | # Grab our projection specific options: |
| | # |
| | $self->{projection_params} = [ qw( lat_1 ) ]; |
| | foreach my $param ( @{ $self->{projection_params} } ) |
| | { $self->{params}->{$param} = PDL::Transform::_opt( $o, [ $param ] ); } |
| | $self->update_proj_string(); |
| | #my $dd = Data::Dumper->new( [$self->{params}], ["$sub: params"] ); |
| | #$dd->Indent(1); |
| | #print STDERR $dd->Dump(); |
| | #print STDERR "$sub: Final proj_params: \'" . $self->{params}->{proj_params} |
| | . "\'\n"; |
| | return $self; |
| | } # End of PDL::Transform::bonne::new()... |
| | |
| | 1; |
| | #line 477 "Proj4.pd" |
| | #line 5644 "Proj4.pm" |
| | |
| | #line 433 "Proj4.pd" |
| | |
| | #line 379 "Proj4.pd" |
| | # Autogenerated code for the Proj4 projection code: |
| | # calcofi |
| | # |
| | package PDL::Transform::Proj4::calcofi; |
| | use strict; |
| | use warnings; |
| | our @ISA = ( 'PDL::Transform::Proj4' ); |
| | |
| | sub new |
| | { |
| | my $proto = shift; |
| | my $class = ref($proto) || $proto; |
| | my $sub = "PDL::Transform::Proj4::calcofi::new()"; |
| | #print STDERR "$sub: ARGS: [" . join(", ", @_ ) . "]\n"; |
| | my $self = $class->SUPER::new( @_ ); |
| | bless ($self, $class); |
| | my $o = $_[0]; |
| | unless( (ref $o) ) |
| | { $o = {@_}; } |
| | #use Data::Dumper; |
| | #my $dd2 = Data::Dumper->new( [$o], ["$sub: o"] ); |
| | #$dd2->Indent(1); |
| | #print STDERR $dd2->Dump(); |
| | $self->{name} = "Cal Coop Ocean Fish Invest Lines/Stations"; |
| | $self->{proj_code} = "calcofi"; |
| | # Make sure proj is set in the options: |
| | $self->{params}->{proj} = $self->{proj_code}; |
| | # Grab our projection specific options: |
| | # |
| | $self->{projection_params} = [ qw( ) ]; |
| | foreach my $param ( @{ $self->{projection_params} } ) |
| | { $self->{params}->{$param} = PDL::Transform::_opt( $o, [ $param ] ); } |
| | $self->update_proj_string(); |
| | #my $dd = Data::Dumper->new( [$self->{params}], ["$sub: params"] ); |
| | #$dd->Indent(1); |
| | #print STDERR $dd->Dump(); |
| | #print STDERR "$sub: Final proj_params: \'" . $self->{params}->{proj_params} |
| | . "\'\n"; |
| | return $self; |
| | } # End of PDL::Transform::calcofi::new()... |
| | |
| | 1; |
| | #line 477 "Proj4.pd" |
| | #line 5694 "Proj4.pm" |
| | |
| | #line 433 "Proj4.pd" |
| | |
| | #line 379 "Proj4.pd" |
| | # Autogenerated code for the Proj4 projection code: |
| | # cart |
| | # |
| | package PDL::Transform::Proj4::cart; |
| | use strict; |
| | use warnings; |
| | our @ISA = ( 'PDL::Transform::Proj4' ); |
| | |
| | sub new |
| | { |
| | my $proto = shift; |
| | my $class = ref($proto) || $proto; |
| | my $sub = "PDL::Transform::Proj4::cart::new()"; |
| | #print STDERR "$sub: ARGS: [" . join(", ", @_ ) . "]\n"; |
| | my $self = $class->SUPER::new( @_ ); |
| | bless ($self, $class); |
| | my $o = $_[0]; |
| | unless( (ref $o) ) |
| | { $o = {@_}; } |
| | #use Data::Dumper; |
| | #my $dd2 = Data::Dumper->new( [$o], ["$sub: o"] ); |
| | #$dd2->Indent(1); |
| | #print STDERR $dd2->Dump(); |
| | $self->{name} = "Geodetic/cartesian conversions"; |
| | $self->{proj_code} = "cart"; |
| | # Make sure proj is set in the options: |
| | $self->{params}->{proj} = $self->{proj_code}; |
| | # Grab our projection specific options: |
| | # |
| | $self->{projection_params} = [ qw( ) ]; |
| | foreach my $param ( @{ $self->{projection_params} } ) |
| | { $self->{params}->{$param} = PDL::Transform::_opt( $o, [ $param ] ); } |
| | $self->update_proj_string(); |
| | #my $dd = Data::Dumper->new( [$self->{params}], ["$sub: params"] ); |
| | #$dd->Indent(1); |
| | #print STDERR $dd->Dump(); |
| | #print STDERR "$sub: Final proj_params: \'" . $self->{params}->{proj_params} |
| | . "\'\n"; |
| | return $self; |
| | } # End of PDL::Transform::cart::new()... |
| | |
| | 1; |
| | #line 477 "Proj4.pd" |
| | #line 5744 "Proj4.pm" |
| | |
| | #line 433 "Proj4.pd" |
| | |
| | #line 379 "Proj4.pd" |
| | # Autogenerated code for the Proj4 projection code: |
| | # cass |
| | # |
| | package PDL::Transform::Proj4::cass; |
| | use strict; |
| | use warnings; |
| | our @ISA = ( 'PDL::Transform::Proj4' ); |
| | |
| | sub new |
| | { |
| | my $proto = shift; |
| | my $class = ref($proto) || $proto; |
| | my $sub = "PDL::Transform::Proj4::cass::new()"; |
| | #print STDERR "$sub: ARGS: [" . join(", ", @_ ) . "]\n"; |
| | my $self = $class->SUPER::new( @_ ); |
| | bless ($self, $class); |
| | my $o = $_[0]; |
| | unless( (ref $o) ) |
| | { $o = {@_}; } |
| | #use Data::Dumper; |
| | #my $dd2 = Data::Dumper->new( [$o], ["$sub: o"] ); |
| | #$dd2->Indent(1); |
| | #print STDERR $dd2->Dump(); |
| | $self->{name} = "Cassini"; |
| | $self->{proj_code} = "cass"; |
| | # Make sure proj is set in the options: |
| | $self->{params}->{proj} = $self->{proj_code}; |
| | # Grab our projection specific options: |
| | # |
| | $self->{projection_params} = [ qw( ) ]; |
| | foreach my $param ( @{ $self->{projection_params} } ) |
| | { $self->{params}->{$param} = PDL::Transform::_opt( $o, [ $param ] ); } |
| | $self->update_proj_string(); |
| | #my $dd = Data::Dumper->new( [$self->{params}], ["$sub: params"] ); |
| | #$dd->Indent(1); |
| | #print STDERR $dd->Dump(); |
| | #print STDERR "$sub: Final proj_params: \'" . $self->{params}->{proj_params} |
| | . "\'\n"; |
| | return $self; |
| | } # End of PDL::Transform::cass::new()... |
| | |
| | 1; |
| | #line 477 "Proj4.pd" |
| | #line 5794 "Proj4.pm" |
| | |
| | #line 433 "Proj4.pd" |
| | |
| | #line 379 "Proj4.pd" |
| | # Autogenerated code for the Proj4 projection code: |
| | # cc |
| | # |
| | package PDL::Transform::Proj4::cc; |
| | use strict; |
| | use warnings; |
| | our @ISA = ( 'PDL::Transform::Proj4' ); |
| | |
| | sub new |
| | { |
| | my $proto = shift; |
| | my $class = ref($proto) || $proto; |
| | my $sub = "PDL::Transform::Proj4::cc::new()"; |
| | #print STDERR "$sub: ARGS: [" . join(", ", @_ ) . "]\n"; |
| | my $self = $class->SUPER::new( @_ ); |
| | bless ($self, $class); |
| | my $o = $_[0]; |
| | unless( (ref $o) ) |
| | { $o = {@_}; } |
| | #use Data::Dumper; |
| | #my $dd2 = Data::Dumper->new( [$o], ["$sub: o"] ); |
| | #$dd2->Indent(1); |
| | #print STDERR $dd2->Dump(); |
| | $self->{name} = "Central Cylindrical"; |
| | $self->{proj_code} = "cc"; |
| | # Make sure proj is set in the options: |
| | $self->{params}->{proj} = $self->{proj_code}; |
| | # Grab our projection specific options: |
| | # |
| | $self->{projection_params} = [ qw( ) ]; |
| | foreach my $param ( @{ $self->{projection_params} } ) |
| | { $self->{params}->{$param} = PDL::Transform::_opt( $o, [ $param ] ); } |
| | $self->update_proj_string(); |
| | #my $dd = Data::Dumper->new( [$self->{params}], ["$sub: params"] ); |
| | #$dd->Indent(1); |
| | #print STDERR $dd->Dump(); |
| | #print STDERR "$sub: Final proj_params: \'" . $self->{params}->{proj_params} |
| | . "\'\n"; |
| | return $self; |
| | } # End of PDL::Transform::cc::new()... |
| | |
| | 1; |
| | #line 477 "Proj4.pd" |
| | #line 5844 "Proj4.pm" |
| | |
| | #line 433 "Proj4.pd" |
| | |
| | #line 379 "Proj4.pd" |
| | # Autogenerated code for the Proj4 projection code: |
| | # ccon |
| | # |
| | package PDL::Transform::Proj4::ccon; |
| | use strict; |
| | use warnings; |
| | our @ISA = ( 'PDL::Transform::Proj4' ); |
| | |
| | sub new |
| | { |
| | my $proto = shift; |
| | my $class = ref($proto) || $proto; |
| | my $sub = "PDL::Transform::Proj4::ccon::new()"; |
| | #print STDERR "$sub: ARGS: [" . join(", ", @_ ) . "]\n"; |
| | my $self = $class->SUPER::new( @_ ); |
| | bless ($self, $class); |
| | my $o = $_[0]; |
| | unless( (ref $o) ) |
| | { $o = {@_}; } |
| | #use Data::Dumper; |
| | #my $dd2 = Data::Dumper->new( [$o], ["$sub: o"] ); |
| | #$dd2->Indent(1); |
| | #print STDERR $dd2->Dump(); |
| | $self->{name} = "Central Conic"; |
| | $self->{proj_code} = "ccon"; |
| | # Make sure proj is set in the options: |
| | $self->{params}->{proj} = $self->{proj_code}; |
| | # Grab our projection specific options: |
| | # |
| | $self->{projection_params} = [ qw( lat_1 ) ]; |
| | foreach my $param ( @{ $self->{projection_params} } ) |
| | { $self->{params}->{$param} = PDL::Transform::_opt( $o, [ $param ] ); } |
| | $self->update_proj_string(); |
| | #my $dd = Data::Dumper->new( [$self->{params}], ["$sub: params"] ); |
| | #$dd->Indent(1); |
| | #print STDERR $dd->Dump(); |
| | #print STDERR "$sub: Final proj_params: \'" . $self->{params}->{proj_params} |
| | . "\'\n"; |
| | return $self; |
| | } # End of PDL::Transform::ccon::new()... |
| | |
| | 1; |
| | #line 477 "Proj4.pd" |
| | #line 5894 "Proj4.pm" |
| | |
| | #line 433 "Proj4.pd" |
| | |
| | #line 379 "Proj4.pd" |
| | # Autogenerated code for the Proj4 projection code: |
| | # cea |
| | # |
| | package PDL::Transform::Proj4::cea; |
| | use strict; |
| | use warnings; |
| | our @ISA = ( 'PDL::Transform::Proj4' ); |
| | |
| | sub new |
| | { |
| | my $proto = shift; |
| | my $class = ref($proto) || $proto; |
| | my $sub = "PDL::Transform::Proj4::cea::new()"; |
| | #print STDERR "$sub: ARGS: [" . join(", ", @_ ) . "]\n"; |
| | my $self = $class->SUPER::new( @_ ); |
| | bless ($self, $class); |
| | my $o = $_[0]; |
| | unless( (ref $o) ) |
| | { $o = {@_}; } |
| | #use Data::Dumper; |
| | #my $dd2 = Data::Dumper->new( [$o], ["$sub: o"] ); |
| | #$dd2->Indent(1); |
| | #print STDERR $dd2->Dump(); |
| | $self->{name} = "Equal Area Cylindrical"; |
| | $self->{proj_code} = "cea"; |
| | # Make sure proj is set in the options: |
| | $self->{params}->{proj} = $self->{proj_code}; |
| | # Grab our projection specific options: |
| | # |
| | $self->{projection_params} = [ qw( lat_ts ) ]; |
| | foreach my $param ( @{ $self->{projection_params} } ) |
| | { $self->{params}->{$param} = PDL::Transform::_opt( $o, [ $param ] ); } |
| | $self->update_proj_string(); |
| | #my $dd = Data::Dumper->new( [$self->{params}], ["$sub: params"] ); |
| | #$dd->Indent(1); |
| | #print STDERR $dd->Dump(); |
| | #print STDERR "$sub: Final proj_params: \'" . $self->{params}->{proj_params} |
| | . "\'\n"; |
| | return $self; |
| | } # End of PDL::Transform::cea::new()... |
| | |
| | 1; |
| | #line 477 "Proj4.pd" |
| | #line 5944 "Proj4.pm" |
| | |
| | #line 433 "Proj4.pd" |
| | |
| | #line 379 "Proj4.pd" |
| | # Autogenerated code for the Proj4 projection code: |
| | # chamb |
| | # |
| | package PDL::Transform::Proj4::chamb; |
| | use strict; |
| | use warnings; |
| | our @ISA = ( 'PDL::Transform::Proj4' ); |
| | |
| | sub new |
| | { |
| | my $proto = shift; |
| | my $class = ref($proto) || $proto; |
| | my $sub = "PDL::Transform::Proj4::chamb::new()"; |
| | #print STDERR "$sub: ARGS: [" . join(", ", @_ ) . "]\n"; |
| | my $self = $class->SUPER::new( @_ ); |
| | bless ($self, $class); |
| | my $o = $_[0]; |
| | unless( (ref $o) ) |
| | { $o = {@_}; } |
| | #use Data::Dumper; |
| | #my $dd2 = Data::Dumper->new( [$o], ["$sub: o"] ); |
| | #$dd2->Indent(1); |
| | #print STDERR $dd2->Dump(); |
| | $self->{name} = "Chamberlin Trimetric"; |
| | $self->{proj_code} = "chamb"; |
| | # Make sure proj is set in the options: |
| | $self->{params}->{proj} = $self->{proj_code}; |
| | # Grab our projection specific options: |
| | # |
| | $self->{projection_params} = [ qw( lat_1 lon_1 lat_2 lon_2 lat_3 lon_3 ) ]; |
| | foreach my $param ( @{ $self->{projection_params} } ) |
| | { $self->{params}->{$param} = PDL::Transform::_opt( $o, [ $param ] ); } |
| | $self->update_proj_string(); |
| | #my $dd = Data::Dumper->new( [$self->{params}], ["$sub: params"] ); |
| | #$dd->Indent(1); |
| | #print STDERR $dd->Dump(); |
| | #print STDERR "$sub: Final proj_params: \'" . $self->{params}->{proj_params} |
| | . "\'\n"; |
| | return $self; |
| | } # End of PDL::Transform::chamb::new()... |
| | |
| | 1; |
| | #line 477 "Proj4.pd" |
| | #line 5994 "Proj4.pm" |
| | |
| | #line 433 "Proj4.pd" |
| | |
| | #line 379 "Proj4.pd" |
| | # Autogenerated code for the Proj4 projection code: |
| | # col_urban |
| | # |
| | package PDL::Transform::Proj4::col_urban; |
| | use strict; |
| | use warnings; |
| | our @ISA = ( 'PDL::Transform::Proj4' ); |
| | |
| | sub new |
| | { |
| | my $proto = shift; |
| | my $class = ref($proto) || $proto; |
| | my $sub = "PDL::Transform::Proj4::col_urban::new()"; |
| | #print STDERR "$sub: ARGS: [" . join(", ", @_ ) . "]\n"; |
| | my $self = $class->SUPER::new( @_ ); |
| | bless ($self, $class); |
| | my $o = $_[0]; |
| | unless( (ref $o) ) |
| | { $o = {@_}; } |
| | #use Data::Dumper; |
| | #my $dd2 = Data::Dumper->new( [$o], ["$sub: o"] ); |
| | #$dd2->Indent(1); |
| | #print STDERR $dd2->Dump(); |
| | $self->{name} = "Colombia Urban"; |
| | $self->{proj_code} = "col_urban"; |
| | # Make sure proj is set in the options: |
| | $self->{params}->{proj} = $self->{proj_code}; |
| | # Grab our projection specific options: |
| | # |
| | $self->{projection_params} = [ qw( h_0 ) ]; |
| | foreach my $param ( @{ $self->{projection_params} } ) |
| | { $self->{params}->{$param} = PDL::Transform::_opt( $o, [ $param ] ); } |
| | $self->update_proj_string(); |
| | #my $dd = Data::Dumper->new( [$self->{params}], ["$sub: params"] ); |
| | #$dd->Indent(1); |
| | #print STDERR $dd->Dump(); |
| | #print STDERR "$sub: Final proj_params: \'" . $self->{params}->{proj_params} |
| | . "\'\n"; |
| | return $self; |
| | } # End of PDL::Transform::col_urban::new()... |
| | |
| | 1; |
| | #line 477 "Proj4.pd" |
| | #line 6044 "Proj4.pm" |
| | |
| | #line 433 "Proj4.pd" |
| | |
| | #line 379 "Proj4.pd" |
| | # Autogenerated code for the Proj4 projection code: |
| | # collg |
| | # |
| | package PDL::Transform::Proj4::collg; |
| | use strict; |
| | use warnings; |
| | our @ISA = ( 'PDL::Transform::Proj4' ); |
| | |
| | sub new |
| | { |
| | my $proto = shift; |
| | my $class = ref($proto) || $proto; |
| | my $sub = "PDL::Transform::Proj4::collg::new()"; |
| | #print STDERR "$sub: ARGS: [" . join(", ", @_ ) . "]\n"; |
| | my $self = $class->SUPER::new( @_ ); |
| | bless ($self, $class); |
| | my $o = $_[0]; |
| | unless( (ref $o) ) |
| | { $o = {@_}; } |
| | #use Data::Dumper; |
| | #my $dd2 = Data::Dumper->new( [$o], ["$sub: o"] ); |
| | #$dd2->Indent(1); |
| | #print STDERR $dd2->Dump(); |
| | $self->{name} = "Collignon"; |
| | $self->{proj_code} = "collg"; |
| | # Make sure proj is set in the options: |
| | $self->{params}->{proj} = $self->{proj_code}; |
| | # Grab our projection specific options: |
| | # |
| | $self->{projection_params} = [ qw( ) ]; |
| | foreach my $param ( @{ $self->{projection_params} } ) |
| | { $self->{params}->{$param} = PDL::Transform::_opt( $o, [ $param ] ); } |
| | $self->update_proj_string(); |
| | #my $dd = Data::Dumper->new( [$self->{params}], ["$sub: params"] ); |
| | #$dd->Indent(1); |
| | #print STDERR $dd->Dump(); |
| | #print STDERR "$sub: Final proj_params: \'" . $self->{params}->{proj_params} |
| | . "\'\n"; |
| | return $self; |
| | } # End of PDL::Transform::collg::new()... |
| | |
| | 1; |
| | #line 477 "Proj4.pd" |
| | #line 6094 "Proj4.pm" |
| | |
| | #line 433 "Proj4.pd" |
| | |
| | #line 379 "Proj4.pd" |
| | # Autogenerated code for the Proj4 projection code: |
| | # comill |
| | # |
| | package PDL::Transform::Proj4::comill; |
| | use strict; |
| | use warnings; |
| | our @ISA = ( 'PDL::Transform::Proj4' ); |
| | |
| | sub new |
| | { |
| | my $proto = shift; |
| | my $class = ref($proto) || $proto; |
| | my $sub = "PDL::Transform::Proj4::comill::new()"; |
| | #print STDERR "$sub: ARGS: [" . join(", ", @_ ) . "]\n"; |
| | my $self = $class->SUPER::new( @_ ); |
| | bless ($self, $class); |
| | my $o = $_[0]; |
| | unless( (ref $o) ) |
| | { $o = {@_}; } |
| | #use Data::Dumper; |
| | #my $dd2 = Data::Dumper->new( [$o], ["$sub: o"] ); |
| | #$dd2->Indent(1); |
| | #print STDERR $dd2->Dump(); |
| | $self->{name} = "Compact Miller"; |
| | $self->{proj_code} = "comill"; |
| | # Make sure proj is set in the options: |
| | $self->{params}->{proj} = $self->{proj_code}; |
| | # Grab our projection specific options: |
| | # |
| | $self->{projection_params} = [ qw( ) ]; |
| | foreach my $param ( @{ $self->{projection_params} } ) |
| | { $self->{params}->{$param} = PDL::Transform::_opt( $o, [ $param ] ); } |
| | $self->update_proj_string(); |
| | #my $dd = Data::Dumper->new( [$self->{params}], ["$sub: params"] ); |
| | #$dd->Indent(1); |
| | #print STDERR $dd->Dump(); |
| | #print STDERR "$sub: Final proj_params: \'" . $self->{params}->{proj_params} |
| | . "\'\n"; |
| | return $self; |
| | } # End of PDL::Transform::comill::new()... |
| | |
| | 1; |
| | #line 477 "Proj4.pd" |
| | #line 6144 "Proj4.pm" |
| | |
| | #line 433 "Proj4.pd" |
| | |
| | #line 379 "Proj4.pd" |
| | # Autogenerated code for the Proj4 projection code: |
| | # crast |
| | # |
| | package PDL::Transform::Proj4::crast; |
| | use strict; |
| | use warnings; |
| | our @ISA = ( 'PDL::Transform::Proj4' ); |
| | |
| | sub new |
| | { |
| | my $proto = shift; |
| | my $class = ref($proto) || $proto; |
| | my $sub = "PDL::Transform::Proj4::crast::new()"; |
| | #print STDERR "$sub: ARGS: [" . join(", ", @_ ) . "]\n"; |
| | my $self = $class->SUPER::new( @_ ); |
| | bless ($self, $class); |
| | my $o = $_[0]; |
| | unless( (ref $o) ) |
| | { $o = {@_}; } |
| | #use Data::Dumper; |
| | #my $dd2 = Data::Dumper->new( [$o], ["$sub: o"] ); |
| | #$dd2->Indent(1); |
| | #print STDERR $dd2->Dump(); |
| | $self->{name} = "Craster Parabolic (Putnins P4)"; |
| | $self->{proj_code} = "crast"; |
| | # Make sure proj is set in the options: |
| | $self->{params}->{proj} = $self->{proj_code}; |
| | # Grab our projection specific options: |
| | # |
| | $self->{projection_params} = [ qw( ) ]; |
| | foreach my $param ( @{ $self->{projection_params} } ) |
| | { $self->{params}->{$param} = PDL::Transform::_opt( $o, [ $param ] ); } |
| | $self->update_proj_string(); |
| | #my $dd = Data::Dumper->new( [$self->{params}], ["$sub: params"] ); |
| | #$dd->Indent(1); |
| | #print STDERR $dd->Dump(); |
| | #print STDERR "$sub: Final proj_params: \'" . $self->{params}->{proj_params} |
| | . "\'\n"; |
| | return $self; |
| | } # End of PDL::Transform::crast::new()... |
| | |
| | 1; |
| | #line 477 "Proj4.pd" |
| | #line 6194 "Proj4.pm" |
| | |
| | #line 433 "Proj4.pd" |
| | |
| | #line 379 "Proj4.pd" |
| | # Autogenerated code for the Proj4 projection code: |
| | # defmodel |
| | # |
| | package PDL::Transform::Proj4::defmodel; |
| | use strict; |
| | use warnings; |
| | our @ISA = ( 'PDL::Transform::Proj4' ); |
| | |
| | sub new |
| | { |
| | my $proto = shift; |
| | my $class = ref($proto) || $proto; |
| | my $sub = "PDL::Transform::Proj4::defmodel::new()"; |
| | #print STDERR "$sub: ARGS: [" . join(", ", @_ ) . "]\n"; |
| | my $self = $class->SUPER::new( @_ ); |
| | bless ($self, $class); |
| | my $o = $_[0]; |
| | unless( (ref $o) ) |
| | { $o = {@_}; } |
| | #use Data::Dumper; |
| | #my $dd2 = Data::Dumper->new( [$o], ["$sub: o"] ); |
| | #$dd2->Indent(1); |
| | #print STDERR $dd2->Dump(); |
| | $self->{name} = "Deformation model"; |
| | $self->{proj_code} = "defmodel"; |
| | # Make sure proj is set in the options: |
| | $self->{params}->{proj} = $self->{proj_code}; |
| | # Grab our projection specific options: |
| | # |
| | $self->{projection_params} = [ qw( ) ]; |
| | foreach my $param ( @{ $self->{projection_params} } ) |
| | { $self->{params}->{$param} = PDL::Transform::_opt( $o, [ $param ] ); } |
| | $self->update_proj_string(); |
| | #my $dd = Data::Dumper->new( [$self->{params}], ["$sub: params"] ); |
| | #$dd->Indent(1); |
| | #print STDERR $dd->Dump(); |
| | #print STDERR "$sub: Final proj_params: \'" . $self->{params}->{proj_params} |
| | . "\'\n"; |
| | return $self; |
| | } # End of PDL::Transform::defmodel::new()... |
| | |
| | 1; |
| | #line 477 "Proj4.pd" |
| | #line 6244 "Proj4.pm" |
| | |
| | #line 433 "Proj4.pd" |
| | |
| | #line 379 "Proj4.pd" |
| | # Autogenerated code for the Proj4 projection code: |
| | # deformation |
| | # |
| | package PDL::Transform::Proj4::deformation; |
| | use strict; |
| | use warnings; |
| | our @ISA = ( 'PDL::Transform::Proj4' ); |
| | |
| | sub new |
| | { |
| | my $proto = shift; |
| | my $class = ref($proto) || $proto; |
| | my $sub = "PDL::Transform::Proj4::deformation::new()"; |
| | #print STDERR "$sub: ARGS: [" . join(", ", @_ ) . "]\n"; |
| | my $self = $class->SUPER::new( @_ ); |
| | bless ($self, $class); |
| | my $o = $_[0]; |
| | unless( (ref $o) ) |
| | { $o = {@_}; } |
| | #use Data::Dumper; |
| | #my $dd2 = Data::Dumper->new( [$o], ["$sub: o"] ); |
| | #$dd2->Indent(1); |
| | #print STDERR $dd2->Dump(); |
| | $self->{name} = "Kinematic grid shift"; |
| | $self->{proj_code} = "deformation"; |
| | # Make sure proj is set in the options: |
| | $self->{params}->{proj} = $self->{proj_code}; |
| | # Grab our projection specific options: |
| | # |
| | $self->{projection_params} = [ qw( ) ]; |
| | foreach my $param ( @{ $self->{projection_params} } ) |
| | { $self->{params}->{$param} = PDL::Transform::_opt( $o, [ $param ] ); } |
| | $self->update_proj_string(); |
| | #my $dd = Data::Dumper->new( [$self->{params}], ["$sub: params"] ); |
| | #$dd->Indent(1); |
| | #print STDERR $dd->Dump(); |
| | #print STDERR "$sub: Final proj_params: \'" . $self->{params}->{proj_params} |
| | . "\'\n"; |
| | return $self; |
| | } # End of PDL::Transform::deformation::new()... |
| | |
| | 1; |
| | #line 477 "Proj4.pd" |
| | #line 6294 "Proj4.pm" |
| | |
| | #line 433 "Proj4.pd" |
| | |
| | #line 379 "Proj4.pd" |
| | # Autogenerated code for the Proj4 projection code: |
| | # denoy |
| | # |
| | package PDL::Transform::Proj4::denoy; |
| | use strict; |
| | use warnings; |
| | our @ISA = ( 'PDL::Transform::Proj4' ); |
| | |
| | sub new |
| | { |
| | my $proto = shift; |
| | my $class = ref($proto) || $proto; |
| | my $sub = "PDL::Transform::Proj4::denoy::new()"; |
| | #print STDERR "$sub: ARGS: [" . join(", ", @_ ) . "]\n"; |
| | my $self = $class->SUPER::new( @_ ); |
| | bless ($self, $class); |
| | my $o = $_[0]; |
| | unless( (ref $o) ) |
| | { $o = {@_}; } |
| | #use Data::Dumper; |
| | #my $dd2 = Data::Dumper->new( [$o], ["$sub: o"] ); |
| | #$dd2->Indent(1); |
| | #print STDERR $dd2->Dump(); |
| | $self->{name} = "Denoyer Semi-Elliptical"; |
| | $self->{proj_code} = "denoy"; |
| | # Make sure proj is set in the options: |
| | $self->{params}->{proj} = $self->{proj_code}; |
| | # Grab our projection specific options: |
| | # |
| | $self->{projection_params} = [ qw( ) ]; |
| | foreach my $param ( @{ $self->{projection_params} } ) |
| | { $self->{params}->{$param} = PDL::Transform::_opt( $o, [ $param ] ); } |
| | $self->update_proj_string(); |
| | #my $dd = Data::Dumper->new( [$self->{params}], ["$sub: params"] ); |
| | #$dd->Indent(1); |
| | #print STDERR $dd->Dump(); |
| | #print STDERR "$sub: Final proj_params: \'" . $self->{params}->{proj_params} |
| | . "\'\n"; |
| | return $self; |
| | } # End of PDL::Transform::denoy::new()... |
| | |
| | 1; |
| | #line 477 "Proj4.pd" |
| | #line 6344 "Proj4.pm" |
| | |
| | #line 433 "Proj4.pd" |
| | |
| | #line 379 "Proj4.pd" |
| | # Autogenerated code for the Proj4 projection code: |
| | # eck1 |
| | # |
| | package PDL::Transform::Proj4::eck1; |
| | use strict; |
| | use warnings; |
| | our @ISA = ( 'PDL::Transform::Proj4' ); |
| | |
| | sub new |
| | { |
| | my $proto = shift; |
| | my $class = ref($proto) || $proto; |
| | my $sub = "PDL::Transform::Proj4::eck1::new()"; |
| | #print STDERR "$sub: ARGS: [" . join(", ", @_ ) . "]\n"; |
| | my $self = $class->SUPER::new( @_ ); |
| | bless ($self, $class); |
| | my $o = $_[0]; |
| | unless( (ref $o) ) |
| | { $o = {@_}; } |
| | #use Data::Dumper; |
| | #my $dd2 = Data::Dumper->new( [$o], ["$sub: o"] ); |
| | #$dd2->Indent(1); |
| | #print STDERR $dd2->Dump(); |
| | $self->{name} = "Eckert I"; |
| | $self->{proj_code} = "eck1"; |
| | # Make sure proj is set in the options: |
| | $self->{params}->{proj} = $self->{proj_code}; |
| | # Grab our projection specific options: |
| | # |
| | $self->{projection_params} = [ qw( ) ]; |
| | foreach my $param ( @{ $self->{projection_params} } ) |
| | { $self->{params}->{$param} = PDL::Transform::_opt( $o, [ $param ] ); } |
| | $self->update_proj_string(); |
| | #my $dd = Data::Dumper->new( [$self->{params}], ["$sub: params"] ); |
| | #$dd->Indent(1); |
| | #print STDERR $dd->Dump(); |
| | #print STDERR "$sub: Final proj_params: \'" . $self->{params}->{proj_params} |
| | . "\'\n"; |
| | return $self; |
| | } # End of PDL::Transform::eck1::new()... |
| | |
| | 1; |
| | #line 477 "Proj4.pd" |
| | #line 6394 "Proj4.pm" |
| | |
| | #line 433 "Proj4.pd" |
| | |
| | #line 379 "Proj4.pd" |
| | # Autogenerated code for the Proj4 projection code: |
| | # eck2 |
| | # |
| | package PDL::Transform::Proj4::eck2; |
| | use strict; |
| | use warnings; |
| | our @ISA = ( 'PDL::Transform::Proj4' ); |
| | |
| | sub new |
| | { |
| | my $proto = shift; |
| | my $class = ref($proto) || $proto; |
| | my $sub = "PDL::Transform::Proj4::eck2::new()"; |
| | #print STDERR "$sub: ARGS: [" . join(", ", @_ ) . "]\n"; |
| | my $self = $class->SUPER::new( @_ ); |
| | bless ($self, $class); |
| | my $o = $_[0]; |
| | unless( (ref $o) ) |
| | { $o = {@_}; } |
| | #use Data::Dumper; |
| | #my $dd2 = Data::Dumper->new( [$o], ["$sub: o"] ); |
| | #$dd2->Indent(1); |
| | #print STDERR $dd2->Dump(); |
| | $self->{name} = "Eckert II"; |
| | $self->{proj_code} = "eck2"; |
| | # Make sure proj is set in the options: |
| | $self->{params}->{proj} = $self->{proj_code}; |
| | # Grab our projection specific options: |
| | # |
| | $self->{projection_params} = [ qw( ) ]; |
| | foreach my $param ( @{ $self->{projection_params} } ) |
| | { $self->{params}->{$param} = PDL::Transform::_opt( $o, [ $param ] ); } |
| | $self->update_proj_string(); |
| | #my $dd = Data::Dumper->new( [$self->{params}], ["$sub: params"] ); |
| | #$dd->Indent(1); |
| | #print STDERR $dd->Dump(); |
| | #print STDERR "$sub: Final proj_params: \'" . $self->{params}->{proj_params} |
| | . "\'\n"; |
| | return $self; |
| | } # End of PDL::Transform::eck2::new()... |
| | |
| | 1; |
| | #line 477 "Proj4.pd" |
| | #line 6444 "Proj4.pm" |
| | |
| | #line 433 "Proj4.pd" |
| | |
| | #line 379 "Proj4.pd" |
| | # Autogenerated code for the Proj4 projection code: |
| | # eck3 |
| | # |
| | package PDL::Transform::Proj4::eck3; |
| | use strict; |
| | use warnings; |
| | our @ISA = ( 'PDL::Transform::Proj4' ); |
| | |
| | sub new |
| | { |
| | my $proto = shift; |
| | my $class = ref($proto) || $proto; |
| | my $sub = "PDL::Transform::Proj4::eck3::new()"; |
| | #print STDERR "$sub: ARGS: [" . join(", ", @_ ) . "]\n"; |
| | my $self = $class->SUPER::new( @_ ); |
| | bless ($self, $class); |
| | my $o = $_[0]; |
| | unless( (ref $o) ) |
| | { $o = {@_}; } |
| | #use Data::Dumper; |
| | #my $dd2 = Data::Dumper->new( [$o], ["$sub: o"] ); |
| | #$dd2->Indent(1); |
| | #print STDERR $dd2->Dump(); |
| | $self->{name} = "Eckert III"; |
| | $self->{proj_code} = "eck3"; |
| | # Make sure proj is set in the options: |
| | $self->{params}->{proj} = $self->{proj_code}; |
| | # Grab our projection specific options: |
| | # |
| | $self->{projection_params} = [ qw( ) ]; |
| | foreach my $param ( @{ $self->{projection_params} } ) |
| | { $self->{params}->{$param} = PDL::Transform::_opt( $o, [ $param ] ); } |
| | $self->update_proj_string(); |
| | #my $dd = Data::Dumper->new( [$self->{params}], ["$sub: params"] ); |
| | #$dd->Indent(1); |
| | #print STDERR $dd->Dump(); |
| | #print STDERR "$sub: Final proj_params: \'" . $self->{params}->{proj_params} |
| | . "\'\n"; |
| | return $self; |
| | } # End of PDL::Transform::eck3::new()... |
| | |
| | 1; |
| | #line 477 "Proj4.pd" |
| | #line 6494 "Proj4.pm" |
| | |
| | #line 433 "Proj4.pd" |
| | |
| | #line 379 "Proj4.pd" |
| | # Autogenerated code for the Proj4 projection code: |
| | # eck4 |
| | # |
| | package PDL::Transform::Proj4::eck4; |
| | use strict; |
| | use warnings; |
| | our @ISA = ( 'PDL::Transform::Proj4' ); |
| | |
| | sub new |
| | { |
| | my $proto = shift; |
| | my $class = ref($proto) || $proto; |
| | my $sub = "PDL::Transform::Proj4::eck4::new()"; |
| | #print STDERR "$sub: ARGS: [" . join(", ", @_ ) . "]\n"; |
| | my $self = $class->SUPER::new( @_ ); |
| | bless ($self, $class); |
| | my $o = $_[0]; |
| | unless( (ref $o) ) |
| | { $o = {@_}; } |
| | #use Data::Dumper; |
| | #my $dd2 = Data::Dumper->new( [$o], ["$sub: o"] ); |
| | #$dd2->Indent(1); |
| | #print STDERR $dd2->Dump(); |
| | $self->{name} = "Eckert IV"; |
| | $self->{proj_code} = "eck4"; |
| | # Make sure proj is set in the options: |
| | $self->{params}->{proj} = $self->{proj_code}; |
| | # Grab our projection specific options: |
| | # |
| | $self->{projection_params} = [ qw( ) ]; |
| | foreach my $param ( @{ $self->{projection_params} } ) |
| | { $self->{params}->{$param} = PDL::Transform::_opt( $o, [ $param ] ); } |
| | $self->update_proj_string(); |
| | #my $dd = Data::Dumper->new( [$self->{params}], ["$sub: params"] ); |
| | #$dd->Indent(1); |
| | #print STDERR $dd->Dump(); |
| | #print STDERR "$sub: Final proj_params: \'" . $self->{params}->{proj_params} |
| | . "\'\n"; |
| | return $self; |
| | } # End of PDL::Transform::eck4::new()... |
| | |
| | 1; |
| | #line 477 "Proj4.pd" |
| | #line 6544 "Proj4.pm" |
| | |
| | #line 433 "Proj4.pd" |
| | |
| | #line 379 "Proj4.pd" |
| | # Autogenerated code for the Proj4 projection code: |
| | # eck5 |
| | # |
| | package PDL::Transform::Proj4::eck5; |
| | use strict; |
| | use warnings; |
| | our @ISA = ( 'PDL::Transform::Proj4' ); |
| | |
| | sub new |
| | { |
| | my $proto = shift; |
| | my $class = ref($proto) || $proto; |
| | my $sub = "PDL::Transform::Proj4::eck5::new()"; |
| | #print STDERR "$sub: ARGS: [" . join(", ", @_ ) . "]\n"; |
| | my $self = $class->SUPER::new( @_ ); |
| | bless ($self, $class); |
| | my $o = $_[0]; |
| | unless( (ref $o) ) |
| | { $o = {@_}; } |
| | #use Data::Dumper; |
| | #my $dd2 = Data::Dumper->new( [$o], ["$sub: o"] ); |
| | #$dd2->Indent(1); |
| | #print STDERR $dd2->Dump(); |
| | $self->{name} = "Eckert V"; |
| | $self->{proj_code} = "eck5"; |
| | # Make sure proj is set in the options: |
| | $self->{params}->{proj} = $self->{proj_code}; |
| | # Grab our projection specific options: |
| | # |
| | $self->{projection_params} = [ qw( ) ]; |
| | foreach my $param ( @{ $self->{projection_params} } ) |
| | { $self->{params}->{$param} = PDL::Transform::_opt( $o, [ $param ] ); } |
| | $self->update_proj_string(); |
| | #my $dd = Data::Dumper->new( [$self->{params}], ["$sub: params"] ); |
| | #$dd->Indent(1); |
| | #print STDERR $dd->Dump(); |
| | #print STDERR "$sub: Final proj_params: \'" . $self->{params}->{proj_params} |
| | . "\'\n"; |
| | return $self; |
| | } # End of PDL::Transform::eck5::new()... |
| | |
| | 1; |
| | #line 477 "Proj4.pd" |
| | #line 6594 "Proj4.pm" |
| | |
| | #line 433 "Proj4.pd" |
| | |
| | #line 379 "Proj4.pd" |
| | # Autogenerated code for the Proj4 projection code: |
| | # eck6 |
| | # |
| | package PDL::Transform::Proj4::eck6; |
| | use strict; |
| | use warnings; |
| | our @ISA = ( 'PDL::Transform::Proj4' ); |
| | |
| | sub new |
| | { |
| | my $proto = shift; |
| | my $class = ref($proto) || $proto; |
| | my $sub = "PDL::Transform::Proj4::eck6::new()"; |
| | #print STDERR "$sub: ARGS: [" . join(", ", @_ ) . "]\n"; |
| | my $self = $class->SUPER::new( @_ ); |
| | bless ($self, $class); |
| | my $o = $_[0]; |
| | unless( (ref $o) ) |
| | { $o = {@_}; } |
| | #use Data::Dumper; |
| | #my $dd2 = Data::Dumper->new( [$o], ["$sub: o"] ); |
| | #$dd2->Indent(1); |
| | #print STDERR $dd2->Dump(); |
| | $self->{name} = "Eckert VI"; |
| | $self->{proj_code} = "eck6"; |
| | # Make sure proj is set in the options: |
| | $self->{params}->{proj} = $self->{proj_code}; |
| | # Grab our projection specific options: |
| | # |
| | $self->{projection_params} = [ qw( ) ]; |
| | foreach my $param ( @{ $self->{projection_params} } ) |
| | { $self->{params}->{$param} = PDL::Transform::_opt( $o, [ $param ] ); } |
| | $self->update_proj_string(); |
| | #my $dd = Data::Dumper->new( [$self->{params}], ["$sub: params"] ); |
| | #$dd->Indent(1); |
| | #print STDERR $dd->Dump(); |
| | #print STDERR "$sub: Final proj_params: \'" . $self->{params}->{proj_params} |
| | . "\'\n"; |
| | return $self; |
| | } # End of PDL::Transform::eck6::new()... |
| | |
| | 1; |
| | #line 477 "Proj4.pd" |
| | #line 6644 "Proj4.pm" |
| | |
| | #line 433 "Proj4.pd" |
| | |
| | #line 379 "Proj4.pd" |
| | # Autogenerated code for the Proj4 projection code: |
| | # eqc |
| | # |
| | package PDL::Transform::Proj4::eqc; |
| | use strict; |
| | use warnings; |
| | our @ISA = ( 'PDL::Transform::Proj4' ); |
| | |
| | sub new |
| | { |
| | my $proto = shift; |
| | my $class = ref($proto) || $proto; |
| | my $sub = "PDL::Transform::Proj4::eqc::new()"; |
| | #print STDERR "$sub: ARGS: [" . join(", ", @_ ) . "]\n"; |
| | my $self = $class->SUPER::new( @_ ); |
| | bless ($self, $class); |
| | my $o = $_[0]; |
| | unless( (ref $o) ) |
| | { $o = {@_}; } |
| | #use Data::Dumper; |
| | #my $dd2 = Data::Dumper->new( [$o], ["$sub: o"] ); |
| | #$dd2->Indent(1); |
| | #print STDERR $dd2->Dump(); |
| | $self->{name} = "Equidistant Cylindrical (Plate Carree)"; |
| | $self->{proj_code} = "eqc"; |
| | # Make sure proj is set in the options: |
| | $self->{params}->{proj} = $self->{proj_code}; |
| | # Grab our projection specific options: |
| | # |
| | $self->{projection_params} = [ qw( lat_ts lat_00 ) ]; |
| | foreach my $param ( @{ $self->{projection_params} } ) |
| | { $self->{params}->{$param} = PDL::Transform::_opt( $o, [ $param ] ); } |
| | $self->update_proj_string(); |
| | #my $dd = Data::Dumper->new( [$self->{params}], ["$sub: params"] ); |
| | #$dd->Indent(1); |
| | #print STDERR $dd->Dump(); |
| | #print STDERR "$sub: Final proj_params: \'" . $self->{params}->{proj_params} |
| | . "\'\n"; |
| | return $self; |
| | } # End of PDL::Transform::eqc::new()... |
| | |
| | 1; |
| | #line 477 "Proj4.pd" |
| | #line 6694 "Proj4.pm" |
| | |
| | #line 433 "Proj4.pd" |
| | |
| | #line 379 "Proj4.pd" |
| | # Autogenerated code for the Proj4 projection code: |
| | # eqdc |
| | # |
| | package PDL::Transform::Proj4::eqdc; |
| | use strict; |
| | use warnings; |
| | our @ISA = ( 'PDL::Transform::Proj4' ); |
| | |
| | sub new |
| | { |
| | my $proto = shift; |
| | my $class = ref($proto) || $proto; |
| | my $sub = "PDL::Transform::Proj4::eqdc::new()"; |
| | #print STDERR "$sub: ARGS: [" . join(", ", @_ ) . "]\n"; |
| | my $self = $class->SUPER::new( @_ ); |
| | bless ($self, $class); |
| | my $o = $_[0]; |
| | unless( (ref $o) ) |
| | { $o = {@_}; } |
| | #use Data::Dumper; |
| | #my $dd2 = Data::Dumper->new( [$o], ["$sub: o"] ); |
| | #$dd2->Indent(1); |
| | #print STDERR $dd2->Dump(); |
| | $self->{name} = "Equidistant Conic"; |
| | $self->{proj_code} = "eqdc"; |
| | # Make sure proj is set in the options: |
| | $self->{params}->{proj} = $self->{proj_code}; |
| | # Grab our projection specific options: |
| | # |
| | $self->{projection_params} = [ qw( lat_1 lat_2 ) ]; |
| | foreach my $param ( @{ $self->{projection_params} } ) |
| | { $self->{params}->{$param} = PDL::Transform::_opt( $o, [ $param ] ); } |
| | $self->update_proj_string(); |
| | #my $dd = Data::Dumper->new( [$self->{params}], ["$sub: params"] ); |
| | #$dd->Indent(1); |
| | #print STDERR $dd->Dump(); |
| | #print STDERR "$sub: Final proj_params: \'" . $self->{params}->{proj_params} |
| | . "\'\n"; |
| | return $self; |
| | } # End of PDL::Transform::eqdc::new()... |
| | |
| | 1; |
| | #line 477 "Proj4.pd" |
| | #line 6744 "Proj4.pm" |
| | |
| | #line 433 "Proj4.pd" |
| | |
| | #line 379 "Proj4.pd" |
| | # Autogenerated code for the Proj4 projection code: |
| | # eqearth |
| | # |
| | package PDL::Transform::Proj4::eqearth; |
| | use strict; |
| | use warnings; |
| | our @ISA = ( 'PDL::Transform::Proj4' ); |
| | |
| | sub new |
| | { |
| | my $proto = shift; |
| | my $class = ref($proto) || $proto; |
| | my $sub = "PDL::Transform::Proj4::eqearth::new()"; |
| | #print STDERR "$sub: ARGS: [" . join(", ", @_ ) . "]\n"; |
| | my $self = $class->SUPER::new( @_ ); |
| | bless ($self, $class); |
| | my $o = $_[0]; |
| | unless( (ref $o) ) |
| | { $o = {@_}; } |
| | #use Data::Dumper; |
| | #my $dd2 = Data::Dumper->new( [$o], ["$sub: o"] ); |
| | #$dd2->Indent(1); |
| | #print STDERR $dd2->Dump(); |
| | $self->{name} = "Equal Earth"; |
| | $self->{proj_code} = "eqearth"; |
| | # Make sure proj is set in the options: |
| | $self->{params}->{proj} = $self->{proj_code}; |
| | # Grab our projection specific options: |
| | # |
| | $self->{projection_params} = [ qw( ) ]; |
| | foreach my $param ( @{ $self->{projection_params} } ) |
| | { $self->{params}->{$param} = PDL::Transform::_opt( $o, [ $param ] ); } |
| | $self->update_proj_string(); |
| | #my $dd = Data::Dumper->new( [$self->{params}], ["$sub: params"] ); |
| | #$dd->Indent(1); |
| | #print STDERR $dd->Dump(); |
| | #print STDERR "$sub: Final proj_params: \'" . $self->{params}->{proj_params} |
| | . "\'\n"; |
| | return $self; |
| | } # End of PDL::Transform::eqearth::new()... |
| | |
| | 1; |
| | #line 477 "Proj4.pd" |
| | #line 6794 "Proj4.pm" |
| | |
| | #line 433 "Proj4.pd" |
| | |
| | #line 379 "Proj4.pd" |
| | # Autogenerated code for the Proj4 projection code: |
| | # etmerc |
| | # |
| | package PDL::Transform::Proj4::etmerc; |
| | use strict; |
| | use warnings; |
| | our @ISA = ( 'PDL::Transform::Proj4' ); |
| | |
| | sub new |
| | { |
| | my $proto = shift; |
| | my $class = ref($proto) || $proto; |
| | my $sub = "PDL::Transform::Proj4::etmerc::new()"; |
| | #print STDERR "$sub: ARGS: [" . join(", ", @_ ) . "]\n"; |
| | my $self = $class->SUPER::new( @_ ); |
| | bless ($self, $class); |
| | my $o = $_[0]; |
| | unless( (ref $o) ) |
| | { $o = {@_}; } |
| | #use Data::Dumper; |
| | #my $dd2 = Data::Dumper->new( [$o], ["$sub: o"] ); |
| | #$dd2->Indent(1); |
| | #print STDERR $dd2->Dump(); |
| | $self->{name} = "Extended Transverse Mercator"; |
| | $self->{proj_code} = "etmerc"; |
| | # Make sure proj is set in the options: |
| | $self->{params}->{proj} = $self->{proj_code}; |
| | # Grab our projection specific options: |
| | # |
| | $self->{projection_params} = [ qw( ) ]; |
| | foreach my $param ( @{ $self->{projection_params} } ) |
| | { $self->{params}->{$param} = PDL::Transform::_opt( $o, [ $param ] ); } |
| | $self->update_proj_string(); |
| | #my $dd = Data::Dumper->new( [$self->{params}], ["$sub: params"] ); |
| | #$dd->Indent(1); |
| | #print STDERR $dd->Dump(); |
| | #print STDERR "$sub: Final proj_params: \'" . $self->{params}->{proj_params} |
| | . "\'\n"; |
| | return $self; |
| | } # End of PDL::Transform::etmerc::new()... |
| | |
| | 1; |
| | #line 477 "Proj4.pd" |
| | #line 6844 "Proj4.pm" |
| | |
| | #line 433 "Proj4.pd" |
| | |
| | #line 379 "Proj4.pd" |
| | # Autogenerated code for the Proj4 projection code: |
| | # euler |
| | # |
| | package PDL::Transform::Proj4::euler; |
| | use strict; |
| | use warnings; |
| | our @ISA = ( 'PDL::Transform::Proj4' ); |
| | |
| | sub new |
| | { |
| | my $proto = shift; |
| | my $class = ref($proto) || $proto; |
| | my $sub = "PDL::Transform::Proj4::euler::new()"; |
| | #print STDERR "$sub: ARGS: [" . join(", ", @_ ) . "]\n"; |
| | my $self = $class->SUPER::new( @_ ); |
| | bless ($self, $class); |
| | my $o = $_[0]; |
| | unless( (ref $o) ) |
| | { $o = {@_}; } |
| | #use Data::Dumper; |
| | #my $dd2 = Data::Dumper->new( [$o], ["$sub: o"] ); |
| | #$dd2->Indent(1); |
| | #print STDERR $dd2->Dump(); |
| | $self->{name} = "Euler"; |
| | $self->{proj_code} = "euler"; |
| | # Make sure proj is set in the options: |
| | $self->{params}->{proj} = $self->{proj_code}; |
| | # Grab our projection specific options: |
| | # |
| | $self->{projection_params} = [ qw( lat_1 lat_2 ) ]; |
| | foreach my $param ( @{ $self->{projection_params} } ) |
| | { $self->{params}->{$param} = PDL::Transform::_opt( $o, [ $param ] ); } |
| | $self->update_proj_string(); |
| | #my $dd = Data::Dumper->new( [$self->{params}], ["$sub: params"] ); |
| | #$dd->Indent(1); |
| | #print STDERR $dd->Dump(); |
| | #print STDERR "$sub: Final proj_params: \'" . $self->{params}->{proj_params} |
| | . "\'\n"; |
| | return $self; |
| | } # End of PDL::Transform::euler::new()... |
| | |
| | 1; |
| | #line 477 "Proj4.pd" |
| | #line 6894 "Proj4.pm" |
| | |
| | #line 433 "Proj4.pd" |
| | |
| | #line 379 "Proj4.pd" |
| | # Autogenerated code for the Proj4 projection code: |
| | # fahey |
| | # |
| | package PDL::Transform::Proj4::fahey; |
| | use strict; |
| | use warnings; |
| | our @ISA = ( 'PDL::Transform::Proj4' ); |
| | |
| | sub new |
| | { |
| | my $proto = shift; |
| | my $class = ref($proto) || $proto; |
| | my $sub = "PDL::Transform::Proj4::fahey::new()"; |
| | #print STDERR "$sub: ARGS: [" . join(", ", @_ ) . "]\n"; |
| | my $self = $class->SUPER::new( @_ ); |
| | bless ($self, $class); |
| | my $o = $_[0]; |
| | unless( (ref $o) ) |
| | { $o = {@_}; } |
| | #use Data::Dumper; |
| | #my $dd2 = Data::Dumper->new( [$o], ["$sub: o"] ); |
| | #$dd2->Indent(1); |
| | #print STDERR $dd2->Dump(); |
| | $self->{name} = "Fahey"; |
| | $self->{proj_code} = "fahey"; |
| | # Make sure proj is set in the options: |
| | $self->{params}->{proj} = $self->{proj_code}; |
| | # Grab our projection specific options: |
| | # |
| | $self->{projection_params} = [ qw( ) ]; |
| | foreach my $param ( @{ $self->{projection_params} } ) |
| | { $self->{params}->{$param} = PDL::Transform::_opt( $o, [ $param ] ); } |
| | $self->update_proj_string(); |
| | #my $dd = Data::Dumper->new( [$self->{params}], ["$sub: params"] ); |
| | #$dd->Indent(1); |
| | #print STDERR $dd->Dump(); |
| | #print STDERR "$sub: Final proj_params: \'" . $self->{params}->{proj_params} |
| | . "\'\n"; |
| | return $self; |
| | } # End of PDL::Transform::fahey::new()... |
| | |
| | 1; |
| | #line 477 "Proj4.pd" |
| | #line 6944 "Proj4.pm" |
| | |
| | #line 433 "Proj4.pd" |
| | |
| | #line 379 "Proj4.pd" |
| | # Autogenerated code for the Proj4 projection code: |
| | # fouc |
| | # |
| | package PDL::Transform::Proj4::fouc; |
| | use strict; |
| | use warnings; |
| | our @ISA = ( 'PDL::Transform::Proj4' ); |
| | |
| | sub new |
| | { |
| | my $proto = shift; |
| | my $class = ref($proto) || $proto; |
| | my $sub = "PDL::Transform::Proj4::fouc::new()"; |
| | #print STDERR "$sub: ARGS: [" . join(", ", @_ ) . "]\n"; |
| | my $self = $class->SUPER::new( @_ ); |
| | bless ($self, $class); |
| | my $o = $_[0]; |
| | unless( (ref $o) ) |
| | { $o = {@_}; } |
| | #use Data::Dumper; |
| | #my $dd2 = Data::Dumper->new( [$o], ["$sub: o"] ); |
| | #$dd2->Indent(1); |
| | #print STDERR $dd2->Dump(); |
| | $self->{name} = "Foucaut"; |
| | $self->{proj_code} = "fouc"; |
| | # Make sure proj is set in the options: |
| | $self->{params}->{proj} = $self->{proj_code}; |
| | # Grab our projection specific options: |
| | # |
| | $self->{projection_params} = [ qw( ) ]; |
| | foreach my $param ( @{ $self->{projection_params} } ) |
| | { $self->{params}->{$param} = PDL::Transform::_opt( $o, [ $param ] ); } |
| | $self->update_proj_string(); |
| | #my $dd = Data::Dumper->new( [$self->{params}], ["$sub: params"] ); |
| | #$dd->Indent(1); |
| | #print STDERR $dd->Dump(); |
| | #print STDERR "$sub: Final proj_params: \'" . $self->{params}->{proj_params} |
| | . "\'\n"; |
| | return $self; |
| | } # End of PDL::Transform::fouc::new()... |
| | |
| | 1; |
| | #line 477 "Proj4.pd" |
| | #line 6994 "Proj4.pm" |
| | |
| | #line 433 "Proj4.pd" |
| | |
| | #line 379 "Proj4.pd" |
| | # Autogenerated code for the Proj4 projection code: |
| | # fouc_s |
| | # |
| | package PDL::Transform::Proj4::fouc_s; |
| | use strict; |
| | use warnings; |
| | our @ISA = ( 'PDL::Transform::Proj4' ); |
| | |
| | sub new |
| | { |
| | my $proto = shift; |
| | my $class = ref($proto) || $proto; |
| | my $sub = "PDL::Transform::Proj4::fouc_s::new()"; |
| | #print STDERR "$sub: ARGS: [" . join(", ", @_ ) . "]\n"; |
| | my $self = $class->SUPER::new( @_ ); |
| | bless ($self, $class); |
| | my $o = $_[0]; |
| | unless( (ref $o) ) |
| | { $o = {@_}; } |
| | #use Data::Dumper; |
| | #my $dd2 = Data::Dumper->new( [$o], ["$sub: o"] ); |
| | #$dd2->Indent(1); |
| | #print STDERR $dd2->Dump(); |
| | $self->{name} = "Foucaut Sinusoidal"; |
| | $self->{proj_code} = "fouc_s"; |
| | # Make sure proj is set in the options: |
| | $self->{params}->{proj} = $self->{proj_code}; |
| | # Grab our projection specific options: |
| | # |
| | $self->{projection_params} = [ qw( ) ]; |
| | foreach my $param ( @{ $self->{projection_params} } ) |
| | { $self->{params}->{$param} = PDL::Transform::_opt( $o, [ $param ] ); } |
| | $self->update_proj_string(); |
| | #my $dd = Data::Dumper->new( [$self->{params}], ["$sub: params"] ); |
| | #$dd->Indent(1); |
| | #print STDERR $dd->Dump(); |
| | #print STDERR "$sub: Final proj_params: \'" . $self->{params}->{proj_params} |
| | . "\'\n"; |
| | return $self; |
| | } # End of PDL::Transform::fouc_s::new()... |
| | |
| | 1; |
| | #line 477 "Proj4.pd" |
| | #line 7044 "Proj4.pm" |
| | |
| | #line 433 "Proj4.pd" |
| | |
| | #line 379 "Proj4.pd" |
| | # Autogenerated code for the Proj4 projection code: |
| | # gall |
| | # |
| | package PDL::Transform::Proj4::gall; |
| | use strict; |
| | use warnings; |
| | our @ISA = ( 'PDL::Transform::Proj4' ); |
| | |
| | sub new |
| | { |
| | my $proto = shift; |
| | my $class = ref($proto) || $proto; |
| | my $sub = "PDL::Transform::Proj4::gall::new()"; |
| | #print STDERR "$sub: ARGS: [" . join(", ", @_ ) . "]\n"; |
| | my $self = $class->SUPER::new( @_ ); |
| | bless ($self, $class); |
| | my $o = $_[0]; |
| | unless( (ref $o) ) |
| | { $o = {@_}; } |
| | #use Data::Dumper; |
| | #my $dd2 = Data::Dumper->new( [$o], ["$sub: o"] ); |
| | #$dd2->Indent(1); |
| | #print STDERR $dd2->Dump(); |
| | $self->{name} = "Gall (Gall Stereographic)"; |
| | $self->{proj_code} = "gall"; |
| | # Make sure proj is set in the options: |
| | $self->{params}->{proj} = $self->{proj_code}; |
| | # Grab our projection specific options: |
| | # |
| | $self->{projection_params} = [ qw( ) ]; |
| | foreach my $param ( @{ $self->{projection_params} } ) |
| | { $self->{params}->{$param} = PDL::Transform::_opt( $o, [ $param ] ); } |
| | $self->update_proj_string(); |
| | #my $dd = Data::Dumper->new( [$self->{params}], ["$sub: params"] ); |
| | #$dd->Indent(1); |
| | #print STDERR $dd->Dump(); |
| | #print STDERR "$sub: Final proj_params: \'" . $self->{params}->{proj_params} |
| | . "\'\n"; |
| | return $self; |
| | } # End of PDL::Transform::gall::new()... |
| | |
| | 1; |
| | #line 477 "Proj4.pd" |
| | #line 7094 "Proj4.pm" |
| | |
| | #line 433 "Proj4.pd" |
| | |
| | #line 379 "Proj4.pd" |
| | # Autogenerated code for the Proj4 projection code: |
| | # geoc |
| | # |
| | package PDL::Transform::Proj4::geoc; |
| | use strict; |
| | use warnings; |
| | our @ISA = ( 'PDL::Transform::Proj4' ); |
| | |
| | sub new |
| | { |
| | my $proto = shift; |
| | my $class = ref($proto) || $proto; |
| | my $sub = "PDL::Transform::Proj4::geoc::new()"; |
| | #print STDERR "$sub: ARGS: [" . join(", ", @_ ) . "]\n"; |
| | my $self = $class->SUPER::new( @_ ); |
| | bless ($self, $class); |
| | my $o = $_[0]; |
| | unless( (ref $o) ) |
| | { $o = {@_}; } |
| | #use Data::Dumper; |
| | #my $dd2 = Data::Dumper->new( [$o], ["$sub: o"] ); |
| | #$dd2->Indent(1); |
| | #print STDERR $dd2->Dump(); |
| | $self->{name} = "Geocentric Latitude"; |
| | $self->{proj_code} = "geoc"; |
| | # Make sure proj is set in the options: |
| | $self->{params}->{proj} = $self->{proj_code}; |
| | # Grab our projection specific options: |
| | # |
| | $self->{projection_params} = [ qw( ) ]; |
| | foreach my $param ( @{ $self->{projection_params} } ) |
| | { $self->{params}->{$param} = PDL::Transform::_opt( $o, [ $param ] ); } |
| | $self->update_proj_string(); |
| | #my $dd = Data::Dumper->new( [$self->{params}], ["$sub: params"] ); |
| | #$dd->Indent(1); |
| | #print STDERR $dd->Dump(); |
| | #print STDERR "$sub: Final proj_params: \'" . $self->{params}->{proj_params} |
| | . "\'\n"; |
| | return $self; |
| | } # End of PDL::Transform::geoc::new()... |
| | |
| | 1; |
| | #line 477 "Proj4.pd" |
| | #line 7144 "Proj4.pm" |
| | |
| | #line 433 "Proj4.pd" |
| | |
| | #line 379 "Proj4.pd" |
| | # Autogenerated code for the Proj4 projection code: |
| | # geocent |
| | # |
| | package PDL::Transform::Proj4::geocent; |
| | use strict; |
| | use warnings; |
| | our @ISA = ( 'PDL::Transform::Proj4' ); |
| | |
| | sub new |
| | { |
| | my $proto = shift; |
| | my $class = ref($proto) || $proto; |
| | my $sub = "PDL::Transform::Proj4::geocent::new()"; |
| | #print STDERR "$sub: ARGS: [" . join(", ", @_ ) . "]\n"; |
| | my $self = $class->SUPER::new( @_ ); |
| | bless ($self, $class); |
| | my $o = $_[0]; |
| | unless( (ref $o) ) |
| | { $o = {@_}; } |
| | #use Data::Dumper; |
| | #my $dd2 = Data::Dumper->new( [$o], ["$sub: o"] ); |
| | #$dd2->Indent(1); |
| | #print STDERR $dd2->Dump(); |
| | $self->{name} = "Geocentric"; |
| | $self->{proj_code} = "geocent"; |
| | # Make sure proj is set in the options: |
| | $self->{params}->{proj} = $self->{proj_code}; |
| | # Grab our projection specific options: |
| | # |
| | $self->{projection_params} = [ qw( ) ]; |
| | foreach my $param ( @{ $self->{projection_params} } ) |
| | { $self->{params}->{$param} = PDL::Transform::_opt( $o, [ $param ] ); } |
| | $self->update_proj_string(); |
| | #my $dd = Data::Dumper->new( [$self->{params}], ["$sub: params"] ); |
| | #$dd->Indent(1); |
| | #print STDERR $dd->Dump(); |
| | #print STDERR "$sub: Final proj_params: \'" . $self->{params}->{proj_params} |
| | . "\'\n"; |
| | return $self; |
| | } # End of PDL::Transform::geocent::new()... |
| | |
| | 1; |
| | #line 477 "Proj4.pd" |
| | #line 7194 "Proj4.pm" |
| | |
| | #line 433 "Proj4.pd" |
| | |
| | #line 379 "Proj4.pd" |
| | # Autogenerated code for the Proj4 projection code: |
| | # geogoffset |
| | # |
| | package PDL::Transform::Proj4::geogoffset; |
| | use strict; |
| | use warnings; |
| | our @ISA = ( 'PDL::Transform::Proj4' ); |
| | |
| | sub new |
| | { |
| | my $proto = shift; |
| | my $class = ref($proto) || $proto; |
| | my $sub = "PDL::Transform::Proj4::geogoffset::new()"; |
| | #print STDERR "$sub: ARGS: [" . join(", ", @_ ) . "]\n"; |
| | my $self = $class->SUPER::new( @_ ); |
| | bless ($self, $class); |
| | my $o = $_[0]; |
| | unless( (ref $o) ) |
| | { $o = {@_}; } |
| | #use Data::Dumper; |
| | #my $dd2 = Data::Dumper->new( [$o], ["$sub: o"] ); |
| | #$dd2->Indent(1); |
| | #print STDERR $dd2->Dump(); |
| | $self->{name} = "Geographic Offset"; |
| | $self->{proj_code} = "geogoffset"; |
| | # Make sure proj is set in the options: |
| | $self->{params}->{proj} = $self->{proj_code}; |
| | # Grab our projection specific options: |
| | # |
| | $self->{projection_params} = [ qw( ) ]; |
| | foreach my $param ( @{ $self->{projection_params} } ) |
| | { $self->{params}->{$param} = PDL::Transform::_opt( $o, [ $param ] ); } |
| | $self->update_proj_string(); |
| | #my $dd = Data::Dumper->new( [$self->{params}], ["$sub: params"] ); |
| | #$dd->Indent(1); |
| | #print STDERR $dd->Dump(); |
| | #print STDERR "$sub: Final proj_params: \'" . $self->{params}->{proj_params} |
| | . "\'\n"; |
| | return $self; |
| | } # End of PDL::Transform::geogoffset::new()... |
| | |
| | 1; |
| | #line 477 "Proj4.pd" |
| | #line 7244 "Proj4.pm" |
| | |
| | #line 433 "Proj4.pd" |
| | |
| | #line 379 "Proj4.pd" |
| | # Autogenerated code for the Proj4 projection code: |
| | # geos |
| | # |
| | package PDL::Transform::Proj4::geos; |
| | use strict; |
| | use warnings; |
| | our @ISA = ( 'PDL::Transform::Proj4' ); |
| | |
| | sub new |
| | { |
| | my $proto = shift; |
| | my $class = ref($proto) || $proto; |
| | my $sub = "PDL::Transform::Proj4::geos::new()"; |
| | #print STDERR "$sub: ARGS: [" . join(", ", @_ ) . "]\n"; |
| | my $self = $class->SUPER::new( @_ ); |
| | bless ($self, $class); |
| | my $o = $_[0]; |
| | unless( (ref $o) ) |
| | { $o = {@_}; } |
| | #use Data::Dumper; |
| | #my $dd2 = Data::Dumper->new( [$o], ["$sub: o"] ); |
| | #$dd2->Indent(1); |
| | #print STDERR $dd2->Dump(); |
| | $self->{name} = "Geostationary Satellite View"; |
| | $self->{proj_code} = "geos"; |
| | # Make sure proj is set in the options: |
| | $self->{params}->{proj} = $self->{proj_code}; |
| | # Grab our projection specific options: |
| | # |
| | $self->{projection_params} = [ qw( h ) ]; |
| | foreach my $param ( @{ $self->{projection_params} } ) |
| | { $self->{params}->{$param} = PDL::Transform::_opt( $o, [ $param ] ); } |
| | $self->update_proj_string(); |
| | #my $dd = Data::Dumper->new( [$self->{params}], ["$sub: params"] ); |
| | #$dd->Indent(1); |
| | #print STDERR $dd->Dump(); |
| | #print STDERR "$sub: Final proj_params: \'" . $self->{params}->{proj_params} |
| | . "\'\n"; |
| | return $self; |
| | } # End of PDL::Transform::geos::new()... |
| | |
| | 1; |
| | #line 477 "Proj4.pd" |
| | #line 7294 "Proj4.pm" |
| | |
| | #line 433 "Proj4.pd" |
| | |
| | #line 379 "Proj4.pd" |
| | # Autogenerated code for the Proj4 projection code: |
| | # gins8 |
| | # |
| | package PDL::Transform::Proj4::gins8; |
| | use strict; |
| | use warnings; |
| | our @ISA = ( 'PDL::Transform::Proj4' ); |
| | |
| | sub new |
| | { |
| | my $proto = shift; |
| | my $class = ref($proto) || $proto; |
| | my $sub = "PDL::Transform::Proj4::gins8::new()"; |
| | #print STDERR "$sub: ARGS: [" . join(", ", @_ ) . "]\n"; |
| | my $self = $class->SUPER::new( @_ ); |
| | bless ($self, $class); |
| | my $o = $_[0]; |
| | unless( (ref $o) ) |
| | { $o = {@_}; } |
| | #use Data::Dumper; |
| | #my $dd2 = Data::Dumper->new( [$o], ["$sub: o"] ); |
| | #$dd2->Indent(1); |
| | #print STDERR $dd2->Dump(); |
| | $self->{name} = "Ginsburg VIII (TsNIIGAiK)"; |
| | $self->{proj_code} = "gins8"; |
| | # Make sure proj is set in the options: |
| | $self->{params}->{proj} = $self->{proj_code}; |
| | # Grab our projection specific options: |
| | # |
| | $self->{projection_params} = [ qw( ) ]; |
| | foreach my $param ( @{ $self->{projection_params} } ) |
| | { $self->{params}->{$param} = PDL::Transform::_opt( $o, [ $param ] ); } |
| | $self->update_proj_string(); |
| | #my $dd = Data::Dumper->new( [$self->{params}], ["$sub: params"] ); |
| | #$dd->Indent(1); |
| | #print STDERR $dd->Dump(); |
| | #print STDERR "$sub: Final proj_params: \'" . $self->{params}->{proj_params} |
| | . "\'\n"; |
| | return $self; |
| | } # End of PDL::Transform::gins8::new()... |
| | |
| | 1; |
| | #line 477 "Proj4.pd" |
| | #line 7344 "Proj4.pm" |
| | |
| | #line 433 "Proj4.pd" |
| | |
| | #line 379 "Proj4.pd" |
| | # Autogenerated code for the Proj4 projection code: |
| | # gn_sinu |
| | # |
| | package PDL::Transform::Proj4::gn_sinu; |
| | use strict; |
| | use warnings; |
| | our @ISA = ( 'PDL::Transform::Proj4' ); |
| | |
| | sub new |
| | { |
| | my $proto = shift; |
| | my $class = ref($proto) || $proto; |
| | my $sub = "PDL::Transform::Proj4::gn_sinu::new()"; |
| | #print STDERR "$sub: ARGS: [" . join(", ", @_ ) . "]\n"; |
| | my $self = $class->SUPER::new( @_ ); |
| | bless ($self, $class); |
| | my $o = $_[0]; |
| | unless( (ref $o) ) |
| | { $o = {@_}; } |
| | #use Data::Dumper; |
| | #my $dd2 = Data::Dumper->new( [$o], ["$sub: o"] ); |
| | #$dd2->Indent(1); |
| | #print STDERR $dd2->Dump(); |
| | $self->{name} = "General Sinusoidal Series"; |
| | $self->{proj_code} = "gn_sinu"; |
| | # Make sure proj is set in the options: |
| | $self->{params}->{proj} = $self->{proj_code}; |
| | # Grab our projection specific options: |
| | # |
| | $self->{projection_params} = [ qw( m n ) ]; |
| | foreach my $param ( @{ $self->{projection_params} } ) |
| | { $self->{params}->{$param} = PDL::Transform::_opt( $o, [ $param ] ); } |
| | $self->update_proj_string(); |
| | #my $dd = Data::Dumper->new( [$self->{params}], ["$sub: params"] ); |
| | #$dd->Indent(1); |
| | #print STDERR $dd->Dump(); |
| | #print STDERR "$sub: Final proj_params: \'" . $self->{params}->{proj_params} |
| | . "\'\n"; |
| | return $self; |
| | } # End of PDL::Transform::gn_sinu::new()... |
| | |
| | 1; |
| | #line 477 "Proj4.pd" |
| | #line 7394 "Proj4.pm" |
| | |
| | #line 433 "Proj4.pd" |
| | |
| | #line 379 "Proj4.pd" |
| | # Autogenerated code for the Proj4 projection code: |
| | # gnom |
| | # |
| | package PDL::Transform::Proj4::gnom; |
| | use strict; |
| | use warnings; |
| | our @ISA = ( 'PDL::Transform::Proj4' ); |
| | |
| | sub new |
| | { |
| | my $proto = shift; |
| | my $class = ref($proto) || $proto; |
| | my $sub = "PDL::Transform::Proj4::gnom::new()"; |
| | #print STDERR "$sub: ARGS: [" . join(", ", @_ ) . "]\n"; |
| | my $self = $class->SUPER::new( @_ ); |
| | bless ($self, $class); |
| | my $o = $_[0]; |
| | unless( (ref $o) ) |
| | { $o = {@_}; } |
| | #use Data::Dumper; |
| | #my $dd2 = Data::Dumper->new( [$o], ["$sub: o"] ); |
| | #$dd2->Indent(1); |
| | #print STDERR $dd2->Dump(); |
| | $self->{name} = "Gnomonic"; |
| | $self->{proj_code} = "gnom"; |
| | # Make sure proj is set in the options: |
| | $self->{params}->{proj} = $self->{proj_code}; |
| | # Grab our projection specific options: |
| | # |
| | $self->{projection_params} = [ qw( ) ]; |
| | foreach my $param ( @{ $self->{projection_params} } ) |
| | { $self->{params}->{$param} = PDL::Transform::_opt( $o, [ $param ] ); } |
| | $self->update_proj_string(); |
| | #my $dd = Data::Dumper->new( [$self->{params}], ["$sub: params"] ); |
| | #$dd->Indent(1); |
| | #print STDERR $dd->Dump(); |
| | #print STDERR "$sub: Final proj_params: \'" . $self->{params}->{proj_params} |
| | . "\'\n"; |
| | return $self; |
| | } # End of PDL::Transform::gnom::new()... |
| | |
| | 1; |
| | #line 477 "Proj4.pd" |
| | #line 7444 "Proj4.pm" |
| | |
| | #line 433 "Proj4.pd" |
| | |
| | #line 379 "Proj4.pd" |
| | # Autogenerated code for the Proj4 projection code: |
| | # goode |
| | # |
| | package PDL::Transform::Proj4::goode; |
| | use strict; |
| | use warnings; |
| | our @ISA = ( 'PDL::Transform::Proj4' ); |
| | |
| | sub new |
| | { |
| | my $proto = shift; |
| | my $class = ref($proto) || $proto; |
| | my $sub = "PDL::Transform::Proj4::goode::new()"; |
| | #print STDERR "$sub: ARGS: [" . join(", ", @_ ) . "]\n"; |
| | my $self = $class->SUPER::new( @_ ); |
| | bless ($self, $class); |
| | my $o = $_[0]; |
| | unless( (ref $o) ) |
| | { $o = {@_}; } |
| | #use Data::Dumper; |
| | #my $dd2 = Data::Dumper->new( [$o], ["$sub: o"] ); |
| | #$dd2->Indent(1); |
| | #print STDERR $dd2->Dump(); |
| | $self->{name} = "Goode Homolosine"; |
| | $self->{proj_code} = "goode"; |
| | # Make sure proj is set in the options: |
| | $self->{params}->{proj} = $self->{proj_code}; |
| | # Grab our projection specific options: |
| | # |
| | $self->{projection_params} = [ qw( ) ]; |
| | foreach my $param ( @{ $self->{projection_params} } ) |
| | { $self->{params}->{$param} = PDL::Transform::_opt( $o, [ $param ] ); } |
| | $self->update_proj_string(); |
| | #my $dd = Data::Dumper->new( [$self->{params}], ["$sub: params"] ); |
| | #$dd->Indent(1); |
| | #print STDERR $dd->Dump(); |
| | #print STDERR "$sub: Final proj_params: \'" . $self->{params}->{proj_params} |
| | . "\'\n"; |
| | return $self; |
| | } # End of PDL::Transform::goode::new()... |
| | |
| | 1; |
| | #line 477 "Proj4.pd" |
| | #line 7494 "Proj4.pm" |
| | |
| | #line 433 "Proj4.pd" |
| | |
| | #line 379 "Proj4.pd" |
| | # Autogenerated code for the Proj4 projection code: |
| | # gs48 |
| | # |
| | package PDL::Transform::Proj4::gs48; |
| | use strict; |
| | use warnings; |
| | our @ISA = ( 'PDL::Transform::Proj4' ); |
| | |
| | sub new |
| | { |
| | my $proto = shift; |
| | my $class = ref($proto) || $proto; |
| | my $sub = "PDL::Transform::Proj4::gs48::new()"; |
| | #print STDERR "$sub: ARGS: [" . join(", ", @_ ) . "]\n"; |
| | my $self = $class->SUPER::new( @_ ); |
| | bless ($self, $class); |
| | my $o = $_[0]; |
| | unless( (ref $o) ) |
| | { $o = {@_}; } |
| | #use Data::Dumper; |
| | #my $dd2 = Data::Dumper->new( [$o], ["$sub: o"] ); |
| | #$dd2->Indent(1); |
| | #print STDERR $dd2->Dump(); |
| | $self->{name} = "Modified Stereographic of 48 U.S."; |
| | $self->{proj_code} = "gs48"; |
| | # Make sure proj is set in the options: |
| | $self->{params}->{proj} = $self->{proj_code}; |
| | # Grab our projection specific options: |
| | # |
| | $self->{projection_params} = [ qw( ) ]; |
| | foreach my $param ( @{ $self->{projection_params} } ) |
| | { $self->{params}->{$param} = PDL::Transform::_opt( $o, [ $param ] ); } |
| | $self->update_proj_string(); |
| | #my $dd = Data::Dumper->new( [$self->{params}], ["$sub: params"] ); |
| | #$dd->Indent(1); |
| | #print STDERR $dd->Dump(); |
| | #print STDERR "$sub: Final proj_params: \'" . $self->{params}->{proj_params} |
| | . "\'\n"; |
| | return $self; |
| | } # End of PDL::Transform::gs48::new()... |
| | |
| | 1; |
| | #line 477 "Proj4.pd" |
| | #line 7544 "Proj4.pm" |
| | |
| | #line 433 "Proj4.pd" |
| | |
| | #line 379 "Proj4.pd" |
| | # Autogenerated code for the Proj4 projection code: |
| | # gs50 |
| | # |
| | package PDL::Transform::Proj4::gs50; |
| | use strict; |
| | use warnings; |
| | our @ISA = ( 'PDL::Transform::Proj4' ); |
| | |
| | sub new |
| | { |
| | my $proto = shift; |
| | my $class = ref($proto) || $proto; |
| | my $sub = "PDL::Transform::Proj4::gs50::new()"; |
| | #print STDERR "$sub: ARGS: [" . join(", ", @_ ) . "]\n"; |
| | my $self = $class->SUPER::new( @_ ); |
| | bless ($self, $class); |
| | my $o = $_[0]; |
| | unless( (ref $o) ) |
| | { $o = {@_}; } |
| | #use Data::Dumper; |
| | #my $dd2 = Data::Dumper->new( [$o], ["$sub: o"] ); |
| | #$dd2->Indent(1); |
| | #print STDERR $dd2->Dump(); |
| | $self->{name} = "Modified Stereographic of 50 U.S."; |
| | $self->{proj_code} = "gs50"; |
| | # Make sure proj is set in the options: |
| | $self->{params}->{proj} = $self->{proj_code}; |
| | # Grab our projection specific options: |
| | # |
| | $self->{projection_params} = [ qw( ) ]; |
| | foreach my $param ( @{ $self->{projection_params} } ) |
| | { $self->{params}->{$param} = PDL::Transform::_opt( $o, [ $param ] ); } |
| | $self->update_proj_string(); |
| | #my $dd = Data::Dumper->new( [$self->{params}], ["$sub: params"] ); |
| | #$dd->Indent(1); |
| | #print STDERR $dd->Dump(); |
| | #print STDERR "$sub: Final proj_params: \'" . $self->{params}->{proj_params} |
| | . "\'\n"; |
| | return $self; |
| | } # End of PDL::Transform::gs50::new()... |
| | |
| | 1; |
| | #line 477 "Proj4.pd" |
| | #line 7594 "Proj4.pm" |
| | |
| | #line 433 "Proj4.pd" |
| | |
| | #line 379 "Proj4.pd" |
| | # Autogenerated code for the Proj4 projection code: |
| | # gstmerc |
| | # |
| | package PDL::Transform::Proj4::gstmerc; |
| | use strict; |
| | use warnings; |
| | our @ISA = ( 'PDL::Transform::Proj4' ); |
| | |
| | sub new |
| | { |
| | my $proto = shift; |
| | my $class = ref($proto) || $proto; |
| | my $sub = "PDL::Transform::Proj4::gstmerc::new()"; |
| | #print STDERR "$sub: ARGS: [" . join(", ", @_ ) . "]\n"; |
| | my $self = $class->SUPER::new( @_ ); |
| | bless ($self, $class); |
| | my $o = $_[0]; |
| | unless( (ref $o) ) |
| | { $o = {@_}; } |
| | #use Data::Dumper; |
| | #my $dd2 = Data::Dumper->new( [$o], ["$sub: o"] ); |
| | #$dd2->Indent(1); |
| | #print STDERR $dd2->Dump(); |
| | $self->{name} = "Gauss-Schreiber Transverse Mercator (aka Gauss-Laborde Reun |
| | ion)"; |
| | $self->{proj_code} = "gstmerc"; |
| | # Make sure proj is set in the options: |
| | $self->{params}->{proj} = $self->{proj_code}; |
| | # Grab our projection specific options: |
| | # |
| | $self->{projection_params} = [ qw( lat_0 lon_0 k_0 ) ]; |
| | foreach my $param ( @{ $self->{projection_params} } ) |
| | { $self->{params}->{$param} = PDL::Transform::_opt( $o, [ $param ] ); } |
| | $self->update_proj_string(); |
| | #my $dd = Data::Dumper->new( [$self->{params}], ["$sub: params"] ); |
| | #$dd->Indent(1); |
| | #print STDERR $dd->Dump(); |
| | #print STDERR "$sub: Final proj_params: \'" . $self->{params}->{proj_params} |
| | . "\'\n"; |
| | return $self; |
| | } # End of PDL::Transform::gstmerc::new()... |
| | |
| | 1; |
| | #line 477 "Proj4.pd" |
| | #line 7644 "Proj4.pm" |
| | |
| | #line 433 "Proj4.pd" |
| | |
| | #line 379 "Proj4.pd" |
| | # Autogenerated code for the Proj4 projection code: |
| | # guyou |
| | # |
| | package PDL::Transform::Proj4::guyou; |
| | use strict; |
| | use warnings; |
| | our @ISA = ( 'PDL::Transform::Proj4' ); |
| | |
| | sub new |
| | { |
| | my $proto = shift; |
| | my $class = ref($proto) || $proto; |
| | my $sub = "PDL::Transform::Proj4::guyou::new()"; |
| | #print STDERR "$sub: ARGS: [" . join(", ", @_ ) . "]\n"; |
| | my $self = $class->SUPER::new( @_ ); |
| | bless ($self, $class); |
| | my $o = $_[0]; |
| | unless( (ref $o) ) |
| | { $o = {@_}; } |
| | #use Data::Dumper; |
| | #my $dd2 = Data::Dumper->new( [$o], ["$sub: o"] ); |
| | #$dd2->Indent(1); |
| | #print STDERR $dd2->Dump(); |
| | $self->{name} = "Guyou"; |
| | $self->{proj_code} = "guyou"; |
| | # Make sure proj is set in the options: |
| | $self->{params}->{proj} = $self->{proj_code}; |
| | # Grab our projection specific options: |
| | # |
| | $self->{projection_params} = [ qw( ) ]; |
| | foreach my $param ( @{ $self->{projection_params} } ) |
| | { $self->{params}->{$param} = PDL::Transform::_opt( $o, [ $param ] ); } |
| | $self->update_proj_string(); |
| | #my $dd = Data::Dumper->new( [$self->{params}], ["$sub: params"] ); |
| | #$dd->Indent(1); |
| | #print STDERR $dd->Dump(); |
| | #print STDERR "$sub: Final proj_params: \'" . $self->{params}->{proj_params} |
| | . "\'\n"; |
| | return $self; |
| | } # End of PDL::Transform::guyou::new()... |
| | |
| | 1; |
| | #line 477 "Proj4.pd" |
| | #line 7694 "Proj4.pm" |
| | |
| | #line 433 "Proj4.pd" |
| | |
| | #line 379 "Proj4.pd" |
| | # Autogenerated code for the Proj4 projection code: |
| | # hammer |
| | # |
| | package PDL::Transform::Proj4::hammer; |
| | use strict; |
| | use warnings; |
| | our @ISA = ( 'PDL::Transform::Proj4' ); |
| | |
| | sub new |
| | { |
| | my $proto = shift; |
| | my $class = ref($proto) || $proto; |
| | my $sub = "PDL::Transform::Proj4::hammer::new()"; |
| | #print STDERR "$sub: ARGS: [" . join(", ", @_ ) . "]\n"; |
| | my $self = $class->SUPER::new( @_ ); |
| | bless ($self, $class); |
| | my $o = $_[0]; |
| | unless( (ref $o) ) |
| | { $o = {@_}; } |
| | #use Data::Dumper; |
| | #my $dd2 = Data::Dumper->new( [$o], ["$sub: o"] ); |
| | #$dd2->Indent(1); |
| | #print STDERR $dd2->Dump(); |
| | $self->{name} = "Hammer & Eckert-Greifendorff"; |
| | $self->{proj_code} = "hammer"; |
| | # Make sure proj is set in the options: |
| | $self->{params}->{proj} = $self->{proj_code}; |
| | # Grab our projection specific options: |
| | # |
| | $self->{projection_params} = [ qw( W M ) ]; |
| | foreach my $param ( @{ $self->{projection_params} } ) |
| | { $self->{params}->{$param} = PDL::Transform::_opt( $o, [ $param ] ); } |
| | $self->update_proj_string(); |
| | #my $dd = Data::Dumper->new( [$self->{params}], ["$sub: params"] ); |
| | #$dd->Indent(1); |
| | #print STDERR $dd->Dump(); |
| | #print STDERR "$sub: Final proj_params: \'" . $self->{params}->{proj_params} |
| | . "\'\n"; |
| | return $self; |
| | } # End of PDL::Transform::hammer::new()... |
| | |
| | 1; |
| | #line 477 "Proj4.pd" |
| | #line 7744 "Proj4.pm" |
| | |
| | #line 433 "Proj4.pd" |
| | |
| | #line 379 "Proj4.pd" |
| | # Autogenerated code for the Proj4 projection code: |
| | # hatano |
| | # |
| | package PDL::Transform::Proj4::hatano; |
| | use strict; |
| | use warnings; |
| | our @ISA = ( 'PDL::Transform::Proj4' ); |
| | |
| | sub new |
| | { |
| | my $proto = shift; |
| | my $class = ref($proto) || $proto; |
| | my $sub = "PDL::Transform::Proj4::hatano::new()"; |
| | #print STDERR "$sub: ARGS: [" . join(", ", @_ ) . "]\n"; |
| | my $self = $class->SUPER::new( @_ ); |
| | bless ($self, $class); |
| | my $o = $_[0]; |
| | unless( (ref $o) ) |
| | { $o = {@_}; } |
| | #use Data::Dumper; |
| | #my $dd2 = Data::Dumper->new( [$o], ["$sub: o"] ); |
| | #$dd2->Indent(1); |
| | #print STDERR $dd2->Dump(); |
| | $self->{name} = "Hatano Asymmetrical Equal Area"; |
| | $self->{proj_code} = "hatano"; |
| | # Make sure proj is set in the options: |
| | $self->{params}->{proj} = $self->{proj_code}; |
| | # Grab our projection specific options: |
| | # |
| | $self->{projection_params} = [ qw( ) ]; |
| | foreach my $param ( @{ $self->{projection_params} } ) |
| | { $self->{params}->{$param} = PDL::Transform::_opt( $o, [ $param ] ); } |
| | $self->update_proj_string(); |
| | #my $dd = Data::Dumper->new( [$self->{params}], ["$sub: params"] ); |
| | #$dd->Indent(1); |
| | #print STDERR $dd->Dump(); |
| | #print STDERR "$sub: Final proj_params: \'" . $self->{params}->{proj_params} |
| | . "\'\n"; |
| | return $self; |
| | } # End of PDL::Transform::hatano::new()... |
| | |
| | 1; |
| | #line 477 "Proj4.pd" |
| | #line 7794 "Proj4.pm" |
| | |
| | #line 433 "Proj4.pd" |
| | |
| | #line 379 "Proj4.pd" |
| | # Autogenerated code for the Proj4 projection code: |
| | # healpix |
| | # |
| | package PDL::Transform::Proj4::healpix; |
| | use strict; |
| | use warnings; |
| | our @ISA = ( 'PDL::Transform::Proj4' ); |
| | |
| | sub new |
| | { |
| | my $proto = shift; |
| | my $class = ref($proto) || $proto; |
| | my $sub = "PDL::Transform::Proj4::healpix::new()"; |
| | #print STDERR "$sub: ARGS: [" . join(", ", @_ ) . "]\n"; |
| | my $self = $class->SUPER::new( @_ ); |
| | bless ($self, $class); |
| | my $o = $_[0]; |
| | unless( (ref $o) ) |
| | { $o = {@_}; } |
| | #use Data::Dumper; |
| | #my $dd2 = Data::Dumper->new( [$o], ["$sub: o"] ); |
| | #$dd2->Indent(1); |
| | #print STDERR $dd2->Dump(); |
| | $self->{name} = "HEALPix"; |
| | $self->{proj_code} = "healpix"; |
| | # Make sure proj is set in the options: |
| | $self->{params}->{proj} = $self->{proj_code}; |
| | # Grab our projection specific options: |
| | # |
| | $self->{projection_params} = [ qw( rot_xy ) ]; |
| | foreach my $param ( @{ $self->{projection_params} } ) |
| | { $self->{params}->{$param} = PDL::Transform::_opt( $o, [ $param ] ); } |
| | $self->update_proj_string(); |
| | #my $dd = Data::Dumper->new( [$self->{params}], ["$sub: params"] ); |
| | #$dd->Indent(1); |
| | #print STDERR $dd->Dump(); |
| | #print STDERR "$sub: Final proj_params: \'" . $self->{params}->{proj_params} |
| | . "\'\n"; |
| | return $self; |
| | } # End of PDL::Transform::healpix::new()... |
| | |
| | 1; |
| | #line 477 "Proj4.pd" |
| | #line 7844 "Proj4.pm" |
| | |
| | #line 433 "Proj4.pd" |
| | |
| | #line 379 "Proj4.pd" |
| | # Autogenerated code for the Proj4 projection code: |
| | # helmert |
| | # |
| | package PDL::Transform::Proj4::helmert; |
| | use strict; |
| | use warnings; |
| | our @ISA = ( 'PDL::Transform::Proj4' ); |
| | |
| | sub new |
| | { |
| | my $proto = shift; |
| | my $class = ref($proto) || $proto; |
| | my $sub = "PDL::Transform::Proj4::helmert::new()"; |
| | #print STDERR "$sub: ARGS: [" . join(", ", @_ ) . "]\n"; |
| | my $self = $class->SUPER::new( @_ ); |
| | bless ($self, $class); |
| | my $o = $_[0]; |
| | unless( (ref $o) ) |
| | { $o = {@_}; } |
| | #use Data::Dumper; |
| | #my $dd2 = Data::Dumper->new( [$o], ["$sub: o"] ); |
| | #$dd2->Indent(1); |
| | #print STDERR $dd2->Dump(); |
| | $self->{name} = "3(6)-, 4(8)- and 7(14)-parameter Helmert shift"; |
| | $self->{proj_code} = "helmert"; |
| | # Make sure proj is set in the options: |
| | $self->{params}->{proj} = $self->{proj_code}; |
| | # Grab our projection specific options: |
| | # |
| | $self->{projection_params} = [ qw( ) ]; |
| | foreach my $param ( @{ $self->{projection_params} } ) |
| | { $self->{params}->{$param} = PDL::Transform::_opt( $o, [ $param ] ); } |
| | $self->update_proj_string(); |
| | #my $dd = Data::Dumper->new( [$self->{params}], ["$sub: params"] ); |
| | #$dd->Indent(1); |
| | #print STDERR $dd->Dump(); |
| | #print STDERR "$sub: Final proj_params: \'" . $self->{params}->{proj_params} |
| | . "\'\n"; |
| | return $self; |
| | } # End of PDL::Transform::helmert::new()... |
| | |
| | 1; |
| | #line 477 "Proj4.pd" |
| | #line 7894 "Proj4.pm" |
| | |
| | #line 433 "Proj4.pd" |
| | |
| | #line 379 "Proj4.pd" |
| | # Autogenerated code for the Proj4 projection code: |
| | # hgridshift |
| | # |
| | package PDL::Transform::Proj4::hgridshift; |
| | use strict; |
| | use warnings; |
| | our @ISA = ( 'PDL::Transform::Proj4' ); |
| | |
| | sub new |
| | { |
| | my $proto = shift; |
| | my $class = ref($proto) || $proto; |
| | my $sub = "PDL::Transform::Proj4::hgridshift::new()"; |
| | #print STDERR "$sub: ARGS: [" . join(", ", @_ ) . "]\n"; |
| | my $self = $class->SUPER::new( @_ ); |
| | bless ($self, $class); |
| | my $o = $_[0]; |
| | unless( (ref $o) ) |
| | { $o = {@_}; } |
| | #use Data::Dumper; |
| | #my $dd2 = Data::Dumper->new( [$o], ["$sub: o"] ); |
| | #$dd2->Indent(1); |
| | #print STDERR $dd2->Dump(); |
| | $self->{name} = "Horizontal grid shift"; |
| | $self->{proj_code} = "hgridshift"; |
| | # Make sure proj is set in the options: |
| | $self->{params}->{proj} = $self->{proj_code}; |
| | # Grab our projection specific options: |
| | # |
| | $self->{projection_params} = [ qw( ) ]; |
| | foreach my $param ( @{ $self->{projection_params} } ) |
| | { $self->{params}->{$param} = PDL::Transform::_opt( $o, [ $param ] ); } |
| | $self->update_proj_string(); |
| | #my $dd = Data::Dumper->new( [$self->{params}], ["$sub: params"] ); |
| | #$dd->Indent(1); |
| | #print STDERR $dd->Dump(); |
| | #print STDERR "$sub: Final proj_params: \'" . $self->{params}->{proj_params} |
| | . "\'\n"; |
| | return $self; |
| | } # End of PDL::Transform::hgridshift::new()... |
| | |
| | 1; |
| | #line 477 "Proj4.pd" |
| | #line 7944 "Proj4.pm" |
| | |
| | #line 433 "Proj4.pd" |
| | |
| | #line 379 "Proj4.pd" |
| | # Autogenerated code for the Proj4 projection code: |
| | # horner |
| | # |
| | package PDL::Transform::Proj4::horner; |
| | use strict; |
| | use warnings; |
| | our @ISA = ( 'PDL::Transform::Proj4' ); |
| | |
| | sub new |
| | { |
| | my $proto = shift; |
| | my $class = ref($proto) || $proto; |
| | my $sub = "PDL::Transform::Proj4::horner::new()"; |
| | #print STDERR "$sub: ARGS: [" . join(", ", @_ ) . "]\n"; |
| | my $self = $class->SUPER::new( @_ ); |
| | bless ($self, $class); |
| | my $o = $_[0]; |
| | unless( (ref $o) ) |
| | { $o = {@_}; } |
| | #use Data::Dumper; |
| | #my $dd2 = Data::Dumper->new( [$o], ["$sub: o"] ); |
| | #$dd2->Indent(1); |
| | #print STDERR $dd2->Dump(); |
| | $self->{name} = "Horner polynomial evaluation"; |
| | $self->{proj_code} = "horner"; |
| | # Make sure proj is set in the options: |
| | $self->{params}->{proj} = $self->{proj_code}; |
| | # Grab our projection specific options: |
| | # |
| | $self->{projection_params} = [ qw( ) ]; |
| | foreach my $param ( @{ $self->{projection_params} } ) |
| | { $self->{params}->{$param} = PDL::Transform::_opt( $o, [ $param ] ); } |
| | $self->update_proj_string(); |
| | #my $dd = Data::Dumper->new( [$self->{params}], ["$sub: params"] ); |
| | #$dd->Indent(1); |
| | #print STDERR $dd->Dump(); |
| | #print STDERR "$sub: Final proj_params: \'" . $self->{params}->{proj_params} |
| | . "\'\n"; |
| | return $self; |
| | } # End of PDL::Transform::horner::new()... |
| | |
| | 1; |
| | #line 477 "Proj4.pd" |
| | #line 7994 "Proj4.pm" |
| | |
| | #line 433 "Proj4.pd" |
| | |
| | #line 379 "Proj4.pd" |
| | # Autogenerated code for the Proj4 projection code: |
| | # igh |
| | # |
| | package PDL::Transform::Proj4::igh; |
| | use strict; |
| | use warnings; |
| | our @ISA = ( 'PDL::Transform::Proj4' ); |
| | |
| | sub new |
| | { |
| | my $proto = shift; |
| | my $class = ref($proto) || $proto; |
| | my $sub = "PDL::Transform::Proj4::igh::new()"; |
| | #print STDERR "$sub: ARGS: [" . join(", ", @_ ) . "]\n"; |
| | my $self = $class->SUPER::new( @_ ); |
| | bless ($self, $class); |
| | my $o = $_[0]; |
| | unless( (ref $o) ) |
| | { $o = {@_}; } |
| | #use Data::Dumper; |
| | #my $dd2 = Data::Dumper->new( [$o], ["$sub: o"] ); |
| | #$dd2->Indent(1); |
| | #print STDERR $dd2->Dump(); |
| | $self->{name} = "Interrupted Goode Homolosine"; |
| | $self->{proj_code} = "igh"; |
| | # Make sure proj is set in the options: |
| | $self->{params}->{proj} = $self->{proj_code}; |
| | # Grab our projection specific options: |
| | # |
| | $self->{projection_params} = [ qw( ) ]; |
| | foreach my $param ( @{ $self->{projection_params} } ) |
| | { $self->{params}->{$param} = PDL::Transform::_opt( $o, [ $param ] ); } |
| | $self->update_proj_string(); |
| | #my $dd = Data::Dumper->new( [$self->{params}], ["$sub: params"] ); |
| | #$dd->Indent(1); |
| | #print STDERR $dd->Dump(); |
| | #print STDERR "$sub: Final proj_params: \'" . $self->{params}->{proj_params} |
| | . "\'\n"; |
| | return $self; |
| | } # End of PDL::Transform::igh::new()... |
| | |
| | 1; |
| | #line 477 "Proj4.pd" |
| | #line 8044 "Proj4.pm" |
| | |
| | #line 433 "Proj4.pd" |
| | |
| | #line 379 "Proj4.pd" |
| | # Autogenerated code for the Proj4 projection code: |
| | # igh_o |
| | # |
| | package PDL::Transform::Proj4::igh_o; |
| | use strict; |
| | use warnings; |
| | our @ISA = ( 'PDL::Transform::Proj4' ); |
| | |
| | sub new |
| | { |
| | my $proto = shift; |
| | my $class = ref($proto) || $proto; |
| | my $sub = "PDL::Transform::Proj4::igh_o::new()"; |
| | #print STDERR "$sub: ARGS: [" . join(", ", @_ ) . "]\n"; |
| | my $self = $class->SUPER::new( @_ ); |
| | bless ($self, $class); |
| | my $o = $_[0]; |
| | unless( (ref $o) ) |
| | { $o = {@_}; } |
| | #use Data::Dumper; |
| | #my $dd2 = Data::Dumper->new( [$o], ["$sub: o"] ); |
| | #$dd2->Indent(1); |
| | #print STDERR $dd2->Dump(); |
| | $self->{name} = "Interrupted Goode Homolosine Oceanic View"; |
| | $self->{proj_code} = "igh_o"; |
| | # Make sure proj is set in the options: |
| | $self->{params}->{proj} = $self->{proj_code}; |
| | # Grab our projection specific options: |
| | # |
| | $self->{projection_params} = [ qw( ) ]; |
| | foreach my $param ( @{ $self->{projection_params} } ) |
| | { $self->{params}->{$param} = PDL::Transform::_opt( $o, [ $param ] ); } |
| | $self->update_proj_string(); |
| | #my $dd = Data::Dumper->new( [$self->{params}], ["$sub: params"] ); |
| | #$dd->Indent(1); |
| | #print STDERR $dd->Dump(); |
| | #print STDERR "$sub: Final proj_params: \'" . $self->{params}->{proj_params} |
| | . "\'\n"; |
| | return $self; |
| | } # End of PDL::Transform::igh_o::new()... |
| | |
| | 1; |
| | #line 477 "Proj4.pd" |
| | #line 8094 "Proj4.pm" |
| | |
| | #line 433 "Proj4.pd" |
| | |
| | #line 379 "Proj4.pd" |
| | # Autogenerated code for the Proj4 projection code: |
| | # imw_p |
| | # |
| | package PDL::Transform::Proj4::imw_p; |
| | use strict; |
| | use warnings; |
| | our @ISA = ( 'PDL::Transform::Proj4' ); |
| | |
| | sub new |
| | { |
| | my $proto = shift; |
| | my $class = ref($proto) || $proto; |
| | my $sub = "PDL::Transform::Proj4::imw_p::new()"; |
| | #print STDERR "$sub: ARGS: [" . join(", ", @_ ) . "]\n"; |
| | my $self = $class->SUPER::new( @_ ); |
| | bless ($self, $class); |
| | my $o = $_[0]; |
| | unless( (ref $o) ) |
| | { $o = {@_}; } |
| | #use Data::Dumper; |
| | #my $dd2 = Data::Dumper->new( [$o], ["$sub: o"] ); |
| | #$dd2->Indent(1); |
| | #print STDERR $dd2->Dump(); |
| | $self->{name} = "International Map of the World Polyconic"; |
| | $self->{proj_code} = "imw_p"; |
| | # Make sure proj is set in the options: |
| | $self->{params}->{proj} = $self->{proj_code}; |
| | # Grab our projection specific options: |
| | # |
| | $self->{projection_params} = [ qw( lat_1 lat_2 lon_1 ) ]; |
| | foreach my $param ( @{ $self->{projection_params} } ) |
| | { $self->{params}->{$param} = PDL::Transform::_opt( $o, [ $param ] ); } |
| | $self->update_proj_string(); |
| | #my $dd = Data::Dumper->new( [$self->{params}], ["$sub: params"] ); |
| | #$dd->Indent(1); |
| | #print STDERR $dd->Dump(); |
| | #print STDERR "$sub: Final proj_params: \'" . $self->{params}->{proj_params} |
| | . "\'\n"; |
| | return $self; |
| | } # End of PDL::Transform::imw_p::new()... |
| | |
| | 1; |
| | #line 477 "Proj4.pd" |
| | #line 8144 "Proj4.pm" |
| | |
| | #line 433 "Proj4.pd" |
| | |
| | #line 379 "Proj4.pd" |
| | # Autogenerated code for the Proj4 projection code: |
| | # isea |
| | # |
| | package PDL::Transform::Proj4::isea; |
| | use strict; |
| | use warnings; |
| | our @ISA = ( 'PDL::Transform::Proj4' ); |
| | |
| | sub new |
| | { |
| | my $proto = shift; |
| | my $class = ref($proto) || $proto; |
| | my $sub = "PDL::Transform::Proj4::isea::new()"; |
| | #print STDERR "$sub: ARGS: [" . join(", ", @_ ) . "]\n"; |
| | my $self = $class->SUPER::new( @_ ); |
| | bless ($self, $class); |
| | my $o = $_[0]; |
| | unless( (ref $o) ) |
| | { $o = {@_}; } |
| | #use Data::Dumper; |
| | #my $dd2 = Data::Dumper->new( [$o], ["$sub: o"] ); |
| | #$dd2->Indent(1); |
| | #print STDERR $dd2->Dump(); |
| | $self->{name} = "Icosahedral Snyder Equal Area"; |
| | $self->{proj_code} = "isea"; |
| | # Make sure proj is set in the options: |
| | $self->{params}->{proj} = $self->{proj_code}; |
| | # Grab our projection specific options: |
| | # |
| | $self->{projection_params} = [ qw( ) ]; |
| | foreach my $param ( @{ $self->{projection_params} } ) |
| | { $self->{params}->{$param} = PDL::Transform::_opt( $o, [ $param ] ); } |
| | $self->update_proj_string(); |
| | #my $dd = Data::Dumper->new( [$self->{params}], ["$sub: params"] ); |
| | #$dd->Indent(1); |
| | #print STDERR $dd->Dump(); |
| | #print STDERR "$sub: Final proj_params: \'" . $self->{params}->{proj_params} |
| | . "\'\n"; |
| | return $self; |
| | } # End of PDL::Transform::isea::new()... |
| | |
| | 1; |
| | #line 477 "Proj4.pd" |
| | #line 8194 "Proj4.pm" |
| | |
| | #line 433 "Proj4.pd" |
| | |
| | #line 379 "Proj4.pd" |
| | # Autogenerated code for the Proj4 projection code: |
| | # kav5 |
| | # |
| | package PDL::Transform::Proj4::kav5; |
| | use strict; |
| | use warnings; |
| | our @ISA = ( 'PDL::Transform::Proj4' ); |
| | |
| | sub new |
| | { |
| | my $proto = shift; |
| | my $class = ref($proto) || $proto; |
| | my $sub = "PDL::Transform::Proj4::kav5::new()"; |
| | #print STDERR "$sub: ARGS: [" . join(", ", @_ ) . "]\n"; |
| | my $self = $class->SUPER::new( @_ ); |
| | bless ($self, $class); |
| | my $o = $_[0]; |
| | unless( (ref $o) ) |
| | { $o = {@_}; } |
| | #use Data::Dumper; |
| | #my $dd2 = Data::Dumper->new( [$o], ["$sub: o"] ); |
| | #$dd2->Indent(1); |
| | #print STDERR $dd2->Dump(); |
| | $self->{name} = "Kavraisky V"; |
| | $self->{proj_code} = "kav5"; |
| | # Make sure proj is set in the options: |
| | $self->{params}->{proj} = $self->{proj_code}; |
| | # Grab our projection specific options: |
| | # |
| | $self->{projection_params} = [ qw( ) ]; |
| | foreach my $param ( @{ $self->{projection_params} } ) |
| | { $self->{params}->{$param} = PDL::Transform::_opt( $o, [ $param ] ); } |
| | $self->update_proj_string(); |
| | #my $dd = Data::Dumper->new( [$self->{params}], ["$sub: params"] ); |
| | #$dd->Indent(1); |
| | #print STDERR $dd->Dump(); |
| | #print STDERR "$sub: Final proj_params: \'" . $self->{params}->{proj_params} |
| | . "\'\n"; |
| | return $self; |
| | } # End of PDL::Transform::kav5::new()... |
| | |
| | 1; |
| | #line 477 "Proj4.pd" |
| | #line 8244 "Proj4.pm" |
| | |
| | #line 433 "Proj4.pd" |
| | |
| | #line 379 "Proj4.pd" |
| | # Autogenerated code for the Proj4 projection code: |
| | # kav7 |
| | # |
| | package PDL::Transform::Proj4::kav7; |
| | use strict; |
| | use warnings; |
| | our @ISA = ( 'PDL::Transform::Proj4' ); |
| | |
| | sub new |
| | { |
| | my $proto = shift; |
| | my $class = ref($proto) || $proto; |
| | my $sub = "PDL::Transform::Proj4::kav7::new()"; |
| | #print STDERR "$sub: ARGS: [" . join(", ", @_ ) . "]\n"; |
| | my $self = $class->SUPER::new( @_ ); |
| | bless ($self, $class); |
| | my $o = $_[0]; |
| | unless( (ref $o) ) |
| | { $o = {@_}; } |
| | #use Data::Dumper; |
| | #my $dd2 = Data::Dumper->new( [$o], ["$sub: o"] ); |
| | #$dd2->Indent(1); |
| | #print STDERR $dd2->Dump(); |
| | $self->{name} = "Kavraisky VII"; |
| | $self->{proj_code} = "kav7"; |
| | # Make sure proj is set in the options: |
| | $self->{params}->{proj} = $self->{proj_code}; |
| | # Grab our projection specific options: |
| | # |
| | $self->{projection_params} = [ qw( ) ]; |
| | foreach my $param ( @{ $self->{projection_params} } ) |
| | { $self->{params}->{$param} = PDL::Transform::_opt( $o, [ $param ] ); } |
| | $self->update_proj_string(); |
| | #my $dd = Data::Dumper->new( [$self->{params}], ["$sub: params"] ); |
| | #$dd->Indent(1); |
| | #print STDERR $dd->Dump(); |
| | #print STDERR "$sub: Final proj_params: \'" . $self->{params}->{proj_params} |
| | . "\'\n"; |
| | return $self; |
| | } # End of PDL::Transform::kav7::new()... |
| | |
| | 1; |
| | #line 477 "Proj4.pd" |
| | #line 8294 "Proj4.pm" |
| | |
| | #line 433 "Proj4.pd" |
| | |
| | #line 379 "Proj4.pd" |
| | # Autogenerated code for the Proj4 projection code: |
| | # krovak |
| | # |
| | package PDL::Transform::Proj4::krovak; |
| | use strict; |
| | use warnings; |
| | our @ISA = ( 'PDL::Transform::Proj4' ); |
| | |
| | sub new |
| | { |
| | my $proto = shift; |
| | my $class = ref($proto) || $proto; |
| | my $sub = "PDL::Transform::Proj4::krovak::new()"; |
| | #print STDERR "$sub: ARGS: [" . join(", ", @_ ) . "]\n"; |
| | my $self = $class->SUPER::new( @_ ); |
| | bless ($self, $class); |
| | my $o = $_[0]; |
| | unless( (ref $o) ) |
| | { $o = {@_}; } |
| | #use Data::Dumper; |
| | #my $dd2 = Data::Dumper->new( [$o], ["$sub: o"] ); |
| | #$dd2->Indent(1); |
| | #print STDERR $dd2->Dump(); |
| | $self->{name} = "Krovak"; |
| | $self->{proj_code} = "krovak"; |
| | # Make sure proj is set in the options: |
| | $self->{params}->{proj} = $self->{proj_code}; |
| | # Grab our projection specific options: |
| | # |
| | $self->{projection_params} = [ qw( ) ]; |
| | foreach my $param ( @{ $self->{projection_params} } ) |
| | { $self->{params}->{$param} = PDL::Transform::_opt( $o, [ $param ] ); } |
| | $self->update_proj_string(); |
| | #my $dd = Data::Dumper->new( [$self->{params}], ["$sub: params"] ); |
| | #$dd->Indent(1); |
| | #print STDERR $dd->Dump(); |
| | #print STDERR "$sub: Final proj_params: \'" . $self->{params}->{proj_params} |
| | . "\'\n"; |
| | return $self; |
| | } # End of PDL::Transform::krovak::new()... |
| | |
| | 1; |
| | #line 477 "Proj4.pd" |
| | #line 8344 "Proj4.pm" |
| | |
| | #line 433 "Proj4.pd" |
| | |
| | #line 379 "Proj4.pd" |
| | # Autogenerated code for the Proj4 projection code: |
| | # labrd |
| | # |
| | package PDL::Transform::Proj4::labrd; |
| | use strict; |
| | use warnings; |
| | our @ISA = ( 'PDL::Transform::Proj4' ); |
| | |
| | sub new |
| | { |
| | my $proto = shift; |
| | my $class = ref($proto) || $proto; |
| | my $sub = "PDL::Transform::Proj4::labrd::new()"; |
| | #print STDERR "$sub: ARGS: [" . join(", ", @_ ) . "]\n"; |
| | my $self = $class->SUPER::new( @_ ); |
| | bless ($self, $class); |
| | my $o = $_[0]; |
| | unless( (ref $o) ) |
| | { $o = {@_}; } |
| | #use Data::Dumper; |
| | #my $dd2 = Data::Dumper->new( [$o], ["$sub: o"] ); |
| | #$dd2->Indent(1); |
| | #print STDERR $dd2->Dump(); |
| | $self->{name} = "Laborde"; |
| | $self->{proj_code} = "labrd"; |
| | # Make sure proj is set in the options: |
| | $self->{params}->{proj} = $self->{proj_code}; |
| | # Grab our projection specific options: |
| | # |
| | $self->{projection_params} = [ qw( ) ]; |
| | foreach my $param ( @{ $self->{projection_params} } ) |
| | { $self->{params}->{$param} = PDL::Transform::_opt( $o, [ $param ] ); } |
| | $self->update_proj_string(); |
| | #my $dd = Data::Dumper->new( [$self->{params}], ["$sub: params"] ); |
| | #$dd->Indent(1); |
| | #print STDERR $dd->Dump(); |
| | #print STDERR "$sub: Final proj_params: \'" . $self->{params}->{proj_params} |
| | . "\'\n"; |
| | return $self; |
| | } # End of PDL::Transform::labrd::new()... |
| | |
| | 1; |
| | #line 477 "Proj4.pd" |
| | #line 8394 "Proj4.pm" |
| | |
| | #line 433 "Proj4.pd" |
| | |
| | #line 379 "Proj4.pd" |
| | # Autogenerated code for the Proj4 projection code: |
| | # laea |
| | # |
| | package PDL::Transform::Proj4::laea; |
| | use strict; |
| | use warnings; |
| | our @ISA = ( 'PDL::Transform::Proj4' ); |
| | |
| | sub new |
| | { |
| | my $proto = shift; |
| | my $class = ref($proto) || $proto; |
| | my $sub = "PDL::Transform::Proj4::laea::new()"; |
| | #print STDERR "$sub: ARGS: [" . join(", ", @_ ) . "]\n"; |
| | my $self = $class->SUPER::new( @_ ); |
| | bless ($self, $class); |
| | my $o = $_[0]; |
| | unless( (ref $o) ) |
| | { $o = {@_}; } |
| | #use Data::Dumper; |
| | #my $dd2 = Data::Dumper->new( [$o], ["$sub: o"] ); |
| | #$dd2->Indent(1); |
| | #print STDERR $dd2->Dump(); |
| | $self->{name} = "Lambert Azimuthal Equal Area"; |
| | $self->{proj_code} = "laea"; |
| | # Make sure proj is set in the options: |
| | $self->{params}->{proj} = $self->{proj_code}; |
| | # Grab our projection specific options: |
| | # |
| | $self->{projection_params} = [ qw( ) ]; |
| | foreach my $param ( @{ $self->{projection_params} } ) |
| | { $self->{params}->{$param} = PDL::Transform::_opt( $o, [ $param ] ); } |
| | $self->update_proj_string(); |
| | #my $dd = Data::Dumper->new( [$self->{params}], ["$sub: params"] ); |
| | #$dd->Indent(1); |
| | #print STDERR $dd->Dump(); |
| | #print STDERR "$sub: Final proj_params: \'" . $self->{params}->{proj_params} |
| | . "\'\n"; |
| | return $self; |
| | } # End of PDL::Transform::laea::new()... |
| | |
| | 1; |
| | #line 477 "Proj4.pd" |
| | #line 8444 "Proj4.pm" |
| | |
| | #line 433 "Proj4.pd" |
| | |
| | #line 379 "Proj4.pd" |
| | # Autogenerated code for the Proj4 projection code: |
| | # lagrng |
| | # |
| | package PDL::Transform::Proj4::lagrng; |
| | use strict; |
| | use warnings; |
| | our @ISA = ( 'PDL::Transform::Proj4' ); |
| | |
| | sub new |
| | { |
| | my $proto = shift; |
| | my $class = ref($proto) || $proto; |
| | my $sub = "PDL::Transform::Proj4::lagrng::new()"; |
| | #print STDERR "$sub: ARGS: [" . join(", ", @_ ) . "]\n"; |
| | my $self = $class->SUPER::new( @_ ); |
| | bless ($self, $class); |
| | my $o = $_[0]; |
| | unless( (ref $o) ) |
| | { $o = {@_}; } |
| | #use Data::Dumper; |
| | #my $dd2 = Data::Dumper->new( [$o], ["$sub: o"] ); |
| | #$dd2->Indent(1); |
| | #print STDERR $dd2->Dump(); |
| | $self->{name} = "Lagrange"; |
| | $self->{proj_code} = "lagrng"; |
| | # Make sure proj is set in the options: |
| | $self->{params}->{proj} = $self->{proj_code}; |
| | # Grab our projection specific options: |
| | # |
| | $self->{projection_params} = [ qw( W ) ]; |
| | foreach my $param ( @{ $self->{projection_params} } ) |
| | { $self->{params}->{$param} = PDL::Transform::_opt( $o, [ $param ] ); } |
| | $self->update_proj_string(); |
| | #my $dd = Data::Dumper->new( [$self->{params}], ["$sub: params"] ); |
| | #$dd->Indent(1); |
| | #print STDERR $dd->Dump(); |
| | #print STDERR "$sub: Final proj_params: \'" . $self->{params}->{proj_params} |
| | . "\'\n"; |
| | return $self; |
| | } # End of PDL::Transform::lagrng::new()... |
| | |
| | 1; |
| | #line 477 "Proj4.pd" |
| | #line 8494 "Proj4.pm" |
| | |
| | #line 433 "Proj4.pd" |
| | |
| | #line 379 "Proj4.pd" |
| | # Autogenerated code for the Proj4 projection code: |
| | # larr |
| | # |
| | package PDL::Transform::Proj4::larr; |
| | use strict; |
| | use warnings; |
| | our @ISA = ( 'PDL::Transform::Proj4' ); |
| | |
| | sub new |
| | { |
| | my $proto = shift; |
| | my $class = ref($proto) || $proto; |
| | my $sub = "PDL::Transform::Proj4::larr::new()"; |
| | #print STDERR "$sub: ARGS: [" . join(", ", @_ ) . "]\n"; |
| | my $self = $class->SUPER::new( @_ ); |
| | bless ($self, $class); |
| | my $o = $_[0]; |
| | unless( (ref $o) ) |
| | { $o = {@_}; } |
| | #use Data::Dumper; |
| | #my $dd2 = Data::Dumper->new( [$o], ["$sub: o"] ); |
| | #$dd2->Indent(1); |
| | #print STDERR $dd2->Dump(); |
| | $self->{name} = "Larrivee"; |
| | $self->{proj_code} = "larr"; |
| | # Make sure proj is set in the options: |
| | $self->{params}->{proj} = $self->{proj_code}; |
| | # Grab our projection specific options: |
| | # |
| | $self->{projection_params} = [ qw( ) ]; |
| | foreach my $param ( @{ $self->{projection_params} } ) |
| | { $self->{params}->{$param} = PDL::Transform::_opt( $o, [ $param ] ); } |
| | $self->update_proj_string(); |
| | #my $dd = Data::Dumper->new( [$self->{params}], ["$sub: params"] ); |
| | #$dd->Indent(1); |
| | #print STDERR $dd->Dump(); |
| | #print STDERR "$sub: Final proj_params: \'" . $self->{params}->{proj_params} |
| | . "\'\n"; |
| | return $self; |
| | } # End of PDL::Transform::larr::new()... |
| | |
| | 1; |
| | #line 477 "Proj4.pd" |
| | #line 8544 "Proj4.pm" |
| | |
| | #line 433 "Proj4.pd" |
| | |
| | #line 379 "Proj4.pd" |
| | # Autogenerated code for the Proj4 projection code: |
| | # lask |
| | # |
| | package PDL::Transform::Proj4::lask; |
| | use strict; |
| | use warnings; |
| | our @ISA = ( 'PDL::Transform::Proj4' ); |
| | |
| | sub new |
| | { |
| | my $proto = shift; |
| | my $class = ref($proto) || $proto; |
| | my $sub = "PDL::Transform::Proj4::lask::new()"; |
| | #print STDERR "$sub: ARGS: [" . join(", ", @_ ) . "]\n"; |
| | my $self = $class->SUPER::new( @_ ); |
| | bless ($self, $class); |
| | my $o = $_[0]; |
| | unless( (ref $o) ) |
| | { $o = {@_}; } |
| | #use Data::Dumper; |
| | #my $dd2 = Data::Dumper->new( [$o], ["$sub: o"] ); |
| | #$dd2->Indent(1); |
| | #print STDERR $dd2->Dump(); |
| | $self->{name} = "Laskowski"; |
| | $self->{proj_code} = "lask"; |
| | # Make sure proj is set in the options: |
| | $self->{params}->{proj} = $self->{proj_code}; |
| | # Grab our projection specific options: |
| | # |
| | $self->{projection_params} = [ qw( ) ]; |
| | foreach my $param ( @{ $self->{projection_params} } ) |
| | { $self->{params}->{$param} = PDL::Transform::_opt( $o, [ $param ] ); } |
| | $self->update_proj_string(); |
| | #my $dd = Data::Dumper->new( [$self->{params}], ["$sub: params"] ); |
| | #$dd->Indent(1); |
| | #print STDERR $dd->Dump(); |
| | #print STDERR "$sub: Final proj_params: \'" . $self->{params}->{proj_params} |
| | . "\'\n"; |
| | return $self; |
| | } # End of PDL::Transform::lask::new()... |
| | |
| | 1; |
| | #line 477 "Proj4.pd" |
| | #line 8594 "Proj4.pm" |
| | |
| | #line 433 "Proj4.pd" |
| | |
| | #line 379 "Proj4.pd" |
| | # Autogenerated code for the Proj4 projection code: |
| | # latlon |
| | # |
| | package PDL::Transform::Proj4::latlon; |
| | use strict; |
| | use warnings; |
| | our @ISA = ( 'PDL::Transform::Proj4' ); |
| | |
| | sub new |
| | { |
| | my $proto = shift; |
| | my $class = ref($proto) || $proto; |
| | my $sub = "PDL::Transform::Proj4::latlon::new()"; |
| | #print STDERR "$sub: ARGS: [" . join(", ", @_ ) . "]\n"; |
| | my $self = $class->SUPER::new( @_ ); |
| | bless ($self, $class); |
| | my $o = $_[0]; |
| | unless( (ref $o) ) |
| | { $o = {@_}; } |
| | #use Data::Dumper; |
| | #my $dd2 = Data::Dumper->new( [$o], ["$sub: o"] ); |
| | #$dd2->Indent(1); |
| | #print STDERR $dd2->Dump(); |
| | $self->{name} = "Lat/long (Geodetic alias)"; |
| | $self->{proj_code} = "latlon"; |
| | # Make sure proj is set in the options: |
| | $self->{params}->{proj} = $self->{proj_code}; |
| | # Grab our projection specific options: |
| | # |
| | $self->{projection_params} = [ qw( ) ]; |
| | foreach my $param ( @{ $self->{projection_params} } ) |
| | { $self->{params}->{$param} = PDL::Transform::_opt( $o, [ $param ] ); } |
| | $self->update_proj_string(); |
| | #my $dd = Data::Dumper->new( [$self->{params}], ["$sub: params"] ); |
| | #$dd->Indent(1); |
| | #print STDERR $dd->Dump(); |
| | #print STDERR "$sub: Final proj_params: \'" . $self->{params}->{proj_params} |
| | . "\'\n"; |
| | return $self; |
| | } # End of PDL::Transform::latlon::new()... |
| | |
| | 1; |
| | #line 477 "Proj4.pd" |
| | #line 8644 "Proj4.pm" |
| | |
| | #line 433 "Proj4.pd" |
| | |
| | #line 379 "Proj4.pd" |
| | # Autogenerated code for the Proj4 projection code: |
| | # latlong |
| | # |
| | package PDL::Transform::Proj4::latlong; |
| | use strict; |
| | use warnings; |
| | our @ISA = ( 'PDL::Transform::Proj4' ); |
| | |
| | sub new |
| | { |
| | my $proto = shift; |
| | my $class = ref($proto) || $proto; |
| | my $sub = "PDL::Transform::Proj4::latlong::new()"; |
| | #print STDERR "$sub: ARGS: [" . join(", ", @_ ) . "]\n"; |
| | my $self = $class->SUPER::new( @_ ); |
| | bless ($self, $class); |
| | my $o = $_[0]; |
| | unless( (ref $o) ) |
| | { $o = {@_}; } |
| | #use Data::Dumper; |
| | #my $dd2 = Data::Dumper->new( [$o], ["$sub: o"] ); |
| | #$dd2->Indent(1); |
| | #print STDERR $dd2->Dump(); |
| | $self->{name} = "Lat/long (Geodetic alias)"; |
| | $self->{proj_code} = "latlong"; |
| | # Make sure proj is set in the options: |
| | $self->{params}->{proj} = $self->{proj_code}; |
| | # Grab our projection specific options: |
| | # |
| | $self->{projection_params} = [ qw( ) ]; |
| | foreach my $param ( @{ $self->{projection_params} } ) |
| | { $self->{params}->{$param} = PDL::Transform::_opt( $o, [ $param ] ); } |
| | $self->update_proj_string(); |
| | #my $dd = Data::Dumper->new( [$self->{params}], ["$sub: params"] ); |
| | #$dd->Indent(1); |
| | #print STDERR $dd->Dump(); |
| | #print STDERR "$sub: Final proj_params: \'" . $self->{params}->{proj_params} |
| | . "\'\n"; |
| | return $self; |
| | } # End of PDL::Transform::latlong::new()... |
| | |
| | 1; |
| | #line 477 "Proj4.pd" |
| | #line 8694 "Proj4.pm" |
| | |
| | #line 433 "Proj4.pd" |
| | |
| | #line 379 "Proj4.pd" |
| | # Autogenerated code for the Proj4 projection code: |
| | # lcc |
| | # |
| | package PDL::Transform::Proj4::lcc; |
| | use strict; |
| | use warnings; |
| | our @ISA = ( 'PDL::Transform::Proj4' ); |
| | |
| | sub new |
| | { |
| | my $proto = shift; |
| | my $class = ref($proto) || $proto; |
| | my $sub = "PDL::Transform::Proj4::lcc::new()"; |
| | #print STDERR "$sub: ARGS: [" . join(", ", @_ ) . "]\n"; |
| | my $self = $class->SUPER::new( @_ ); |
| | bless ($self, $class); |
| | my $o = $_[0]; |
| | unless( (ref $o) ) |
| | { $o = {@_}; } |
| | #use Data::Dumper; |
| | #my $dd2 = Data::Dumper->new( [$o], ["$sub: o"] ); |
| | #$dd2->Indent(1); |
| | #print STDERR $dd2->Dump(); |
| | $self->{name} = "Lambert Conformal Conic"; |
| | $self->{proj_code} = "lcc"; |
| | # Make sure proj is set in the options: |
| | $self->{params}->{proj} = $self->{proj_code}; |
| | # Grab our projection specific options: |
| | # |
| | $self->{projection_params} = [ qw( lat_1 lat_2 lat_0 k_0 ) ]; |
| | foreach my $param ( @{ $self->{projection_params} } ) |
| | { $self->{params}->{$param} = PDL::Transform::_opt( $o, [ $param ] ); } |
| | $self->update_proj_string(); |
| | #my $dd = Data::Dumper->new( [$self->{params}], ["$sub: params"] ); |
| | #$dd->Indent(1); |
| | #print STDERR $dd->Dump(); |
| | #print STDERR "$sub: Final proj_params: \'" . $self->{params}->{proj_params} |
| | . "\'\n"; |
| | return $self; |
| | } # End of PDL::Transform::lcc::new()... |
| | |
| | 1; |
| | #line 477 "Proj4.pd" |
| | #line 8744 "Proj4.pm" |
| | |
| | #line 433 "Proj4.pd" |
| | |
| | #line 379 "Proj4.pd" |
| | # Autogenerated code for the Proj4 projection code: |
| | # lcca |
| | # |
| | package PDL::Transform::Proj4::lcca; |
| | use strict; |
| | use warnings; |
| | our @ISA = ( 'PDL::Transform::Proj4' ); |
| | |
| | sub new |
| | { |
| | my $proto = shift; |
| | my $class = ref($proto) || $proto; |
| | my $sub = "PDL::Transform::Proj4::lcca::new()"; |
| | #print STDERR "$sub: ARGS: [" . join(", ", @_ ) . "]\n"; |
| | my $self = $class->SUPER::new( @_ ); |
| | bless ($self, $class); |
| | my $o = $_[0]; |
| | unless( (ref $o) ) |
| | { $o = {@_}; } |
| | #use Data::Dumper; |
| | #my $dd2 = Data::Dumper->new( [$o], ["$sub: o"] ); |
| | #$dd2->Indent(1); |
| | #print STDERR $dd2->Dump(); |
| | $self->{name} = "Lambert Conformal Conic Alternative"; |
| | $self->{proj_code} = "lcca"; |
| | # Make sure proj is set in the options: |
| | $self->{params}->{proj} = $self->{proj_code}; |
| | # Grab our projection specific options: |
| | # |
| | $self->{projection_params} = [ qw( lat_0 ) ]; |
| | foreach my $param ( @{ $self->{projection_params} } ) |
| | { $self->{params}->{$param} = PDL::Transform::_opt( $o, [ $param ] ); } |
| | $self->update_proj_string(); |
| | #my $dd = Data::Dumper->new( [$self->{params}], ["$sub: params"] ); |
| | #$dd->Indent(1); |
| | #print STDERR $dd->Dump(); |
| | #print STDERR "$sub: Final proj_params: \'" . $self->{params}->{proj_params} |
| | . "\'\n"; |
| | return $self; |
| | } # End of PDL::Transform::lcca::new()... |
| | |
| | 1; |
| | #line 477 "Proj4.pd" |
| | #line 8794 "Proj4.pm" |
| | |
| | #line 433 "Proj4.pd" |
| | |
| | #line 379 "Proj4.pd" |
| | # Autogenerated code for the Proj4 projection code: |
| | # leac |
| | # |
| | package PDL::Transform::Proj4::leac; |
| | use strict; |
| | use warnings; |
| | our @ISA = ( 'PDL::Transform::Proj4' ); |
| | |
| | sub new |
| | { |
| | my $proto = shift; |
| | my $class = ref($proto) || $proto; |
| | my $sub = "PDL::Transform::Proj4::leac::new()"; |
| | #print STDERR "$sub: ARGS: [" . join(", ", @_ ) . "]\n"; |
| | my $self = $class->SUPER::new( @_ ); |
| | bless ($self, $class); |
| | my $o = $_[0]; |
| | unless( (ref $o) ) |
| | { $o = {@_}; } |
| | #use Data::Dumper; |
| | #my $dd2 = Data::Dumper->new( [$o], ["$sub: o"] ); |
| | #$dd2->Indent(1); |
| | #print STDERR $dd2->Dump(); |
| | $self->{name} = "Lambert Equal Area Conic"; |
| | $self->{proj_code} = "leac"; |
| | # Make sure proj is set in the options: |
| | $self->{params}->{proj} = $self->{proj_code}; |
| | # Grab our projection specific options: |
| | # |
| | $self->{projection_params} = [ qw( lat_1 south ) ]; |
| | foreach my $param ( @{ $self->{projection_params} } ) |
| | { $self->{params}->{$param} = PDL::Transform::_opt( $o, [ $param ] ); } |
| | $self->update_proj_string(); |
| | #my $dd = Data::Dumper->new( [$self->{params}], ["$sub: params"] ); |
| | #$dd->Indent(1); |
| | #print STDERR $dd->Dump(); |
| | #print STDERR "$sub: Final proj_params: \'" . $self->{params}->{proj_params} |
| | . "\'\n"; |
| | return $self; |
| | } # End of PDL::Transform::leac::new()... |
| | |
| | 1; |
| | #line 477 "Proj4.pd" |
| | #line 8844 "Proj4.pm" |
| | |
| | #line 433 "Proj4.pd" |
| | |
| | #line 379 "Proj4.pd" |
| | # Autogenerated code for the Proj4 projection code: |
| | # lee_os |
| | # |
| | package PDL::Transform::Proj4::lee_os; |
| | use strict; |
| | use warnings; |
| | our @ISA = ( 'PDL::Transform::Proj4' ); |
| | |
| | sub new |
| | { |
| | my $proto = shift; |
| | my $class = ref($proto) || $proto; |
| | my $sub = "PDL::Transform::Proj4::lee_os::new()"; |
| | #print STDERR "$sub: ARGS: [" . join(", ", @_ ) . "]\n"; |
| | my $self = $class->SUPER::new( @_ ); |
| | bless ($self, $class); |
| | my $o = $_[0]; |
| | unless( (ref $o) ) |
| | { $o = {@_}; } |
| | #use Data::Dumper; |
| | #my $dd2 = Data::Dumper->new( [$o], ["$sub: o"] ); |
| | #$dd2->Indent(1); |
| | #print STDERR $dd2->Dump(); |
| | $self->{name} = "Lee Oblated Stereographic"; |
| | $self->{proj_code} = "lee_os"; |
| | # Make sure proj is set in the options: |
| | $self->{params}->{proj} = $self->{proj_code}; |
| | # Grab our projection specific options: |
| | # |
| | $self->{projection_params} = [ qw( ) ]; |
| | foreach my $param ( @{ $self->{projection_params} } ) |
| | { $self->{params}->{$param} = PDL::Transform::_opt( $o, [ $param ] ); } |
| | $self->update_proj_string(); |
| | #my $dd = Data::Dumper->new( [$self->{params}], ["$sub: params"] ); |
| | #$dd->Indent(1); |
| | #print STDERR $dd->Dump(); |
| | #print STDERR "$sub: Final proj_params: \'" . $self->{params}->{proj_params} |
| | . "\'\n"; |
| | return $self; |
| | } # End of PDL::Transform::lee_os::new()... |
| | |
| | 1; |
| | #line 477 "Proj4.pd" |
| | #line 8894 "Proj4.pm" |
| | |
| | #line 433 "Proj4.pd" |
| | |
| | #line 379 "Proj4.pd" |
| | # Autogenerated code for the Proj4 projection code: |
| | # longlat |
| | # |
| | package PDL::Transform::Proj4::longlat; |
| | use strict; |
| | use warnings; |
| | our @ISA = ( 'PDL::Transform::Proj4' ); |
| | |
| | sub new |
| | { |
| | my $proto = shift; |
| | my $class = ref($proto) || $proto; |
| | my $sub = "PDL::Transform::Proj4::longlat::new()"; |
| | #print STDERR "$sub: ARGS: [" . join(", ", @_ ) . "]\n"; |
| | my $self = $class->SUPER::new( @_ ); |
| | bless ($self, $class); |
| | my $o = $_[0]; |
| | unless( (ref $o) ) |
| | { $o = {@_}; } |
| | #use Data::Dumper; |
| | #my $dd2 = Data::Dumper->new( [$o], ["$sub: o"] ); |
| | #$dd2->Indent(1); |
| | #print STDERR $dd2->Dump(); |
| | $self->{name} = "Lat/long (Geodetic alias)"; |
| | $self->{proj_code} = "longlat"; |
| | # Make sure proj is set in the options: |
| | $self->{params}->{proj} = $self->{proj_code}; |
| | # Grab our projection specific options: |
| | # |
| | $self->{projection_params} = [ qw( ) ]; |
| | foreach my $param ( @{ $self->{projection_params} } ) |
| | { $self->{params}->{$param} = PDL::Transform::_opt( $o, [ $param ] ); } |
| | $self->update_proj_string(); |
| | #my $dd = Data::Dumper->new( [$self->{params}], ["$sub: params"] ); |
| | #$dd->Indent(1); |
| | #print STDERR $dd->Dump(); |
| | #print STDERR "$sub: Final proj_params: \'" . $self->{params}->{proj_params} |
| | . "\'\n"; |
| | return $self; |
| | } # End of PDL::Transform::longlat::new()... |
| | |
| | 1; |
| | #line 477 "Proj4.pd" |
| | #line 8944 "Proj4.pm" |
| | |
| | #line 433 "Proj4.pd" |
| | |
| | #line 379 "Proj4.pd" |
| | # Autogenerated code for the Proj4 projection code: |
| | # lonlat |
| | # |
| | package PDL::Transform::Proj4::lonlat; |
| | use strict; |
| | use warnings; |
| | our @ISA = ( 'PDL::Transform::Proj4' ); |
| | |
| | sub new |
| | { |
| | my $proto = shift; |
| | my $class = ref($proto) || $proto; |
| | my $sub = "PDL::Transform::Proj4::lonlat::new()"; |
| | #print STDERR "$sub: ARGS: [" . join(", ", @_ ) . "]\n"; |
| | my $self = $class->SUPER::new( @_ ); |
| | bless ($self, $class); |
| | my $o = $_[0]; |
| | unless( (ref $o) ) |
| | { $o = {@_}; } |
| | #use Data::Dumper; |
| | #my $dd2 = Data::Dumper->new( [$o], ["$sub: o"] ); |
| | #$dd2->Indent(1); |
| | #print STDERR $dd2->Dump(); |
| | $self->{name} = "Lat/long (Geodetic)"; |
| | $self->{proj_code} = "lonlat"; |
| | # Make sure proj is set in the options: |
| | $self->{params}->{proj} = $self->{proj_code}; |
| | # Grab our projection specific options: |
| | # |
| | $self->{projection_params} = [ qw( ) ]; |
| | foreach my $param ( @{ $self->{projection_params} } ) |
| | { $self->{params}->{$param} = PDL::Transform::_opt( $o, [ $param ] ); } |
| | $self->update_proj_string(); |
| | #my $dd = Data::Dumper->new( [$self->{params}], ["$sub: params"] ); |
| | #$dd->Indent(1); |
| | #print STDERR $dd->Dump(); |
| | #print STDERR "$sub: Final proj_params: \'" . $self->{params}->{proj_params} |
| | . "\'\n"; |
| | return $self; |
| | } # End of PDL::Transform::lonlat::new()... |
| | |
| | 1; |
| | #line 477 "Proj4.pd" |
| | #line 8994 "Proj4.pm" |
| | |
| | #line 433 "Proj4.pd" |
| | |
| | #line 379 "Proj4.pd" |
| | # Autogenerated code for the Proj4 projection code: |
| | # loxim |
| | # |
| | package PDL::Transform::Proj4::loxim; |
| | use strict; |
| | use warnings; |
| | our @ISA = ( 'PDL::Transform::Proj4' ); |
| | |
| | sub new |
| | { |
| | my $proto = shift; |
| | my $class = ref($proto) || $proto; |
| | my $sub = "PDL::Transform::Proj4::loxim::new()"; |
| | #print STDERR "$sub: ARGS: [" . join(", ", @_ ) . "]\n"; |
| | my $self = $class->SUPER::new( @_ ); |
| | bless ($self, $class); |
| | my $o = $_[0]; |
| | unless( (ref $o) ) |
| | { $o = {@_}; } |
| | #use Data::Dumper; |
| | #my $dd2 = Data::Dumper->new( [$o], ["$sub: o"] ); |
| | #$dd2->Indent(1); |
| | #print STDERR $dd2->Dump(); |
| | $self->{name} = "Loximuthal"; |
| | $self->{proj_code} = "loxim"; |
| | # Make sure proj is set in the options: |
| | $self->{params}->{proj} = $self->{proj_code}; |
| | # Grab our projection specific options: |
| | # |
| | $self->{projection_params} = [ qw( ) ]; |
| | foreach my $param ( @{ $self->{projection_params} } ) |
| | { $self->{params}->{$param} = PDL::Transform::_opt( $o, [ $param ] ); } |
| | $self->update_proj_string(); |
| | #my $dd = Data::Dumper->new( [$self->{params}], ["$sub: params"] ); |
| | #$dd->Indent(1); |
| | #print STDERR $dd->Dump(); |
| | #print STDERR "$sub: Final proj_params: \'" . $self->{params}->{proj_params} |
| | . "\'\n"; |
| | return $self; |
| | } # End of PDL::Transform::loxim::new()... |
| | |
| | 1; |
| | #line 477 "Proj4.pd" |
| | #line 9044 "Proj4.pm" |
| | |
| | #line 433 "Proj4.pd" |
| | |
| | #line 379 "Proj4.pd" |
| | # Autogenerated code for the Proj4 projection code: |
| | # lsat |
| | # |
| | package PDL::Transform::Proj4::lsat; |
| | use strict; |
| | use warnings; |
| | our @ISA = ( 'PDL::Transform::Proj4' ); |
| | |
| | sub new |
| | { |
| | my $proto = shift; |
| | my $class = ref($proto) || $proto; |
| | my $sub = "PDL::Transform::Proj4::lsat::new()"; |
| | #print STDERR "$sub: ARGS: [" . join(", ", @_ ) . "]\n"; |
| | my $self = $class->SUPER::new( @_ ); |
| | bless ($self, $class); |
| | my $o = $_[0]; |
| | unless( (ref $o) ) |
| | { $o = {@_}; } |
| | #use Data::Dumper; |
| | #my $dd2 = Data::Dumper->new( [$o], ["$sub: o"] ); |
| | #$dd2->Indent(1); |
| | #print STDERR $dd2->Dump(); |
| | $self->{name} = "Space oblique for LANDSAT"; |
| | $self->{proj_code} = "lsat"; |
| | # Make sure proj is set in the options: |
| | $self->{params}->{proj} = $self->{proj_code}; |
| | # Grab our projection specific options: |
| | # |
| | $self->{projection_params} = [ qw( lsat path ) ]; |
| | foreach my $param ( @{ $self->{projection_params} } ) |
| | { $self->{params}->{$param} = PDL::Transform::_opt( $o, [ $param ] ); } |
| | $self->update_proj_string(); |
| | #my $dd = Data::Dumper->new( [$self->{params}], ["$sub: params"] ); |
| | #$dd->Indent(1); |
| | #print STDERR $dd->Dump(); |
| | #print STDERR "$sub: Final proj_params: \'" . $self->{params}->{proj_params} |
| | . "\'\n"; |
| | return $self; |
| | } # End of PDL::Transform::lsat::new()... |
| | |
| | 1; |
| | #line 477 "Proj4.pd" |
| | #line 9094 "Proj4.pm" |
| | |
| | #line 433 "Proj4.pd" |
| | |
| | #line 379 "Proj4.pd" |
| | # Autogenerated code for the Proj4 projection code: |
| | # mbt_fps |
| | # |
| | package PDL::Transform::Proj4::mbt_fps; |
| | use strict; |
| | use warnings; |
| | our @ISA = ( 'PDL::Transform::Proj4' ); |
| | |
| | sub new |
| | { |
| | my $proto = shift; |
| | my $class = ref($proto) || $proto; |
| | my $sub = "PDL::Transform::Proj4::mbt_fps::new()"; |
| | #print STDERR "$sub: ARGS: [" . join(", ", @_ ) . "]\n"; |
| | my $self = $class->SUPER::new( @_ ); |
| | bless ($self, $class); |
| | my $o = $_[0]; |
| | unless( (ref $o) ) |
| | { $o = {@_}; } |
| | #use Data::Dumper; |
| | #my $dd2 = Data::Dumper->new( [$o], ["$sub: o"] ); |
| | #$dd2->Indent(1); |
| | #print STDERR $dd2->Dump(); |
| | $self->{name} = "McBryde-Thomas Flat-Pole Sine (No. 2)"; |
| | $self->{proj_code} = "mbt_fps"; |
| | # Make sure proj is set in the options: |
| | $self->{params}->{proj} = $self->{proj_code}; |
| | # Grab our projection specific options: |
| | # |
| | $self->{projection_params} = [ qw( ) ]; |
| | foreach my $param ( @{ $self->{projection_params} } ) |
| | { $self->{params}->{$param} = PDL::Transform::_opt( $o, [ $param ] ); } |
| | $self->update_proj_string(); |
| | #my $dd = Data::Dumper->new( [$self->{params}], ["$sub: params"] ); |
| | #$dd->Indent(1); |
| | #print STDERR $dd->Dump(); |
| | #print STDERR "$sub: Final proj_params: \'" . $self->{params}->{proj_params} |
| | . "\'\n"; |
| | return $self; |
| | } # End of PDL::Transform::mbt_fps::new()... |
| | |
| | 1; |
| | #line 477 "Proj4.pd" |
| | #line 9144 "Proj4.pm" |
| | |
| | #line 433 "Proj4.pd" |
| | |
| | #line 379 "Proj4.pd" |
| | # Autogenerated code for the Proj4 projection code: |
| | # mbt_s |
| | # |
| | package PDL::Transform::Proj4::mbt_s; |
| | use strict; |
| | use warnings; |
| | our @ISA = ( 'PDL::Transform::Proj4' ); |
| | |
| | sub new |
| | { |
| | my $proto = shift; |
| | my $class = ref($proto) || $proto; |
| | my $sub = "PDL::Transform::Proj4::mbt_s::new()"; |
| | #print STDERR "$sub: ARGS: [" . join(", ", @_ ) . "]\n"; |
| | my $self = $class->SUPER::new( @_ ); |
| | bless ($self, $class); |
| | my $o = $_[0]; |
| | unless( (ref $o) ) |
| | { $o = {@_}; } |
| | #use Data::Dumper; |
| | #my $dd2 = Data::Dumper->new( [$o], ["$sub: o"] ); |
| | #$dd2->Indent(1); |
| | #print STDERR $dd2->Dump(); |
| | $self->{name} = "McBryde-Thomas Flat-Polar Sine (No. 1)"; |
| | $self->{proj_code} = "mbt_s"; |
| | # Make sure proj is set in the options: |
| | $self->{params}->{proj} = $self->{proj_code}; |
| | # Grab our projection specific options: |
| | # |
| | $self->{projection_params} = [ qw( ) ]; |
| | foreach my $param ( @{ $self->{projection_params} } ) |
| | { $self->{params}->{$param} = PDL::Transform::_opt( $o, [ $param ] ); } |
| | $self->update_proj_string(); |
| | #my $dd = Data::Dumper->new( [$self->{params}], ["$sub: params"] ); |
| | #$dd->Indent(1); |
| | #print STDERR $dd->Dump(); |
| | #print STDERR "$sub: Final proj_params: \'" . $self->{params}->{proj_params} |
| | . "\'\n"; |
| | return $self; |
| | } # End of PDL::Transform::mbt_s::new()... |
| | |
| | 1; |
| | #line 477 "Proj4.pd" |
| | #line 9194 "Proj4.pm" |
| | |
| | #line 433 "Proj4.pd" |
| | |
| | #line 379 "Proj4.pd" |
| | # Autogenerated code for the Proj4 projection code: |
| | # mbtfpp |
| | # |
| | package PDL::Transform::Proj4::mbtfpp; |
| | use strict; |
| | use warnings; |
| | our @ISA = ( 'PDL::Transform::Proj4' ); |
| | |
| | sub new |
| | { |
| | my $proto = shift; |
| | my $class = ref($proto) || $proto; |
| | my $sub = "PDL::Transform::Proj4::mbtfpp::new()"; |
| | #print STDERR "$sub: ARGS: [" . join(", ", @_ ) . "]\n"; |
| | my $self = $class->SUPER::new( @_ ); |
| | bless ($self, $class); |
| | my $o = $_[0]; |
| | unless( (ref $o) ) |
| | { $o = {@_}; } |
| | #use Data::Dumper; |
| | #my $dd2 = Data::Dumper->new( [$o], ["$sub: o"] ); |
| | #$dd2->Indent(1); |
| | #print STDERR $dd2->Dump(); |
| | $self->{name} = "McBride-Thomas Flat-Polar Parabolic"; |
| | $self->{proj_code} = "mbtfpp"; |
| | # Make sure proj is set in the options: |
| | $self->{params}->{proj} = $self->{proj_code}; |
| | # Grab our projection specific options: |
| | # |
| | $self->{projection_params} = [ qw( ) ]; |
| | foreach my $param ( @{ $self->{projection_params} } ) |
| | { $self->{params}->{$param} = PDL::Transform::_opt( $o, [ $param ] ); } |
| | $self->update_proj_string(); |
| | #my $dd = Data::Dumper->new( [$self->{params}], ["$sub: params"] ); |
| | #$dd->Indent(1); |
| | #print STDERR $dd->Dump(); |
| | #print STDERR "$sub: Final proj_params: \'" . $self->{params}->{proj_params} |
| | . "\'\n"; |
| | return $self; |
| | } # End of PDL::Transform::mbtfpp::new()... |
| | |
| | 1; |
| | #line 477 "Proj4.pd" |
| | #line 9244 "Proj4.pm" |
| | |
| | #line 433 "Proj4.pd" |
| | |
| | #line 379 "Proj4.pd" |
| | # Autogenerated code for the Proj4 projection code: |
| | # mbtfpq |
| | # |
| | package PDL::Transform::Proj4::mbtfpq; |
| | use strict; |
| | use warnings; |
| | our @ISA = ( 'PDL::Transform::Proj4' ); |
| | |
| | sub new |
| | { |
| | my $proto = shift; |
| | my $class = ref($proto) || $proto; |
| | my $sub = "PDL::Transform::Proj4::mbtfpq::new()"; |
| | #print STDERR "$sub: ARGS: [" . join(", ", @_ ) . "]\n"; |
| | my $self = $class->SUPER::new( @_ ); |
| | bless ($self, $class); |
| | my $o = $_[0]; |
| | unless( (ref $o) ) |
| | { $o = {@_}; } |
| | #use Data::Dumper; |
| | #my $dd2 = Data::Dumper->new( [$o], ["$sub: o"] ); |
| | #$dd2->Indent(1); |
| | #print STDERR $dd2->Dump(); |
| | $self->{name} = "McBryde-Thomas Flat-Polar Quartic"; |
| | $self->{proj_code} = "mbtfpq"; |
| | # Make sure proj is set in the options: |
| | $self->{params}->{proj} = $self->{proj_code}; |
| | # Grab our projection specific options: |
| | # |
| | $self->{projection_params} = [ qw( ) ]; |
| | foreach my $param ( @{ $self->{projection_params} } ) |
| | { $self->{params}->{$param} = PDL::Transform::_opt( $o, [ $param ] ); } |
| | $self->update_proj_string(); |
| | #my $dd = Data::Dumper->new( [$self->{params}], ["$sub: params"] ); |
| | #$dd->Indent(1); |
| | #print STDERR $dd->Dump(); |
| | #print STDERR "$sub: Final proj_params: \'" . $self->{params}->{proj_params} |
| | . "\'\n"; |
| | return $self; |
| | } # End of PDL::Transform::mbtfpq::new()... |
| | |
| | 1; |
| | #line 477 "Proj4.pd" |
| | #line 9294 "Proj4.pm" |
| | |
| | #line 433 "Proj4.pd" |
| | |
| | #line 379 "Proj4.pd" |
| | # Autogenerated code for the Proj4 projection code: |
| | # mbtfps |
| | # |
| | package PDL::Transform::Proj4::mbtfps; |
| | use strict; |
| | use warnings; |
| | our @ISA = ( 'PDL::Transform::Proj4' ); |
| | |
| | sub new |
| | { |
| | my $proto = shift; |
| | my $class = ref($proto) || $proto; |
| | my $sub = "PDL::Transform::Proj4::mbtfps::new()"; |
| | #print STDERR "$sub: ARGS: [" . join(", ", @_ ) . "]\n"; |
| | my $self = $class->SUPER::new( @_ ); |
| | bless ($self, $class); |
| | my $o = $_[0]; |
| | unless( (ref $o) ) |
| | { $o = {@_}; } |
| | #use Data::Dumper; |
| | #my $dd2 = Data::Dumper->new( [$o], ["$sub: o"] ); |
| | #$dd2->Indent(1); |
| | #print STDERR $dd2->Dump(); |
| | $self->{name} = "McBryde-Thomas Flat-Polar Sinusoidal"; |
| | $self->{proj_code} = "mbtfps"; |
| | # Make sure proj is set in the options: |
| | $self->{params}->{proj} = $self->{proj_code}; |
| | # Grab our projection specific options: |
| | # |
| | $self->{projection_params} = [ qw( ) ]; |
| | foreach my $param ( @{ $self->{projection_params} } ) |
| | { $self->{params}->{$param} = PDL::Transform::_opt( $o, [ $param ] ); } |
| | $self->update_proj_string(); |
| | #my $dd = Data::Dumper->new( [$self->{params}], ["$sub: params"] ); |
| | #$dd->Indent(1); |
| | #print STDERR $dd->Dump(); |
| | #print STDERR "$sub: Final proj_params: \'" . $self->{params}->{proj_params} |
| | . "\'\n"; |
| | return $self; |
| | } # End of PDL::Transform::mbtfps::new()... |
| | |
| | 1; |
| | #line 477 "Proj4.pd" |
| | #line 9344 "Proj4.pm" |
| | |
| | #line 433 "Proj4.pd" |
| | |
| | #line 379 "Proj4.pd" |
| | # Autogenerated code for the Proj4 projection code: |
| | # merc |
| | # |
| | package PDL::Transform::Proj4::merc; |
| | use strict; |
| | use warnings; |
| | our @ISA = ( 'PDL::Transform::Proj4' ); |
| | |
| | sub new |
| | { |
| | my $proto = shift; |
| | my $class = ref($proto) || $proto; |
| | my $sub = "PDL::Transform::Proj4::merc::new()"; |
| | #print STDERR "$sub: ARGS: [" . join(", ", @_ ) . "]\n"; |
| | my $self = $class->SUPER::new( @_ ); |
| | bless ($self, $class); |
| | my $o = $_[0]; |
| | unless( (ref $o) ) |
| | { $o = {@_}; } |
| | #use Data::Dumper; |
| | #my $dd2 = Data::Dumper->new( [$o], ["$sub: o"] ); |
| | #$dd2->Indent(1); |
| | #print STDERR $dd2->Dump(); |
| | $self->{name} = "Mercator"; |
| | $self->{proj_code} = "merc"; |
| | # Make sure proj is set in the options: |
| | $self->{params}->{proj} = $self->{proj_code}; |
| | # Grab our projection specific options: |
| | # |
| | $self->{projection_params} = [ qw( lat_ts ) ]; |
| | foreach my $param ( @{ $self->{projection_params} } ) |
| | { $self->{params}->{$param} = PDL::Transform::_opt( $o, [ $param ] ); } |
| | $self->update_proj_string(); |
| | #my $dd = Data::Dumper->new( [$self->{params}], ["$sub: params"] ); |
| | #$dd->Indent(1); |
| | #print STDERR $dd->Dump(); |
| | #print STDERR "$sub: Final proj_params: \'" . $self->{params}->{proj_params} |
| | . "\'\n"; |
| | return $self; |
| | } # End of PDL::Transform::merc::new()... |
| | |
| | 1; |
| | #line 477 "Proj4.pd" |
| | #line 9394 "Proj4.pm" |
| | |
| | #line 433 "Proj4.pd" |
| | |
| | #line 379 "Proj4.pd" |
| | # Autogenerated code for the Proj4 projection code: |
| | # mil_os |
| | # |
| | package PDL::Transform::Proj4::mil_os; |
| | use strict; |
| | use warnings; |
| | our @ISA = ( 'PDL::Transform::Proj4' ); |
| | |
| | sub new |
| | { |
| | my $proto = shift; |
| | my $class = ref($proto) || $proto; |
| | my $sub = "PDL::Transform::Proj4::mil_os::new()"; |
| | #print STDERR "$sub: ARGS: [" . join(", ", @_ ) . "]\n"; |
| | my $self = $class->SUPER::new( @_ ); |
| | bless ($self, $class); |
| | my $o = $_[0]; |
| | unless( (ref $o) ) |
| | { $o = {@_}; } |
| | #use Data::Dumper; |
| | #my $dd2 = Data::Dumper->new( [$o], ["$sub: o"] ); |
| | #$dd2->Indent(1); |
| | #print STDERR $dd2->Dump(); |
| | $self->{name} = "Miller Oblated Stereographic"; |
| | $self->{proj_code} = "mil_os"; |
| | # Make sure proj is set in the options: |
| | $self->{params}->{proj} = $self->{proj_code}; |
| | # Grab our projection specific options: |
| | # |
| | $self->{projection_params} = [ qw( ) ]; |
| | foreach my $param ( @{ $self->{projection_params} } ) |
| | { $self->{params}->{$param} = PDL::Transform::_opt( $o, [ $param ] ); } |
| | $self->update_proj_string(); |
| | #my $dd = Data::Dumper->new( [$self->{params}], ["$sub: params"] ); |
| | #$dd->Indent(1); |
| | #print STDERR $dd->Dump(); |
| | #print STDERR "$sub: Final proj_params: \'" . $self->{params}->{proj_params} |
| | . "\'\n"; |
| | return $self; |
| | } # End of PDL::Transform::mil_os::new()... |
| | |
| | 1; |
| | #line 477 "Proj4.pd" |
| | #line 9444 "Proj4.pm" |
| | |
| | #line 433 "Proj4.pd" |
| | |
| | #line 379 "Proj4.pd" |
| | # Autogenerated code for the Proj4 projection code: |
| | # mill |
| | # |
| | package PDL::Transform::Proj4::mill; |
| | use strict; |
| | use warnings; |
| | our @ISA = ( 'PDL::Transform::Proj4' ); |
| | |
| | sub new |
| | { |
| | my $proto = shift; |
| | my $class = ref($proto) || $proto; |
| | my $sub = "PDL::Transform::Proj4::mill::new()"; |
| | #print STDERR "$sub: ARGS: [" . join(", ", @_ ) . "]\n"; |
| | my $self = $class->SUPER::new( @_ ); |
| | bless ($self, $class); |
| | my $o = $_[0]; |
| | unless( (ref $o) ) |
| | { $o = {@_}; } |
| | #use Data::Dumper; |
| | #my $dd2 = Data::Dumper->new( [$o], ["$sub: o"] ); |
| | #$dd2->Indent(1); |
| | #print STDERR $dd2->Dump(); |
| | $self->{name} = "Miller Cylindrical"; |
| | $self->{proj_code} = "mill"; |
| | # Make sure proj is set in the options: |
| | $self->{params}->{proj} = $self->{proj_code}; |
| | # Grab our projection specific options: |
| | # |
| | $self->{projection_params} = [ qw( ) ]; |
| | foreach my $param ( @{ $self->{projection_params} } ) |
| | { $self->{params}->{$param} = PDL::Transform::_opt( $o, [ $param ] ); } |
| | $self->update_proj_string(); |
| | #my $dd = Data::Dumper->new( [$self->{params}], ["$sub: params"] ); |
| | #$dd->Indent(1); |
| | #print STDERR $dd->Dump(); |
| | #print STDERR "$sub: Final proj_params: \'" . $self->{params}->{proj_params} |
| | . "\'\n"; |
| | return $self; |
| | } # End of PDL::Transform::mill::new()... |
| | |
| | 1; |
| | #line 477 "Proj4.pd" |
| | #line 9494 "Proj4.pm" |
| | |
| | #line 433 "Proj4.pd" |
| | |
| | #line 379 "Proj4.pd" |
| | # Autogenerated code for the Proj4 projection code: |
| | # misrsom |
| | # |
| | package PDL::Transform::Proj4::misrsom; |
| | use strict; |
| | use warnings; |
| | our @ISA = ( 'PDL::Transform::Proj4' ); |
| | |
| | sub new |
| | { |
| | my $proto = shift; |
| | my $class = ref($proto) || $proto; |
| | my $sub = "PDL::Transform::Proj4::misrsom::new()"; |
| | #print STDERR "$sub: ARGS: [" . join(", ", @_ ) . "]\n"; |
| | my $self = $class->SUPER::new( @_ ); |
| | bless ($self, $class); |
| | my $o = $_[0]; |
| | unless( (ref $o) ) |
| | { $o = {@_}; } |
| | #use Data::Dumper; |
| | #my $dd2 = Data::Dumper->new( [$o], ["$sub: o"] ); |
| | #$dd2->Indent(1); |
| | #print STDERR $dd2->Dump(); |
| | $self->{name} = "Space oblique for MISR"; |
| | $self->{proj_code} = "misrsom"; |
| | # Make sure proj is set in the options: |
| | $self->{params}->{proj} = $self->{proj_code}; |
| | # Grab our projection specific options: |
| | # |
| | $self->{projection_params} = [ qw( path ) ]; |
| | foreach my $param ( @{ $self->{projection_params} } ) |
| | { $self->{params}->{$param} = PDL::Transform::_opt( $o, [ $param ] ); } |
| | $self->update_proj_string(); |
| | #my $dd = Data::Dumper->new( [$self->{params}], ["$sub: params"] ); |
| | #$dd->Indent(1); |
| | #print STDERR $dd->Dump(); |
| | #print STDERR "$sub: Final proj_params: \'" . $self->{params}->{proj_params} |
| | . "\'\n"; |
| | return $self; |
| | } # End of PDL::Transform::misrsom::new()... |
| | |
| | 1; |
| | #line 477 "Proj4.pd" |
| | #line 9544 "Proj4.pm" |
| | |
| | #line 433 "Proj4.pd" |
| | |
| | #line 379 "Proj4.pd" |
| | # Autogenerated code for the Proj4 projection code: |
| | # moll |
| | # |
| | package PDL::Transform::Proj4::moll; |
| | use strict; |
| | use warnings; |
| | our @ISA = ( 'PDL::Transform::Proj4' ); |
| | |
| | sub new |
| | { |
| | my $proto = shift; |
| | my $class = ref($proto) || $proto; |
| | my $sub = "PDL::Transform::Proj4::moll::new()"; |
| | #print STDERR "$sub: ARGS: [" . join(", ", @_ ) . "]\n"; |
| | my $self = $class->SUPER::new( @_ ); |
| | bless ($self, $class); |
| | my $o = $_[0]; |
| | unless( (ref $o) ) |
| | { $o = {@_}; } |
| | #use Data::Dumper; |
| | #my $dd2 = Data::Dumper->new( [$o], ["$sub: o"] ); |
| | #$dd2->Indent(1); |
| | #print STDERR $dd2->Dump(); |
| | $self->{name} = "Mollweide"; |
| | $self->{proj_code} = "moll"; |
| | # Make sure proj is set in the options: |
| | $self->{params}->{proj} = $self->{proj_code}; |
| | # Grab our projection specific options: |
| | # |
| | $self->{projection_params} = [ qw( ) ]; |
| | foreach my $param ( @{ $self->{projection_params} } ) |
| | { $self->{params}->{$param} = PDL::Transform::_opt( $o, [ $param ] ); } |
| | $self->update_proj_string(); |
| | #my $dd = Data::Dumper->new( [$self->{params}], ["$sub: params"] ); |
| | #$dd->Indent(1); |
| | #print STDERR $dd->Dump(); |
| | #print STDERR "$sub: Final proj_params: \'" . $self->{params}->{proj_params} |
| | . "\'\n"; |
| | return $self; |
| | } # End of PDL::Transform::moll::new()... |
| | |
| | 1; |
| | #line 477 "Proj4.pd" |
| | #line 9594 "Proj4.pm" |
| | |
| | #line 433 "Proj4.pd" |
| | |
| | #line 379 "Proj4.pd" |
| | # Autogenerated code for the Proj4 projection code: |
| | # molobadekas |
| | # |
| | package PDL::Transform::Proj4::molobadekas; |
| | use strict; |
| | use warnings; |
| | our @ISA = ( 'PDL::Transform::Proj4' ); |
| | |
| | sub new |
| | { |
| | my $proto = shift; |
| | my $class = ref($proto) || $proto; |
| | my $sub = "PDL::Transform::Proj4::molobadekas::new()"; |
| | #print STDERR "$sub: ARGS: [" . join(", ", @_ ) . "]\n"; |
| | my $self = $class->SUPER::new( @_ ); |
| | bless ($self, $class); |
| | my $o = $_[0]; |
| | unless( (ref $o) ) |
| | { $o = {@_}; } |
| | #use Data::Dumper; |
| | #my $dd2 = Data::Dumper->new( [$o], ["$sub: o"] ); |
| | #$dd2->Indent(1); |
| | #print STDERR $dd2->Dump(); |
| | $self->{name} = "Molodensky-Badekas transformation"; |
| | $self->{proj_code} = "molobadekas"; |
| | # Make sure proj is set in the options: |
| | $self->{params}->{proj} = $self->{proj_code}; |
| | # Grab our projection specific options: |
| | # |
| | $self->{projection_params} = [ qw( ) ]; |
| | foreach my $param ( @{ $self->{projection_params} } ) |
| | { $self->{params}->{$param} = PDL::Transform::_opt( $o, [ $param ] ); } |
| | $self->update_proj_string(); |
| | #my $dd = Data::Dumper->new( [$self->{params}], ["$sub: params"] ); |
| | #$dd->Indent(1); |
| | #print STDERR $dd->Dump(); |
| | #print STDERR "$sub: Final proj_params: \'" . $self->{params}->{proj_params} |
| | . "\'\n"; |
| | return $self; |
| | } # End of PDL::Transform::molobadekas::new()... |
| | |
| | 1; |
| | #line 477 "Proj4.pd" |
| | #line 9644 "Proj4.pm" |
| | |
| | #line 433 "Proj4.pd" |
| | |
| | #line 379 "Proj4.pd" |
| | # Autogenerated code for the Proj4 projection code: |
| | # molodensky |
| | # |
| | package PDL::Transform::Proj4::molodensky; |
| | use strict; |
| | use warnings; |
| | our @ISA = ( 'PDL::Transform::Proj4' ); |
| | |
| | sub new |
| | { |
| | my $proto = shift; |
| | my $class = ref($proto) || $proto; |
| | my $sub = "PDL::Transform::Proj4::molodensky::new()"; |
| | #print STDERR "$sub: ARGS: [" . join(", ", @_ ) . "]\n"; |
| | my $self = $class->SUPER::new( @_ ); |
| | bless ($self, $class); |
| | my $o = $_[0]; |
| | unless( (ref $o) ) |
| | { $o = {@_}; } |
| | #use Data::Dumper; |
| | #my $dd2 = Data::Dumper->new( [$o], ["$sub: o"] ); |
| | #$dd2->Indent(1); |
| | #print STDERR $dd2->Dump(); |
| | $self->{name} = "Molodensky transform"; |
| | $self->{proj_code} = "molodensky"; |
| | # Make sure proj is set in the options: |
| | $self->{params}->{proj} = $self->{proj_code}; |
| | # Grab our projection specific options: |
| | # |
| | $self->{projection_params} = [ qw( ) ]; |
| | foreach my $param ( @{ $self->{projection_params} } ) |
| | { $self->{params}->{$param} = PDL::Transform::_opt( $o, [ $param ] ); } |
| | $self->update_proj_string(); |
| | #my $dd = Data::Dumper->new( [$self->{params}], ["$sub: params"] ); |
| | #$dd->Indent(1); |
| | #print STDERR $dd->Dump(); |
| | #print STDERR "$sub: Final proj_params: \'" . $self->{params}->{proj_params} |
| | . "\'\n"; |
| | return $self; |
| | } # End of PDL::Transform::molodensky::new()... |
| | |
"Fossies" - the Fresh Open Source Software Archive 