reserve x,z for set;
reserve k for Element of NAT;
reserve D for non empty set;
reserve X for set;
reserve p,r for relation;
reserve a,a1,a2,b for FinSequence;

theorem Th5:
  {} is relation_length of k
proof
  thus a in {} implies len a = k;
end;
