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.
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.
StridedVectorType vx(make_vector(x,*n, std::abs(*incx)))
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