hatano.hpp 7.0 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187
  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, 2019.
  4. // Modifications copyright (c) 2017-2019, 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_HATANO_HPP
  31. #define BOOST_GEOMETRY_PROJECTIONS_HATANO_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 projections
  40. {
  41. #ifndef DOXYGEN_NO_DETAIL
  42. namespace detail { namespace hatano
  43. {
  44. static const int n_iter = 20;
  45. static const double epsilon = 1e-7;
  46. static const double one_plus_tol = 1.000001;
  47. static const double CN_ = 2.67595;
  48. static const double CS_ = 2.43763;
  49. static const double RCN = 0.37369906014686373063;
  50. static const double RCS = 0.41023453108141924738;
  51. static const double FYCN = 1.75859;
  52. static const double FYCS = 1.93052;
  53. static const double RYCN = 0.56863737426006061674;
  54. static const double RYCS = 0.51799515156538134803;
  55. static const double FXC = 0.85;
  56. static const double RXC = 1.17647058823529411764;
  57. template <typename T, typename Parameters>
  58. struct base_hatano_spheroid
  59. {
  60. // FORWARD(s_forward) spheroid
  61. // Project coordinates from geographic (lon, lat) to cartesian (x, y)
  62. inline void fwd(Parameters const& , T const& lp_lon, T lp_lat, T& xy_x, T& xy_y) const
  63. {
  64. T th1, c;
  65. int i;
  66. c = sin(lp_lat) * (lp_lat < 0. ? CS_ : CN_);
  67. for (i = n_iter; i; --i) {
  68. lp_lat -= th1 = (lp_lat + sin(lp_lat) - c) / (1. + cos(lp_lat));
  69. if (fabs(th1) < epsilon) break;
  70. }
  71. xy_x = FXC * lp_lon * cos(lp_lat *= .5);
  72. xy_y = sin(lp_lat) * (lp_lat < 0. ? FYCS : FYCN);
  73. }
  74. // INVERSE(s_inverse) spheroid
  75. // Project coordinates from cartesian (x, y) to geographic (lon, lat)
  76. inline void inv(Parameters const& , T const& xy_x, T const& xy_y, T& lp_lon, T& lp_lat) const
  77. {
  78. static T const half_pi = detail::half_pi<T>();
  79. T th;
  80. th = xy_y * ( xy_y < 0. ? RYCS : RYCN);
  81. if (fabs(th) > 1.) {
  82. if (fabs(th) > one_plus_tol) {
  83. BOOST_THROW_EXCEPTION( projection_exception(error_tolerance_condition) );
  84. } else {
  85. th = th > 0. ? half_pi : - half_pi;
  86. }
  87. } else {
  88. th = asin(th);
  89. }
  90. lp_lon = RXC * xy_x / cos(th);
  91. th += th;
  92. lp_lat = (th + sin(th)) * (xy_y < 0. ? RCS : RCN);
  93. if (fabs(lp_lat) > 1.) {
  94. if (fabs(lp_lat) > one_plus_tol) {
  95. BOOST_THROW_EXCEPTION( projection_exception(error_tolerance_condition) );
  96. } else {
  97. lp_lat = lp_lat > 0. ? half_pi : - half_pi;
  98. }
  99. } else {
  100. lp_lat = asin(lp_lat);
  101. }
  102. }
  103. static inline std::string get_name()
  104. {
  105. return "hatano_spheroid";
  106. }
  107. };
  108. // Hatano Asymmetrical Equal Area
  109. template <typename Parameters>
  110. inline void setup_hatano(Parameters& par)
  111. {
  112. par.es = 0.;
  113. }
  114. }} // namespace detail::hatano
  115. #endif // doxygen
  116. /*!
  117. \brief Hatano Asymmetrical Equal Area projection
  118. \ingroup projections
  119. \tparam Geographic latlong point type
  120. \tparam Cartesian xy point type
  121. \tparam Parameters parameter type
  122. \par Projection characteristics
  123. - Pseudocylindrical
  124. - Spheroid
  125. \par Example
  126. \image html ex_hatano.gif
  127. */
  128. template <typename T, typename Parameters>
  129. struct hatano_spheroid : public detail::hatano::base_hatano_spheroid<T, Parameters>
  130. {
  131. template <typename Params>
  132. inline hatano_spheroid(Params const& , Parameters & par)
  133. {
  134. detail::hatano::setup_hatano(par);
  135. }
  136. };
  137. #ifndef DOXYGEN_NO_DETAIL
  138. namespace detail
  139. {
  140. // Static projection
  141. BOOST_GEOMETRY_PROJECTIONS_DETAIL_STATIC_PROJECTION_FI(srs::spar::proj_hatano, hatano_spheroid)
  142. // Factory entry(s)
  143. BOOST_GEOMETRY_PROJECTIONS_DETAIL_FACTORY_ENTRY_FI(hatano_entry, hatano_spheroid)
  144. BOOST_GEOMETRY_PROJECTIONS_DETAIL_FACTORY_INIT_BEGIN(hatano_init)
  145. {
  146. BOOST_GEOMETRY_PROJECTIONS_DETAIL_FACTORY_INIT_ENTRY(hatano, hatano_entry)
  147. }
  148. } // namespace detail
  149. #endif // doxygen
  150. } // namespace projections
  151. }} // namespace boost::geometry
  152. #endif // BOOST_GEOMETRY_PROJECTIONS_HATANO_HPP