sig
  exception Invalid_header
  exception Skipped_frame
  exception Error
  type t
  val create :
    Ogg.Stream.packet -> Ogg.Stream.packet -> Schroedinger.Decoder.t
  val check : Ogg.Stream.packet -> bool
  val get_video_format : Schroedinger.Decoder.t -> Schroedinger.video_format
  val get_picture_number : Schroedinger.Decoder.t -> int
  val decode_frame :
    Schroedinger.Decoder.t -> Ogg.Stream.t -> Schroedinger.frame
end