Sun distance |
Top Previous Next |
Calculates the distance of the sun
function Sun_Distance(date:TDateTime): extended;
Description Calculates the distance of the earth from the sun. The value is given in Astronomical Units (AU).
1 AU = 149597869 km
Reference This function is based upon chapter 25 (24) of "Astronomical Algorithms". |