theorem Th16: :: FINSEQ_8:5
  mid(p,1,k)=p|k
proof
  1-'1=0 by XREAL_1:232;
  hence thesis by Th10;
end;
