theorem Th53:
  for S, s st s in S holds S-head s = s & S-tail s = {}
proof
  let S, s;
  assume s in S;
  then S-head (s^{}) = s & S-tail (s^{}) = {} by Th52;
  hence thesis by FINSEQ_1:34;
end;
