let L be non empty right_complementable Abelian add-associative right_zeroed well-unital distributive commutative doubleLoopStr ; :: thesis: for p being Polynomial of L holds p `^ 0 = 1_. L
let p be Polynomial of L; :: thesis: p `^ 0 = 1_. L
reconsider p1 = p as Element of (Polynom-Ring L) by POLYNOM3:def 10;
thus p `^ 0 = (power (Polynom-Ring L)) . (p1,0)
.= 1_ (Polynom-Ring L) by GROUP_1:def 7
.= 1_. L by POLYNOM3:37 ; :: thesis: verum