Function: calendar-mayan-previous-round-date

calendar-mayan-previous-round-date is an autoloaded, interactive and byte-compiled function defined in cal-mayan.el.gz.

Signature

(calendar-mayan-previous-round-date TZOLKIN-DATE HAAB-DATE &optional NOECHO)

Documentation

Move to previous instance of Mayan TZOLKIN-DATE HAAB-DATE combination.

Echo Mayan date unless NOECHO is non-nil.

Key Bindings

Source Code

;; Defined in /usr/src/emacs/lisp/calendar/cal-mayan.el.gz
;;;###cal-autoload
(defun calendar-mayan-previous-round-date
  (tzolkin-date haab-date &optional noecho)
  "Move to previous instance of Mayan TZOLKIN-DATE HAAB-DATE combination.
Echo Mayan date unless NOECHO is non-nil."
  (interactive (list (calendar-mayan-read-tzolkin-date)
                     (calendar-mayan-read-haab-date)))
  (let ((date (calendar-mayan-tzolkin-haab-on-or-before
               tzolkin-date haab-date
               (1- (calendar-absolute-from-gregorian
                    (calendar-cursor-to-date))))))
    (if (not date)
        (error "%s, %s does not exist in the Mayan calendar round"
               (calendar-mayan-tzolkin-to-string tzolkin-date)
               (calendar-mayan-haab-to-string haab-date))
      (calendar-goto-date (calendar-gregorian-from-absolute date))
      (or noecho (calendar-mayan-print-date)))))