]> matita.cs.unibo.it Git - helm.git/commitdiff
Removed duplicated uri in sigmatch
authorMatteo Selmi <matteo.selmi@mail.polimi.it>
Wed, 17 Nov 2004 12:48:55 +0000 (12:48 +0000)
committerMatteo Selmi <matteo.selmi@mail.polimi.it>
Wed, 17 Nov 2004 12:48:55 +0000 (12:48 +0000)
helm/ocaml/metadata/metadataConstraints.ml

index 5dcfae44df4a831545956859f61ae1ad3f88e633..c5119433c988343b13b2aace187b869ab349ee82 100644 (file)
@@ -547,7 +547,7 @@ let sigmatch ~(dbd:Mysql.dbd)
         let subsets = 
           let subsets = power constants in
           let types_no = List.length types in
-          (0,[]) :: List.map (function (n,l) -> (n+types_no,types@l)) subsets
+          List.map (function (n,l) -> (n+types_no,types@l)) subsets
         in
         compute_exactly ~dbd ~facts ~where main subsets