
theorem Th15:
  for L be Abelian add-associative right_zeroed
  right_complementable well-unital commutative distributive non empty
  doubleLoopStr for p be Polynomial of L holds p`^0 = 1_.(L)
proof
  let L be Abelian add-associative right_zeroed right_complementable
  well-unital commutative distributive non empty doubleLoopStr;
  let p be Polynomial of 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;
end;
