Parsing through a list with scheme