let create ?label () =
    match label with None -> create []
    | Some label -> create_with_label label