reserve I for Element of Segm 8,
  S for non empty 1-sorted,
  t for Element of S,
  x for set,
  k for Element of NAT;
 reserve R for Ring, T for InsType of SCM-Instr R;
reserve R for Ring,
  r for Element of R,
  a, b, c, d1, d2 for Data-Location of R,
  i1 for Nat;
reserve s for State of SCM R;

theorem
 for R being Ring holds
 (the carrier of SCM R) \ {NAT} = SCM-Data-Loc by Lm2;
