src/HOL/Decision_Procs/Cooper.thy
changeset 69266 7cc2d66a92a6
parent 69214 74455459973d
child 69597 ff784d5a5bfb
     1.1 --- a/src/HOL/Decision_Procs/Cooper.thy	Thu Nov 08 14:58:04 2018 +0100
     1.2 +++ b/src/HOL/Decision_Procs/Cooper.thy	Thu Nov 08 15:49:56 2018 +0100
     1.3 @@ -2524,7 +2524,7 @@
     1.4        val ps = map_index swap bs;
     1.5        val t' = term_of_fm ps vs (@{code pa} (fm_of_term ps vs t));
     1.6      in Thm.cterm_of ctxt (HOLogic.mk_Trueprop (HOLogic.mk_eq (t, t'))) end
     1.7 -end;
     1.8 +end
     1.9  \<close>
    1.10  
    1.11  ML_file "cooper_tac.ML"