theorem Th13:
  X |- TAUT(A)
proof
  TAUT(A) c= Cn(X) by CQC_THE1:39;
  hence thesis by Th7;
end;
