add an implementation of picture language for sicp