reserve i,j for Nat;
reserve i,j for Nat,
  x for variable,
  l for quasi-loci;
reserve C for initialized ConstructorSignature,
  c for constructor OperSymbol of C;

theorem
  kind_of set-constr = a_Type & loci_of set-constr = {} &
  index_of set-constr = 0;
