Source position: srastro.pas line 148
function Solstice(
Y: Integer;
Epoch: Integer;
Summer: Boolean
):TplDateTimeRec;