### strcat(hide(set([x],[]),set([s],[99 bottles of beer]),set([i],[99]),while([get([i])],[set([x],strcat(get([x]),get([s]),[ on the wall,],newline(),get([s]),[.],newline(),[Take one down, pass it around,],newline(),hide(set([i],round(sub(get([i]),[1]))),set([s],strcat(if(get([i]),[get([i])],[[No]]),[ bottle],if(sub(get[i],[1]),[[s]],[[]]),[ of beer]))),get([s]),[ on the wall.],newline(),newline()))])),[

],get([x]),[

])