Numerical Constants

WinOrbit uses several numerical constants. The values I used are listed below:
Pi = 3.14159265358979
SpeedOfLight = 299792.5 Speed of Light, km/sec
R_Equatorial = 6378.165 'Earth Radius, km (Equatorial)
Re_Mean = 6367 'Earth Radius, km (avg)
F_Earth = 1 / 298.25 '1/Flattening coeff for ellipsoidal geodetic model
G0 = 75369793000000 'G *M(earth), (Orbit/d)^2/km^3
Astronomical_Unit = 149597870 'Mean Earth-Sun distance, km