theorem Th9:
  (Computation s).1 = Following s
proof
  (Computation s).(0+1) = Following (Computation s).0 by Def7
    .=Following s by Def7;
  hence thesis;
end;
