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, 2018, 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_IMPL_PJ_FWD_HPP
40 #define BOOST_GEOMETRY_PROJECTIONS_IMPL_PJ_FWD_HPP
41
42 #include <boost/geometry/core/radian_access.hpp>
43 #include <boost/geometry/util/math.hpp>
44
45 #include <boost/geometry/srs/projections/impl/adjlon.hpp>
46 #include <boost/geometry/srs/projections/impl/projects.hpp>
47
48 #include <boost/math/constants/constants.hpp>
49
50 /* general forward projection */
51
52 namespace boost { namespace geometry { namespace projections {
53
54 namespace detail {
55
56 /* forward projection entry */
57 template <typename Prj, typename LL, typename XY, typename P>
pj_fwd(Prj const & prj,P const & par,LL const & ll,XY & xy)58 inline void pj_fwd(Prj const& prj, P const& par, LL const& ll, XY& xy)
59 {
60 typedef typename P::type calc_t;
61 static const calc_t EPS = 1.0e-12;
62
63 using namespace detail;
64
65 calc_t lp_lon = geometry::get_as_radian<0>(ll);
66 calc_t lp_lat = geometry::get_as_radian<1>(ll);
67 calc_t const t = geometry::math::abs(lp_lat) - geometry::math::half_pi<calc_t>();
68
69 /* check for forward and latitude or longitude overange */
70 if (t > EPS || geometry::math::abs(lp_lon) > 10.)
71 {
72 BOOST_THROW_EXCEPTION( projection_exception(error_lat_or_lon_exceed_limit) );
73 }
74
75 if (geometry::math::abs(t) <= EPS)
76 {
77 lp_lat = lp_lat < 0. ? -geometry::math::half_pi<calc_t>() : geometry::math::half_pi<calc_t>();
78 }
79 else if (par.geoc)
80 {
81 lp_lat = atan(par.rone_es * tan(lp_lat));
82 }
83
84 lp_lon -= par.lam0; /* compute del lp.lam */
85 if (! par.over)
86 {
87 lp_lon = adjlon(lp_lon); /* post_forward del longitude */
88 }
89
90 calc_t x = 0;
91 calc_t y = 0;
92
93 prj.fwd(par, lp_lon, lp_lat, x, y);
94
95 geometry::set<0>(xy, par.fr_meter * (par.a * x + par.x0));
96 geometry::set<1>(xy, par.fr_meter * (par.a * y + par.y0));
97 }
98
99 } // namespace detail
100 }}} // namespace boost::geometry::projections
101
102 #endif // BOOST_GEOMETRY_PROJECTIONS_IMPL_PJ_FWD_HPP
103