43 real _a, _b, _c, _ab2, _bc2, _ac2;
45 static void norm(real&
x, real&
y) {
47 real z = hypot(
x,
y);
x /= z;
y /= z;
63 , _ab2((_a - _b) * (_a + _b))
64 , _bc2((_b - _c) * (_b + _c))
65 , _ac2((_a - _c) * (_a + _c))
66 , _ex(_ab2 / _ac2 *
Math::sq(_c / _b), -_ab2 /
Math::sq(_b),
67 _bc2 / _ac2 *
Math::sq(_a / _b),
Math::sq(_a / _b))
68 , _ey(_bc2 / _ac2 *
Math::sq(_a / _b), +_bc2 /
Math::sq(_b),
69 _ab2 / _ac2 *
Math::sq(_c / _b),
Math::sq(_c / _b))
72 if (!(isfinite(_a) && _a >= _b && _b >= _c && _c > 0))
73 throw GeographicErr(
"JacobiConformal: axes are not in order");
76 (
"JacobiConformal: use alternate constructor for sphere");
94 , _ab2(ab * (_a + _b))
95 , _bc2(bc * (_b + _c))
97 , _ex(_ab2 / _ac2 *
Math::sq(_c / _b),
98 -(_a - _b) * (_a + _b) /
Math::sq(_b),
99 _bc2 / _ac2 *
Math::sq(_a / _b),
Math::sq(_a / _b))
100 , _ey(_bc2 / _ac2 *
Math::sq(_a / _b),
101 +(_b - _c) * (_b + _c) /
Math::sq(_b),
102 _ab2 / _ac2 *
Math::sq(_c / _b),
Math::sq(_c / _b))
105 if (!(isfinite(_a) && _a >= _b && _b >= _c && _c > 0 &&
107 throw GeographicErr(
"JacobiConformal: axes are not in order");
108 if (!(ab + bc > 0 && isfinite(_ac2)))
109 throw GeographicErr(
"JacobiConformal: ab + bc must be positive");
123 real somg1 = _b * somg, comg1 = _a * comg; norm(somg1, comg1);
125 * _ex.
Pi(somg1, comg1, _ex.
Delta(somg1, comg1));
152 real sbet1 = _b * sbet, cbet1 = _c * cbet; norm(sbet1, cbet1);
154 * _ey.
Pi(sbet1, cbet1, _ey.
Delta(sbet1, cbet1));
Header for GeographicLib::EllipticFunction class.
Elliptic integrals and functions.
Math::real Delta(real sn, real cn) const
Exception handling for GeographicLib.
Mathematical functions needed by GeographicLib.
static void sincosd(T x, T &sinx, T &cosx)
Namespace for GeographicLib.