theorem Th51:
  len p = k + l & q = p | Seg k implies len q = k
proof
  assume that
A1: len p = k + l and
A2: q = p | Seg k;
  k <= len p by A1,NAT_1:12;
  hence thesis by A2,FINSEQ_1:17;
end;
