author | wenzelm |
Sat, 20 May 2006 23:36:51 +0200 | |
changeset 19684 | 6101fbebda1d |
parent 19683 | 3620e494cef2 |
child 19685 | 4477003648cc |
--- a/src/HOL/Algebra/Group.thy Sat May 20 23:36:49 2006 +0200 +++ b/src/HOL/Algebra/Group.thy Sat May 20 23:36:51 2006 +0200 @@ -34,7 +34,7 @@ consts pow :: "[('a, 'm) monoid_scheme, 'a, 'b::number] => 'a" (infixr "'(^')\<index>" 75) -defs (overloaded) +defs (unchecked overloaded) nat_pow_def: "pow G a n == nat_rec \<one>\<^bsub>G\<^esub> (%u b. b \<otimes>\<^bsub>G\<^esub> a) n" int_pow_def: "pow G a z == let p = nat_rec \<one>\<^bsub>G\<^esub> (%u b. b \<otimes>\<^bsub>G\<^esub> a)