sig
  module Stdlib :
    sig
      val compare : '-> '-> int
      val succ : int -> int
      val incr : int Pervasives.ref -> unit
      val min : '-> '-> 'a
      val max : '-> '-> 'a
      val min_int : int
      val max_int : int
    end
  module Dynlink : sig val init : unit -> unit end
  module Float : sig val max_float : float end
  module Format :
    sig
      type stag
      val string_of_stag : Transitioning.Format.stag -> string
      val stag_of_string : string -> Transitioning.Format.stag
      type formatter_stag_functions = {
        mark_open_stag : Transitioning.Format.stag -> string;
        mark_close_stag : Transitioning.Format.stag -> string;
        print_open_stag : Transitioning.Format.stag -> unit;
        print_close_stag : Transitioning.Format.stag -> unit;
      }
      val pp_set_formatter_stag_functions :
        Format.formatter ->
        Transitioning.Format.formatter_stag_functions -> unit
      val pp_get_formatter_stag_functions :
        Format.formatter ->
        unit -> Transitioning.Format.formatter_stag_functions
      val pp_open_stag :
        Format.formatter -> Transitioning.Format.stag -> unit
      val pp_close_stag : Format.formatter -> unit -> unit
    end
  module Q : sig val to_float : Q.t -> float end
end