Functions that I wrote/copied while reading the Schemer series.