Sha256: 78345ffedeb44a86f6ab0aef428254c354916961b419a126b94838d30f60d6b6
Contents?: true
Size: 273 Bytes
Versions: 396
Compression:
Stored size: 273 Bytes
Contents
(cl:defpackage #:leap
(:use #:common-lisp)
(:export #:leap-year-p))
(in-package #:leap)
(defun divisible-by-p (n d) (= 0 (rem n d)))
(defun leap-year-p (year)
(and (divisible-by-p year 4)
(or (not (divisible-by-p year 100))
(divisible-by-p year 400))))
Version data entries
396 entries across 396 versions & 1 rubygems