sig
  val cast : 'a Gobject.obj -> Gdk.bitmap
  val create :
    ?window:Gdk.window -> width:int -> height:int -> unit -> Gdk.bitmap
  val create_from_data :
    ?window:Gdk.window -> width:int -> height:int -> string -> Gdk.bitmap
end