theorem Th121:
  for f be FinSequence st f in doms(n,k) holds len f = k
proof
  let f be FinSequence;
  assume f in doms(n,k);
  then ex s be Element of (Seg n)* st f=s & len s= k;
  hence thesis;
end;
