(socket host port)
(defn socket [host port] (let [socket (Socket. host port) in (io/reader socket) out (io/writer socket)] {:socket socket :in in :out out}))