https://www.mathworks.com/matlabcentral/fileexchange/55167-high-precision-orbit-propagator?s_tid=srchtitle
https://www.researchgate.net/publication/340793133_High_Precision_Orbit_Propagator_C_code
The motion of a near-Earth satellite is affected by various forces. One of these forces is the Earth's central gravitation and the others are known as perturbations. These perturbations are classified into gravitational and non-gravitational forces. In this case, the equation of motion can be written as:
r ̈=-(GM/r^3)*r+γ_p
γ_p is the vector of additional accelerations induced by the disturbing forces.
γ_p=r ̈_E+r ̈_S+r ̈_M+r ̈_P+r ̈_e+r ̈_o+r ̈_D+r ̈_SP+r ̈_A+r ̈_emp
r ̈_E = Accelerations due to the non-spherically and inhomogeneous mass distribution within Earth (central body)
r ̈_S, r ̈_M, r ̈_P = Accelerations due to other celestial bodies (Sun, Moon, and planets)
r ̈_e, r ̈_o = Accelerations due to Earth and oceanic tides
r ̈_D = Accelerations due to atmospheric drag
r ̈_SP, r ̈_A = Accelerations due to direct and Earth-reflected solar radiation pressure
r ̈_emp = Accelerations due to unmodeled forces
Here I have used the following integrator and force model to simulate the satellite's perturbed motion:
Integrator: Variable-order Radau IIA integrator with step-size control
Force Model:
- gravity field of the Earth (GGM03S model)
- gravity of the solar system planets (positions of the planets are computed by JPLDE436)
- drag effect using Jacchia-Bowman 2008, NRLMSISE-00, MSIS-86, Jacchia 70 or modified Harris-Priester atmospheric density model (in Accel.m you can uncomment your favorite model)
- solar radiation pressure using geometrical or cylindrical shadow model
- solid Earth tides (IERS Conventions 2010)
- ocean tides
- general relativity
- ECEF2ECI and ECI2ECEF transformations using IAU 2006 Resolution
The Simulation starts by running the test_HPOP.m. In the InitialState.txt set initial values for your favorite satellite; lines 2-7 are the state vector of satellite/spacecraft in the International Terrestrial Reference Frame (ITRF). Lines 8 to 12 are the satellite parameters related to the forces from atmospheric drag and solar radiation pressure. Lines 8-10 are in units m^2 and kg. Line 11: Cr is the radiation pressure coefficient (Cr = 1 + reflectivity of satellite). Line 12: Cd is the atmospheric drag coefficient of the satellite. In the test_HPOP.m you can consider different perturbations by setting them 1 as follows:
AuxParam.n = 70; % maximum degree of central body's gravitation field
AuxParam.m = 70; % maximum order of central body's gravitation field
AuxParam.sun = 1; % perturbation of the Sun
AuxParam.moon = 1; % perturbation of Moon
AuxParam.planets = 1; % perturbations of planets
AuxParam.sRad = 1; % solar radiation pressure
AuxParam.drag = 1; % atmospheric drag
AuxParam.SolidEarthTides = 1; % solid Earth tides
AuxParam.OceanTides = 1; % ocean tides
AuxParam.Relativity = 1; % general relativity
References:
Montenbruck O., Gill E.; Satellite Orbits: Models, Methods and Applications; Springer Verlag, Heidelberg; Corrected 3rd Printing (2005).
Montenbruck O., Pfleger T.; Astronomy on the Personal Computer; Springer Verlag, Heidelberg; 4th edition (2000).
Seeber G.; Satellite Geodesy; Walter de Gruyter, Berlin, New York; 2nd completely revised and extended edition (2003).
Vallado D. A; Fundamentals of Astrodynamics and Applications; McGraw-Hill, New York; 3rd edition(2007).
NIMA. 2000. Department of Defense World Geodetic System 1984. NIMA-TR 8350.2, 3rd ed, Amendment 1. Washington, DC: Headquarters, National Imagery, and Mapping Agency.
http://sol.spacenvironment.net/jb2008/
https://ssd.jpl.nasa.gov/planets/eph_export.html
https://celestrak.org/SpaceData/