From 5865d4d79f052cfb190e728e8618cb05e2ac845f Mon Sep 17 00:00:00 2001
From: filliatr
Date: Fri, 19 Nov 1999 09:11:35 +0000
Subject: discriminations nets

git-svn-id: svn+ssh://scm.gforge.inria.fr/svn/coq/trunk@123 85f007b7-540e-0410-9357-904b9bb8a0f7
---
 lib/gmap.mli | 6 ++++++
 1 file changed, 6 insertions(+)

(limited to 'lib/gmap.mli')

diff --git a/lib/gmap.mli b/lib/gmap.mli
index 861e730e26..908bad1bcf 100644
--- a/lib/gmap.mli
+++ b/lib/gmap.mli
@@ -14,3 +14,9 @@ val mem :  'a -> ('a,'b) t -> bool
 val iter : ('a -> 'b -> unit) -> ('a,'b) t -> unit
 val map : ('b -> 'c) -> ('a,'b) t -> ('a,'c) t
 val fold : ('a -> 'b -> 'c -> 'c) -> ('a,'b) t -> 'c -> 'c
+
+(* Additions with respect to ocaml standard library. *)
+
+val dom : ('a,'b) t -> 'a list
+val rng : ('a,'b) t -> 'b list
+val to_list : ('a,'b) t -> ('a * 'b) list
-- 
cgit v1.2.3