Seasons

delphimoon

Seasons

Algorithms

Top  Previous  Next

 

Calculates the starting dates of the seasons

 

function StartSeason(year: Integer; season:TSeason): TDateTime;

 

Description

Calculates the starting dates of the four seasons, or to be more exact the astronomical event which is used as the season start - that is: the position of the sun has a longitude divisible by 90°.

 

Season

 Astronomical

Winter

 December solstitial

Spring

 March (vernal) equinox

Summer

 June solstitial

Autumn

 September equinox

 

Hint

The Chinese calendar is separating the year by 24 times called solar terms, the beginning of the seasons are just four of those.

 

Reference

This function is based upon chapter 27 (26) of "Astronomical Algorithms".