theorem
  for s being State of SCM+FSA holds dom (s|FinSeq-Locations) =
  FinSeq-Locations
proof
  let s be State of SCM+FSA;
  FinSeq-Locations c= dom s by Th39;
  hence thesis by RELAT_1:62;
end;
