Google Groups no longer supports new Usenet posts or subscriptions. Historical content remains viewable.
Dismiss

emacs.git 內的 holiday-chinese-qingming

1 view
Skip to first unread message

Kang-min Liu

unread,
Jul 28, 2022, 4:25:07 AM7/28/22
to

https://github.com/emacs-mirror/emacs/blob/master/lisp/calendar/cal-china.el#L457

是計算清明日期的函數。

(defun holiday-chinese-qingming ()
"Date of Chinese Qingming Festival, if visible in calendar.
Returns (((MONTH DAY YEAR) TEXT)), where the date is Gregorian."
(when (memq displayed-month '(3 4 5)) ; is April visible?
(list (list (calendar-gregorian-from-absolute
;; 15 days after Vernal Equinox.
(+ 15
(calendar-chinese-zodiac-sign-on-or-after
(calendar-absolute-from-gregorian
(list 3 15 displayed-year)))))
"Qingming Festival"))))

看來有夠短... 而且依照註釋,是在計算「春分後第 15 日」的日期。

依照 calendar-chinese-zodiac-sign-on-or-after 這函數的說明來看,春分的找
法是等同於當年 3/15 日之後第一個黃島十二宮星座改變的日期,也就是找出
牡羊宮 (Aries) 的第一天。

這麼說來牡羊宮第一天就是春分,而第十六天就是清明?一定這麼一致的嗎?

https://zh.wikipedia.org/wiki/%E9%BB%83%E9%81%93%E5%8D%81%E4%BA%8C%E5%AE%AE



----
0 new messages