X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=components%2Fextlib%2FhExtlib.mli;h=5b467d00577fb71a44296fc54d537b4301d31453;hb=42f43b29d87e84825a3f6a65674dc30cd670333f;hp=8de41f6837df4a067bab010438a8731a81d35b88;hpb=8e6849498744f64cc2a60b60ac45ccacb169a6bc;p=helm.git diff --git a/components/extlib/hExtlib.mli b/components/extlib/hExtlib.mli index 8de41f683..5b467d005 100644 --- a/components/extlib/hExtlib.mli +++ b/components/extlib/hExtlib.mli @@ -75,9 +75,12 @@ val trim_blanks: string -> string (** strip heading and trailing blanks *) val list_uniq: ?eq:('a->'a->bool) -> 'a list -> 'a list (** uniq unix filter on lists *) val filter_map: ('a -> 'b option) -> 'a list -> 'b list (** filter + map *) +val list_rev_map_filter: ('a -> 'b option) -> 'a list -> 'b list +val list_rev_map_filter_fold: ('c -> 'a -> 'c * 'b option) -> 'c -> 'a list -> 'c * 'b list val list_concat: ?sep:'a list -> 'a list list -> 'a list (**String.concat-like*) val list_findopt: ('a -> 'b option) -> 'a list -> 'b option val flatten_map: ('a -> 'b list) -> 'a list -> 'b list +val list_last: 'a list -> 'a (** split_nth n l * @returns two list, the first contains at least n elements, the second the