Function: holiday-bahai-twin-holy-birthdays-1

holiday-bahai-twin-holy-birthdays-1 is a byte-compiled function defined in cal-bahai.el.gz.

Signature

(holiday-bahai-twin-holy-birthdays-1 Y)

Documentation

Return holiday entries of the Twin Holy Birthdays in Gregorian year Y.

Source Code

;; Defined in /usr/src/emacs/lisp/calendar/cal-bahai.el.gz
(defun holiday-bahai-twin-holy-birthdays-1 (y)
  "Return holiday entries of the Twin Holy Birthdays in Gregorian year Y."
  (let ((bahai-year (- y (1- 1844))))
    (if (>= bahai-year calendar-bahai-reform-year)
        ;; Post-reform: calculate from eighth new moon
        (let ((dates (calendar-bahai-twin-holy-birthdays-for-year bahai-year)))
          (list (list (car dates) "Birth of the Báb")
                (list (cadr dates) "Birth of Bahá’u’lláh")))
      ;; Pre-reform: fixed dates
      (list (list (list 10 20 y) "Birth of the Báb")
            (list (list 11 12 y) "Birth of Bahá’u’lláh")))))