theorem Th35:
  a c= X implies [Total a,a] in TOL(X)
proof
  assume
A1: a c= X;
  then Total a in Toler_on_subsets(X) by Th29;
  hence thesis by A1;
end;
