# HG changeset patch
# User paulson
# Date 808752002 -7200
# Node ID 91d2c1bb580377cce9fc1ff68ba9b26d11158393
# Parent  87e29e18e97066764abcf21730b565d39c21e9f6
clarified comment

diff -r 87e29e18e970 -r 91d2c1bb5803 src/Provers/classical.ML
--- a/src/Provers/classical.ML	Fri Aug 18 12:28:02 1995 +0200
+++ b/src/Provers/classical.ML	Fri Aug 18 15:20:02 1995 +0200
@@ -186,7 +186,7 @@
      map (pair false) intrs);
 
 (*Priority: prefer rules with fewest subgoals, 
-              then rules added most recently.*)
+  then rules added most recently (preferring the head of the list).*)
 fun tag_brls k [] = []
   | tag_brls k (brl::brls) =
       (1000000*subgoals_of_brl brl + k, brl) ::