sig
  val compress :
    ?level:int -> ?write_zlib_header:bool -> unit -> Cryptokit.transform
  val uncompress : ?expect_zlib_header:bool -> unit -> Cryptokit.transform
end