1 process for now

[helm.git] / helm / software / components / binaries / matitaprover / matitaprover.ml

diff --git a/helm/software/components/binaries/matitaprover/matitaprover.ml b/helm/software/components/binaries/matitaprover/matitaprover.ml
index 35d6fd79c4ea6468bbc498b8ac175a108992b266..c029cfa228317690d81e14b0978ee88191cc381d 100644 (file)
--- a/helm/software/components/binaries/matitaprover/matitaprover.ml
+++ b/helm/software/components/binaries/matitaprover/matitaprover.ml
@@ -197,9 +197,11 @@ usage: matitaprover [options] problemfile";
         let module M = Main(struct let cmp (a,_) (b,_) = compare a b end) in
         M.main goal hypotheses)
     ;
+(*
       (fun () ->     
         let module M = Main(struct let cmp (a,_) (b,_) = compare b a end) in
         M.main goal hypotheses)
+*)
     ];
   let rec aux () =
     if List.length !childs = 0 then