theorem Th6:
  [7,<*i1*>,<*d1*>] in SCM-Instr S
   proof
     reconsider d1 as Element of SCM-Data-Loc by Th1,AMI_3:27;
     [7,<*i1*>,<*d1*>] in SCM-Instr S by SCMRINGI:11;
    hence thesis;
   end;
