Zip and Unzip Text

http://en.wikipedia.org/wiki/LZW
shows how to zip and unzip using the Lempel-Ziv-Welch algorithm.  Implement this in Clojure. Test with emma.txt.  Show the 
compressed file size and include timing.  Check that unzip restores your zip file. You may use 16 bits for each code which 
means that code will range from 0 through 65535.  When the table is full just use it without additional entries. The zip file 
should be binary. In Java a DataOutputStream has several write methods and a wrtieChar method.  It can be created from a 
BufferedOutputStream which can be created from a FileOutputStream.