Anonymous user
Last Friday of each month: Difference between revisions
→{{header|Emacs Lisp}}
(→{{header|Elm}}: add Emacs Lisp) |
|||
Line 1,366:
<lang lisp>(require 'calendar)
(defun last-
"Print the last Friday in each month of year"
(mapcar (lambda (month)
Line 1,379:
(number-sequence 1 12)))
(last-
{{output}}
<pre>2012-01-27
| |||