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_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 <typename T, typename Parameters> 71 struct base_mbt_fps_spheroid 72 { 73 // FORWARD(s_forward) spheroid 74 // Project coordinates from geographic (lon, lat) to cartesian (x, y) fwdboost::geometry::projections::detail::mbt_fps::base_mbt_fps_spheroid75 inline void fwd(Parameters const& , T const& lp_lon, T lp_lat, T& xy_x, T& xy_y) const 76 { 77 static const T C1_2 = mbt_fps::C1_2<T>(); 78 79 T k, V, t; 80 int i; 81 82 k = C3 * sin(lp_lat); 83 for (i = max_iter; i ; --i) { 84 t = lp_lat / C2; 85 lp_lat -= V = (C1 * sin(t) + sin(lp_lat) - k) / 86 (C1_2 * cos(t) + cos(lp_lat)); 87 if (fabs(V) < loop_tol) 88 break; 89 } 90 t = lp_lat / C2; 91 xy_x = C_x * lp_lon * (1. + 3. * cos(lp_lat)/cos(t) ); 92 xy_y = C_y * sin(t); 93 } 94 95 // INVERSE(s_inverse) spheroid 96 // Project coordinates from cartesian (x, y) to geographic (lon, lat) invboost::geometry::projections::detail::mbt_fps::base_mbt_fps_spheroid97 inline void inv(Parameters const&, T const& xy_x, T const& xy_y, T& lp_lon, T& lp_lat) const 98 { 99 T t; 100 101 lp_lat = C2 * (t = aasin(xy_y / C_y)); 102 lp_lon = xy_x / (C_x * (1. + 3. * cos(lp_lat)/cos(t))); 103 lp_lat = aasin((C1 * sin(t) + sin(lp_lat)) / C3); 104 } 105 get_nameboost::geometry::projections::detail::mbt_fps::base_mbt_fps_spheroid106 static inline std::string get_name() 107 { 108 return "mbt_fps_spheroid"; 109 } 110 111 }; 112 113 // McBryde-Thomas Flat-Pole Sine (No. 2) 114 template <typename Parameters> setup_mbt_fps(Parameters & par)115 inline void setup_mbt_fps(Parameters& par) 116 { 117 par.es = 0; 118 } 119 120 }} // namespace detail::mbt_fps 121 #endif // doxygen 122 123 /*! 124 \brief McBryde-Thomas Flat-Pole Sine (No. 2) projection 125 \ingroup projections 126 \tparam Geographic latlong point type 127 \tparam Cartesian xy point type 128 \tparam Parameters parameter type 129 \par Projection characteristics 130 - Cylindrical 131 - Spheroid 132 \par Example 133 \image html ex_mbt_fps.gif 134 */ 135 template <typename T, typename Parameters> 136 struct mbt_fps_spheroid : public detail::mbt_fps::base_mbt_fps_spheroid<T, Parameters> 137 { 138 template <typename Params> mbt_fps_spheroidboost::geometry::projections::mbt_fps_spheroid139 inline mbt_fps_spheroid(Params const& , Parameters & par) 140 { 141 detail::mbt_fps::setup_mbt_fps(par); 142 } 143 }; 144 145 #ifndef DOXYGEN_NO_DETAIL 146 namespace detail 147 { 148 149 // Static projection BOOST_GEOMETRY_PROJECTIONS_DETAIL_STATIC_PROJECTION_FI(srs::spar::proj_mbt_fps,mbt_fps_spheroid)150 BOOST_GEOMETRY_PROJECTIONS_DETAIL_STATIC_PROJECTION_FI(srs::spar::proj_mbt_fps, mbt_fps_spheroid) 151 152 // Factory entry(s) 153 BOOST_GEOMETRY_PROJECTIONS_DETAIL_FACTORY_ENTRY_FI(mbt_fps_entry, mbt_fps_spheroid) 154 155 BOOST_GEOMETRY_PROJECTIONS_DETAIL_FACTORY_INIT_BEGIN(mbt_fps_init) 156 { 157 BOOST_GEOMETRY_PROJECTIONS_DETAIL_FACTORY_INIT_ENTRY(mbt_fps, mbt_fps_entry) 158 } 159 160 } // namespace detail 161 #endif // doxygen 162 163 } // namespace projections 164 165 }} // namespace boost::geometry 166 167 #endif // BOOST_GEOMETRY_PROJECTIONS_MBT_FPS_HPP 168 169