theorem Th8:
  A <> {} implies {} in A
proof
A1: {} c= A;
  assume A <> {};
  then {} c< A by A1;
  hence thesis by ORDINAL1:11;
end;
