src/HOL/Semiring_Normalization.thy
changeset 53076 47c9aff07725
parent 52435 6646bb548c6b
child 54230 b1d955791529
--- a/src/HOL/Semiring_Normalization.thy	Sun Aug 18 17:00:10 2013 +0200
+++ b/src/HOL/Semiring_Normalization.thy	Sun Aug 18 18:49:45 2013 +0200
@@ -107,7 +107,7 @@
   "(x ^ p) * (x ^ q) = x ^ (p + q)"
   "x * (x ^ q) = x ^ (Suc q)"
   "(x ^ q) * x = x ^ (Suc q)"
-  "x * x = x ^ 2"
+  "x * x = x\<^sup>2"
   "(x * y) ^ q = (x ^ q) * (y ^ q)"
   "(x ^ p) ^ q = x ^ (p * q)"
   "x ^ 0 = 1"