Extracted life example from R7RS to library files