X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=helm%2Focaml%2Ftactics%2FdiscriminationTactics.ml;h=9e5bc7f43e1d3885225d6f3ecd24dbab01faab73;hb=6bbeb650abc3a94e76d683aa47b2e46254d495d1;hp=dd122ee4850419326ef50c38afa31022d25e9915;hpb=afa05d30f20de12e031c3e5c3e5c33c19c42a7d8;p=helm.git

diff --git a/helm/ocaml/tactics/discriminationTactics.ml b/helm/ocaml/tactics/discriminationTactics.ml
index dd122ee48..9e5bc7f43 100644
--- a/helm/ocaml/tactics/discriminationTactics.ml
+++ b/helm/ocaml/tactics/discriminationTactics.ml
@@ -23,6 +23,8 @@
  * http://cs.unibo.it/helm/.
  *)
 
+(* $Id$ *)
+
 let debug_print = fun _ -> ()
 
 let rec injection_tac ~term =