src/HOL/Tools/Metis/metis_tactic.ML

           kbo_advisory_simp_ordering (ord_info ())
         else
           Metis_KnuthBendixOrder.default
     fun fall_back () =
       (verbose_warning ctxt
-           ("Falling back on " ^
-            quote (metis_call (hd fallback_type_encs) lam_trans) ^ "...");
+           ("Falling back on " ^ quote (metis_call (hd fallback_type_encs) lam_trans) ^ "...");
        FOL_SOLVE fallback_type_encs lam_trans ctxt cls ths0)
   in
     (case filter (fn t => prop_of t aconv @{prop False}) cls of
          false_th :: _ => [false_th RS @{thm FalseE}]
        | [] =>