Poem/ALisp example for a waste-removal scenario