sig
  val configure :
    ?background:Tk.color ->
    ?data:string ->
    ?file:string ->
    ?foreground:Tk.color ->
    ?maskdata:string -> ?maskfile:string -> Tk.imageBitmap -> unit
  val configure_get : Tk.imageBitmap -> string
  val create :
    ?name:Tk.imageBitmap ->
    ?background:Tk.color ->
    ?data:string ->
    ?file:string ->
    ?foreground:Tk.color ->
    ?maskdata:string -> ?maskfile:string -> unit -> [> `Bitmap of string ]
  val delete : Tk.imageBitmap -> unit
  val height : Tk.imageBitmap -> int
  val width : Tk.imageBitmap -> int
end