Function: calendar-mayan-tzolkin-from-absolute

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

Signature

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

Documentation

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

Source Code

;; Defined in /usr/src/emacs/lisp/calendar/cal-mayan.el.gz
(defun calendar-mayan-tzolkin-from-absolute (date)
  "Convert absolute DATE into a Mayan tzolkin date (a pair)."
  (let* ((long-count (+ date calendar-mayan-days-before-absolute-zero))
         ;; Remainder on division by 13,20 with 13,20 instead of zero.
         (day (1+ (mod
                   (1- (+ long-count (car calendar-mayan-tzolkin-at-epoch)))
                   13)))
         (name (1+ (mod
                    (1- (+ long-count (cdr calendar-mayan-tzolkin-at-epoch)))
                    20))))
    (cons day name)))