Imported Upstream version 1.72.0
[platform/upstream/boost.git] / boost / geometry / srs / projections / impl / pj_inv.hpp
1 // Boost.Geometry (aka GGL, Generic Geometry Library)
2 // This file is manually converted from PROJ4
3
4 // Copyright (c) 2008-2012 Barend Gehrels, Amsterdam, the Netherlands.
5
6 // This file was modified by Oracle on 2017, 2019.
7 // Modifications copyright (c) 2017-2019, Oracle and/or its affiliates.
8 // Contributed and/or modified by Adam Wulkiewicz, on behalf of Oracle
9
10 // Use, modification and distribution is subject to the Boost Software License,
11 // Version 1.0. (See accompanying file LICENSE_1_0.txt or copy at
12 // http://www.boost.org/LICENSE_1_0.txt)
13
14 // This file is converted from PROJ4, http://trac.osgeo.org/proj
15 // PROJ4 is originally written by Gerald Evenden (then of the USGS)
16 // PROJ4 is maintained by Frank Warmerdam
17 // PROJ4 is converted to Geometry Library by Barend Gehrels (Geodan, Amsterdam)
18
19 // Original copyright notice:
20
21 // Permission is hereby granted, free of charge, to any person obtaining a
22 // copy of this software and associated documentation files (the "Software"),
23 // to deal in the Software without restriction, including without limitation
24 // the rights to use, copy, modify, merge, publish, distribute, sublicense,
25 // and/or sell copies of the Software, and to permit persons to whom the
26 // Software is furnished to do so, subject to the following conditions:
27
28 // The above copyright notice and this permission notice shall be included
29 // in all copies or substantial portions of the Software.
30
31 // THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS
32 // OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
33 // FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL
34 // THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
35 // LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING
36 // FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER
37 // DEALINGS IN THE SOFTWARE.
38
39 #ifndef BOOST_GEOMETRY_PROJECTIONS_PJ_INV_HPP
40 #define BOOST_GEOMETRY_PROJECTIONS_PJ_INV_HPP
41
42
43
44 #include <boost/geometry/srs/projections/impl/adjlon.hpp>
45 #include <boost/geometry/core/radian_access.hpp>
46 #include <boost/geometry/util/math.hpp>
47
48 /* general inverse projection */
49
50 namespace boost { namespace geometry { namespace projections
51 {
52
53 namespace detail
54 {
55
56  /* inverse projection entry */
57 template <typename PRJ, typename LL, typename XY, typename PAR>
58 inline void pj_inv(PRJ const& prj, PAR const& par, XY const& xy, LL& ll)
59 {
60     typedef typename PAR::type calc_t;
61     static const calc_t EPS = 1.0e-12;
62
63     /* can't do as much preliminary checking as with forward */
64     /* descale and de-offset */
65     calc_t xy_x = (geometry::get<0>(xy) * par.to_meter - par.x0) * par.ra;
66     calc_t xy_y = (geometry::get<1>(xy) * par.to_meter - par.y0) * par.ra;
67     calc_t lon = 0, lat = 0;
68
69     prj.inv(par, xy_x, xy_y, lon, lat); /* inverse project */
70     
71     lon += par.lam0; /* reduce from del lp.lam */
72     if (!par.over)
73         lon = adjlon(lon); /* adjust longitude to CM */
74     if (par.geoc && geometry::math::abs(geometry::math::abs(lat)-geometry::math::half_pi<calc_t>()) > EPS)
75         lat = atan(par.one_es * tan(lat));
76
77     geometry::set_from_radian<0>(ll, lon);
78     geometry::set_from_radian<1>(ll, lat);
79 }
80
81 } // namespace detail
82 }}} // namespace boost::geometry::projections
83
84 #endif