A riff sample involving functions of finite streams that maintain stream-related state - View it on GitHub