tuned op's
authornipkow
Wed, 20 Dec 2017 12:22:36 +0100
changeset 67228 7c7b76695c90
parent 67226 ec32cdaab97b
child 67229 4ecf0ef70efb
tuned op's
src/HOL/Tools/ATP/atp_problem_generate.ML
--- a/src/HOL/Tools/ATP/atp_problem_generate.ML	Tue Dec 19 13:58:12 2017 +0100
+++ b/src/HOL/Tools/ATP/atp_problem_generate.ML	Wed Dec 20 12:22:36 2017 +0100
@@ -1796,7 +1796,7 @@
   else if lam_trans = combs_or_liftingN then
     lift_lams_part_1 ctxt type_enc
     ##> map (fn t => (case head_of (strip_qnt_body @{const_name All} t) of
-                       @{term "op =::bool => bool => bool"} => t
+                       @{term "op = ::bool => bool => bool"} => t
                      | _ => introduce_combinators ctxt (intentionalize_def t)))
     #> lift_lams_part_2 ctxt
   else if lam_trans = keep_lamsN then