Anonymous user
Day of the week: Difference between revisions
m
→{{header|Scheme}}: increasing years
m (→{{header|Scheme}}: increasing years) |
|||
Line 1,920:
(define (task)
(let loop ((y
(if (
v
(loop (
(if (= 7 (day-of-week y 12 25))
(cons y v)
Line 1,929:
(task)
; (
=={{header|Seed7}}==
|