sig
  type t
  val pack : Tools.PDU.t -> Bitstring.bitstring
  val unpack : Bitstring.bitstring -> Tools.PDU.t option
end