Lunation

delphimoon

previous page next page

Lunation

Algorithms

Top Previous Next

Calculates the lunation

function Lunation(date:TDateTime): integer;

function Lunation_phase(lunation: integer; phase: TMoonPhase): TDateTime;

Description

Calculates the lunation of the given date, or calculates the date of the given moon phase during the lunation given. The lunation is a count of the new moons since January 1st, 1923.

previous page start next page