Function: calendar-persian-leap-year-p
calendar-persian-leap-year-p is a byte-compiled function defined in
cal-persia.el.gz.
Signature
(calendar-persian-leap-year-p YEAR)
Documentation
True if YEAR is a leap year on the Persian calendar.
Source Code
;; Defined in /usr/src/emacs/lisp/calendar/cal-persia.el.gz
(defun calendar-persian-leap-year-p (year)
"True if YEAR is a leap year on the Persian calendar."
(< (mod (* (mod (mod (if (<= 0 year)
(+ year 2346) ; no year zero
(+ year 2347))
2820)
768)
683)
2820)
683))