wink2.hpp 6.6 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189
  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_WINK2_HPP
  31. #define BOOST_GEOMETRY_PROJECTIONS_WINK2_HPP
  32. #include <boost/geometry/util/math.hpp>
  33. #include <boost/geometry/srs/projections/impl/base_static.hpp>
  34. #include <boost/geometry/srs/projections/impl/base_dynamic.hpp>
  35. #include <boost/geometry/srs/projections/impl/projects.hpp>
  36. #include <boost/geometry/srs/projections/impl/factory_entry.hpp>
  37. namespace boost { namespace geometry
  38. {
  39. namespace srs { namespace par4
  40. {
  41. struct wink2 {}; // Winkel II
  42. }} //namespace srs::par4
  43. namespace projections
  44. {
  45. #ifndef DOXYGEN_NO_DETAIL
  46. namespace detail { namespace wink2
  47. {
  48. static const int max_iter = 10;
  49. static const double loop_tol = 1e-7;
  50. template <typename T>
  51. struct par_wink2
  52. {
  53. T cosphi1;
  54. };
  55. // template class, using CRTP to implement forward/inverse
  56. template <typename T, typename Parameters>
  57. struct base_wink2_spheroid
  58. : public base_t_f<base_wink2_spheroid<T, Parameters>, T, Parameters>
  59. {
  60. par_wink2<T> m_proj_parm;
  61. inline base_wink2_spheroid(const Parameters& par)
  62. : base_t_f<base_wink2_spheroid<T, Parameters>, T, Parameters>(*this, par) {}
  63. // FORWARD(s_forward) spheroid
  64. // Project coordinates from geographic (lon, lat) to cartesian (x, y)
  65. inline void fwd(T& lp_lon, T& lp_lat, T& xy_x, T& xy_y) const
  66. {
  67. static const T pi = detail::pi<T>();
  68. static const T half_pi = detail::half_pi<T>();
  69. static const T fourth_pi = detail::fourth_pi<T>();
  70. static const T two_div_pi = detail::two_div_pi<T>();
  71. T k, V;
  72. int i;
  73. xy_y = lp_lat * two_div_pi;
  74. k = pi * sin(lp_lat);
  75. lp_lat *= 1.8;
  76. for (i = max_iter; i ; --i) {
  77. lp_lat -= V = (lp_lat + sin(lp_lat) - k) /
  78. (1. + cos(lp_lat));
  79. if (fabs(V) < loop_tol)
  80. break;
  81. }
  82. if (!i)
  83. lp_lat = (lp_lat < 0.) ? -half_pi : half_pi;
  84. else
  85. lp_lat *= 0.5;
  86. xy_x = 0.5 * lp_lon * (cos(lp_lat) + this->m_proj_parm.cosphi1);
  87. xy_y = fourth_pi * (sin(lp_lat) + xy_y);
  88. }
  89. static inline std::string get_name()
  90. {
  91. return "wink2_spheroid";
  92. }
  93. };
  94. // Winkel II
  95. template <typename Parameters, typename T>
  96. inline void setup_wink2(Parameters& par, par_wink2<T>& proj_parm)
  97. {
  98. proj_parm.cosphi1 = cos(pj_get_param_r(par.params, "lat_1"));
  99. par.es = 0.;
  100. }
  101. }} // namespace detail::wink2
  102. #endif // doxygen
  103. /*!
  104. \brief Winkel II projection
  105. \ingroup projections
  106. \tparam Geographic latlong point type
  107. \tparam Cartesian xy point type
  108. \tparam Parameters parameter type
  109. \par Projection characteristics
  110. - Pseudocylindrical
  111. - Spheroid
  112. - no inverse
  113. \par Projection parameters
  114. - lat_1: Latitude of first standard parallel (degrees)
  115. \par Example
  116. \image html ex_wink2.gif
  117. */
  118. template <typename T, typename Parameters>
  119. struct wink2_spheroid : public detail::wink2::base_wink2_spheroid<T, Parameters>
  120. {
  121. inline wink2_spheroid(const Parameters& par) : detail::wink2::base_wink2_spheroid<T, Parameters>(par)
  122. {
  123. detail::wink2::setup_wink2(this->m_par, this->m_proj_parm);
  124. }
  125. };
  126. #ifndef DOXYGEN_NO_DETAIL
  127. namespace detail
  128. {
  129. // Static projection
  130. BOOST_GEOMETRY_PROJECTIONS_DETAIL_STATIC_PROJECTION(srs::par4::wink2, wink2_spheroid, wink2_spheroid)
  131. // Factory entry(s)
  132. template <typename T, typename Parameters>
  133. class wink2_entry : public detail::factory_entry<T, Parameters>
  134. {
  135. public :
  136. virtual base_v<T, Parameters>* create_new(const Parameters& par) const
  137. {
  138. return new base_v_f<wink2_spheroid<T, Parameters>, T, Parameters>(par);
  139. }
  140. };
  141. template <typename T, typename Parameters>
  142. inline void wink2_init(detail::base_factory<T, Parameters>& factory)
  143. {
  144. factory.add_to_factory("wink2", new wink2_entry<T, Parameters>);
  145. }
  146. } // namespace detail
  147. #endif // doxygen
  148. } // namespace projections
  149. }} // namespace boost::geometry
  150. #endif // BOOST_GEOMETRY_PROJECTIONS_WINK2_HPP