reserve L for Boolean non empty RelStr;
reserve a,b,c,d for Element of L;

theorem Th34:
  a"/\"'not' a = Bottom L & a"\/"'not' a = Top L
proof
  'not' a is_a_complement_of a by Th11;
  hence thesis by WAYBEL_1:def 23;
end;
