fixed dependencies

2024-10-24 15:46:01 +08:00
parent d16a5bd9c0
commit 1161e8d054
2005 changed files with 690883 additions and 0 deletions
--- a/vendor/github.com/starainrt/astro/basic/calendar.go
+++ b/vendor/github.com/starainrt/astro/basic/calendar.go
@@ -0,0 +1,434 @@
+package basic
+
+import (
+	"fmt"
+	"math"
+	"strings"
+	"time"
+)
+
+var defDeltaTFn = DefaultDeltaT
+
+/*
+@name: 儒略日计算
+@dec: 计算给定时间的儒略日，1582年改力后为格里高利历，之前为儒略历
+@     请注意，传入的时间在天文计算中一般为力学时，应当注意和世界时的转化
+*/
+func JDECalc(Year, Month int, Day float64) float64 {
+	if Month == 1 || Month == 2 {
+		Year--
+		Month += 12
+	}
+	var tmpvarB int
+	tmpvar := fmt.Sprintf("%04d-%02d-%2d", Year, Month, int(math.Floor(Day)))
+	if strings.Compare(tmpvar, `1582-10-04`) != 1 {
+		tmpvarB = 0
+	} else {
+		tmpvarA := int(Year / 100)
+		tmpvarB = 2 - tmpvarA + int(tmpvarA/4)
+	}
+	return (math.Floor(365.25*(float64(Year)+4716.0)) + math.Floor(30.6001*float64(Month+1)) + Day + float64(tmpvarB) - 1524.5)
+}
+
+/*
+@name: 获得当前儒略日时间：当地世界时，非格林尼治时间
+*/
+func GetNowJDE() (NowJDE float64) {
+	Time := float64(time.Now().Second())/3600.0/24.0 + float64(time.Now().Minute())/60.0/24.0 + float64(time.Now().Hour())/24.0
+	NowJDE = JDECalc(time.Now().Year(), int(time.Now().Month()), float64(time.Now().Day())+Time)
+	return
+}
+
+func dt_ext(y, jsd float64) float64 { // 二次曲线外推，用于数值外插
+	dy := (y - 1820) / 100.00
+	return -20 + jsd*dy*dy
+}
+func dt_cal(y float64) float64 { //传入年， 返回世界时UT与原子时（力学时 TD）之差, ΔT = TD - UT
+	dt_at := []float64{
+		-4000, 108371.7, -13036.80, 392.000, 0.0000,
+		-500, 17201.0, -627.82, 16.170, -0.3413,
+		-150, 12200.6, -346.41, 5.403, -0.1593,
+		150, 9113.8, -328.13, -1.647, 0.0377,
+		500, 5707.5, -391.41, 0.915, 0.3145,
+		900, 2203.4, -283.45, 13.034, -0.1778,
+		1300, 490.1, -57.35, 2.085, -0.0072,
+		1600, 120.0, -9.81, -1.532, 0.1403,
+		1700, 10.2, -0.91, 0.510, -0.0370,
+		1800, 13.4, -0.72, 0.202, -0.0193,
+		1830, 7.8, -1.81, 0.416, -0.0247,
+		1860, 8.3, -0.13, -0.406, 0.0292,
+		1880, -5.4, 0.32, -0.183, 0.0173,
+		1900, -2.3, 2.06, 0.169, -0.0135,
+		1920, 21.2, 1.69, -0.304, 0.0167,
+		1940, 24.2, 1.22, -0.064, 0.0031,
+		1960, 33.2, 0.51, 0.231, -0.0109,
+		1980, 51.0, 1.29, -0.026, 0.0032,
+		2000, 63.87, 0.1, 0, 0,
+		2005, 64.7, 0.4, 0, 0, //一次项记为x,则 10x=0.4秒/年*(2015-2005),解得x=0.4
+		2015, 69,
+	}
+	y0 := dt_at[len(dt_at)-2] //表中最后一年
+	t0 := dt_at[len(dt_at)-1] //表中最后一年的 deltatT
+	if y >= y0 {
+		jsd := float64(31) // sjd是y1年之后的加速度估计
+		// 瑞士星历表jsd=31, NASA网站jsd=32, skmap的jsd=29
+		if y > y0+100.00 {
+			return dt_ext(y, jsd)
+		}
+		v := dt_ext(y, jsd)        //二次曲线外推
+		dv := dt_ext(y0, jsd) - t0 // ye年的二次外推与te的差
+		return (v - dv*(y0+100.00-y)/100.00)
+	}
+	d := dt_at
+	var i int
+	for i = 0; i < len(d); i += 5 {
+		if float64(y) < d[i+5] {
+			break
+			// 判断年所在的区间
+		}
+	}
+	t1 := (y - d[i]) / (d[i+5] - d[i]) * 10.00 //////// 三次插值， 保证精确性
+	t2 := t1 * t1
+	t3 := t2 * t1
+	res := d[i+1] + d[i+2]*t1 + d[i+3]*t2 + d[i+4]*t3
+	return (res)
+}
+
+func DeltaT(date float64, isJDE bool) float64 {
+	return defDeltaTFn(date, isJDE)
+}
+
+func SetDeltaTFn(fn func(float64, bool) float64) {
+	if fn != nil {
+		defDeltaTFn = fn
+	}
+}
+
+func GetDeltaTFn() func(float64, bool) float64 {
+	return defDeltaTFn
+}
+
+func OldDefaultDeltaT(Date float64, IsJDE bool) (Result float64) { //传入年或儒略日，传出为秒
+	var Year float64
+	if IsJDE {
+		dates := JDE2Date(Date)
+		Year = float64(dates.Year()) + float64(dates.YearDay())/365.0
+	} else {
+		Year = Date
+	}
+	if Year < 2100 && Year >= 2010 {
+		return dt_cal(Year)
+	}
+	return DefaultDeltaT(Date, IsJDE)
+}
+
+func DefaultDeltaT(Date float64, IsJDE bool) (Result float64) { //传入年或儒略日，传出为秒
+	var Year float64
+	if IsJDE {
+		dates := JDE2Date(Date)
+		Year = float64(dates.Year()) + float64(dates.YearDay())/365.0
+	} else {
+		Year = Date
+	}
+	if Year < 2010 {
+		Result = dt_cal(Year)
+		return
+	}
+	if Year < 2100 && Year >= 2010 {
+		var t = (Year - 2000.0)
+		Result = 62.92 + 0.32217*t + 0.005589*t*t
+		return
+	}
+	if Year >= 2100 && Year <= 2150 {
+		Result = -20 + 32*(((Year-1820.0)/100.0)*((Year-1820.0)/100.0)) - 0.5628*(2150-Year)
+		return
+	}
+	if Year > 2150 {
+		//tmp=(Year-1820)/100;
+		//Result= -20 + 32 * tmp*tmp;
+		Result = dt_cal(Year)
+		return
+	}
+	return
+}
+
+func TD2UT(JDE float64, UT2TD bool) float64 { // true 世界时转力学时CC，false 力学时转世界时VV
+
+	Deltat := DeltaT(JDE, true)
+	if UT2TD {
+		return JDE + Deltat/3600/24
+	} else {
+		return JDE - Deltat/3600/24
+	}
+}
+
+/*
+ * @name: JDE转日期，输出为数组
+ */
+func JDE2Date(JD float64) time.Time {
+	JD = JD + 0.5
+	Z := float64(int(JD))
+	F := JD - Z
+	var A, B, Years, Months, Days float64
+	if Z < 2299161.0 {
+		A = Z
+	} else {
+		alpha := math.Floor((Z - 1867216.25) / 36524.25)
+		A = Z + 1 + alpha - math.Floor(alpha/4)
+	}
+	B = A + 1524
+	C := math.Floor((B - 122.1) / 365.25)
+	D := math.Floor(365.25 * C)
+	E := math.Floor((B - D) / 30.6001)
+	Days = B - D - math.Floor(30.6001*E) + F
+	if E < 14 {
+		Months = E - 1
+	}
+	if E == 14 || E == 15 {
+		Months = E - 13
+	}
+	if Months > 2 {
+		Years = C - 4716
+	}
+	if Months == 1 || Months == 2 {
+		Years = C - 4715
+	}
+	tms := (Days - math.Floor(Days)) * 24 * 3600
+	Days = math.Floor(Days)
+	tz, _ := time.LoadLocation("Local")
+	dates := time.Date(int(Years), time.Month(int(Months)), int(Days), 0, 0, 0, 0, tz)
+	dates = time.Unix(dates.Unix()+int64(tms), int64((tms-math.Floor(tms))*1000000000))
+	return dates
+}
+
+func JDE2DateByZone(JD float64, tz *time.Location, byZone bool) time.Time {
+	JD = JD + 0.5
+	Z := float64(int(JD))
+	F := JD - Z
+	var A, B, Years, Months, Days float64
+	if Z < 2299161.0 {
+		A = Z
+	} else {
+		alpha := math.Floor((Z - 1867216.25) / 36524.25)
+		A = Z + 1 + alpha - math.Floor(alpha/4)
+	}
+	B = A + 1524
+	C := math.Floor((B - 122.1) / 365.25)
+	D := math.Floor(365.25 * C)
+	E := math.Floor((B - D) / 30.6001)
+	Days = B - D - math.Floor(30.6001*E) + F
+	if E < 14 {
+		Months = E - 1
+	}
+	if E == 14 || E == 15 {
+		Months = E - 13
+	}
+	if Months > 2 {
+		Years = C - 4716
+	}
+	if Months == 1 || Months == 2 {
+		Years = C - 4715
+	}
+	tms := (Days - math.Floor(Days)) * 24 * 3600
+	Days = math.Floor(Days)
+	if !byZone {
+		dates := time.Date(int(Years), time.Month(int(Months)), int(Days), 0, 0, 0, 0, time.UTC)
+		return time.Unix(dates.Unix()+int64(tms), int64((tms-math.Floor(tms))*1000000000)).In(tz)
+	}
+	dates := time.Date(int(Years), time.Month(int(Months)), int(Days), 0, 0, 0, 0, tz)
+	return time.Unix(dates.Unix()+int64(tms), int64((tms-math.Floor(tms))*1000000000))
+}
+
+func GetLunar(year, month, day int, tz float64) (lmonth, lday int, leap bool, result string) {
+	jde := JDECalc(year, month, float64(day)) //计算当前JDE时间
+	if month == 11 || month == 12 {           //判断当前日期属于前一年周期还是后一年周期
+		//判断方法：当前日期与冬至日所在朔望月的关系
+		winterday := GetJQTime(year, 270) + tz                                        //冬至日日期（世界时，北京时间）
+		Fday := TD2UT(CalcMoonS(float64(year)+11.0/12.0+5.0/30.0/12.0, 0), true) + tz //朔月（世界时，北京时间）
+		Yday := TD2UT(CalcMoonS(float64(year)+1.0, 0), true) + tz                     //下一朔月（世界时，北京时间）
+		if Fday-math.Floor(Fday) > 0.5 {
+			Fday = math.Floor(Fday) + 0.5
+		} else {
+			Fday = math.Floor(Fday) - 0.5
+		}
+		if Yday-math.Floor(Yday) > 0.5 {
+			Yday = math.Floor(Yday) + 0.5
+		} else {
+			Yday = math.Floor(Yday) - 0.5
+		}
+		if winterday >= Fday && winterday < Yday && jde <= Fday {
+			year--
+		}
+		if winterday >= Yday && jde < Yday {
+			year--
+		}
+	} else {
+		year--
+	}
+	jieqi := GetJieqiLoops(year, 25)        //一年的节气
+	moon := GetMoonLoops(float64(year), 17) //一年朔月日
+	winter1 := jieqi[0] - 8.0/24 + tz       //第一年冬至日
+	winter2 := jieqi[24] - 8.0/24 + tz      //第二年冬至日
+	for idx, v := range moon {
+		if tz != 8.0/24 {
+			v = v - 8.0/24 + tz
+		}
+		if v-math.Floor(v) > 0.5 {
+			moon[idx] = math.Floor(v) + 0.5
+		} else {
+			moon[idx] = math.Floor(v) - 0.5
+		}
+	} //置闰月为0点
+	for idx, v := range jieqi {
+		if tz != 8.0/24 {
+			v = v - 8.0/24 + tz
+		}
+		if v-math.Floor(v) > 0.5 {
+			jieqi[idx] = math.Floor(v) + 0.5
+		} else {
+			jieqi[idx] = math.Floor(v) - 0.5
+		}
+	} //置节气为0点
+	mooncount := 0           //年内朔望月计数
+	var min, max int = 20, 0 //最大最小计数
+	for i := 0; i < 15; i++ {
+		if moon[i] >= winter1 && moon[i] < winter2 {
+			if i <= min {
+				min = i
+			}
+			if i >= max {
+				max = i
+			}
+			mooncount++
+		}
+	}
+	leapmonth := 20
+	if mooncount == 13 { //存在闰月
+		var j, i = 2, 0
+		for i = min; i <= max; i++ {
+			if !(moon[i] <= jieqi[j] && moon[i+1] > jieqi[j]) {
+				break
+			}
+			j += 2
+		}
+		leapmonth = i - min + 1
+	}
+	i := 0
+	for i = min - 1; i <= max; i++ {
+		if moon[i] > jde {
+			break
+		}
+	}
+	lmonth = i - min
+	var sleap bool = false
+	leap = false
+	if lmonth >= leapmonth {
+		sleap = true
+	}
+	if lmonth == leapmonth {
+		leap = true
+	}
+	if lmonth < 2 {
+		lmonth += 11
+	} else {
+		lmonth--
+	}
+	if sleap {
+		lmonth--
+	}
+	if lmonth <= 0 {
+		lmonth += 12
+	}
+	lday = int(jde-moon[i-1]) + 1
+	strmonth := []string{"十", "一", "二", "三", "四", "五", "六", "七", "八", "九", "十", "冬", "腊"}
+	strday := []string{"初", "十", "廿", "三"}
+	if leap {
+		result += "闰"
+	}
+	if lmonth == 1 {
+		result += "正月"
+	} else {
+		result += strmonth[lmonth] + "月"
+	}
+	if lday == 20 {
+		result += "二十"
+	} else if lday == 10 {
+		result += "初十"
+	} else {
+		result += strday[lday/10] + strmonth[lday%10]
+	}
+	return
+}
+
+func GetSolar(year, month, day int, leap bool, tz float64) float64 {
+	if month < 11 {
+		year--
+	}
+	jieqi := GetJieqiLoops(year, 25)        //一年的节气
+	moon := GetMoonLoops(float64(year), 17) //一年朔月日
+	winter1 := jieqi[0] - 8.0/24 + tz       //第一年冬至日
+	winter2 := jieqi[24] - 8.0/24 + tz      //第二年冬至日
+	for idx, v := range moon {
+		if tz != 8.0/24 {
+			v = v - 8.0/24 + tz
+		}
+		if v-math.Floor(v) > 0.5 {
+			moon[idx] = math.Floor(v) + 0.5
+		} else {
+			moon[idx] = math.Floor(v) - 0.5
+		}
+	} //置闰月为0点
+	for idx, v := range jieqi {
+		if tz != 8.0/24 {
+			v = v - 8.0/24 + tz
+		}
+		if v-math.Floor(v) > 0.5 {
+			jieqi[idx] = math.Floor(v) + 0.5
+		} else {
+			jieqi[idx] = math.Floor(v) - 0.5
+		}
+	} //置节气为0点
+	mooncount := 0           //年内朔望月计数
+	var min, max int = 20, 0 //最大最小计数
+	for i := 0; i < 15; i++ {
+		if moon[i] >= winter1 && moon[i] < winter2 {
+			if i <= min {
+				min = i
+			}
+			if i >= max {
+				max = i
+			}
+			mooncount++
+		}
+	}
+	leapmonth := 20
+	if mooncount == 13 { //存在闰月
+		var j, i = 2, 0
+		for i = min; i <= max; i++ {
+			if !(moon[i] <= jieqi[j] && moon[i+1] > jieqi[j]) {
+				break
+			}
+			j += 2
+		}
+		leapmonth = i - min + 1
+	}
+	if leap {
+		month++
+	}
+	if month > 10 {
+		month -= 11
+	} else {
+		month++
+	}
+	if month >= leapmonth && !leap {
+		month++
+	}
+	jde := moon[min-1+month] + float64(day) - 1
+	return jde
+}
+
+// Date2JDE 日期转儒略日
+func Date2JDE(date time.Time) float64 {
+	day := float64(date.Day()) + float64(date.Hour())/24.0 + float64(date.Minute())/24.0/60.0 + float64(date.Second())/24.0/3600.0 + float64(date.Nanosecond())/1000000000.0/3600.0/24.0
+	return JDECalc(date.Year(), int(date.Month()), day)
+}