sort E weights
authorblanchet
Tue, 08 Feb 2011 16:10:09 +0100
changeset 425901ef01508bb9b
parent 42589 7cca2de89296
child 42591 ab3f6d76fb23
sort E weights
src/HOL/Tools/Sledgehammer/sledgehammer_atp_translate.ML
     1.1 --- a/src/HOL/Tools/Sledgehammer/sledgehammer_atp_translate.ML	Tue Feb 08 16:10:08 2011 +0100
     1.2 +++ b/src/HOL/Tools/Sledgehammer/sledgehammer_atp_translate.ML	Tue Feb 08 16:10:09 2011 +0100
     1.3 @@ -681,5 +681,6 @@
     1.4    |> add_conjectures_weights (these (AList.lookup (op =) problem conjsN))
     1.5    |> add_facts_weights (these (AList.lookup (op =) problem factsN))
     1.6    |> Symtab.dest
     1.7 +  |> sort (prod_ord Real.compare string_ord o pairself swap)
     1.8  
     1.9  end;