theorem Th1:
  for o being Object of SCM+FSA st o in Data-Locations SCM+FSA
   holds o is Int-Location or o is FinSeq-Location
proof
  let o be Object of SCM+FSA;
  assume o in Data-Locations SCM+FSA;
   then o in SCM-Data-Loc or o in SCM+FSA-Data*-Loc
    by SCMFSA_2:100,XBOOLE_0:def 3;
  hence thesis by AMI_2:def 16,SCMFSA_2:def 5;
end;
