# HG changeset patch
# User haftmann
# Date 1283411596 -7200
# Node ID 81a70e2835b6c5f529ff96d063620510765ef534
# Parent  7cf8beb31e0fb1ab67fe6ee3e7ad3221cbacb6e5
normalization is allowed to solve True

diff -r 7cf8beb31e0f -r 81a70e2835b6 src/HOL/HOL.thy
--- a/src/HOL/HOL.thy	Thu Sep 02 08:40:25 2010 +0200
+++ b/src/HOL/HOL.thy	Thu Sep 02 09:13:16 2010 +0200
@@ -1996,7 +1996,7 @@
 
 method_setup normalization = {*
   Scan.succeed (K (SIMPLE_METHOD'
-    (CHANGED_PROP o CONVERSION Nbe.dynamic_eval_conv THEN' (fn k => TRY (rtac TrueI k)))))
+    (CHANGED_PROP o (CONVERSION Nbe.dynamic_eval_conv THEN' (fn k => TRY (rtac TrueI k))))))
 *} "solve goal by normalization"