example-GravityCircle.cpp 1.32 KB
Newer Older
Valentin Platzgummer's avatar
Valentin Platzgummer committed
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36
using namespace System;
using namespace NETGeographicLib;

int main(array<System::String ^> ^/*args*/)
{
    try {
        GravityModel^ grav = gcnew GravityModel("egm96", "");
        double lat = 27.99, lon0 = 86.93, h = 8820; // Mt Everest
        {
            // Slow method of evaluating the values at several points on a circle of
            // latitude.
            for (int i = -5; i <= 5; ++i) {
                double lon = lon0 + i * 0.2;
                double gx, gy, gz;
                grav->Gravity(lat, lon, h, gx, gy, gz);
                Console::WriteLine(String::Format("{0} {1} {2} {3}", lon, gx, gy, gz));
            }
        }
        {
            // Fast method of evaluating the values at several points on a circle of
            // latitude using GravityCircle.
            GravityCircle^ circ = grav->Circle(lat, h, GravityModel::Mask::ALL);
            for (int i = -5; i <= 5; ++i) {
                double lon = lon0 + i * 0.2;
                double gx, gy, gz;
                circ->Gravity(lon, gx, gy, gz);
                Console::WriteLine(String::Format("{0} {1} {2} {3}", lon, gx, gy, gz));
            }
        }
    }
    catch (GeographicErr^ e) {
        Console::WriteLine(String::Format("Caught exception: {0}", e->Message));
        return -1;
    }
    return 0;
}