theorem
  for k being Element of Seg i holds (idseq i).k = k;
