--- a/src/HOL/RelPow.thy Fri Jul 24 13:02:01 1998 +0200 +++ b/src/HOL/RelPow.thy Fri Jul 24 13:03:20 1998 +0200 @@ -8,7 +8,7 @@ RelPow = Nat + -primrec "op ^" nat +primrec "R^0 = id" "R^(Suc n) = R O (R^n)"