feat: 完善日月食与月掩几何链路并扩展历法接口

- 新增日月食中心带、偏食带、阴影足迹、等时线、食分线及升落边界计算，支持极区与混合食拓扑
- 新增日食单时刻阴影求解器、站心状态查询、批量采样和 ΔT 覆盖接口
- 重构恒星与行星月掩路径，补充有限盘面接触、站心修正、掩带宽度、极区投影及升落边界
- 扩展 SVG 与 GeoJSON 输出，支持详细面板、全球/极区/地球投影、边界闭合、时间标记和拓扑签名
- 扩展日月食候选搜索、局地搜索、沙罗序列预计算与范围外推，补充系列锚点和成员一致性校验
- 补齐古历纪年、儒略历独有闰日、多公历候选、历法改革跨日及精确日期运算接口
- 优化 ΔT、章动、恒星时、月球地平线、事件根搜索和本地星历缓存，降低重复计算开销并提升边界稳定

basic/moon_horizon.go

@@ -0,0 +1,58 @@
+package basic
+
+import "math"
+
+// MoonHorizon 返回 UT 儒略日下海平面几何月球中心地平圈（月球恰好在地平线上的观测者轨迹，
+// 即月下点周围的地平圈）的 [经度, 纬度] 顶点，单位为度，不重复首点。视差与椭球口径同
+// HMoonHeight，不含折射；与 HMoonHeight(经, 纬, ..., 0) 配合时该圈上的点高度角为 0。
+// samples<=0 取 360，其余夹到 [12, 1440]。
+// MoonHorizon returns sea-level geometric Moon-centre horizon vertices in degrees for a UT Julian
+// day: the locus of observers that see the Moon exactly on the horizon. Parallax and the observer
+// ellipsoid match HMoonHeight; refraction is excluded.
+func MoonHorizon(jdUT float64, samples int) [][2]float64 {
+	if !finite(jdUT) {
+		return nil
+	}
+	if samples <= 0 {
+		samples = 360
+	}
+	if samples < 12 {
+		samples = 12
+	} else if samples > 1440 {
+		samples = 1440
+	}
+	tt := TD2UT(jdUT, true)
+	ra, dec := HMoonTrueRaDec(tt)
+	distanceAU := HMoonAway(tt) / angularDiameterAstronomicalUnitKM
+	parallax := math.Sin(0.0024427777777*rad) / distanceAU
+	longitude := (ra - ApparentSiderealTime(jdUT)*15) * rad
+	latitude := dec * rad
+	if !finite(parallax) || parallax <= 0 || parallax >= 1 || !finite(longitude) || !finite(latitude) {
+		return nil
+	}
+	center := [3]float64{math.Cos(latitude) * math.Cos(longitude), math.Cos(latitude) * math.Sin(longitude), math.Sin(latitude)}
+	north := [3]float64{-math.Sin(latitude) * math.Cos(longitude), -math.Sin(latitude) * math.Sin(longitude), math.Cos(latitude)}
+	east := [3]float64{-math.Sin(longitude), math.Cos(longitude), 0}
+	points := make([][2]float64, samples)
+	for index := range points {
+		bearing := 2 * math.Pi * float64(index) / float64(samples)
+		radius := math.Acos(parallax)
+		var point [3]float64
+		for iteration := 0; iteration < 8; iteration++ {
+			for axis := range point {
+				point[axis] = center[axis]*math.Cos(radius) +
+					(north[axis]*math.Cos(bearing)+east[axis]*math.Sin(bearing))*math.Sin(radius)
+			}
+			lat := math.Asin(math.Max(-1, math.Min(1, point[2]))) / rad
+			// The topocentric direction is horizontal when its dot product
+			// with the geodetic zenith vanishes: cos(radius)=observer/range.
+			next := math.Acos(parallax * (pcosi(lat, 0)*math.Cos(lat*rad) + psini(lat, 0)*math.Sin(lat*rad)))
+			if math.Abs(next-radius) < 1e-14 {
+				break
+			}
+			radius = next
+		}
+		points[index] = [2]float64{math.Atan2(point[1], point[0]) / rad, math.Asin(math.Max(-1, math.Min(1, point[2]))) / rad}
+	}
+	return points
+}