+ // Set sea-level radius
+ SG_LOG( SG_FLIGHT, SG_INFO, "...initializing sea-level radius..." );
+ SG_LOG( SG_FLIGHT, SG_INFO, " lat = "
+ << fgGetDouble("/sim/presets/latitude-deg")
+ << " alt = " << get_Altitude() );
+ double sea_level_radius_meters;
+ double lat_geoc;
+ sgGeodToGeoc( fgGetDouble("/sim/presets/latitude-deg")
+ * SGD_DEGREES_TO_RADIANS,
+ get_Altitude() * SG_FEET_TO_METER,
+ &sea_level_radius_meters, &lat_geoc );
+ _set_Sea_level_radius( sea_level_radius_meters * SG_METER_TO_FEET );
+
+ // Set initial velocities
+ SG_LOG( SG_FLIGHT, SG_INFO, "...initializing velocities..." );
+ if ( !fgHasNode("/sim/presets/speed-set") ) {
+ set_V_calibrated_kts(0.0);
+ } else {
+ const string speedset = fgGetString("/sim/presets/speed-set");
+ if ( speedset == "knots" || speedset == "KNOTS" ) {
+ set_V_calibrated_kts( fgGetDouble("/sim/presets/airspeed-kt") );
+ } else if ( speedset == "mach" || speedset == "MACH" ) {
+ set_Mach_number( fgGetDouble("/sim/presets/mach") );
+ } else if ( speedset == "UVW" || speedset == "uvw" ) {
+ set_Velocities_Wind_Body(
+ fgGetDouble("/sim/presets/uBody-fps"),
+ fgGetDouble("/sim/presets/vBody-fps"),
+ fgGetDouble("/sim/presets/wBody-fps") );
+ } else if ( speedset == "NED" || speedset == "ned" ) {
+ set_Velocities_Local(
+ fgGetDouble("/sim/presets/speed-north-fps"),
+ fgGetDouble("/sim/presets/speed-east-fps"),
+ fgGetDouble("/sim/presets/speed-down-fps") );
+ } else {
+ SG_LOG( SG_FLIGHT, SG_ALERT,
+ "Unrecognized value for /sim/presets/speed-set: "
+ << speedset);
+ set_V_calibrated_kts( 0.0 );
+ }
+ }