Get/Set
The SemiMajor property provides access to a LinearValue that gives the length of the semi major radius for the Ellipsoid.
Private Sub GeoCalcNET_Ellipsoid_SemiMajor(ByVal ell As GeoCalcNET.Ellipsoid, ByVal data As GeoCalcNET.DataSourceComponent)
Dim semiMaj As GeoCalcNET.LinearValue = ell.SemiMajor
ell.SemiMajor = New GeoCalcNET.LinearValue
ell.SemiMajor.Units = data.GetLinearUnit("BMG", "METERS")
ell.SemiMajor.InUnits = 6378137.0
End Sub
private void GeoCalcNET_Ellipsoid_SemiMajor(GeoCalcNET.Ellipsoid ell, GeoCalcNET.DataSourceComponent data)
{
GeoCalcNET.LinearValue lv = ell.SemiMajor;
GeoCalcNET.LinearUnit lu = data.GetLinearUnit("BMG", "METERS");
GeoCalcNET.LinearValue lv2 = new GeoCalcNET.LinearValue();
lv2.Units = lu;
lv2.InUnits = 6378137;
ell.SemiMajor = lv2;
}