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;

theorem Th4:
  [5,{},<*d1,t*>] in SCM-Instr S
   proof
     reconsider d1 as Element of SCM-Data-Loc by Th1,AMI_3:27;
      [5,{},<*d1,t*>] in SCM-Instr S by SCMRINGI:9;
    hence thesis;
   end;
