File indexing completed on 2025-01-18 09:35:44
0001
0002
0003
0004
0005
0006
0007
0008
0009
0010
0011
0012
0013
0014
0015
0016
0017
0018
0019
0020
0021
0022
0023
0024
0025
0026
0027
0028
0029
0030
0031
0032
0033
0034
0035
0036
0037
0038
0039
0040 #ifndef BOOST_GEOMETRY_PROJECTIONS_MBT_FPS_HPP
0041 #define BOOST_GEOMETRY_PROJECTIONS_MBT_FPS_HPP
0042
0043 #include <boost/geometry/srs/projections/impl/base_static.hpp>
0044 #include <boost/geometry/srs/projections/impl/base_dynamic.hpp>
0045 #include <boost/geometry/srs/projections/impl/projects.hpp>
0046 #include <boost/geometry/srs/projections/impl/factory_entry.hpp>
0047 #include <boost/geometry/srs/projections/impl/aasincos.hpp>
0048
0049 namespace boost { namespace geometry
0050 {
0051
0052 namespace projections
0053 {
0054 #ifndef DOXYGEN_NO_DETAIL
0055 namespace detail { namespace mbt_fps
0056 {
0057
0058 static const int max_iter = 10;
0059 static const double loop_tol = 1e-7;
0060 static const double C1 = 0.45503;
0061 static const double C2 = 1.36509;
0062 static const double C3 = 1.41546;
0063 static const double C_x = 0.22248;
0064 static const double C_y = 1.44492;
0065
0066
0067 template <typename T>
0068 inline T C1_2() { return detail::third<T>(); }
0069
0070 template <typename T, typename Parameters>
0071 struct base_mbt_fps_spheroid
0072 {
0073
0074
0075 inline void fwd(Parameters const& , T const& lp_lon, T lp_lat, T& xy_x, T& xy_y) const
0076 {
0077 static const T C1_2 = mbt_fps::C1_2<T>();
0078
0079 T k, V, t;
0080 int i;
0081
0082 k = C3 * sin(lp_lat);
0083 for (i = max_iter; i ; --i) {
0084 t = lp_lat / C2;
0085 lp_lat -= V = (C1 * sin(t) + sin(lp_lat) - k) /
0086 (C1_2 * cos(t) + cos(lp_lat));
0087 if (fabs(V) < loop_tol)
0088 break;
0089 }
0090 t = lp_lat / C2;
0091 xy_x = C_x * lp_lon * (1. + 3. * cos(lp_lat)/cos(t) );
0092 xy_y = C_y * sin(t);
0093 }
0094
0095
0096
0097 inline void inv(Parameters const&, T const& xy_x, T const& xy_y, T& lp_lon, T& lp_lat) const
0098 {
0099 T t;
0100
0101 lp_lat = C2 * (t = aasin(xy_y / C_y));
0102 lp_lon = xy_x / (C_x * (1. + 3. * cos(lp_lat)/cos(t)));
0103 lp_lat = aasin((C1 * sin(t) + sin(lp_lat)) / C3);
0104 }
0105
0106 static inline std::string get_name()
0107 {
0108 return "mbt_fps_spheroid";
0109 }
0110
0111 };
0112
0113
0114 template <typename Parameters>
0115 inline void setup_mbt_fps(Parameters& par)
0116 {
0117 par.es = 0;
0118 }
0119
0120 }}
0121 #endif
0122
0123
0124
0125
0126
0127
0128
0129
0130
0131
0132
0133
0134
0135 template <typename T, typename Parameters>
0136 struct mbt_fps_spheroid : public detail::mbt_fps::base_mbt_fps_spheroid<T, Parameters>
0137 {
0138 template <typename Params>
0139 inline mbt_fps_spheroid(Params const& , Parameters & par)
0140 {
0141 detail::mbt_fps::setup_mbt_fps(par);
0142 }
0143 };
0144
0145 #ifndef DOXYGEN_NO_DETAIL
0146 namespace detail
0147 {
0148
0149
0150 BOOST_GEOMETRY_PROJECTIONS_DETAIL_STATIC_PROJECTION_FI(srs::spar::proj_mbt_fps, mbt_fps_spheroid)
0151
0152
0153 BOOST_GEOMETRY_PROJECTIONS_DETAIL_FACTORY_ENTRY_FI(mbt_fps_entry, mbt_fps_spheroid)
0154
0155 BOOST_GEOMETRY_PROJECTIONS_DETAIL_FACTORY_INIT_BEGIN(mbt_fps_init)
0156 {
0157 BOOST_GEOMETRY_PROJECTIONS_DETAIL_FACTORY_INIT_ENTRY(mbt_fps, mbt_fps_entry)
0158 }
0159
0160 }
0161 #endif
0162
0163 }
0164
0165 }}
0166
0167 #endif
0168