|
Next blue moon |
Top Previous Next |
|
Calculates the date of the next blue moon
function Next_Blue_Moon(date:TDateTime): TDateTime;
Description "Once upon a blue moon" was originally a term for something happening very rarly. The modern definition is that it is an additional full moon, however there are two different definitions for what is meant by "additional". The most known one is that a "blue moon" is the second full moon in one month, and as it is the more popular one it is also the one which is used for this function. The traditional one is used for the Moon name function. |