Imported Upstream version 1.72.0
[platform/upstream/boost.git] / boost / geometry / srs / projections / proj / gins8.hpp
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, 2019.
6 // Modifications copyright (c) 2017-2019, 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_GINS8_HPP
41 #define BOOST_GEOMETRY_PROJECTIONS_GINS8_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
48 namespace boost { namespace geometry
49 {
50
51 namespace projections
52 {
53     #ifndef DOXYGEN_NO_DETAIL
54     namespace detail { namespace gins8
55     {
56
57             static const double Cl = 0.000952426;
58             static const double Cp = 0.162388;
59             //static const double C12 = 0.08333333333333333;
60
61             template <typename T>
62             inline T C12() { return 0.083333333333333333333333333333333333; }
63
64             template <typename T, typename Parameters>
65             struct base_gins8_spheroid
66             {
67                 // FORWARD(s_forward)  spheroid
68                 // Project coordinates from geographic (lon, lat) to cartesian (x, y)
69                 inline void fwd(Parameters const& , T const& lp_lon, T const& lp_lat, T& xy_x, T& xy_y) const
70                 {
71                     static const T C12 = gins8::C12<T>();
72
73                     T t = lp_lat * lp_lat;
74
75                     xy_y = lp_lat * (1. + t * C12);
76                     xy_x = lp_lon * (1. - Cp * t);
77                     t = lp_lon * lp_lon;
78                     xy_x *= (0.87 - Cl * t * t);
79                 }
80
81                 static inline std::string get_name()
82                 {
83                     return "gins8_spheroid";
84                 }
85
86             };
87
88             // Ginsburg VIII (TsNIIGAiK)
89             template <typename Parameters>
90             inline void setup_gins8(Parameters& par)
91             {
92                 par.es = 0.;
93             }
94
95     }} // namespace detail::gins8
96     #endif // doxygen
97
98     /*!
99         \brief Ginsburg VIII (TsNIIGAiK) projection
100         \ingroup projections
101         \tparam Geographic latlong point type
102         \tparam Cartesian xy point type
103         \tparam Parameters parameter type
104         \par Projection characteristics
105          - Pseudocylindrical
106          - Spheroid
107          - no inverse
108         \par Example
109         \image html ex_gins8.gif
110     */
111     template <typename T, typename Parameters>
112     struct gins8_spheroid : public detail::gins8::base_gins8_spheroid<T, Parameters>
113     {
114         template <typename Params>
115         inline gins8_spheroid(Params const& , Parameters & par)
116         {
117             detail::gins8::setup_gins8(par);
118         }
119     };
120
121     #ifndef DOXYGEN_NO_DETAIL
122     namespace detail
123     {
124
125         // Static projection
126         BOOST_GEOMETRY_PROJECTIONS_DETAIL_STATIC_PROJECTION_F(srs::spar::proj_gins8, gins8_spheroid)
127
128         // Factory entry(s)
129         BOOST_GEOMETRY_PROJECTIONS_DETAIL_FACTORY_ENTRY_F(gins8_entry, gins8_spheroid)
130         
131         BOOST_GEOMETRY_PROJECTIONS_DETAIL_FACTORY_INIT_BEGIN(gins8_init)
132         {
133             BOOST_GEOMETRY_PROJECTIONS_DETAIL_FACTORY_INIT_ENTRY(gins8, gins8_entry);
134         }
135
136     } // namespace detail
137     #endif // doxygen
138
139 } // namespace projections
140
141 }} // namespace boost::geometry
142
143 #endif // BOOST_GEOMETRY_PROJECTIONS_GINS8_HPP
144