Last Friday of each month: Difference between revisions
m
→{{header|Factor}}: update to Factor 0.98
Drkameleon (talk | contribs) No edit summary |
m (→{{header|Factor}}: update to Factor 0.98) |
||
Line 1,083:
=={{header|Factor}}==
{{works with|Factor|0.98}}
The <code>last-friday-of-month</code> word in the <code>calendar</code> vocabulary does most of the work. This program expects the year as a command line argument.
<lang factor>USING: calendar calendar.format command-line io kernel math.parser sequences ;
IN: rosetta-code.last-fridays
(command-line) second string>number <year> 12 <iota>
[ months time+ last-friday-of-month ] with map
[ timestamp>ymd print ] each</lang>
| |||