class output_inflate :Netchannels.out_obj_channel ->Netchannels.out_obj_channel
let ch' = new output_inflate ch: Data written to ch' is inflated
      and written to ch. Use this for uncompressing data while writing.
Note that ch isn't closed when ch' is closed.