Added stream reading function and test in tut3.hs.  Seems to read for one cycle then stop working.