theorem Th58:
  for S, s holds s is (S^^0)-headed & (S^^0)-head s = {} & (S^^0)-tail s = s
proof
  let S, s;
  A1: s = {}^s by FINSEQ_1:34;
  {} in S^^0 by Th4;
  hence thesis by A1, Th52;
end;
