example-MagneticModel.cpp 673 Bytes
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
using namespace System;
using namespace NETGeographicLib;

int main(array<System::String ^> ^/*args*/)
{
    try {
        MagneticModel^ mag = gcnew MagneticModel("wmm2010","");
        double lat = 27.99, lon = 86.93, h = 8820, t = 2012; // Mt Everest
        double Bx, By, Bz;
        mag->Field(t, lat,lon, h, Bx, By, Bz);
        double H, F, D, I;
        MagneticModel::FieldComponents(Bx, By, Bz, H, F, D, I);
        Console::WriteLine(String::Format("{0} {1} {2} {3}", H, F, D, I));
    }
    catch (GeographicErr^ e) {
        Console::WriteLine(String::Format("Caught exception: {0}", e->Message));
        return -1;
    }
    return 0;
}