theorem Th1:
  for f being FinSequence holds not 0 in dom f
proof
  let f be FinSequence;
  assume 0 in dom f;
  then 0 in Seg len f by FINSEQ_1:def 3;
  hence contradiction by FINSEQ_1:1;
end;
