Function: calendar-mayan-long-count-common-era

calendar-mayan-long-count-common-era is a byte-compiled function defined in cal-mayan.el.gz.

Signature

(calendar-mayan-long-count-common-era LC)

Documentation

Return non-nil if long count LC represents a date in the Common Era.

Source Code

;; Defined in /usr/src/emacs/lisp/calendar/cal-mayan.el.gz
(defun calendar-mayan-long-count-common-era (lc)
  "Return non-nil if long count LC represents a date in the Common Era."
  (let ((base (calendar-mayan-long-count-from-absolute 1)))
    (while (and base (= (car lc) (car base)))
      (setq lc (cdr lc)
            base (cdr base)))
    (or (null lc) (> (car lc) (car base)))))