putp6.hpp 8.2 KB

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