src/Sequents/simpdata.ML
changeset 46186 9ae331a1d8c5
parent 45659 09539cdffcd7
child 51717 9e7d1c139569
--- a/src/Sequents/simpdata.ML	Wed Jan 11 16:23:59 2012 +0100
+++ b/src/Sequents/simpdata.ML	Wed Jan 11 16:25:34 2012 +0100
@@ -75,7 +75,7 @@
   |> Simplifier.set_mkcong mk_meta_cong;
 
 val LK_simps =
-   [triv_forall_equality, (* prunes params *)
+   [@{thm triv_forall_equality}, (* prunes params *)
     @{thm refl} RS @{thm P_iff_T}] @
     @{thms conj_simps} @ @{thms disj_simps} @ @{thms not_simps} @
     @{thms imp_simps} @ @{thms iff_simps} @ @{thms quant_simps} @