pandorafms/extras/anytermd/libpbe/include/geometry.hh

101 lines
3.3 KiB
C++

// include/geometry.hh
// This file is part of libpbe; see http://svn.chezphil.org/libpbe/
// (C) 2008 Philip Endecott
// This program is free software; you can redistribute it and/or modify
// it under the terms of the GNU General Public License as published by
// the Free Software Foundation; either version 2 of the License, or
// any later version.
//
// This program is distributed in the hope that it will be useful,
// but WITHOUT ANY WARRANTY; without even the implied warranty of
// MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
// GNU General Public License for more details.
//
// You should have received a copy of the GNU General Public License
// along with this program; if not, write to the Free Software
// Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
#ifndef libpbe_geometry_hh
#define libpbe_geometry_hh
#include <cmath>
namespace pbe {
const float PI = 3.1415927F;
const double PId = 3.1415927;
const float earth_radius = 6372795.0F;
template <typename T>
inline T sqr(T x) { return x*x; }
inline float deg2rad(float a) { return PI/180.0F * a; }
inline float rad2deg(float a) { return 180.0F/PI * a; }
inline float degsin(float a) { return sin(deg2rad(a)); }
inline float degcos(float a) { return cos(deg2rad(a)); }
inline float degtan(float a) { return tan(deg2rad(a)); }
inline float degasin(float x) { return rad2deg(asin(x)); }
inline float degacos(float x) { return rad2deg(acos(x)); }
inline float degatan(float x) { return rad2deg(atan(x)); }
inline float degatan2(float y, float x) { return rad2deg(atan2(y,x)); }
inline double deg2rad(double a) { return PId/180.0 * a; }
inline double rad2deg(double a) { return 180.0/PId * a; }
inline double degsin(double a) { return sin(deg2rad(a)); }
inline double degcos(double a) { return cos(deg2rad(a)); }
inline double degtan(double a) { return tan(deg2rad(a)); }
inline double degasin(double x) { return rad2deg(asin(x)); }
inline double degacos(double x) { return rad2deg(acos(x)); }
inline double degatan(double x) { return rad2deg(atan(x)); }
inline double degatan2(double y, double x) { return rad2deg(atan2(y,x)); }
inline float normalise_unsigned_angle(float a) { return a>0 ? fmod(a,360.0F) : 360.0F+fmod(a,360.0F); }
inline float normalise_signed_angle(float a) { return normalise_unsigned_angle(a+180.0F)-180.0F; }
struct position {
float lng;
float lat;
float alt;
position() {}
position(float lng_, float lat_, float alt_):
lng(lng_), lat(lat_), alt(alt_)
{}
};
float distance(const position& a, const position& b); // Proper great circle calculation
float bearing(const position& a, const position& b);
float elevation(const position& a, const position& b);
inline float cheap_distance(const position& a, const position& b) {
return earth_radius / 360.0F * 2*PI
* sqrt( sqr(a.lat-b.lat) + sqr((a.lng-b.lng)*degcos(a.lat)) );
}
inline float cheap_bearing(const position& a, const position& b) {
float d = degatan2( (b.lng-a.lng) * degcos(a.lat),
b.lat-a.lat );
return normalise_unsigned_angle(d);
}
inline float elevation(const position& a, const position& b) {
return degatan2(b.alt-a.alt,cheap_distance(a,b));
}
inline float rectilinear_elevation(const position& a, const position& b) {
return rad2deg((b.alt-a.alt) / cheap_distance(a,b));
}
};
#endif