theorem
  for x being Element of A st Class (the InternalRel of A, x) meets X
  holds x in UAp X;
