123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158 |
- #ifndef BOOST_GEOMETRY_PROJECTIONS_BOGGS_HPP
- #define BOOST_GEOMETRY_PROJECTIONS_BOGGS_HPP
- #include <boost/geometry/util/math.hpp>
- #include <boost/geometry/srs/projections/impl/base_static.hpp>
- #include <boost/geometry/srs/projections/impl/base_dynamic.hpp>
- #include <boost/geometry/srs/projections/impl/projects.hpp>
- #include <boost/geometry/srs/projections/impl/factory_entry.hpp>
- namespace boost { namespace geometry
- {
- namespace projections
- {
- #ifndef DOXYGEN_NO_DETAIL
- namespace detail { namespace boggs
- {
- static const int n_iter = 20;
- static const double epsilon = 1e-7;
- static const double FXC = 2.00276;
- static const double FXC2 = 1.11072;
- static const double FYC = 0.49931;
- template <typename T, typename Parameters>
- struct base_boggs_spheroid
- {
-
-
- inline void fwd(Parameters const& , T const& lp_lon, T const& lp_lat, T& xy_x, T& xy_y) const
- {
- static const T half_pi = detail::half_pi<T>();
- static const T pi = detail::pi<T>();
- static const T root_two = boost::math::constants::root_two<T>();
- T theta, th1, c;
- int i;
- theta = lp_lat;
- if (fabs(fabs(lp_lat) - half_pi) < epsilon)
- xy_x = 0.;
- else {
- c = sin(theta) * pi;
- for (i = n_iter; i; --i) {
- theta -= th1 = (theta + sin(theta) - c) /
- (1. + cos(theta));
- if (fabs(th1) < epsilon) break;
- }
- theta *= 0.5;
- xy_x = FXC * lp_lon / (1. / cos(lp_lat) + FXC2 / cos(theta));
- }
- xy_y = FYC * (lp_lat + root_two * sin(theta));
- }
- static inline std::string get_name()
- {
- return "boggs_spheroid";
- }
- };
-
- template <typename Parameters>
- inline void setup_boggs(Parameters& par)
- {
- par.es = 0.;
- }
- }}
- #endif
-
- template <typename T, typename Parameters>
- struct boggs_spheroid : public detail::boggs::base_boggs_spheroid<T, Parameters>
- {
- template <typename Params>
- inline boggs_spheroid(Params const& , Parameters & par)
- {
- detail::boggs::setup_boggs(par);
- }
- };
- #ifndef DOXYGEN_NO_DETAIL
- namespace detail
- {
-
- BOOST_GEOMETRY_PROJECTIONS_DETAIL_STATIC_PROJECTION_F(srs::spar::proj_boggs, boggs_spheroid)
-
- BOOST_GEOMETRY_PROJECTIONS_DETAIL_FACTORY_ENTRY_F(boggs_entry, boggs_spheroid)
- BOOST_GEOMETRY_PROJECTIONS_DETAIL_FACTORY_INIT_BEGIN(boggs_init)
- {
- BOOST_GEOMETRY_PROJECTIONS_DETAIL_FACTORY_INIT_ENTRY(boggs, boggs_entry);
- }
- }
- #endif
- }
- }}
- #endif
|