Notice. New forum software under development. It's going to miss a few functions and look a bit ugly for a while, but I'm working on it full time now as the old forum was too unstable. Couple days, all good. If you notice any issues, please contact me.
|
Forum Index : Microcontroller and PC projects : MMX/RPI/DOS - geodetic coordinates
Author | Message | ||||
cdeagle Senior Member Joined: 22/06/2014 Location: United StatesPosts: 261 |
' program demo_geodetic.bas July 30, 2017 ' this program demonstrates the proper method for ' interacting with several MMBASIC subroutines ' that perform geocentric to/from geodetic ' coordinate conversions ' MMX, RasPi and DOS version geodetic and geocentric coordinate conversions ---------------------------------------------- please input the geocentric radius (kilometers) ? 8000 please input the geocentric declination (degrees) ? 45 please input the geocentric east longitude (degrees) ? 100 sub geodet1.bas (geocentric-to-geodetic - series solution) ------------------------------------------ geocentric radius = 8000.0000 kilometers geocentric declination = 45.0000 degrees geodetic altitude = 1632.5720 kilometers geodetic latitude = 45.1532 degrees sub geodet2.bas (geocentric-to-geodetic - Borkowski solution) --------------------------------------------- geocentric radius = 8000.0000 kilometers geocentric declination = 45.0000 degrees geodetic altitude = 1632.5720 kilometers geodetic latitude = 45.1532 degrees sub geodet3.bas (geodetic coordinates to ecf position vector) --------------------------------------------- ecf x-position = -982.3024 kilometers ecf y-position = 5570.9139 kilometers ecf z-position = 5656.8542 kilometers geocentric radius = 8000.0000 kilometers geocentric declination = 45.0000 degrees geodetic altitude = 1632.5720 kilometers geodetic latitude = 45.1532 degrees east longitude = 100.0000 degrees sub geodet4.bas (geodetic-to-geocentric - series solution) ------------------------------------------ geocentric radius = 7999.9999 kilometers geocentric declination = 45.0000 degrees geodetic altitude = 1632.5720 kilometers geodetic latitude = 45.1532 degrees sub ecf2geodet.bas (ecf position vector-to-geodetic coordinates) --------------------------------------------- ecf x-position = -982.3024 kilometers ecf y-position = 5570.9139 kilometers ecf z-position = 5656.8542 kilometers geocentric radius = 8000.0000 kilometers geocentric declination = 45.0000 degrees geodetic altitude = 1632.5720 kilometers geodetic latitude = 45.1532 degrees east longitude = 100.0000 degrees 2017-07-31_161511_demo_geodetic.zip |
||||
Print this page |