
theorem
  for L being complemented' lower-bounded' upper-bounded'
  join-commutative meet-commutative join-idempotent distributive distributive'
  non empty LattStr, x, y being Element of L holds
  x is_a_complement'_of y iff x is_a_complement_of y
by Th19,Th18;
