theorem
  Reloc(J,card I) c= I ";" J
 proof
   I ";" J
    = CutLastLoc stop Directed I +* Reloc(J,card stop I -' 1) by Th27
   .= CutLastLoc stop Directed I +* Reloc(J,card I) by COMPOS_1:71;
  hence thesis by FUNCT_4:25;
 end;
