class type box =object..end
method add : 'a. ?position:int -> ?expand:bool -> (#t as 'a) -> unitadd ?position ?expand widget adds a widget to the box. If
expand is true (the default) then widget will occupy as
much space as possible. If position is not specified then
the widget is appended to the end of the widget list. It
raises LTerm_widget.Out_of_range if the given position is negative or
exceed the number of widgets.method remove : 'b. (#t as 'b) -> unitremove widget remove a widget from the box.