14 double ca[] = {10, 9, 8, 7, 6, 5, 4, 3, 2, 1};
15 vector<double>
C(ca, ca + (N + 1) * (N + 2) / 2);
16 double sa[] = {6, 5, 4, 3, 2, 1};
17 vector<double>
S(sa, sa + N * (N + 1) / 2);
18 double cb[] = {1, 2, 3, 4, 5, 6};
19 vector<double>
C1(cb, cb + (N1 + 1) * (N1 + 2) / 2);
20 double sb[] = {3, 2, 1};
21 vector<double> S1(sb, sb + N1 * (N1 + 1) / 2);
24 double tau = 0.1,
x = 2,
y = 3,
z = 1;
26 v =
h(tau,
x,
y,
z, vx, vy, vz);
27 cout << v <<
" " << vx <<
" " << vy <<
" " << vz <<
"\n";
29 catch (
const exception&
e) {
30 cerr <<
"Caught exception: " << e.what() <<
"\n";
StridedVectorType vy(make_vector(y, *n, std::abs(*incy)))
Header for GeographicLib::SphericalHarmonic1 class.
StridedVectorType vx(make_vector(x, *n, std::abs(*incx)))
Array< int, Dynamic, 1 > v
Namespace for GeographicLib.
Array< double, 1, 3 > e(1./3., 0.5, 2.)
Matrix< Scalar, Dynamic, Dynamic > C
Spherical harmonic series with a correction to the coefficients.
set noclip points set clip one set noclip two set bar set border lt lw set xdata set ydata set zdata set x2data set y2data set boxwidth set dummy x