sig
  val create :
    ?dst:Bogue.Layout.t ->
    ?name:string ->
    ?action:(int -> unit) ->
    ?fg:Bogue.Draw.color -> string array -> int -> Bogue.Layout.t
end