
theorem
  for L being add-associative right_zeroed right_complementable
  well-unital Abelian distributive non empty doubleLoopStr
  holds 1.Polynom-Ring L = 1_.L by Def10;
