add sicp lecture4b <pattern match and evluate>