src/HOL/TPTP/atp_problem_import.ML
changeset 57268 027feff882c4
parent 57154 f0eff6393a32
child 57547 677b07d777c3
--- a/src/HOL/TPTP/atp_problem_import.ML	Mon Jun 16 19:42:44 2014 +0200
+++ b/src/HOL/TPTP/atp_problem_import.ML	Mon Jun 16 19:44:02 2014 +0200
@@ -319,8 +319,8 @@
     val presimp = true
     val facts = map (apfst (rpair (Global, Non_Rec_Def))) defs @
       map (apfst (rpair (Global, General))) nondefs
-    val (atp_problem, _, _, _, _) =
-      prepare_atp_problem ctxt format Hypothesis (type_enc_of_string Strict type_enc) Translator
+    val (atp_problem, _, _, _) =
+      generate_atp_problem ctxt format Hypothesis (type_enc_of_string Strict type_enc) Translator
         lam_trans uncurried_aliases readable_names presimp [] conj facts
 
     val ord = effective_term_order ctxt spassN