Function: calendar-mayan-next-round-date

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

Signature

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

Documentation

Move cursor to next 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-next-round-date (tzolkin-date haab-date
                                                       &optional noecho)
  "Move cursor to next 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
               (+ 18980 (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)))))