Source position: srastro.pas line 118
function MoonRiseSet(
LD: TplDate;
Longitude: Double;
Latitude: Double
):TplRiseSetRec;