[(let drink ((bottles 99)) (brl-when (positive? bottles) ]

[bottles] bottles of beer on the wall; [bottles] bottles of beer!
Take one down, pass it around; [(- bottles 1)] bottles of beer on the wall!

[ (drink (- bottles 1))))