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;
reserve a,a9 for quasi-adjective,
  t,t1,t2 for quasi-term,
  T for quasi-type,

  c for Element of Constructors;

theorem
  for l being empty quasi-loci holds {} is type-distribution of l
  proof
    let l be empty quasi-loci;
    reconsider d = {} as PartFunc of Vars, QuasiTypes by RELSET_1:12;
    dom d = rng l & d is even;
    hence thesis by Def30;
  end;
