X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=helm%2Focaml%2Fcic%2Fdiscrimination_tree.ml;h=0bef85a8cc4e7ea1d89c3f708c025c0c998cb545;hb=2ca2baa7b345693c7684994130707fb152227931;hp=6e252901631c4465917ea76042f44513378787ac;hpb=20ea4afc703668c1c643aaf81d62aeae51be36a1;p=helm.git

diff --git a/helm/ocaml/cic/discrimination_tree.ml b/helm/ocaml/cic/discrimination_tree.ml
index 6e2529016..0bef85a8c 100644
--- a/helm/ocaml/cic/discrimination_tree.ml
+++ b/helm/ocaml/cic/discrimination_tree.ml
@@ -23,6 +23,8 @@
  * http://cs.unibo.it/helm/.
  *)
 
+(* $Id$ *)
+
 module DiscriminationTreeIndexing =  
   functor (A:Set.S) -> 
     struct