-- For the Euphoria 4.0 Developer Team
-- Merry Christmas

include std/io.e
include std/sequence.e

sequence s = reverse({ "Twelve drummers drumming",
"Eleven pipers piping", 
"Ten lords a-leaping", 
"Nine ladies dancing", 
"Eight maids a-milking", 
"Seven swans a-swimming", 
"Six geese a-laying", 
"Five gold rings", 
"Four calling birds", 
"Three French hens", 
"Two turtle doves",
"And a partridge in a pear tree." })


puts( 1, "On the first day of Christmas\n")
puts( 1, "My true love sent to me\n")
puts( 1, "A partridge in a pear true\n")
puts( 1, "\n" )

for i = 2 to 12 do
	printf( 1, "On the %dth day of Christmas\n", {i})
	printf( 1, "My true love sent to me\n", {} )
	for j = i to 1 by -1 do
		printf( 1, "%s\n", {s[j]} )
	end for
	puts( 1, "\n" )
end for