src/HOL/Tools/simpdata.ML
changeset 38558 32ad17fe2b9c
parent 37744 3daaf23b9ab4
child 38715 6513ea67d95d
--- a/src/HOL/Tools/simpdata.ML	Thu Aug 19 16:08:54 2010 +0200
+++ b/src/HOL/Tools/simpdata.ML	Thu Aug 19 16:08:59 2010 +0200
@@ -45,7 +45,7 @@
   (*expects Trueprop if not == *)
   of Const (@{const_name "=="},_) $ _ $ _ => th
    | _ $ (Const (@{const_name "op ="}, _) $ _ $ _) => mk_meta_eq th
-   | _ $ (Const (@{const_name "Not"}, _) $ _) => th RS @{thm Eq_FalseI}
+   | _ $ (Const (@{const_name Not}, _) $ _) => th RS @{thm Eq_FalseI}
    | _ => th RS @{thm Eq_TrueI}
 
 fun mk_eq_True (_: simpset) r =