theorem
  (Partial_Intersection XSeq).n c= XSeq.n by Th8;
