sig
  type raw_data_type =
      (char, Bigarray.int8_unsigned_elt, Bigarray.c_layout) Bigarray.Array1.t
  exception LoadFailure
  module Time :
    sig
      type t
      val as_seconds : OcsfmlSystem.Time.t -> float
      val as_milliseconds : OcsfmlSystem.Time.t -> int
      val as_microseconds : OcsfmlSystem.Time.t -> int64
      val seconds : float -> OcsfmlSystem.Time.t
      val milliseconds : int -> OcsfmlSystem.Time.t
      val microseconds : int64 -> OcsfmlSystem.Time.t
      val add :
        OcsfmlSystem.Time.t -> OcsfmlSystem.Time.t -> OcsfmlSystem.Time.t
      val sub :
        OcsfmlSystem.Time.t -> OcsfmlSystem.Time.t -> OcsfmlSystem.Time.t
      val mul : OcsfmlSystem.Time.t -> int64 -> OcsfmlSystem.Time.t
      val mul_float : OcsfmlSystem.Time.t -> float -> OcsfmlSystem.Time.t
      val div : OcsfmlSystem.Time.t -> int64 -> OcsfmlSystem.Time.t
      val div_float : OcsfmlSystem.Time.t -> float -> OcsfmlSystem.Time.t
    end
  module Clock :
    sig
      type t
      val destroy : OcsfmlSystem.Clock.t -> unit
      val create : unit -> OcsfmlSystem.Clock.t
      val get_elapsed_time : OcsfmlSystem.Clock.t -> OcsfmlSystem.Time.t
      val restart : OcsfmlSystem.Clock.t -> OcsfmlSystem.Time.t
    end
  class clock :
    object
      val t_clockCpp : OcsfmlSystem.Clock.t
      method destroy : unit
      method get_elapsed_time : OcsfmlSystem.Time.t
      method rep__sf_Clock : OcsfmlSystem.Clock.t
      method restart : OcsfmlSystem.Time.t
    end
  val sleep : OcsfmlSystem.Time.t -> unit
  class virtual input_stream :
    object
      method virtual get_size : int
      method virtual read : OcsfmlSystem.raw_data_type -> int -> int
      method virtual seek : int -> int
      method virtual tell : int
    end
end