author | haftmann |
Tue, 28 Apr 2009 16:58:23 +0200 | |
changeset 31019 | 0a38079e789b |
parent 31018 | b8a8cf6e16f2 |
child 31020 | 9999a77590c3 |
--- a/src/HOL/NSA/NSComplex.thy Tue Apr 28 15:50:32 2009 +0200 +++ b/src/HOL/NSA/NSComplex.thy Tue Apr 28 16:58:23 2009 +0200 @@ -383,7 +383,7 @@ by transfer (rule power_mult_distrib) lemma hcpow_zero2 [simp]: - "\<And>n. 0 pow (hSuc n) = (0::'a::{semiring_0} star)" + "\<And>n. 0 pow (hSuc n) = (0::'a::{power,semiring_0} star)" by transfer (rule power_0_Suc) lemma hcpow_not_zero [simp,intro]: