reserve S, R for 1-sorted,
  X for Subset of R,
  T for TopStruct,
  x for set;

theorem
  rng id S = [#]S by RELAT_1:45;
