(********
99 Bottles of beer, a rendition from TacoDev
 *********)

component bottles
export Executable

run() = do
    for i <- seq(99:1:-1) do
      println(i " bottles of beer on the wall, " i " bottles of beer.")
      println("Take one down and Pass it around, " (i-1) " bottles of beer on the wall.\n")
    end
      println("No more bottles of beer on the wall, no more bottles of beer.")
      println("Go to the store and buy some more, 99 bottles of beer on the wall.\n")
  end
end