putp6.hpp 8.8 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244
  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 srs { namespace par4
  40. {
  41. struct putp6 {}; // Putnins P6
  42. struct putp6p {}; // Putnins P6'
  43. }} //namespace srs::par4
  44. namespace projections
  45. {
  46. #ifndef DOXYGEN_NO_DETAIL
  47. namespace detail { namespace putp6
  48. {
  49. static const double epsilon = 1e-10;
  50. static const int n_iter = 10;
  51. static const double CON_POLE = 1.732050807568877;
  52. template <typename T>
  53. struct par_putp6
  54. {
  55. T C_x, C_y, A, B, D;
  56. };
  57. // template class, using CRTP to implement forward/inverse
  58. template <typename T, typename Parameters>
  59. struct base_putp6_spheroid
  60. : public base_t_fi<base_putp6_spheroid<T, Parameters>, T, Parameters>
  61. {
  62. par_putp6<T> m_proj_parm;
  63. inline base_putp6_spheroid(const Parameters& par)
  64. : base_t_fi<base_putp6_spheroid<T, Parameters>, T, Parameters>(*this, par)
  65. {}
  66. // FORWARD(s_forward) spheroid
  67. // Project coordinates from geographic (lon, lat) to cartesian (x, y)
  68. inline void fwd(T& lp_lon, T& lp_lat, T& xy_x, T& xy_y) const
  69. {
  70. T p, r, V;
  71. int i;
  72. p = this->m_proj_parm.B * sin(lp_lat);
  73. lp_lat *= 1.10265779;
  74. for (i = n_iter; i ; --i) {
  75. r = sqrt(1. + lp_lat * lp_lat);
  76. lp_lat -= V = ( (this->m_proj_parm.A - r) * lp_lat - log(lp_lat + r) - p ) /
  77. (this->m_proj_parm.A - 2. * r);
  78. if (fabs(V) < epsilon)
  79. break;
  80. }
  81. if (!i)
  82. lp_lat = p < 0. ? -CON_POLE : CON_POLE;
  83. xy_x = this->m_proj_parm.C_x * lp_lon * (this->m_proj_parm.D - sqrt(1. + lp_lat * lp_lat));
  84. xy_y = this->m_proj_parm.C_y * lp_lat;
  85. }
  86. // INVERSE(s_inverse) spheroid
  87. // Project coordinates from cartesian (x, y) to geographic (lon, lat)
  88. inline void inv(T& xy_x, T& xy_y, T& lp_lon, T& lp_lat) const
  89. {
  90. T r;
  91. lp_lat = xy_y / this->m_proj_parm.C_y;
  92. r = sqrt(1. + lp_lat * lp_lat);
  93. lp_lon = xy_x / (this->m_proj_parm.C_x * (this->m_proj_parm.D - r));
  94. lp_lat = aasin(( (this->m_proj_parm.A - r) * lp_lat - log(lp_lat + r) ) / this->m_proj_parm.B);
  95. }
  96. static inline std::string get_name()
  97. {
  98. return "putp6_spheroid";
  99. }
  100. };
  101. // Putnins P6
  102. template <typename Parameters, typename T>
  103. inline void setup_putp6(Parameters& par, par_putp6<T>& proj_parm)
  104. {
  105. proj_parm.C_x = 1.01346;
  106. proj_parm.C_y = 0.91910;
  107. proj_parm.A = 4.;
  108. proj_parm.B = 2.1471437182129378784;
  109. proj_parm.D = 2.;
  110. par.es = 0.;
  111. }
  112. // Putnins P6'
  113. template <typename Parameters, typename T>
  114. inline void setup_putp6p(Parameters& par, par_putp6<T>& proj_parm)
  115. {
  116. proj_parm.C_x = 0.44329;
  117. proj_parm.C_y = 0.80404;
  118. proj_parm.A = 6.;
  119. proj_parm.B = 5.61125;
  120. proj_parm.D = 3.;
  121. par.es = 0.;
  122. }
  123. }} // namespace detail::putp6
  124. #endif // doxygen
  125. /*!
  126. \brief Putnins P6 projection
  127. \ingroup projections
  128. \tparam Geographic latlong point type
  129. \tparam Cartesian xy point type
  130. \tparam Parameters parameter type
  131. \par Projection characteristics
  132. - Pseudocylindrical
  133. - Spheroid
  134. \par Example
  135. \image html ex_putp6.gif
  136. */
  137. template <typename T, typename Parameters>
  138. struct putp6_spheroid : public detail::putp6::base_putp6_spheroid<T, Parameters>
  139. {
  140. inline putp6_spheroid(const Parameters& par) : detail::putp6::base_putp6_spheroid<T, Parameters>(par)
  141. {
  142. detail::putp6::setup_putp6(this->m_par, this->m_proj_parm);
  143. }
  144. };
  145. /*!
  146. \brief Putnins P6' projection
  147. \ingroup projections
  148. \tparam Geographic latlong point type
  149. \tparam Cartesian xy point type
  150. \tparam Parameters parameter type
  151. \par Projection characteristics
  152. - Pseudocylindrical
  153. - Spheroid
  154. \par Example
  155. \image html ex_putp6p.gif
  156. */
  157. template <typename T, typename Parameters>
  158. struct putp6p_spheroid : public detail::putp6::base_putp6_spheroid<T, Parameters>
  159. {
  160. inline putp6p_spheroid(const Parameters& par) : detail::putp6::base_putp6_spheroid<T, Parameters>(par)
  161. {
  162. detail::putp6::setup_putp6p(this->m_par, this->m_proj_parm);
  163. }
  164. };
  165. #ifndef DOXYGEN_NO_DETAIL
  166. namespace detail
  167. {
  168. // Static projection
  169. BOOST_GEOMETRY_PROJECTIONS_DETAIL_STATIC_PROJECTION(srs::par4::putp6, putp6_spheroid, putp6_spheroid)
  170. BOOST_GEOMETRY_PROJECTIONS_DETAIL_STATIC_PROJECTION(srs::par4::putp6p, putp6p_spheroid, putp6p_spheroid)
  171. // Factory entry(s)
  172. template <typename T, typename Parameters>
  173. class putp6_entry : public detail::factory_entry<T, Parameters>
  174. {
  175. public :
  176. virtual base_v<T, Parameters>* create_new(const Parameters& par) const
  177. {
  178. return new base_v_fi<putp6_spheroid<T, Parameters>, T, Parameters>(par);
  179. }
  180. };
  181. template <typename T, typename Parameters>
  182. class putp6p_entry : public detail::factory_entry<T, Parameters>
  183. {
  184. public :
  185. virtual base_v<T, Parameters>* create_new(const Parameters& par) const
  186. {
  187. return new base_v_fi<putp6p_spheroid<T, Parameters>, T, Parameters>(par);
  188. }
  189. };
  190. template <typename T, typename Parameters>
  191. inline void putp6_init(detail::base_factory<T, Parameters>& factory)
  192. {
  193. factory.add_to_factory("putp6", new putp6_entry<T, Parameters>);
  194. factory.add_to_factory("putp6p", new putp6p_entry<T, Parameters>);
  195. }
  196. } // namespace detail
  197. #endif // doxygen
  198. } // namespace projections
  199. }} // namespace boost::geometry
  200. #endif // BOOST_GEOMETRY_PROJECTIONS_PUTP6_HPP