Bimage_display
module Texture : sig ... end
module Window : sig ... end
val show_all : ?update_in_background:bool -> 'a Window.t list -> unit
val show : ?update_in_background:bool -> (string * Bimage.Image.any) list -> unit