
theorem
  for L being add-associative right_zeroed right_complementable
  left-distributive non empty doubleLoopStr holds {0.L} is RightIdeal of L;
