Day of the week: Difference between revisions
Content added Content deleted
(Added REXX sample) |
(Added PicoLisp) |
||
| Line 513: | Line 513: | ||
Sun Dec 25 00:00:00 EST 2112 |
Sun Dec 25 00:00:00 EST 2112 |
||
Sun Dec 25 00:00:00 EST 2118</pre> |
Sun Dec 25 00:00:00 EST 2118</pre> |
||
=={{header|PicoLisp}}== |
|||
<lang PicoLisp>(for (Y 2008 (>= 2121 Y) (inc Y)) |
|||
(when (= "Sunday" (day (date Y 12 25))) |
|||
(printsp Y) ) ) |
|||
2011 2016 2022 2033 2039 2044 2050 2061 2067 2072 2078 2089 2095 2101 2107 2112 2118</lang> |
|||
=={{header|M4}}== |
=={{header|M4}}== |
||