fixed format selection logic for Waldmeister
authorblanchet
Wed, 08 Jun 2011 16:20:18 +0200
changeset 43289 0f2bbcfaf208
parent 43288 7a4eebdebb23
child 43290 07eb0ad9bb93
fixed format selection logic for Waldmeister
src/HOL/Tools/ATP/atp_translate.ML
--- a/src/HOL/Tools/ATP/atp_translate.ML	Wed Jun 08 16:20:18 2011 +0200
+++ b/src/HOL/Tools/ATP/atp_translate.ML	Wed Jun 08 16:20:18 2011 +0200
@@ -625,7 +625,7 @@
        CNF_UEQ =>
        (CNF_UEQ, case type_sys of
                    Preds stuff =>
-                   (if is_type_sys_fairly_sound type_sys then Preds else Tags)
+                   (if is_type_sys_fairly_sound type_sys then Tags else Preds)
                        stuff
                  | _ => type_sys)
      | format => (format, type_sys))