sig
  val configure :
    ?after:'a Widget.widget ->
    ?anchor:Tk.anchor ->
    ?before:'b Widget.widget ->
    ?expand:bool ->
    ?fill:Tk.fillMode ->
    ?inside:'c Widget.widget ->
    ?ipadx:int ->
    ?ipady:int ->
    ?padx:int -> ?pady:int -> ?side:Tk.side -> 'd Widget.widget list -> unit
  val forget : 'a Widget.widget list -> unit
  val info : 'a Widget.widget -> string
  val propagate_get : 'a Widget.widget -> bool
  val propagate_set : 'a Widget.widget -> bool -> unit
  val slaves : 'a Widget.widget -> Widget.any Widget.widget list
end