]> matita.cs.unibo.it Git - helm.git/commitdiff
We order alternatives according to the number of subgoals they open.
authorAndrea Asperti <andrea.asperti@unibo.it>
Thu, 20 Oct 2011 15:54:22 +0000 (15:54 +0000)
committerAndrea Asperti <andrea.asperti@unibo.it>
Thu, 20 Oct 2011 15:54:22 +0000 (15:54 +0000)
matitaB/components/ng_tactics/nnAuto.ml

index d77fd2f743a3e7a2427cd8e1e65f636c1adca6dc..8cf11d98cd939c4173e363a4787429f7494de308 100644 (file)
@@ -1393,8 +1393,8 @@ let do_something signature flags status g depth gty cache =
   (* states in l1 have have an empty set of subgoals: no point to sort them *)
   debug_print ~depth 
     (lazy ("alternatives = " ^ (string_of_int (List.length (l1@l@l2)))));
-    (* l1 @ (sort_new_elems (l @ l2)), cache *)
-    l1 @ (List.rev l2) @ l, cache 
+    (* we order alternatives w.r.t the number of subgoals they open *)
+    l1 @ (sort_new_elems l2) @ l), cache 
 ;;
 
 let pp_goal = function