Function: holiday-greek-orthodox-easter-abs

holiday-greek-orthodox-easter-abs is a byte-compiled function defined in holidays.el.gz.

Signature

(holiday-greek-orthodox-easter-abs Y)

Documentation

Return the absolute date of Easter in Year.

Source Code

;; Defined in /usr/src/emacs/lisp/calendar/holidays.el.gz
(defun holiday-greek-orthodox-easter-abs (y)
  "Return the absolute date of Easter in Year."
  (let* ((julian-year (calendar-extract-year
                       (calendar-julian-from-absolute
                        (calendar-absolute-from-gregorian
                         (list 3 31 y)))))
         (shifted-epact                 ; age of moon for April 5
          (% (+ 14
                (* 11 (% julian-year 19)))
             30))
         (paschal-moon      ; day after full moon on or after March 21
          (- (calendar-julian-to-absolute (list 4 19 julian-year))
             shifted-epact))
	 (abs-easter (calendar-dayname-on-or-before 0 (+ paschal-moon 7))))
    abs-easter))