theorem Th29:
  (Top BL)` = Bottom BL
proof
  set a=Bottom BL;
  thus (Top BL)` = (a "\/" a`)` by LATTICES:21
    .= a` "/\"a``
    .= Bottom BL;
end;
