1 // Boost.Geometry - gis-projections (based on PROJ4)
2 
3 // Copyright (c) 2008-2015 Barend Gehrels, Amsterdam, the Netherlands.
4 
5 // This file was modified by Oracle on 2017, 2018.
6 // Modifications copyright (c) 2017-2018, Oracle and/or its affiliates.
7 // Contributed and/or modified by Adam Wulkiewicz, on behalf of Oracle.
8 
9 // Use, modification and distribution is subject to the Boost Software License,
10 // Version 1.0. (See accompanying file LICENSE_1_0.txt or copy at
11 // http://www.boost.org/LICENSE_1_0.txt)
12 
13 // This file is converted from PROJ4, http://trac.osgeo.org/proj
14 // PROJ4 is originally written by Gerald Evenden (then of the USGS)
15 // PROJ4 is maintained by Frank Warmerdam
16 // PROJ4 is converted to Boost.Geometry by Barend Gehrels
17 
18 // Last updated version of proj: 5.0.0
19 
20 // Original copyright notice:
21 
22 // Permission is hereby granted, free of charge, to any person obtaining a
23 // copy of this software and associated documentation files (the "Software"),
24 // to deal in the Software without restriction, including without limitation
25 // the rights to use, copy, modify, merge, publish, distribute, sublicense,
26 // and/or sell copies of the Software, and to permit persons to whom the
27 // Software is furnished to do so, subject to the following conditions:
28 
29 // The above copyright notice and this permission notice shall be included
30 // in all copies or substantial portions of the Software.
31 
32 // THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS
33 // OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
34 // FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL
35 // THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
36 // LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING
37 // FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER
38 // DEALINGS IN THE SOFTWARE.
39 
40 #ifndef BOOST_GEOMETRY_PROJECTIONS_MBT_FPS_HPP
41 #define BOOST_GEOMETRY_PROJECTIONS_MBT_FPS_HPP
42 
43 #include <boost/geometry/srs/projections/impl/base_static.hpp>
44 #include <boost/geometry/srs/projections/impl/base_dynamic.hpp>
45 #include <boost/geometry/srs/projections/impl/projects.hpp>
46 #include <boost/geometry/srs/projections/impl/factory_entry.hpp>
47 #include <boost/geometry/srs/projections/impl/aasincos.hpp>
48 
49 namespace boost { namespace geometry
50 {
51 
52 namespace projections
53 {
54     #ifndef DOXYGEN_NO_DETAIL
55     namespace detail { namespace mbt_fps
56     {
57 
58             static const int max_iter = 10;
59             static const double loop_tol = 1e-7;
60             static const double C1 = 0.45503;
61             static const double C2 = 1.36509;
62             static const double C3 = 1.41546;
63             static const double C_x = 0.22248;
64             static const double C_y = 1.44492;
65             //static const double C1_2 = 0.33333333333333333333333333;
66 
67             template <typename T>
C1_2()68             inline T C1_2() { return detail::third<T>(); }
69 
70             // template class, using CRTP to implement forward/inverse
71             template <typename T, typename Parameters>
72             struct base_mbt_fps_spheroid
73                 : public base_t_fi<base_mbt_fps_spheroid<T, Parameters>, T, Parameters>
74             {
base_mbt_fps_spheroidboost::geometry::projections::detail::mbt_fps::base_mbt_fps_spheroid75                 inline base_mbt_fps_spheroid(const Parameters& par)
76                     : base_t_fi<base_mbt_fps_spheroid<T, Parameters>, T, Parameters>(*this, par)
77                 {}
78 
79                 // FORWARD(s_forward)  spheroid
80                 // Project coordinates from geographic (lon, lat) to cartesian (x, y)
fwdboost::geometry::projections::detail::mbt_fps::base_mbt_fps_spheroid81                 inline void fwd(T const& lp_lon, T lp_lat, T& xy_x, T& xy_y) const
82                 {
83                     static const T C1_2 = mbt_fps::C1_2<T>();
84 
85                     T k, V, t;
86                     int i;
87 
88                     k = C3 * sin(lp_lat);
89                     for (i = max_iter; i ; --i) {
90                         t = lp_lat / C2;
91                         lp_lat -= V = (C1 * sin(t) + sin(lp_lat) - k) /
92                             (C1_2 * cos(t) + cos(lp_lat));
93                         if (fabs(V) < loop_tol)
94                             break;
95                     }
96                     t = lp_lat / C2;
97                     xy_x = C_x * lp_lon * (1. + 3. * cos(lp_lat)/cos(t) );
98                     xy_y = C_y * sin(t);
99                 }
100 
101                 // INVERSE(s_inverse)  spheroid
102                 // Project coordinates from cartesian (x, y) to geographic (lon, lat)
invboost::geometry::projections::detail::mbt_fps::base_mbt_fps_spheroid103                 inline void inv(T const& xy_x, T const& xy_y, T& lp_lon, T& lp_lat) const
104                 {
105                     T t;
106 
107                     lp_lat = C2 * (t = aasin(xy_y / C_y));
108                     lp_lon = xy_x / (C_x * (1. + 3. * cos(lp_lat)/cos(t)));
109                     lp_lat = aasin((C1 * sin(t) + sin(lp_lat)) / C3);
110                 }
111 
get_nameboost::geometry::projections::detail::mbt_fps::base_mbt_fps_spheroid112                 static inline std::string get_name()
113                 {
114                     return "mbt_fps_spheroid";
115                 }
116 
117             };
118 
119             // McBryde-Thomas Flat-Pole Sine (No. 2)
120             template <typename Parameters>
setup_mbt_fps(Parameters & par)121             inline void setup_mbt_fps(Parameters& par)
122             {
123                 par.es = 0;
124             }
125 
126     }} // namespace detail::mbt_fps
127     #endif // doxygen
128 
129     /*!
130         \brief McBryde-Thomas Flat-Pole Sine (No. 2) projection
131         \ingroup projections
132         \tparam Geographic latlong point type
133         \tparam Cartesian xy point type
134         \tparam Parameters parameter type
135         \par Projection characteristics
136          - Cylindrical
137          - Spheroid
138         \par Example
139         \image html ex_mbt_fps.gif
140     */
141     template <typename T, typename Parameters>
142     struct mbt_fps_spheroid : public detail::mbt_fps::base_mbt_fps_spheroid<T, Parameters>
143     {
144         template <typename Params>
mbt_fps_spheroidboost::geometry::projections::mbt_fps_spheroid145         inline mbt_fps_spheroid(Params const& , Parameters const& par)
146             : detail::mbt_fps::base_mbt_fps_spheroid<T, Parameters>(par)
147         {
148             detail::mbt_fps::setup_mbt_fps(this->m_par);
149         }
150     };
151 
152     #ifndef DOXYGEN_NO_DETAIL
153     namespace detail
154     {
155 
156         // Static projection
BOOST_GEOMETRY_PROJECTIONS_DETAIL_STATIC_PROJECTION(srs::spar::proj_mbt_fps,mbt_fps_spheroid,mbt_fps_spheroid)157         BOOST_GEOMETRY_PROJECTIONS_DETAIL_STATIC_PROJECTION(srs::spar::proj_mbt_fps, mbt_fps_spheroid, mbt_fps_spheroid)
158 
159         // Factory entry(s)
160         BOOST_GEOMETRY_PROJECTIONS_DETAIL_FACTORY_ENTRY_FI(mbt_fps_entry, mbt_fps_spheroid)
161 
162         BOOST_GEOMETRY_PROJECTIONS_DETAIL_FACTORY_INIT_BEGIN(mbt_fps_init)
163         {
164             BOOST_GEOMETRY_PROJECTIONS_DETAIL_FACTORY_INIT_ENTRY(mbt_fps, mbt_fps_entry)
165         }
166 
167     } // namespace detail
168     #endif // doxygen
169 
170 } // namespace projections
171 
172 }} // namespace boost::geometry
173 
174 #endif // BOOST_GEOMETRY_PROJECTIONS_MBT_FPS_HPP
175 
176