song.01 ~~~~~~~ define(verse, ----- green bottles sitting on a wall and if one green bottle should accidently fall there'd be ----- green bottles sitting on the wall ) verse verse verse verse verse verse verse verse verse verse song.02 ~~~~~~~ define(line, ----- green bottles sitting on a wall) define(verse, line and if one green bottle should accidently fall there'd be ----- green bottles sitting on the wall ) line verse verse verse verse verse verse verse verse verse verse song.03 ~~~~~~~ define(line, ----- green bottles sitting on a wall) define(verse, `line' and if one green bottle should accidently fall there'd be ----- green bottles sitting on the wall ) line verse verse verse verse verse verse verse verse verse verse song.04 ~~~~~~~ define(line, $1 green bottles sitting on a wall) define(verse, line($1) and if one green bottle should accidently fall there'd be $2 green bottles sitting on the wall ) line(Ten) verse(ten, nine) verse(Nine, eight) verse(Eight, seven) verse(Seven, six) verse(Six, five) verse(Five, four) verse(Four, three) verse(Three, two) verse(Two, one) verse(One, NO) song.05 ~~~~~~~ define(song, `ifelse($1, 1, verse(1, 0), verse($1, decr($1)) `song(decr($1))')') song(10) song.06 ~~~~~~~ define(song, `ifelse($1, 1, `verse(1, 0)', `verse($1, decr($1))' `song(decr($1))')') song(10) song.07 ~~~~~~~ define(song, `ifelse($1, 1, `verse(N1, NO)', `verse(N$1, decr($1))' `song(decr($1))')') define(N1, One) define(N2, Two) define(N3, Three) define(N4, Four) define(N5, Five) define(N6, Six) define(N7, Seven) define(N8, Eight) define(N9, Nine) define(N10, Ten) song(10) song.08 ~~~~~~~ define(song, `ifelse($1, 1, `verse(N1, NO)', `verse(N$1, cat(n, decr($1)))' `song(decr($1))')') define(cat, $1$2) define(N1, One) define(N2, Two) define(N3, Three) define(N4, Four) define(N5, Five) define(N6, Six) define(N7, Seven) define(N8, Eight) define(N9, Nine) define(N10, Ten) define(n1, one) define(n2, two) define(n3, three) define(n4, four) define(n5, five) define(n6, six) define(n7, seven) define(n8, eight) define(n9, nine) song(10) song.09 ~~~~~~~ define(song, `ifelse($1, 1, `verse(N1, NO)', `verse(N$1, cat(n, decr($1)))' `song(decr($1))')')dnl define(cat, $1$2)dnl define(N1, One)dnl define(N2, Two)dnl define(N3, Three)dnl define(N4, Four)dnl define(N5, Five)dnl define(N6, Six)dnl define(N7, Seven)dnl define(N8, Eight)dnl define(N9, Nine)dnl define(N10, Ten)dnl define(n1, one)dnl define(n2, two)dnl define(n3, three)dnl define(n4, four)dnl define(n5, five)dnl define(n6, six)dnl define(n7, seven)dnl define(n8, eight)dnl define(n9, nine)dnl song(10) song.10 ~~~~~~~ define(song, `ifelse($1, 1, `verse(N1, NO)', `verse(N$1, cat(n, decr($1)))' `song(decr($1))')')dnl define(cat, $1$2)dnl define(N1, One)dnl define(N2, Two)dnl define(N3, Three)dnl define(N4, Four)dnl define(N5, Five)dnl define(N6, Six)dnl define(N7, Seven)dnl define(N8, Eight)dnl define(N9, Nine)dnl define(n1, one)dnl define(n2, two)dnl define(n3, three)dnl define(n4, four)dnl define(n5, five)dnl define(n6, six)dnl define(n7, seven)dnl define(n8, eight)dnl TEN GREEN BOTTLES - an idiotic folk `song' ---------------------------------------- line(Ten) verse(ten, nine) song(9) song.11 ~~~~~~~ define(line, $1 green bottles sitting on a wall)dnl define(verse, line($1) and if one green bottle should accidently fall there'd be $2 green bottles sitting on the wall )dnl define(song, `ifelse($1, 1, `verse(N1, NO)', `verse(N$1, cat(n, decr($1)))' `song(decr($1))')')dnl define(cat, $1$2)dnl define(N1, One)dnl define(N2, Two)dnl define(N3, Three)dnl define(N4, Four)dnl define(N5, Five)dnl define(N6, Six)dnl define(N7, Seven)dnl define(N8, Eight)dnl define(N9, Nine)dnl define(n1, one)dnl define(n2, two)dnl define(n3, three)dnl define(n4, four)dnl define(n5, five)dnl define(n6, six)dnl define(n7, seven)dnl define(n8, eight)dnl TEN GREEN BOTTLES - an idiotic folk `song' ---------------------------------------- line(Ten) verse(ten, nine) song(9)