
theorem Th23:
  for L be lower-bounded sup-Semilattice holds InclPoset Ids
  CompactSublatt L is CLSubFrame of BoolePoset the carrier of CompactSublatt L
proof
  let L be lower-bounded sup-Semilattice;
  CompactSublatt L is lower-bounded sup-Semilattice by Th15;
  hence thesis by Th8;
end;
