sig
  val room_margin : int
  val scale_int : int -> int
  val set_text_font : string -> unit
  val set_label_font : string -> unit
  val set_scale : float -> unit
  val set_integer_scale : bool -> unit
  val find_share : string -> string -> string option
  val get_path : ?path:string list -> string -> string
  val get_font_path_opt : string -> string option
end