sig
  val create :
    ?slide:Bogue.Avar.direction ->
    ?adjust:Bogue.Layout.adjust ->
    ?expand:bool ->
    ?canvas:Bogue.Draw.canvas ->
    ?name:string -> (string * Bogue.Layout.t) list -> Bogue.Layout.t
end