diff options
Diffstat (limited to 'lib/tlm.mli')
| -rw-r--r-- | lib/tlm.mli | 32 |
1 files changed, 32 insertions, 0 deletions
diff --git a/lib/tlm.mli b/lib/tlm.mli new file mode 100644 index 00000000..a3011932 --- /dev/null +++ b/lib/tlm.mli @@ -0,0 +1,32 @@ +(************************************************************************) +(* v * The Coq Proof Assistant / The Coq Development Team *) +(* <O___,, * CNRS-Ecole Polytechnique-INRIA Futurs-Universite Paris Sud *) +(* \VV/ **************************************************************) +(* // * This file is distributed under the terms of the *) +(* * GNU Lesser General Public License Version 2.1 *) +(************************************************************************) + +(*i $Id: tlm.mli,v 1.5.16.1 2004/07/16 19:30:31 herbelin Exp $ i*) + +(* Tries. This module implements a data structure [('a,'b) t] mapping lists + of values of type ['a] to sets (as lists) of values of type ['b]. *) + +type ('a,'b) t + +val empty : ('a,'b) t + +(* Work on labels, not on paths. *) + +val map : ('a,'b) t -> 'a -> ('a,'b) t +val xtract : ('a,'b) t -> 'b list +val dom : ('a,'b) t -> 'a list +val in_dom : ('a,'b) t -> 'a -> bool + +(* Work on paths, not on labels. *) + +val add : ('a,'b) t -> 'a list * 'b -> ('a,'b) t +val rmv : ('a,'b) t -> ('a list * 'b) -> ('a,'b) t + +val app : (('a list * 'b) -> unit) -> ('a,'b) t -> unit +val to_list : ('a,'b) t -> ('a list * 'b) list + |