diff -r 05ff40b255eb -r c51b4196b5e6 src/HOL/Tools/Metis/metis_translate.ML
--- 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))