bottles.mt

def bottles(n):
    return switch (n) {
        match ==0 { return "No bottles" }
        match ==1 { return "1 bottle" }
        match _   { return `$n bottles` }
    }

var n := 99

while (n > 0): 
    traceln(`${bottles(n)} of beer on the wall,
${bottles(n)} of beer.
Take one down, pass it around,`)
    n := n - 1
    traceln(`${bottles(n)} of beer on the wall.
`)