]> matita.cs.unibo.it Git - helm.git/commitdiff
removed only made with the DB
authorEnrico Tassi <enrico.tassi@inria.fr>
Mon, 2 Oct 2006 15:16:02 +0000 (15:16 +0000)
committerEnrico Tassi <enrico.tassi@inria.fr>
Mon, 2 Oct 2006 15:16:02 +0000 (15:16 +0000)
helm/software/components/metadata/metadataConstraints.ml

index f9766a7350e12bf652bd69e727a183c399e6f817..6c373f18036677cf454d256fd79e264f2161a49e 100644 (file)
@@ -546,9 +546,11 @@ let compute_with_only ~(dbd:HMysql.dbd) ?(facts=false) ?(where = `Conclusion)
           maximal_prefixes)
     in
 (*     Printf.fprintf stderr "all: %d\n" (List.length all);flush_all (); *)
+(*
     List.filter (function (_,uri) -> 
-(*       prerr_endline ("W" ^UriManager.string_of_uri uri); *)
-      at_most ~dbd ~where constants uri) all 
+      at_most ~dbd ~where constants uri) 
+*)
+    all 
     in
   let equal_to = compute_exactly ~dbd ~facts ~where main prefixes in
     greater_than @ equal_to