The Twelve Days of Christmas: Difference between revisions

→‎{{header|Common Lisp}}: Use format to generate ordinal names
m (→‎{{header|Haskell}}: Applied Ormolu)
(→‎{{header|Common Lisp}}: Use format to generate ordinal names)
Line 1,247:
 
<lang lisp>(let
((names ' (firstloop secondfor thirdn from 1 to 12 collect (format fourthnil fifth"~:r" sixthn)))
seventh eighth ninth tenth eleventh twelfth))
(gifts '( "A partridge in a pear tree." "Two turtle doves and"
"Three French hens," "Four calling birds,"
1,481

edits