| 123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190 |
- // Boost.Geometry
- // Copyright (c) 2017-2018, Oracle and/or its affiliates.
- // Contributed and/or modified by Adam Wulkiewicz, on behalf of Oracle
- // Licensed under the Boost Software License version 1.0.
- // http://www.boost.org/users/license.html
- #ifndef BOOST_GEOMETRY_STRATEGIES_SPHERICAL_DENSIFY_HPP
- #define BOOST_GEOMETRY_STRATEGIES_SPHERICAL_DENSIFY_HPP
- #include <boost/geometry/algorithms/detail/convert_point_to_point.hpp>
- #include <boost/geometry/algorithms/detail/signed_size_type.hpp>
- #include <boost/geometry/arithmetic/arithmetic.hpp>
- #include <boost/geometry/arithmetic/cross_product.hpp>
- #include <boost/geometry/arithmetic/dot_product.hpp>
- #include <boost/geometry/arithmetic/normalize.hpp>
- #include <boost/geometry/core/assert.hpp>
- #include <boost/geometry/core/coordinate_dimension.hpp>
- #include <boost/geometry/core/coordinate_type.hpp>
- #include <boost/geometry/core/radian_access.hpp>
- #include <boost/geometry/formulas/spherical.hpp>
- #include <boost/geometry/srs/sphere.hpp>
- #include <boost/geometry/strategies/densify.hpp>
- #include <boost/geometry/strategies/spherical/get_radius.hpp>
- #include <boost/geometry/util/math.hpp>
- #include <boost/geometry/util/select_most_precise.hpp>
- namespace boost { namespace geometry
- {
- namespace strategy { namespace densify
- {
- /*!
- \brief Densification of spherical segment.
- \ingroup strategies
- \tparam RadiusTypeOrSphere \tparam_radius_or_sphere
- \tparam CalculationType \tparam_calculation
- \qbk{
- [heading See also]
- [link geometry.reference.algorithms.densify.densify_4_with_strategy densify (with strategy)]
- }
- */
- template
- <
- typename RadiusTypeOrSphere = double,
- typename CalculationType = void
- >
- class spherical
- {
- public:
- // For consistency with area strategy the radius is set to 1
- inline spherical()
- : m_radius(1.0)
- {}
- template <typename RadiusOrSphere>
- explicit inline spherical(RadiusOrSphere const& radius_or_sphere)
- : m_radius(strategy_detail::get_radius
- <
- RadiusOrSphere
- >::apply(radius_or_sphere))
- {}
- template <typename Point, typename AssignPolicy, typename T>
- inline void apply(Point const& p0, Point const& p1, AssignPolicy & policy, T const& length_threshold) const
- {
- typedef typename AssignPolicy::point_type out_point_t;
- typedef typename select_most_precise
- <
- typename coordinate_type<Point>::type,
- typename coordinate_type<out_point_t>::type,
- CalculationType
- >::type calc_t;
- calc_t const c0 = 0;
- calc_t const c1 = 1;
- calc_t const pi = math::pi<calc_t>();
- typedef model::point<calc_t, 3, cs::cartesian> point3d_t;
- point3d_t const xyz0 = formula::sph_to_cart3d<point3d_t>(p0);
- point3d_t const xyz1 = formula::sph_to_cart3d<point3d_t>(p1);
- calc_t const dot01 = geometry::dot_product(xyz0, xyz1);
- calc_t const angle01 = acos(dot01);
- BOOST_GEOMETRY_ASSERT(length_threshold > T(0));
- signed_size_type n = signed_size_type(angle01 * m_radius / length_threshold);
- if (n <= 0)
- return;
- point3d_t axis;
- if (! math::equals(angle01, pi))
- {
- axis = geometry::cross_product(xyz0, xyz1);
- geometry::detail::vec_normalize(axis);
- }
- else // antipodal
- {
- calc_t const half_pi = math::half_pi<calc_t>();
- calc_t const lat = geometry::get_as_radian<1>(p0);
- if (math::equals(lat, half_pi))
- {
- // pointing east, segment lies on prime meridian, going south
- axis = point3d_t(c0, c1, c0);
- }
- else if (math::equals(lat, -half_pi))
- {
- // pointing west, segment lies on prime meridian, going north
- axis = point3d_t(c0, -c1, c0);
- }
- else
- {
- // lon rotated west by pi/2 at equator
- calc_t const lon = geometry::get_as_radian<0>(p0);
- axis = point3d_t(sin(lon), -cos(lon), c0);
- }
- }
- calc_t step = angle01 / (n + 1);
- calc_t a = step;
- for (signed_size_type i = 0 ; i < n ; ++i, a += step)
- {
- // Axis-Angle rotation
- // see: https://en.wikipedia.org/wiki/Axis-angle_representation
- calc_t const cos_a = cos(a);
- calc_t const sin_a = sin(a);
- // cos_a * v
- point3d_t s1 = xyz0;
- geometry::multiply_value(s1, cos_a);
- // sin_a * (n x v)
- point3d_t s2 = geometry::cross_product(axis, xyz0);
- geometry::multiply_value(s2, sin_a);
- // (1 - cos_a)(n.v) * n
- point3d_t s3 = axis;
- geometry::multiply_value(s3, (c1 - cos_a) * geometry::dot_product(axis, xyz0));
- // v_rot = cos_a * v + sin_a * (n x v) + (1 - cos_a)(n.v) * e
- point3d_t v_rot = s1;
- geometry::add_point(v_rot, s2);
- geometry::add_point(v_rot, s3);
-
- out_point_t p = formula::cart3d_to_sph<out_point_t>(v_rot);
- geometry::detail::conversion::point_to_point
- <
- Point, out_point_t,
- 2, dimension<out_point_t>::value
- >::apply(p0, p);
- policy.apply(p);
- }
- }
- private:
- typename strategy_detail::get_radius
- <
- RadiusTypeOrSphere
- >::type m_radius;
- };
- #ifndef DOXYGEN_NO_STRATEGY_SPECIALIZATIONS
- namespace services
- {
- template <>
- struct default_strategy<spherical_equatorial_tag>
- {
- typedef strategy::densify::spherical<> type;
- };
- } // namespace services
- #endif // DOXYGEN_NO_STRATEGY_SPECIALIZATIONS
- }} // namespace strategy::densify
- }} // namespace boost::geometry
- #endif // BOOST_GEOMETRY_ALGORITHMS_DENSIFY_HPP
|