reserve p,q,r for FinSequence;
reserve u,v,x,y,y1,y2,z for object, A,D,X,Y for set;
reserve i,j,k,l,m,n for Nat;

theorem Th18:
  Seg k c= Seg(k + n) by FINSEQ_1:5,NAT_1:12;
