diff options
Diffstat (limited to 'src/PJ_hatano.c')
| -rw-r--r-- | src/PJ_hatano.c | 37 |
1 files changed, 16 insertions, 21 deletions
diff --git a/src/PJ_hatano.c b/src/PJ_hatano.c index d75a96a3..be95fe73 100644 --- a/src/PJ_hatano.c +++ b/src/PJ_hatano.c @@ -71,19 +71,6 @@ static LP s_inverse (XY xy, PJ *P) { /* Spheroidal, inverse */ } -static void *freeup_new (PJ *P) { /* Destructor */ - if (0==P) - return 0; - - return pj_dealloc(P); -} - -static void freeup (PJ *P) { - freeup_new (P); - return; -} - - PJ *PROJECTION(hatano) { P->es = 0.; P->inv = s_inverse; @@ -110,10 +97,14 @@ int pj_hatano_selftest (void) { }; XY s_fwd_expect[] = { - { 189878.87894652804, 131409.8024406255
}, - { 189881.08195244463, -131409.14227607418
}, - {-189878.87894652804, 131409.8024406255
}, - {-189881.08195244463, -131409.14227607418
}, + { 189878.87894652804, 131409.8024406255 +}, + { 189881.08195244463, -131409.14227607418 +}, + {-189878.87894652804, 131409.8024406255 +}, + {-189881.08195244463, -131409.14227607418 +}, }; XY inv_in[] = { @@ -124,10 +115,14 @@ int pj_hatano_selftest (void) { }; LP s_inv_expect[] = { - { 0.0021064624821817597, 0.00076095689425791926
}, - { 0.0021064624821676096, -0.00076095777439265377
}, - {-0.0021064624821817597, 0.00076095689425791926
}, - {-0.0021064624821676096, -0.00076095777439265377
}, + { 0.0021064624821817597, 0.00076095689425791926 +}, + { 0.0021064624821676096, -0.00076095777439265377 +}, + {-0.0021064624821817597, 0.00076095689425791926 +}, + {-0.0021064624821676096, -0.00076095777439265377 +}, }; return pj_generic_selftest (0, s_args, tolerance_xy, tolerance_lp, 4, 4, fwd_in, 0, s_fwd_expect, inv_in, 0, s_inv_expect); |