Function: calendar-mayan-haab-from-absolute

calendar-mayan-haab-from-absolute is a byte-compiled function defined in cal-mayan.el.gz.

Signature

(calendar-mayan-haab-from-absolute DATE)

Documentation

Convert absolute DATE into a Mayan haab date (a pair).

Source Code

;; Defined in /usr/src/emacs/lisp/calendar/cal-mayan.el.gz
(defun calendar-mayan-haab-from-absolute (date)
  "Convert absolute DATE into a Mayan haab date (a pair)."
  (let* ((long-count (+ date calendar-mayan-days-before-absolute-zero))
         (day-of-haab
          (% (+ long-count
                (car calendar-mayan-haab-at-epoch)
                (* 20 (1- (cdr calendar-mayan-haab-at-epoch))))
             365))
         (day (% day-of-haab 20))
         (month (1+ (/ day-of-haab 20))))
    (cons day month)))