X-Git-Url: http://matita.cs.unibo.it/gitweb/?a=blobdiff_plain;f=helm%2Focaml%2Fmetadata%2FsqlStatements.ml;h=262188e13699b214c31e9b332dda9bf84382b37e;hb=4167cea65ca58897d1a3dbb81ff95de5074700cc;hp=ecfade5177a62afad39c097d0091c2366c276527;hpb=1fbd5af6e9d6c15a4708482767ccdc4214f80872;p=helm.git

diff --git a/helm/ocaml/metadata/sqlStatements.ml b/helm/ocaml/metadata/sqlStatements.ml
index ecfade517..262188e13 100644
--- a/helm/ocaml/metadata/sqlStatements.ml
+++ b/helm/ocaml/metadata/sqlStatements.ml
@@ -100,7 +100,6 @@ sprintf "CREATE INDEX %s_source ON %s (source);" name name ;
 sprintf "CREATE INDEX %s_no ON %s (no);" name name] 
 
 let sprintf_count_index name = [
-sprintf "CREATE INDEX %s_source ON %s (source);" name name;
 sprintf "CREATE INDEX %s_conclusion ON %s (conclusion);" name name;
 sprintf "CREATE INDEX %s_hypothesis ON %s (hypothesis);" name name;
 sprintf "CREATE INDEX %s_statement ON %s (statement);" name name]