add writer_reader.hs