* modified stream.scm