--- a/src/HOL/Tools/Metis/metis_translate.ML Tue Jul 26 14:53:00 2011 +0200
+++ b/src/HOL/Tools/Metis/metis_translate.ML Tue Jul 26 14:53:00 2011 +0200
@@ -197,8 +197,7 @@
*)
val (atp_problem, _, _, _, _, _, sym_tab) =
prepare_atp_problem ctxt CNF Hypothesis Axiom type_enc true false
- (rpair [] o map (introduce_combinators ctxt))
- false false [] @{prop False} props
+ (rpair []) false false [] @{prop False} props
(*
val _ = tracing ("ATP PROBLEM: " ^
cat_lines (tptp_lines_for_atp_problem CNF atp_problem))